pkgsrc-WIP-changes archive
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]
cyclone: move to cyclone-bootstrap
Module Name: pkgsrc-wip
Committed By: Yorick Hardy <yorickhardy%gmail.com@localhost>
Pushed By: yhardy
Date: Thu Feb 29 01:04:58 2024 +0200
Changeset: 3b42e4e2518b52e4dd780ce86030219ec4f1ad9c
Added Files:
cyclone-bootstrap/DESCR
cyclone-bootstrap/Makefile
cyclone-bootstrap/PLIST
cyclone-bootstrap/distinfo
cyclone-bootstrap/patches/patch-Makefile
cyclone-bootstrap/patches/patch-Makefile.config
cyclone-bootstrap/patches/patch-scheme_base.c
cyclone-bootstrap/patches/patch-scheme_base.sld
Log Message:
cyclone: move to cyclone-bootstrap
This move is in preparation for importing the full cyclone package,
and this package will be used for the bootstrapping stage only.
By keeping the bootstrapping package and main package separate, the
patches for cyclone will be simpler, since the generated C files
will not need to be patched.
To see a diff of this commit:
https://wip.pkgsrc.org/cgi-bin/gitweb.cgi?p=pkgsrc-wip.git;a=commitdiff;h=3b42e4e2518b52e4dd780ce86030219ec4f1ad9c
Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.
diffstat:
cyclone-bootstrap/DESCR | 11 +
cyclone-bootstrap/Makefile | 23 +
cyclone-bootstrap/PLIST | 183 +
cyclone-bootstrap/distinfo | 9 +
cyclone-bootstrap/patches/patch-Makefile | 46 +
cyclone-bootstrap/patches/patch-Makefile.config | 31 +
cyclone-bootstrap/patches/patch-scheme_base.c | 70370 ++++++++++++++++++++++
cyclone-bootstrap/patches/patch-scheme_base.sld | 31 +
8 files changed, 70704 insertions(+)
diffs:
diff --git a/cyclone-bootstrap/DESCR b/cyclone-bootstrap/DESCR
new file mode 100644
index 0000000000..55634c6031
--- /dev/null
+++ b/cyclone-bootstrap/DESCR
@@ -0,0 +1,11 @@
+Cyclone is an R7RS Scheme-to-C compiler that uses a variant of
+Cheney on the MTA (http://www.pipeline.com/~hbaker1/CheneyMTA.html)
+to implement full tail recursion, continuations, and generational
+garbage collection. In addition, the Cheney on the MTA concept
+has been extended to allow execution of multiple native threads.
+An on-the-fly garbage collector is used to manage the second-generation
+heap and perform major collections without "stopping the world".
+
+Cyclone is written entirely in the latest R7RS Scheme language
+standard, and the intent is to support as much of that language as
+possible.
diff --git a/cyclone-bootstrap/Makefile b/cyclone-bootstrap/Makefile
new file mode 100644
index 0000000000..56bc69985c
--- /dev/null
+++ b/cyclone-bootstrap/Makefile
@@ -0,0 +1,23 @@
+# $NetBSD$
+
+DISTNAME= ${GITHUB_TAG}
+PKGNAME= cyclone-${DISTNAME:S,^v,,}
+CATEGORIES= lang
+MASTER_SITES= ${MASTER_SITE_GITHUB:=justinethier/}
+GITHUB_PROJECT= cyclone-bootstrap
+GITHUB_TAG= v0.36.0
+DIST_SUBDIR= ${GITHUB_PROJECT}
+
+MAINTAINER= pkgsrc-users%NetBSD.org@localhost
+HOMEPAGE= https://justinethier.github.io/cyclone/
+COMMENT= Scheme-to-C compiler
+LICENSE= mit
+
+WRKSRC= ${WRKDIR}/cyclone-bootstrap-${DISTNAME:S,^v,,}
+USE_TOOLS+= gmake pkg-config
+
+PKGCONFIG_OVERRIDE+= third-party/libtommath-1.2.0/libtommath.pc.in
+
+.include "../../devel/concurrencykit/buildlink3.mk"
+.include "../../math/ltm/buildlink3.mk"
+.include "../../mk/bsd.pkg.mk"
diff --git a/cyclone-bootstrap/PLIST b/cyclone-bootstrap/PLIST
new file mode 100644
index 0000000000..84bf645d77
--- /dev/null
+++ b/cyclone-bootstrap/PLIST
@@ -0,0 +1,183 @@
+@comment $NetBSD$
+bin/cyclone
+bin/icyc
+bin/winds
+include/cyclone/bignum.h
+include/cyclone/ck_ht_hash.h
+include/cyclone/hashset.h
+include/cyclone/runtime-main.h
+include/cyclone/runtime.h
+include/cyclone/types.h
+lib/libcyclone.a
+share/cyclone/cyclone/concurrent.o
+share/cyclone/cyclone/concurrent.sld
+share/cyclone/cyclone/concurrent.so
+share/cyclone/cyclone/foreign.meta
+share/cyclone/cyclone/foreign.o
+share/cyclone/cyclone/foreign.sld
+share/cyclone/cyclone/foreign.so
+share/cyclone/cyclone/match.meta
+share/cyclone/cyclone/match.o
+share/cyclone/cyclone/match.sld
+share/cyclone/cyclone/match.so
+share/cyclone/cyclone/test.meta
+share/cyclone/cyclone/test.o
+share/cyclone/cyclone/test.scm
+share/cyclone/cyclone/test.sld
+share/cyclone/cyclone/test.so
+share/cyclone/scheme/base.o
+share/cyclone/scheme/base.sld
+share/cyclone/scheme/base.so
+share/cyclone/scheme/case-lambda.o
+share/cyclone/scheme/case-lambda.sld
+share/cyclone/scheme/case-lambda.so
+share/cyclone/scheme/char.o
+share/cyclone/scheme/char.sld
+share/cyclone/scheme/char.so
+share/cyclone/scheme/complex.o
+share/cyclone/scheme/complex.sld
+share/cyclone/scheme/complex.so
+share/cyclone/scheme/cxr.o
+share/cyclone/scheme/cxr.sld
+share/cyclone/scheme/cxr.so
+share/cyclone/scheme/cyclone/ast.o
+share/cyclone/scheme/cyclone/ast.sld
+share/cyclone/scheme/cyclone/ast.so
+share/cyclone/scheme/cyclone/cgen.o
+share/cyclone/scheme/cyclone/cgen.sld
+share/cyclone/scheme/cyclone/cgen.so
+share/cyclone/scheme/cyclone/common.o
+share/cyclone/scheme/cyclone/common.sld
+share/cyclone/scheme/cyclone/common.so
+share/cyclone/scheme/cyclone/cps-opt-analyze-call-graph.scm
+share/cyclone/scheme/cyclone/cps-opt-local-var-redux.scm
+share/cyclone/scheme/cyclone/cps-opt-memoize-pure-fncs.scm
+share/cyclone/scheme/cyclone/cps-optimizations.o
+share/cyclone/scheme/cyclone/cps-optimizations.sld
+share/cyclone/scheme/cyclone/cps-optimizations.so
+share/cyclone/scheme/cyclone/hashset.o
+share/cyclone/scheme/cyclone/hashset.sld
+share/cyclone/scheme/cyclone/hashset.so
+share/cyclone/scheme/cyclone/libraries.o
+share/cyclone/scheme/cyclone/libraries.sld
+share/cyclone/scheme/cyclone/libraries.so
+share/cyclone/scheme/cyclone/macros.o
+share/cyclone/scheme/cyclone/macros.sld
+share/cyclone/scheme/cyclone/macros.so
+share/cyclone/scheme/cyclone/pass-validate-syntax.scm
+share/cyclone/scheme/cyclone/pretty-print.o
+share/cyclone/scheme/cyclone/pretty-print.sld
+share/cyclone/scheme/cyclone/pretty-print.so
+share/cyclone/scheme/cyclone/primitives.o
+share/cyclone/scheme/cyclone/primitives.sld
+share/cyclone/scheme/cyclone/primitives.so
+share/cyclone/scheme/cyclone/transforms.o
+share/cyclone/scheme/cyclone/transforms.sld
+share/cyclone/scheme/cyclone/transforms.so
+share/cyclone/scheme/cyclone/util.o
+share/cyclone/scheme/cyclone/util.sld
+share/cyclone/scheme/cyclone/util.so
+share/cyclone/scheme/eval.o
+share/cyclone/scheme/eval.sld
+share/cyclone/scheme/eval.so
+share/cyclone/scheme/file.o
+share/cyclone/scheme/file.sld
+share/cyclone/scheme/file.so
+share/cyclone/scheme/inexact.o
+share/cyclone/scheme/inexact.sld
+share/cyclone/scheme/inexact.so
+share/cyclone/scheme/lazy.o
+share/cyclone/scheme/lazy.sld
+share/cyclone/scheme/lazy.so
+share/cyclone/scheme/load.o
+share/cyclone/scheme/load.sld
+share/cyclone/scheme/load.so
+share/cyclone/scheme/process-context.o
+share/cyclone/scheme/process-context.sld
+share/cyclone/scheme/process-context.so
+share/cyclone/scheme/read.o
+share/cyclone/scheme/read.sld
+share/cyclone/scheme/read.so
+share/cyclone/scheme/repl.o
+share/cyclone/scheme/repl.sld
+share/cyclone/scheme/repl.so
+share/cyclone/scheme/time.o
+share/cyclone/scheme/time.sld
+share/cyclone/scheme/time.so
+share/cyclone/scheme/write.o
+share/cyclone/scheme/write.sld
+share/cyclone/scheme/write.so
+share/cyclone/srfi/1.o
+share/cyclone/srfi/1.scm
+share/cyclone/srfi/1.sld
+share/cyclone/srfi/1.so
+share/cyclone/srfi/106.o
+share/cyclone/srfi/106.sld
+share/cyclone/srfi/106.so
+share/cyclone/srfi/111.o
+share/cyclone/srfi/111.sld
+share/cyclone/srfi/111.so
+share/cyclone/srfi/113.o
+share/cyclone/srfi/113.sld
+share/cyclone/srfi/113.so
+share/cyclone/srfi/117.o
+share/cyclone/srfi/117.sld
+share/cyclone/srfi/117.so
+share/cyclone/srfi/121.o
+share/cyclone/srfi/121.scm
+share/cyclone/srfi/121.sld
+share/cyclone/srfi/121.so
+share/cyclone/srfi/128.meta
+share/cyclone/srfi/128.o
+share/cyclone/srfi/128.sld
+share/cyclone/srfi/128.so
+share/cyclone/srfi/132.o
+share/cyclone/srfi/132.sld
+share/cyclone/srfi/132.so
+share/cyclone/srfi/133.o
+share/cyclone/srfi/133.sld
+share/cyclone/srfi/133.so
+share/cyclone/srfi/143.o
+share/cyclone/srfi/143.sld
+share/cyclone/srfi/143.so
+share/cyclone/srfi/18.o
+share/cyclone/srfi/18.sld
+share/cyclone/srfi/18.so
+share/cyclone/srfi/2.meta
+share/cyclone/srfi/2.o
+share/cyclone/srfi/2.scm
+share/cyclone/srfi/2.sld
+share/cyclone/srfi/2.so
+share/cyclone/srfi/27.o
+share/cyclone/srfi/27.sld
+share/cyclone/srfi/27.so
+share/cyclone/srfi/28.o
+share/cyclone/srfi/28.scm
+share/cyclone/srfi/28.sld
+share/cyclone/srfi/28.so
+share/cyclone/srfi/60.o
+share/cyclone/srfi/60.scm
+share/cyclone/srfi/60.sld
+share/cyclone/srfi/60.so
+share/cyclone/srfi/69.o
+share/cyclone/srfi/69.sld
+share/cyclone/srfi/69.so
+share/cyclone/srfi/list-queues/list-queues-impl.scm
+share/cyclone/srfi/list-queues/list-queues-test.scm
+share/cyclone/srfi/sorting/delndups.scm
+share/cyclone/srfi/sorting/lmsort.scm
+share/cyclone/srfi/sorting/median.scm
+share/cyclone/srfi/sorting/merge.scm
+share/cyclone/srfi/sorting/select.scm
+share/cyclone/srfi/sorting/sort.scm
+share/cyclone/srfi/sorting/sortfaster.scm
+share/cyclone/srfi/sorting/sorting-test.scm
+share/cyclone/srfi/sorting/sortp.scm
+share/cyclone/srfi/sorting/vbinsearch.scm
+share/cyclone/srfi/sorting/vector-util.scm
+share/cyclone/srfi/sorting/vhsort.scm
+share/cyclone/srfi/sorting/visort.scm
+share/cyclone/srfi/sorting/vmsort.scm
+share/cyclone/srfi/sorting/vqsort2.scm
+share/cyclone/srfi/sorting/vqsort3.scm
+share/cyclone/srfi/vectors-impl.scm
diff --git a/cyclone-bootstrap/distinfo b/cyclone-bootstrap/distinfo
new file mode 100644
index 0000000000..fe3cbed2f0
--- /dev/null
+++ b/cyclone-bootstrap/distinfo
@@ -0,0 +1,9 @@
+$NetBSD$
+
+BLAKE2s (cyclone-bootstrap/v0.36.0.tar.gz) = 24afeaa923381ea26a001f720556429a2928718ba05ba2b00359d8f765033cad
+SHA512 (cyclone-bootstrap/v0.36.0.tar.gz) = 477534602baa4acbae0450e664617ad70302a79c552005741080c4e4d2993805ff1d25703bd2c43c82764a477a4b26fb4b88c8787a82e99fa5a6fc88d9f914f2
+Size (cyclone-bootstrap/v0.36.0.tar.gz) = 3967729 bytes
+SHA1 (patch-Makefile) = 3b1405ff54738ac53808f1f4e2e2a8d3f458f75d
+SHA1 (patch-Makefile.config) = 8838e7b3ac7b22452b798ab043ad94fe33ac4822
+SHA1 (patch-scheme_base.c) = 9800c0a282d41e93fde5d2b5f6c9b3582a913dd9
+SHA1 (patch-scheme_base.sld) = b9aaeb494572eb4fddecf25d30eae7cafe77163f
diff --git a/cyclone-bootstrap/patches/patch-Makefile b/cyclone-bootstrap/patches/patch-Makefile
new file mode 100644
index 0000000000..645b675900
--- /dev/null
+++ b/cyclone-bootstrap/patches/patch-Makefile
@@ -0,0 +1,46 @@
+$NetBSD$
+
+Use pkgsrc libtommath (internally named libcyclonebn).
+
+--- Makefile.orig 2021-04-06 03:32:12.000000000 +0000
++++ Makefile
+@@ -8,8 +8,8 @@ include Makefile.config
+
+ # Libraries
+ CYC_RT_LIB = libcyclone.a
+-CYC_BN_LIB = libcyclonebn.a
+-CYC_BN_LIB_SUBDIR = third-party/libtommath-1.2.0
++#CYC_BN_LIB = libcyclonebn.a
++#CYC_BN_LIB_SUBDIR = third-party/libtommath-1.2.0
+ CYC_LIBS = $(CYC_RT_LIB) $(CYC_BN_LIB)
+
+ COBJ = scheme/base \
+@@ -94,8 +94,8 @@ $(CYC_RT_LIB): runtime.c include/cyclone
+ $(CREATE_LIBRARY_COMMAND) $(CREATE_LIBRARY_FLAGS) $(LIBRARY_OUTPUT_FILE) runtime.o gc.o ffi.o mstreams.o hashset.o
+ $(RANLIB_COMMAND)
+
+-$(CYC_BN_LIB) : $(CYC_BN_LIB_SUBDIR)/*.c
+- cd $(CYC_BN_LIB_SUBDIR) ; $(MAKE) LIBNAME=$(CYC_BN_LIB) && cp $(CYC_BN_LIB) ../..
++#$(CYC_BN_LIB) : $(CYC_BN_LIB_SUBDIR)/*.c
++# cd $(CYC_BN_LIB_SUBDIR) ; $(MAKE) LIBNAME=$(CYC_BN_LIB) && cp $(CYC_BN_LIB) ../..
+
+ cyclone: $(CFILES) $(COBJECTS) $(C_SHARED_OBJECTS) $(CYC_LIBS)
+ $(CC) cyclone.c $(CFLAGS) -c -o cyclone.o
+@@ -166,7 +166,7 @@ install:
+ #install-libs:
+ $(MKDIR) $(DESTDIR)$(LIBDIR)
+ $(INSTALL) -m0644 $(CYC_RT_LIB) $(DESTDIR)$(LIBDIR)/
+- $(INSTALL) -m0644 $(CYC_BN_LIB) $(DESTDIR)$(LIBDIR)/
++# $(INSTALL) -m0644 $(CYC_BN_LIB) $(DESTDIR)$(LIBDIR)/
+ #install-cyclone:
+ $(MKDIR) $(DESTDIR)$(BINDIR)
+ $(MKDIR) $(DESTDIR)$(DATADIR)/scheme/cyclone
+@@ -191,7 +191,7 @@ install:
+ $(INSTALL) -m0755 icyc $(DESTDIR)$(BINDIR)/
+ $(INSTALL) -m0755 winds $(DESTDIR)$(BINDIR)/
+ $(INSTALL) -m0644 $(CYC_RT_LIB) $(DESTDIR)$(LIBDIR)/
+- $(INSTALL) -m0644 $(CYC_BN_LIB) $(DESTDIR)$(LIBDIR)/
++# $(INSTALL) -m0644 $(CYC_BN_LIB) $(DESTDIR)$(LIBDIR)/
+ $(INSTALL) -m0644 include/cyclone/*.h $(DESTDIR)$(INCDIR)/
+ $(INSTALL) -m0644 scheme/*.sld $(DESTDIR)$(DATADIR)/scheme
+ $(INSTALL) -m0644 scheme/*.o $(DESTDIR)$(DATADIR)/scheme
diff --git a/cyclone-bootstrap/patches/patch-Makefile.config b/cyclone-bootstrap/patches/patch-Makefile.config
new file mode 100644
index 0000000000..01b4486863
--- /dev/null
+++ b/cyclone-bootstrap/patches/patch-Makefile.config
@@ -0,0 +1,31 @@
+$NetBSD$
+
+1) Set the RPATH when creating executables and shared libraries.
+
+2) Use pkgsrc libtommath instead of cyclone libtommath (cyclonebn).
+
+--- Makefile.config.orig 2022-08-25 21:12:33.000000000 +0000
++++ Makefile.config
+@@ -21,8 +21,8 @@ CYC_PTHREAD_SET_STACK_SIZE ?=
+ OS = $(shell uname)
+ CC ?= cc
+
+-LIBS = -pthread -lcyclone -lck -lm -lcyclonebn
+-ifneq ($(OS),FreeBSD)
++LIBS = -pthread -lcyclone -lck -lm -ltommath
++ifeq (,$(findstring $(OS),FreeBSD NetBSD OpenBSD DragonFly))
+ # libdl is part of libc on FreeBSD
+ LIBS += -ldl
+ endif
+@@ -66,9 +66,9 @@ endif
+
+ # Commands "baked into" cyclone for invoking the C compiler
+ CC_PROG ?= "$(CC) ~src-file~ $(COMP_PROG_CFLAGS) ~cc-extra~ $(COMP_INCDIRS) -c -o ~exec-file~.o"
+-CC_EXEC ?= "$(CC) ~exec-file~.o ~obj-files~ $(LIBS) $(COMP_CFLAGS) ~ld-extra~ $(COMP_LIBDIRS) -o ~exec-file~"
++CC_EXEC ?= "$(CC) ~exec-file~.o ~obj-files~ $(LIBS) $(COMP_CFLAGS) $(COMPILER_RPATH_FLAG)$(PREFIX)/lib ~ld-extra~ $(COMP_LIBDIRS) -o ~exec-file~"
+ CC_LIB ?= "$(CC) ~src-file~ $(COMP_CFLAGS) ~cc-extra~ $(COMP_INCDIRS) -c -o ~exec-file~.o"
+-CC_SO ?= "$(CC) -shared $(LDFLAGS) -o ~exec-file~.so ~exec-file~.o"
++CC_SO ?= "$(CC) -shared $(LDFLAGS) $(COMPILER_RPATH_FLAG)$(PREFIX)/lib -o ~exec-file~.so ~exec-file~.o"
+
+ AR ?= ar
+ LIBTOOL ?= libtool
diff --git a/cyclone-bootstrap/patches/patch-scheme_base.c b/cyclone-bootstrap/patches/patch-scheme_base.c
new file mode 100644
index 0000000000..ffb1c85587
--- /dev/null
+++ b/cyclone-bootstrap/patches/patch-scheme_base.c
@@ -0,0 +1,70370 @@
+$NetBSD$
+
+Make let-values be the same as let*-values, to work around
+
+ https://github.com/justinethier/cyclone/issues/504
+
+--- scheme/base.c.orig 2024-02-14 02:29:41.000000000 +0000
++++ scheme/base.c
+@@ -764,8 +764,6 @@ defsymbol(handler_91k);
+ defsymbol(raise_91continuable);
+ defsymbol(condition);
+ defsymbol(guard_91k);
+-defsymbol(x);
+-defsymbol(let_91values);
+ defsymbol(let_85_91values);
+ defsymbol(define);
+ defsymbol(er_91macro_91transformer);
+@@ -846,4369 +844,4322 @@ defsymbol(_85other_91features_85);
+ defsymbol(platform);
+ defsymbol(cyclone);
+ defsymbol(memory_91streams);
+-static void __lambda_1327(void *data, object clo, int argc, object *args) ;/*closure _,object k_738391*/
+-static void __lambda_1328(void *data, object clo, int argc, object *args) ;/*object self_7314305, object r_738393*/
+-static void __lambda_1329(void *data, object clo, int argc, object *args) ;/*object self_7314306, object r_738394*/
+-static void __lambda_1330(void *data, object clo, int argc, object *args) ;/*object self_7314307, object r_738412*/
+-static void __lambda_1331(void *data, object clo, int argc, object *args) ;/*object self_7314308, object r_738395*/
+-static void __lambda_1332(void *data, object clo, int argc, object *args) ;/*object self_7314309, object r_738410*/
+-static void __lambda_1333(void *data, object clo, int argc, object *args) ;/*object self_7314310, object r_738396*/
+-static void __lambda_1334(void *data, object clo, int argc, object *args) ;/*object self_7314311, object r_738408*/
+-static void __lambda_1335(void *data, object clo, int argc, object *args) ;/*object self_7314312, object r_738397*/
+-static void __lambda_1336(void *data, object clo, int argc, object *args) ;/*object self_7314313, object r_738398*/
+-static void __lambda_1337(void *data, object clo, int argc, object *args) ;/*object self_7314314, object r_738399*/
+-static void __lambda_1338(void *data, object clo, int argc, object *args) ;/*object self_7314315, object r_738400*/
+-static void __lambda_1339(void *data, object clo, int argc, object *args) ;/*object self_7314316, object r_738401*/
+-static void __lambda_1340(void *data, object clo, int argc, object *args) ;/*object self_7314317, object r_738402*/
+-static void __lambda_1341(void *data, object clo, int argc, object *args) ;/*object self_7314318, object r_738403*/
+-static void __lambda_1342(void *data, object clo, int argc, object *args) ;/*object self_7314319, object r_738404*/
+-static void __lambda_1343(void *data, object clo, int argc, object *args) ;/*object self_7314320, object r_738405*/
+-static void __lambda_1344(void *data, object clo, int argc, object *args) ;/*object self_7314321, object r_738406*/
+-static void __lambda_1269(void *data, object clo, int argc, object *args) ;/*closure _,object k_738077, object expr_732685_732725_732817_734061, object rename_732686_732726_732818_734062, object compare_732687_732727_732819_734063*/
+-static void __lambda_1270(void *data, object clo, int argc, object *args) ;/*object self_7314247, object v_931_732693_732807_732867_734111*/
+-static void __lambda_1278(void *data, object clo, int argc, object *args) ;/*object self_7314248, object tmp_732729_732731_732820_734064*/
+-static void __lambda_1326(void *data, object clo, int argc, object *args) ;/*object self_7314249, object r_738078*/
+-static void __lambda_1279(void *data, object clo, int argc, object *args) ;/*object self_7314250, object k_738080*/
+-static void __lambda_1280(void *data, object clo, int argc, object *args) ;/*object self_7314251, object v_936_732698_732793_732858_734102*/
+-static void __lambda_1283(void *data, object clo, int argc, object *args) ;/*object self_7314252, object tmp_732733_732735_732821_734065*/
+-static void __lambda_1284(void *data, object clo, int argc, object *args) ;/*object self_7314253, object v_9313_732705_732754_732831_734075*/
+-static void __lambda_1317(void *data, object clo, int argc, object *args) ;/*object self_7314254, object tmp_732737_732739_732822_734066*/
+-static void __lambda_1318(void *data, object clo, int argc, object *args) ;/*object self_7314255, object v_9328_732720_732744_732824_734068*/
+-static void __lambda_1324(void *data, object clo, int argc, object *args) ;/*object self_7314256, object tmp_732741_732743_732823_734067*/
+-static void __lambda_1325(void *data, object clo, int argc, object *args) ;/*object self_7314257, object r_738084*/
+-static void __lambda_1319(void *data, object clo, int argc, object *args) ;/*object self_7314258, object k_738086*/
+-static void __lambda_1320(void *data, object clo, int argc, object *args) ;/*object self_7314259, object r_738095*/
+-static void __lambda_1321(void *data, object clo, int argc, object *args) ;/*object self_7314260, object r_738103*/
+-static void __lambda_1322(void *data, object clo, int argc, object *args) ;/*object self_7314261, object r_738113*/
+-static void __lambda_1323(void *data, object clo, int argc, object *args) ;/*object self_7314262, object r_738109_7312676_7312685_7312693*/
+-static void __lambda_1285(void *data, object clo, int argc, object *args) ;/*object self_7314263, object k_738125*/
+-static void __lambda_1286(void *data, object clo, int argc, object *args) ;/*object self_7314264, object var0_732759_732834_734078*/
+-static void __lambda_1287(void *data, object clo, int argc, object *args) ;/*object self_7314265, object ls_732689_732764_732837_734081, object i_732691_732765_732838_734082, object res_732690_732766_732839_734083*/
+-static void __lambda_1288(void *data, object clo, int argc, object *args) ;/*object self_7314266, object lp_9317_732709_732767_732840_734084*/
+-static void __lambda_1444(void *data, object clo, int argc, object *args) ;/*object self_7314267, object lp_9317_732709_732767_732840_734084*/
+-static void __lambda_1291(void *data, object clo, int argc, object *args) ;/*object self_7314268, object k_738137, object ls_732689_732768_732841_734085, object i_732691_732769_732842_734086, object res_732690_732770_732843_734087*/
+-static void __lambda_1292(void *data, object clo, int argc, object *args) ;/*object self_7314269, object r_738310_7313015*/
+-static void __lambda_1293(void *data, object clo, int argc, object *args) ;/*object self_7314270, object v_9318_732710_732771_732844_734088_7313016*/
+-static void __lambda_1294(void *data, object clo, int argc, object *args) ;/*object self_7314271, object r_738158_7313017*/
+-static void __lambda_1295(void *data, object clo, int argc, object *args) ;/*object self_7314272, object r_738279_7313018*/
+-static void __lambda_1296(void *data, object clo, int argc, object *args) ;/*object self_7314273, object r_738287_7313019*/
+-static void __lambda_1297(void *data, object clo, int argc, object *args) ;/*object self_7314274, object r_738297_7313020*/
+-static void __lambda_1298(void *data, object clo, int argc, object *args) ;/*object self_7314275, object r_738293_7311728_7311792_7311855_7313021*/
+-static void __lambda_1309(void *data, object clo, int argc, object *args) ;/*object self_7314276, object k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032, object var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033*/
+-static void __lambda_1310(void *data, object clo, int argc, object *args) ;/*object self_7314277, object r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034*/
+-static void __lambda_1311(void *data, object clo, int argc, object *args) ;/*object self_7314278, object r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035*/
+-static void __lambda_1312(void *data, object clo, int argc, object *args) ;/*object self_7314279, object r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036*/
+-static void __lambda_1313(void *data, object clo, int argc, object *args) ;/*object self_7314280, object r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037*/
+-static void __lambda_1314(void *data, object clo, int argc, object *args) ;/*object self_7314281, object r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038*/
+-static void __lambda_1315(void *data, object clo, int argc, object *args) ;/*object self_7314282, object r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039*/
+-static void __lambda_1316(void *data, object clo, int argc, object *args) ;/*object self_7314283, object r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040*/
+-static void __lambda_1299(void *data, object clo, int argc, object *args) ;/*object self_7314284, object r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022*/
+-static void __lambda_1300(void *data, object clo, int argc, object *args) ;/*object self_7314285, object r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023*/
+-static void __lambda_1301(void *data, object clo, int argc, object *args) ;/*object self_7314286, object r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024*/
+-static void __lambda_1302(void *data, object clo, int argc, object *args) ;/*object self_7314287, object r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025*/
+-static void __lambda_1303(void *data, object clo, int argc, object *args) ;/*object self_7314288, object r_738208_7311739_7311803_7311866_7311927_7311987_7312046_7312104_7312161_7312217_7313026*/
+-static void __lambda_1304(void *data, object clo, int argc, object *args) ;/*object self_7314289, object r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027*/
+-static void __lambda_1305(void *data, object clo, int argc, object *args) ;/*object self_7314290, object r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028*/
+-static void __lambda_1306(void *data, object clo, int argc, object *args) ;/*object self_7314291, object r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029*/
+-static void __lambda_1307(void *data, object clo, int argc, object *args) ;/*object self_7314292, object r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030*/
+-static void __lambda_1308(void *data, object clo, int argc, object *args) ;/*object self_7314293, object r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031*/
+-static void __lambda_1289(void *data, object clo, int argc, object *args) ;/*object self_7314294, object r_738136*/
+-static void __lambda_1290(void *data, object clo, int argc, object *args) ;/*object self_7314295, object r_738135*/
+-static void __lambda_1281(void *data, object clo, int argc, object *args) ;/*object self_7314296, object k_738317*/
+-static void __lambda_1282(void *data, object clo, int argc, object *args) ;/*object self_7314297, object r_738330*/
+-static void __lambda_1271(void *data, object clo, int argc, object *args) ;/*object self_7314298, object k_738339*/
+-static void __lambda_1272(void *data, object clo, int argc, object *args) ;/*object self_7314299, object r_738349*/
+-static void __lambda_1273(void *data, object clo, int argc, object *args) ;/*object self_7314300, object r_738352*/
+-static void __lambda_1274(void *data, object clo, int argc, object *args) ;/*object self_7314301, object r_738358*/
+-static void __lambda_1275(void *data, object clo, int argc, object *args) ;/*object self_7314302, object r_738377*/
+-static void __lambda_1276(void *data, object clo, int argc, object *args) ;/*object self_7314303, object r_738367_7311638_7311651_7311663*/
+-static void __lambda_1277(void *data, object clo, int argc, object *args) ;/*object self_7314304, object r_738370_7311639_7311652_7311664*/
+-static void __lambda_1238(void *data, object clo, int argc, object *args) ;/*closure _,object k_737908, object expr_732618_734042, object rename_732619_734043, object compare_732620_734044*/
+-static void __lambda_1240(void *data, object clo, int argc, object *args) ;/*object self_7314217, object parent_732629_734047*/
+-static void __lambda_1241(void *data, object clo, int argc, object *args) ;/*object self_7314218, object _191define_732647_734053*/
+-static void __lambda_1242(void *data, object clo, int argc, object *args) ;/*object self_7314219, object _191lambda_732650_734054*/
+-static void __lambda_1243(void *data, object clo, int argc, object *args) ;/*object self_7314220, object _191let_732653_734055*/
+-static void __lambda_1244(void *data, object clo, int argc, object *args) ;/*object self_7314221, object _191register_732656_734056*/
+-static void __lambda_1245(void *data, object clo, int argc, object *args) ;/*object self_7314222, object _191slot_91set_67_732659_734057*/
+-static void __lambda_1246(void *data, object clo, int argc, object *args) ;/*object self_7314223, object _191type_191slot_191offset_732662_734058*/
+-static void __lambda_1248(void *data, object clo, int argc, object *args) ;/*object self_7314224, object r_737923*/
+-static void __lambda_1249(void *data, object clo, int argc, object *args) ;/*object self_7314225, object r_737924*/
+-static void __lambda_1250(void *data, object clo, int argc, object *args) ;/*object self_7314226, object r_738057*/
+-static void __lambda_1251(void *data, object clo, int argc, object *args) ;/*object self_7314227, object r_738036*/
+-static void __lambda_1266(void *data, object clo, int argc, object *args) ;/*object self_7314228, object k_738002, object f_732667_734059*/
+-static void __lambda_1267(void *data, object clo, int argc, object *args) ;/*object self_7314229, object r_738010*/
+-static void __lambda_1268(void *data, object clo, int argc, object *args) ;/*object self_7314230, object r_738012*/
+-static void __lambda_1252(void *data, object clo, int argc, object *args) ;/*object self_7314231, object r_738001*/
+-static void __lambda_1253(void *data, object clo, int argc, object *args) ;/*object self_7314232, object r_737930*/
+-static void __lambda_1263(void *data, object clo, int argc, object *args) ;/*object self_7314233, object k_737967, object f_732673_734060*/
+-static void __lambda_1264(void *data, object clo, int argc, object *args) ;/*object self_7314234, object r_737976*/
+-static void __lambda_1265(void *data, object clo, int argc, object *args) ;/*object self_7314235, object r_737978*/
+-static void __lambda_1254(void *data, object clo, int argc, object *args) ;/*object self_7314236, object r_737966*/
+-static void __lambda_1255(void *data, object clo, int argc, object *args) ;/*object self_7314237, object r_737932*/
+-static void __lambda_1256(void *data, object clo, int argc, object *args) ;/*object self_7314238, object r_737944*/
+-static void __lambda_1257(void *data, object clo, int argc, object *args) ;/*object self_7314239, object r_737952*/
+-static void __lambda_1258(void *data, object clo, int argc, object *args) ;/*object self_7314240, object r_737954*/
+-static void __lambda_1259(void *data, object clo, int argc, object *args) ;/*object self_7314241, object r_737953*/
+-static void __lambda_1260(void *data, object clo, int argc, object *args) ;/*object self_7314242, object r_737931*/
+-static void __lambda_1261(void *data, object clo, int argc, object *args) ;/*object self_7314243, object r_737929*/
+-static void __lambda_1262(void *data, object clo, int argc, object *args) ;/*object self_7314244, object r_737927*/
+-static void __lambda_1247(void *data, object clo, int argc, object *args) ;/*object self_7314245, object k_738063*/
+-static void __lambda_1239(void *data, object clo, int argc, object *args) ;/*object self_7314246, object k_738071*/
+-static void __lambda_1235(void *data, object clo, int argc, object *args) ;/*closure _,object k_737901, object obj_732614_734040, object rtype_732615_734041*/
+-static void __lambda_1236(void *data, object clo, int argc, object *args) ;/*object self_7314215, object r_737902*/
+-static void __lambda_1237(void *data, object clo, int argc, object *args) ;/*object self_7314216, object r_737903*/
+-static void __lambda_1514(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
+-static void __lambda_1229(void *data, object clo, int argc, object *args) ;/*closure _,object k_737890, object e_732605_734033, object lst1_732606_734034*/
+-static void __lambda_1230(void *data, object clo, int argc, object *args) ;/*object self_7314209, object lis_732608_734035*/
+-static void __lambda_1231(void *data, object clo, int argc, object *args) ;/*object self_7314210, object lp_732610_734037*/
+-static void __lambda_1443(void *data, object clo, int argc, object *args) ;/*object self_7314211, object lp_732610_734037*/
+-static void __lambda_1234(void *data, object clo, int argc, object *args) ;/*object self_7314212, object k_737893, object lis_732611_734038, object n_732612_734039*/
+-static void __lambda_1232(void *data, object clo, int argc, object *args) ;/*object self_7314213, object r_737892*/
+-static void __lambda_1233(void *data, object clo, int argc, object *args) ;/*object self_7314214, object r_737891*/
+-static void __lambda_1225(void *data, object clo, int argc, object *args) ;/*closure _,object k_737882, object sym_732600_734028, object name_732601_734029, object idx_732602_734030*/
+-static void __lambda_1226(void *data, object clo, int argc, object *args) ;/*object self_7314206, object k_737883, object obj_732603_734031, object val_732604_734032*/
+-static void __lambda_1227(void *data, object clo, int argc, object *args) ;/*object self_7314207, object r_737887*/
+-static void __lambda_1228(void *data, object clo, int argc, object *args) ;/*object self_7314208, object r_737885*/
+-static void __lambda_1223(void *data, object clo, int argc, object *args) ;/*closure _,object k_737874, object sym_732596_734024, object name_732597_734025, object idx_732598_734026*/
+-static void __lambda_1224(void *data, object clo, int argc, object *args) ;/*object self_7314205, object k_737875, object obj_732599_734027*/
+-static void __lambda_1220(void *data, object clo, int argc, object *args) ;/*closure _,object k_737867, object name_732585_734020, object obj_732586_734021, object field_732587_734022*/
+-static void __lambda_1222(void *data, object clo, int argc, object *args) ;/*object self_7314203, object idx_732590_734023*/
+-static void __lambda_1221(void *data, object clo, int argc, object *args) ;/*object self_7314204, object k_737870*/
+-static void __lambda_1217(void *data, object clo, int argc, object *args) ;/*closure _,object k_737863, object name_732580_734015, object obj_732581_734016, object idx_732582_734017, object val_732583_734018*/
+-static void __lambda_1218(void *data, object clo, int argc, object *args) ;/*object self_7314201, object vec_732584_734019*/
+-static void __lambda_1219(void *data, object clo, int argc, object *args) ;/*object self_7314202, object r_737864*/
+-static void __lambda_1216(void *data, object clo, int argc, object *args) ;/*closure _,object k_737859, object name_732577_734012, object sym_732578_734013*/
+-static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*closure _,object k_737848, object make_732567_734007, object name_732568_734008*/
+-static void __lambda_1212(void *data, object clo, int argc, object *args) ;/*object self_7314197, object k_737849, object args_732569_734009_raw, ...*/
+-static void __lambda_1213(void *data, object clo, int argc, object *args) ;/*object self_7314198, object field_91values_732575_734011*/
+-static void __lambda_1215(void *data, object clo, int argc, object *args) ;/*object self_7314199, object r_737852*/
+-static void __lambda_1214(void *data, object clo, int argc, object *args) ;/*object self_7314200, object k_737853*/
+-static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*closure _,object k_737841, object make_732557_734002, object name_732558_734003*/
+-static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_7314195, object k_737842, object args_732559_734004_raw, ...*/
+-static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_7314196, object field_91values_732565_734006*/
+-static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*closure _,object k_737835, object pred_732553_733999, object name_732554_734000*/
+-static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_7314193, object k_737836, object obj_732555_734001*/
+-static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_7314194, object r_737837*/
+-static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*closure _,object k_737832, object name_732550_733996, object parent_732551_733997, object field_91tags_732552_733998*/
+-static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*closure _,object k_737527, object expr_732192_732269_732444_733890, object rename_732193_732270_732445_733891, object compare_732194_732271_732446_733892*/
+-static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_7314143, object v_931_732200_732425_732538_733984*/
+-static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*object self_7314144, object tmp_732273_732275_732447_733893*/
+-static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_7314145, object r_737528*/
+-static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_7314146, object k_737530*/
+-static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*object self_7314147, object v_9310_732209_732403_732524_733970*/
+-static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*object self_7314148, object tmp_732277_732279_732448_733894*/
+-static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_7314149, object v_9321_732220_732376_732506_733952*/
+-static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_7314150, object tmp_732281_732283_732449_733895*/
+-static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*object self_7314151, object v_9334_732233_732362_732497_733943*/
+-static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_7314152, object tmp_732285_732287_732450_733896*/
+-static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_7314153, object v_9341_732240_732343_732484_733930*/
+-static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_7314154, object tmp_732289_732291_732451_733897*/
+-static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*object self_7314155, object v_9350_732249_732324_732471_733917*/
+-static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_7314156, object tmp_732293_732295_732452_733898*/
+-static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_7314157, object v_9359_732258_732300_732454_733900*/
+-static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_7314158, object tmp_732297_732299_732453_733899*/
+-static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_7314159, object r_737537*/
+-static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_7314160, object k_737539*/
+-static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_7314161, object r_737558*/
+-static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_7314162, object r_737576*/
+-static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_7314163, object r_737569_7311590_7311599*/
+-static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_7314164, object k_737583*/
+-static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_7314165, object r_737599*/
+-static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_7314166, object r_737609*/
+-static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_7314167, object k_737616*/
+-static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*object self_7314168, object r_737632*/
+-static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_7314169, object r_737640*/
+-static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_7314170, object k_737649*/
+-static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_7314171, object r_737662*/
+-static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_7314172, object k_737671*/
+-static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*object self_7314173, object r_737740*/
+-static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*object self_7314174, object r_737682*/
+-static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_7314175, object r_737694*/
+-static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*object self_7314176, object r_737733*/
+-static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*object self_7314177, object r_737703_7311409_7311427_7311444*/
+-static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*object self_7314178, object r_737706_7311410_7311428_7311445*/
+-static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_7314179, object r_737724_7311411_7311429_7311446*/
+-static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_7314180, object r_737715_7311414_7311432_7311449_7311462_7311474*/
+-static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*object self_7314181, object k_737743*/
+-static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_7314182, object r_737801*/
+-static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*object self_7314183, object r_737754*/
+-static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_7314184, object r_737763*/
+-static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_7314185, object r_737794*/
+-static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_7314186, object r_737772_7311322_7311336_7311349*/
+-static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*object self_7314187, object r_737775_7311323_7311337_7311350*/
+-static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*object self_7314188, object r_737785_7311324_7311338_7311351*/
+-static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*object self_7314189, object k_737804*/
+-static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*object self_7314190, object r_737826*/
+-static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*object self_7314191, object r_737812*/
+-static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*object self_7314192, object r_737821*/
+-static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*closure _,object k_737314, object expr_732135_732150_732173_733875, object rename_732136_732151_732174_733876, object compare_732137_732152_732175_733877*/
+-static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_7314112, object v_931_732143_732157_732177_733879*/
+-static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_7314113, object tmp_732154_732156_732176_733878*/
+-static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_7314114, object r_737315*/
+-static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*object self_7314115, object k_737317*/
+-static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_7314116, object r_737318*/
+-static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_7314117, object k_737320*/
+-static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_7314118, object r_737336*/
+-static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_7314119, object r_737342*/
+-static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_7314120, object r_737519*/
+-static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_7314121, object r_737351_739374*/
+-static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_7314122, object r_737413_739375*/
+-static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_7314123, object r_737513_739376*/
+-static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_7314124, object r_737425_739378_739453*/
+-static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_7314125, object r_737431_739379_739454*/
+-static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_7314126, object r_737507_739380_739455*/
+-static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_7314127, object r_737440_739382_739457_739528*/
+-static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_7314128, object r_737446_739383_739458_739529*/
+-static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_7314129, object r_737455_739384_739459_739530*/
+-static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_7314130, object r_737500_739385_739460_739531*/
+-static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_7314131, object r_737464_739389_739464_739535_739601_739666_739730*/
+-static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_7314132, object r_737469_739390_739465_739536_739602_739667_739731*/
+-static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_7314133, object r_737475_739391_739466_739537_739603_739668_739732*/
+-static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_7314134, object r_737484_739392_739467_739538_739604_739669_739733*/
+-static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_7314135, object r_737487_739393_739468_739539_739605_739670_739734*/
+-static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_7314136, object r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944*/
+-static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*object self_7314137, object r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945*/
+-static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*object self_7314138, object r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946*/
+-static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_7314139, object r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947*/
+-static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_7314140, object r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083*/
+-static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*object self_7314141, object r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084*/
+-static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_7314142, object r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085*/
+-static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*closure _,object k_736966, object expr_731740_731824_732014_733758, object rename_731741_731825_732015_733759, object compare_731742_731826_732016_733760*/
+-static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_7314058, object v_931_731748_732002_732123_733867*/
+-static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_7314059, object tmp_731828_731830_732017_733761*/
+-static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_7314060, object r_736967*/
+-static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_7314061, object k_736969*/
+-static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_7314062, object v_936_731753_731984_732112_733856*/
+-static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_7314063, object tmp_731832_731834_732018_733762*/
+-static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_7314064, object v_9315_731762_731953_732092_733836*/
+-static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_7314065, object tmp_731836_731838_732019_733763*/
+-static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_7314066, object v_9330_731777_731923_732072_733816*/
+-static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_7314067, object tmp_731840_731842_732020_733764*/
+-static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_7314068, object v_9345_731792_731885_732046_733790*/
+-static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_7314069, object tmp_731844_731846_732021_733765*/
+-static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_7314070, object v_9362_731809_731851_732023_733767*/
+-static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_7314071, object tmp_731848_731850_732022_733766*/
+-static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_7314072, object r_736975*/
+-static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*object self_7314073, object k_736977*/
+-static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_7314074, object r_737004*/
+-static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_7314075, object r_737054*/
+-static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*object self_7314076, object r_737013_739178_739208_739237*/
+-static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_7314077, object k_737052_739204_739234_739263, object arg_731883_732044_733788_739205_739235_739264*/
+-static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_7314078, object r_737051_739179_739209_739238*/
+-static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_7314079, object r_737048_739180_739210_739239*/
+-static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_7314080, object r_737049_739181_739211_739240*/
+-static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_7314081, object r_737016_739182_739212_739241*/
+-static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_7314082, object r_737022_739183_739213_739242*/
+-static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_7314083, object k_737046_739202_739232_739261, object tmp_731884_732045_733789_739203_739233_739262*/
+-static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*object self_7314084, object r_737045_739184_739214_739243*/
+-static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_7314085, object r_737034_739185_739215_739244*/
+-static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_7314086, object r_737041_739186_739216_739245*/
+-static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_7314087, object r_737029_739190_739220_739249_739268_739282_739295*/
+-static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_7314088, object k_737065*/
+-static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*object self_7314089, object r_737095*/
+-static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_7314090, object k_737134, object arg_731921_732070_733814*/
+-static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_7314091, object r_737133*/
+-static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*object self_7314092, object r_737127*/
+-static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_7314093, object r_737129*/
+-static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_7314094, object r_737104_739088*/
+-static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_7314095, object k_737126_739104, object tmp_731922_732071_733815_739105*/
+-static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_7314096, object r_737125_739089*/
+-static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_7314097, object r_737114_739090*/
+-static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_7314098, object r_737121_739091*/
+-static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_7314099, object r_737109_739095_739109_739120_739130*/
+-static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_7314100, object k_737137*/
+-static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_7314101, object r_737163*/
+-static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_7314102, object r_737193*/
+-static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_7314103, object r_737172_738979_738994_739008*/
+-static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_7314104, object r_737180_738980_738995_739009*/
+-static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_7314105, object k_737204*/
+-static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*object self_7314106, object r_737231*/
+-static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*object self_7314107, object k_737251*/
+-static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_7314108, object r_737268*/
+-static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_7314109, object k_737277*/
+-static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_7314110, object r_737287*/
+-static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*object self_7314111, object r_737303*/
+-static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*closure _,object k_736856, object expr_731606_731637_731698_733720, object rename_731607_731638_731699_733721, object compare_731608_731639_731700_733722*/
+-static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_7314039, object v_931_731614_731692_731732_733754*/
+-static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_7314040, object tmp_731641_731643_731701_733723*/
+-static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_7314041, object r_736857*/
+-static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_7314042, object k_736859*/
+-static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*object self_7314043, object v_934_731617_731670_731717_733739*/
+-static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_7314044, object tmp_731645_731647_731702_733724*/
+-static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_7314045, object v_9315_731628_731652_731704_733726*/
+-static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_7314046, object tmp_731649_731651_731703_733725*/
+-static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_7314047, object r_736862*/
+-static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_7314048, object k_736864*/
+-static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_7314049, object r_736879*/
+-static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*object self_7314050, object r_736902*/
+-static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*object self_7314051, object r_736888_738820_738832_738843*/
+-static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_7314052, object r_736896_738821_738833_738844*/
+-static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*object self_7314053, object k_736913*/
+-static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_7314054, object r_736932*/
+-static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_7314055, object r_736941_738781_738789_738796*/
+-static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_7314056, object k_736955*/
+-static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_7314057, object r_736961*/
+-static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*closure _,object k_736805, object expr_731521_731541_731576_733694, object rename_731522_731542_731577_733695, object compare_731523_731543_731578_733696*/
+-static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_7314018, object v_931_731529_731548_731580_733698*/
+-static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_7314019, object tmp_731545_731547_731579_733697*/
+-static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*object self_7314020, object r_736806*/
+-static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_7314021, object k_736808*/
+-static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_7314022, object r_736809*/
+-static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_7314023, object k_736811*/
+-static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_7314024, object w_933_731531_731552_731582_733700, object var_91ls5_731533_731553_731583_733701, object val_91ls6_731534_731554_731584_733702*/
+-static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_7314025, object lp_934_731532_731555_731585_733703*/
+-static void __lambda_1442(void *data, object clo, int argc, object *args) ;/*object self_7314026, object lp_934_731532_731555_731585_733703*/
+-static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*object self_7314027, object k_736818, object w_933_731531_731556_731586_733704, object var_91ls5_731533_731557_731587_733705, object val_91ls6_731534_731558_731588_733706*/
+-static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*object self_7314028, object r_736820_7312992*/
+-static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_7314029, object r_736821_7312993_7313004*/
+-static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_7314030, object var_731559_731589_733707_7312994_7313005, object val_731560_731590_733708_7312995_7313006*/
+-static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_7314031, object r_736824_7312996_7313007*/
+-static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_7314032, object k_736832_7313000_7313011, object var_731563_731593_733711_7313001_7313012, object val_731564_731594_733712_7313002_7313013*/
+-static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_7314033, object r_736833_7313003_7313014*/
+-static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_7314034, object r_736831_7312997_7313008*/
+-static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_7314035, object r_736830_7312998_7313009*/
+-static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_7314036, object r_736828_7312999_7313010*/
+-static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_7314037, object r_736817*/
+-static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_7314038, object r_736816*/
+-static void __lambda_810(void *data, object clo, int argc, object *args) ;/*closure _,object k_736347, object expr_731263_733551, object rename_731264_733552, object compare_731265_733553*/
+-static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_7313786, object r_736802*/
+-static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_7313787, object r_736348*/
+-static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_7313788, object r_736349*/
+-static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_7313789, object r_736350*/
+-static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_7313790, object r_736351*/
+-static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_7313791, object r_736352*/
+-static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_7313792, object r_736353*/
+-static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_7313793, object r_736354*/
+-static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_7313794, object r_736355*/
+-static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_7313795, object r_736356*/
+-static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_7313796, object r_736357*/
+-static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_7313797, object r_736358*/
+-static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_7313798, object r_736359*/
+-static void __lambda_824(void *data, object clo, int argc, object *args) ;/*object self_7313799, object r_736360*/
+-static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_7313800, object r_736361*/
+-static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_7313801, object r_736362*/
+-static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_7313802, object r_736363*/
+-static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_7313803, object r_736364*/
+-static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_7313804, object r_736365*/
+-static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_7313805, object r_736366*/
+-static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_7313806, object r_736367*/
+-static void __lambda_832(void *data, object clo, int argc, object *args) ;/*object self_7313807, object r_736368*/
+-static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_7313808, object r_736369*/
+-static void __lambda_834(void *data, object clo, int argc, object *args) ;/*object self_7313809, object r_736370*/
+-static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_7313810, object r_736371*/
+-static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_7313811, object r_736372*/
+-static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_7313812, object r_736373*/
+-static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_7313813, object r_736374*/
+-static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_7313814, object r_736375*/
+-static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_7313815, object r_736376*/
+-static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_7313816, object r_736377*/
+-static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_7313817, object r_736378*/
+-static void __lambda_843(void *data, object clo, int argc, object *args) ;/*object self_7313818, object r_736379*/
+-static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_7313819, object r_736380*/
+-static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_7313820, object r_736381*/
+-static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_7313821, object r_736382*/
+-static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_7313822, object r_736383*/
+-static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_7313823, object ellipsis_91specified_127_731266_733566, object count_731267_733567, object _191er_91macro_91transformer_731268_733568, object _191lambda_731269_733569, object _191let_731270_733570, object _191begin_731271_733571, object _191if_731272_733572, object _191and_731273_733573, object _191or_731274_733574, object _191eq_127_731275_733575, object _191equal_127_731276_733576, object _191car_731277_733577, object _191cdr_731278_733578, object _191cons_731279_733579, object _191pair_127_731280_733580, object _191null_127_731281_733581, object _191expr_731282_733582, object _191rename_731283_733583, object _191compare_731284_733584, object _191quote_731285_733585, object _191apply_731286_733586, object _191append_731287_733587, object _191map_731288_733588, object _191vector_127_731289_733589, object _191list_127_731290_733590, object _191len_731291_733591, object _191length_731292_
733592, object _191_91_731293_733593, object _191_125_123_731294_733594, object _191error_731295_733595, object _191ls_731296_733596, object _191res_731297_733597, object _191i_731298_733598, object _191reverse_731299_733599, object _191vector_91_125list_731300_733600, object _191list_91_125vector_731301_733601, object _191cons3_731302_733602*/
+-static void __lambda_1441(void *data, object clo, int argc, object *args) ;/*object self_7313824, object count_731267_733567*/
+-static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_7313825, object ellipsis_733603, object lits_733604, object forms_733605, object next_91symbol_733606, object expand_91pattern_733607, object ellipsis_91escape_127_733608, object ellipsis_127_733609, object ellipsis_91depth_733610, object ellipsis_91tail_733611, object all_91vars_733612, object free_91vars_733613, object expand_91template_733614*/
+-static void __lambda_1440(void *data, object clo, int argc, object *args) ;/*object self_7313826, object ellipsis_733603*/
+-static void __lambda_1439(void *data, object clo, int argc, object *args) ;/*object self_7313827, object lits_733604*/
+-static void __lambda_1438(void *data, object clo, int argc, object *args) ;/*object self_7313828, object forms_733605*/
+-static void __lambda_1437(void *data, object clo, int argc, object *args) ;/*object self_7313829, object next_91symbol_733606*/
+-static void __lambda_1436(void *data, object clo, int argc, object *args) ;/*object self_7313830, object expand_91pattern_733607*/
+-static void __lambda_1435(void *data, object clo, int argc, object *args) ;/*object self_7313831, object ellipsis_91escape_127_733608*/
+-static void __lambda_1434(void *data, object clo, int argc, object *args) ;/*object self_7313832, object ellipsis_127_733609*/
+-static void __lambda_1433(void *data, object clo, int argc, object *args) ;/*object self_7313833, object ellipsis_91depth_733610*/
+-static void __lambda_1432(void *data, object clo, int argc, object *args) ;/*object self_7313834, object ellipsis_91tail_733611*/
+-static void __lambda_1431(void *data, object clo, int argc, object *args) ;/*object self_7313835, object all_91vars_733612*/
+-static void __lambda_1430(void *data, object clo, int argc, object *args) ;/*object self_7313836, object free_91vars_733613*/
+-static void __lambda_1429(void *data, object clo, int argc, object *args) ;/*object self_7313837, object expand_91template_733614*/
+-static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_7313838, object r_736764*/
+-static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_7313839, object r_736384*/
+-static void __lambda_853(void *data, object clo, int argc, object *args) ;/*object self_7313840, object r_736761*/
+-static void __lambda_854(void *data, object clo, int argc, object *args) ;/*object self_7313841, object r_736385*/
+-static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_7313842, object r_736758*/
+-static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_7313843, object r_736386*/
+-static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_7313844, object k_736752, object s_731303_733615*/
+-static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_7313845, object r_736757*/
+-static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_7313846, object r_736753*/
+-static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*object self_7313847, object r_736756*/
+-static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_7313848, object r_736755*/
+-static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_7313849, object r_736751*/
+-static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_7313850, object r_736387*/
+-static void __lambda_958(void *data, object clo, int argc, object *args) ;/*object self_7313851, object k_736536, object pat_731304_733616, object tmpl_731305_733617*/
+-static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*object self_7313852, object k_736749, object vars_731384_733647*/
+-static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_7313853, object r_736750*/
+-static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_7313854, object r_736540*/
+-static void __lambda_960(void *data, object clo, int argc, object *args) ;/*object self_7313855, object p_731307_733618, object x_731308_733619, object vars_731310_733621, object k_731311_733622*/
+-static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_7313856, object lp_731312_733623*/
+-static void __lambda_1428(void *data, object clo, int argc, object *args) ;/*object self_7313857, object lp_731312_733623*/
+-static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_7313858, object k_736543, object p_731313_733624, object x_731314_733625, object dim_731315_733626, object vars_731316_733627, object k_731317_733628*/
+-static void __lambda_965(void *data, object clo, int argc, object *args) ;/*object self_7313859, object v_731318_733629*/
+-static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_7313860, object r_736546*/
+-static void __lambda_966(void *data, object clo, int argc, object *args) ;/*object self_7313861, object k_736547*/
+-static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_7313862, object r_736548*/
+-static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_7313869, object r_736561*/
+-static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_7313911, object r_736747*/
+-static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_7313910, object r_736745*/
+-static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_7313908, object r_736741*/
+-static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_7313909, object r_736740*/
+-static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_7313905, object k_736735, object vars_731376_733646*/
+-static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_7313906, object r_736734*/
+-static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*object self_7313907, object r_736731*/
+-static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_7313870, object r_736728*/
+-static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_7313897, object k_736725, object x_731332_733631*/
+-static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_7313898, object r_736726*/
+-static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_7313899, object r_736723*/
+-static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_7313900, object r_736724*/
+-static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_7313901, object r_736618*/
+-static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_7313902, object r_736620*/
+-static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_7313903, object len_731335_733632, object _191lp_731336_733633*/
+-static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*object self_7313904, object r_736640*/
+-static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_7313871, object r_736563*/
+-static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_7313873, object w_731352_733634*/
+-static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_7313874, object _191lp_731355_733635*/
+-static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_7313875, object new_91vars_731358_733636*/
+-static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_7313876, object k_736611, object x_731372_733645*/
+-static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_7313877, object r_736613*/
+-static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_7313878, object r_736612*/
+-static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_7313879, object r_736610*/
+-static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_7313880, object ls_91vars_731361_733637*/
+-static void __lambda_994(void *data, object clo, int argc, object *args) ;/*object self_7313881, object k_736603, object _191_731369_733642*/
+-static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_7313882, object k_736608, object x_731370_733643, object l_731371_733644*/
+-static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_7313883, object r_736607*/
+-static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_7313884, object r_736606*/
+-static void __lambda_997(void *data, object clo, int argc, object *args) ;/*object self_7313885, object r_736604*/
+-static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_7313886, object r_736602*/
+-static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_7313887, object once_731364_733638*/
+-static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_7313888, object k_736595, object x_731366_733639*/
+-static void __lambda_985(void *data, object clo, int argc, object *args) ;/*object self_7313889, object r_736594*/
+-static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_7313890, object r_736593*/
+-static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_7313891, object k_736589, object x_731367_733640, object l_731368_733641*/
+-static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_7313892, object r_736588*/
+-static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_7313893, object r_736585*/
+-static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_7313894, object r_736587*/
+-static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_7313895, object r_736586*/
+-static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_7313896, object r_736582*/
+-static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_7313872, object r_736567*/
+-static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_7313863, object k_736560, object l_731322_733630*/
+-static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_7313864, object r_736559*/
+-static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_7313865, object r_736549*/
+-static void __lambda_972(void *data, object clo, int argc, object *args) ;/*object self_7313868, object r_736555*/
+-static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_7313866, object r_736553*/
+-static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_7313867, object r_736551*/
+-static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_7313912, object r_736542*/
+-static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_7313913, object r_736541*/
+-static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_7313914, object r_736535*/
+-static void __lambda_861(void *data, object clo, int argc, object *args) ;/*object self_7313915, object r_736388*/
+-static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_7313916, object k_736532, object x_731385_733648*/
+-static void __lambda_862(void *data, object clo, int argc, object *args) ;/*object self_7313917, object r_736531*/
+-static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_7313918, object r_736389*/
+-static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_7313919, object k_736526, object x_731387_733649*/
+-static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_7313920, object r_736525*/
+-static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_7313921, object r_736390*/
+-static void __lambda_953(void *data, object clo, int argc, object *args) ;/*object self_7313922, object k_736521, object x_731390_733650*/
+-static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_7313923, object r_736522*/
+-static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_7313924, object r_736523*/
+-static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_7313925, object r_736520*/
+-static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_7313926, object r_736391*/
+-static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_7313927, object k_736517, object x_731391_733651*/
+-static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_7313928, object r_736518*/
+-static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_7313929, object r_736516*/
+-static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_7313930, object r_736392*/
+-static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_7313931, object k_736495, object x_731392_733652, object dim_731393_733653*/
+-static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_7313932, object x_731395_733654, object dim_731396_733655, object vars_731397_733656*/
+-static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_7313933, object lp_731398_733657*/
+-static void __lambda_1427(void *data, object clo, int argc, object *args) ;/*object self_7313934, object lp_731398_733657*/
+-static void __lambda_942(void *data, object clo, int argc, object *args) ;/*object self_7313935, object k_736499, object x_731399_733658, object dim_731400_733659, object vars_731401_733660*/
+-static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_7313936, object r_736500*/
+-static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_7313940, object r_736505*/
+-static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_7313943, object r_736515*/
+-static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_7313942, object r_736512*/
+-static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_7313941, object r_736508*/
+-static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_7313937, object k_736504, object lit_731405_733661*/
+-static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_7313938, object r_736503*/
+-static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_7313939, object r_736501*/
+-static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_7313944, object r_736498*/
+-static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_7313945, object r_736497*/
+-static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_7313946, object r_736494*/
+-static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_7313947, object r_736393*/
+-static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_7313948, object k_736477, object x_731416_733662, object vars_731417_733663, object dim_731418_733664*/
+-static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_7313949, object x_731420_733665, object free_731421_733666*/
+-static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_7313950, object lp_731422_733667*/
+-static void __lambda_1426(void *data, object clo, int argc, object *args) ;/*object self_7313951, object lp_731422_733667*/
+-static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_7313952, object k_736481, object x_731423_733668, object free_731424_733669*/
+-static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_7313953, object r_736482*/
+-static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_7313960, object r_736493*/
+-static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_7313959, object r_736490*/
+-static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_7313954, object r_736483*/
+-static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_7313955, object k_736484*/
+-static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_7313956, object r_736485*/
+-static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_7313957, object tmp_731431_731433_733670*/
+-static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_7313958, object cell_731434_733671*/
+-static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_7313961, object r_736480*/
+-static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_7313962, object r_736479*/
+-static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_7313963, object r_736476*/
+-static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_7313964, object r_736394*/
+-static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_7313965, object k_736410, object tmpl_731443_733672, object vars_731444_733673*/
+-static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_7313966, object t_731446_733674*/
+-static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_7313967, object lp_731448_733676*/
+-static void __lambda_1425(void *data, object clo, int argc, object *args) ;/*object self_7313968, object lp_731448_733676*/
+-static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_7313969, object k_736413, object t_731449_733677, object dim_731450_733678*/
+-static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_7313970, object r_736414*/
+-static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_7314005, object r_736473*/
+-static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_7314006, object r_736472*/
+-static void __lambda_892(void *data, object clo, int argc, object *args) ;/*object self_7313975, object r_736423*/
+-static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_7313978, object r_736430*/
+-static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_7314001, object r_736466*/
+-static void __lambda_918(void *data, object clo, int argc, object *args) ;/*object self_7314002, object r_736469*/
+-static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_7314003, object r_736467*/
+-static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_7314004, object r_736468*/
+-static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_7313979, object depth_731473_733682*/
+-static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_7313980, object r_736465*/
+-static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_7313981, object ell_91vars_731479_733684*/
+-static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_7313982, object r_736435*/
+-static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_7313983, object r_736459*/
+-static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_7313984, object once_731491_733685*/
+-static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_7313985, object nest_731494_733686*/
+-static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_7313986, object d_731501_733688, object many_731502_733689*/
+-static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_7313987, object lp_731448_731503_733690*/
+-static void __lambda_1424(void *data, object clo, int argc, object *args) ;/*object self_7313988, object lp_731448_731503_733690*/
+-static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_7313989, object k_736446, object d_731504_733691, object many_731505_733692*/
+-static void __lambda_910(void *data, object clo, int argc, object *args) ;/*object self_7313990, object r_736445*/
+-static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_7313991, object r_736444*/
+-static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_7313992, object many_731497_733687*/
+-static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_7313993, object r_736443*/
+-static void __lambda_914(void *data, object clo, int argc, object *args) ;/*object self_7313994, object r_736442*/
+-static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_7313995, object r_736441*/
+-static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_7313996, object k_736450*/
+-static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_7313997, object r_736451*/
+-static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_7313998, object k_736454*/
+-static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_7313999, object r_736456*/
+-static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_7314000, object k_736460*/
+-static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_7313976, object r_736424*/
+-static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_7313977, object k_736425*/
+-static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_7313971, object k_736420, object v_731461_733681*/
+-static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_7313972, object r_736419*/
+-static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_7313973, object tmp_731456_731458_733679*/
+-static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_7313974, object cell_731459_733680*/
+-static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_7314007, object r_736412*/
+-static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_7314008, object r_736411*/
+-static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_7314009, object r_736409*/
+-static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_7314010, object r_736395*/
+-static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_7314011, object k_736406, object clause_731516_733693*/
+-static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_7314012, object r_736405*/
+-static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_7314013, object r_736401*/
+-static void __lambda_878(void *data, object clo, int argc, object *args) ;/*object self_7314014, object r_736404*/
+-static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_7314015, object r_736400*/
+-static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_7314016, object k_736759*/
+-static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_7314017, object k_736762*/
+-static void __lambda_809(void *data, object clo, int argc, object *args) ;/*closure _,object k_736344, object kar_731260_733548, object kdr_731261_733549, object source_731262_733550*/
+-static void __lambda_807(void *data, object clo, int argc, object *args) ;/*closure _,object k_736340, object pred_731252_733545, object ls_731253_733546*/
+-static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_7313785, object tmp_731256_731258_733547*/
+-static void __lambda_805(void *data, object clo, int argc, object *args) ;/*closure _,object k_736333, object pred_731249_733543, object ls_731250_733544*/
+-static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_7313784, object r_736335*/
+-static void __lambda_1513(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv)*/
+-static void __lambda_1512(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_1511(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_1510(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
+-static void __lambda_1509(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object str)*/
+-static void __lambda_1508(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_1507(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_1506(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_1505(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static object __lambda_1504(void *data, object ptr) ;
+-static void __lambda_1503(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
+-static object __lambda_1502(void *data, object ptr) ;
+-static void __lambda_1501(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
+-static object __lambda_1500(void *data, object ptr) ;
+-static void __lambda_1499(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
+-static void __lambda_1498(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z1, object z2)*/
+-static object __lambda_1497(void *data, object ptr,object z_731248_733542) ;
+-static void __lambda_804(void *data, object clo, int argc, object *args) ;/*closure _,object k_736326, object z_731248_733542*/
+-static void __lambda_801(void *data, object clo, int argc, object *args) ;/*closure _,object k_736321, object n_731246_733540, object m_731247_733541*/
+-static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_7313782, object r_736322*/
+-static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_7313783, object r_736323*/
+-static void __lambda_799(void *data, object clo, int argc, object *args) ;/*closure _,object k_736316, object n_731244_733538, object m_731245_733539*/
+-static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_7313781, object r_736318*/
+-static void __lambda_798(void *data, object clo, int argc, object *args) ;/*closure _,object k_736308, object n_731240_733535, object m_731241_733536*/
+-static void __lambda_795(void *data, object clo, int argc, object *args) ;/*closure _,object k_736303, object n_731238_733533, object m_731239_733534*/
+-static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_7313779, object r_736304*/
+-static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_7313780, object r_736305*/
+-static object __lambda_1496(void *data, object ptr,object x_731235_733531, object y_731236_733532) ;
+-static void __lambda_794(void *data, object clo, int argc, object *args) ;/*closure _,object k_736290, object x_731235_733531, object y_731236_733532*/
+-static object __lambda_1495(void *data, object ptr, object obj) ;
+-static void __lambda_1494(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
+-static void __lambda_1493(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
+-static void __lambda_1492(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
+-static void __lambda_793(void *data, object clo, int argc, object *args) ;/*closure _,object k_736283, object nums_731234_733530_raw, ...*/
+-static void __lambda_791(void *data, object clo, int argc, object *args) ;/*closure _,object k_736277, object a_731232_733528, object b_731233_733529*/
+-static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_7313778, object r_736280*/
+-static void __lambda_790(void *data, object clo, int argc, object *args) ;/*closure _,object k_736270, object nums_731231_733527_raw, ...*/
+-static void __lambda_788(void *data, object clo, int argc, object *args) ;/*closure _,object k_736265, object a_731229_733525, object b_731230_733526*/
+-static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_7313777, object r_736267*/
+-static void __lambda_785(void *data, object clo, int argc, object *args) ;/*closure _,object k_736255, object first_731225_733521, object rest_731226_733522_raw, ...*/
+-static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_7313775, object k_736257, object old_731227_733523, object new_731228_733524*/
+-static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_7313776, object r_736256*/
+-static void __lambda_782(void *data, object clo, int argc, object *args) ;/*closure _,object k_736249, object first_731221_733517, object rest_731222_733518_raw, ...*/
+-static void __lambda_784(void *data, object clo, int argc, object *args) ;/*object self_7313773, object k_736251, object old_731223_733519, object new_731224_733520*/
+-static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_7313774, object r_736250*/
+-static void __lambda_781(void *data, object clo, int argc, object *args) ;/*closure _,object k_736246, object x_731219_733515, object y_731220_733516*/
+-static object __lambda_1491(void *data, object ptr, object z) ;
+-static void __lambda_1490(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static void __lambda_780(void *data, object clo, int argc, object *args) ;/*closure _,object k_736240, object num_731218_733514*/
+-static object __lambda_1489(void *data, object ptr, object num) ;
+-static void __lambda_1488(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
+-static object __lambda_1487(void *data, object ptr, object num) ;
+-static void __lambda_1486(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
+-static object __lambda_1485(void *data, object ptr, object z) ;
+-static void __lambda_1484(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static void __lambda_774(void *data, object clo, int argc, object *args) ;/*closure _,object k_736223, object k_731208_733511*/
+-static void __lambda_776(void *data, object clo, int argc, object *args) ;/*object self_7313768, object r_736224*/
+-static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_7313769, object s_731213_733512*/
+-static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_7313770, object k_736228*/
+-static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_7313771, object r_736229*/
+-static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_7313772, object k_736232*/
+-static void __lambda_1483(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
+-static void __lambda_1482(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
+-static void __lambda_772(void *data, object clo, int argc, object *args) ;/*closure _,object k_736218, object num_731207_733510*/
+-static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_7313767, object r_736220*/
+-static void __lambda_770(void *data, object clo, int argc, object *args) ;/*closure _,object k_736213, object num_731206_733509*/
+-static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_7313766, object r_736215*/
+-static void __lambda_768(void *data, object clo, int argc, object *args) ;/*closure _,object k_736206, object a_731203_733506, object b_731204_733507*/
+-static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_7313765, object res_731205_733508*/
+-static void __lambda_1481(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num1, object num2)*/
+-static void __lambda_1480(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
+-static object __lambda_1479(void *data, object ptr, object z) ;
+-static void __lambda_1478(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static object __lambda_1477(void *data, object ptr, object z) ;
+-static void __lambda_1476(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static object __lambda_1475(void *data, object ptr, object z) ;
+-static void __lambda_1474(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static object __lambda_1473(void *data, object ptr, object z) ;
+-static void __lambda_1472(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static object __lambda_1471(void *data, object ptr, object z) ;
+-static void __lambda_1470(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static object __lambda_1469(void *data, object ptr, object z) ;
+-static void __lambda_1468(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
+-static void __lambda_762(void *data, object clo, int argc, object *args) ;/*closure _,object k_736196, object pred_731190_733501, object lst_731191_733502*/
+-static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_7313759, object l_731193_733503*/
+-static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_7313760, object every_85_731194_733504*/
+-static void __lambda_1423(void *data, object clo, int argc, object *args) ;/*object self_7313761, object every_85_731194_733504*/
+-static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_7313762, object k_736200, object l_731195_733505*/
+-static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_7313763, object r_736199*/
+-static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_7313764, object r_736198*/
+-static void __lambda_756(void *data, object clo, int argc, object *args) ;/*closure _,object k_736186, object pred_731177_733496, object lst_731178_733497*/
+-static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_7313753, object l_731180_733498*/
+-static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_7313754, object any_85_731181_733499*/
+-static void __lambda_1422(void *data, object clo, int argc, object *args) ;/*object self_7313755, object any_85_731181_733499*/
+-static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_7313756, object k_736190, object l_731182_733500*/
+-static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_7313757, object r_736189*/
+-static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_7313758, object r_736188*/
+-static void __lambda_742(void *data, object clo, int argc, object *args) ;/*closure _,object k_736163, object reason_731161_733486, object expr_731162_733487, object args_731163_733488_raw, ...*/
+-static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_7313739, object reason_95line_91loc_127_733490*/
+-static void __lambda_1421(void *data, object clo, int argc, object *args) ;/*object self_7313740, object reason_95line_91loc_127_733490*/
+-static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_7313741, object k_736181, object reason_731164_733492*/
+-static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_7313742, object r_736183*/
+-static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_7313743, object r_736180*/
+-static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_7313744, object r_736164*/
+-static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_7313745, object found_731168_733493*/
+-static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_7313746, object msg_731174_733495*/
+-static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_7313747, object k_736170*/
+-static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_7313748, object r_736171*/
+-static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_7313749, object r_736172*/
+-static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_7313750, object r_736173*/
+-static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_7313751, object k_736177*/
+-static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_7313752, object r_736178*/
+-static void __lambda_1467(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
+-static void __lambda_1466(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object h)*/
+-static void __lambda_730(void *data, object clo, int argc, object *args) ;/*closure _,object k_736145, object handler_731153_733479, object thunk_731154_733480*/
+-static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_7313726, object k_736151, object obj_731157_733483*/
+-static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_7313727, object result_731158_733484, object continuable_127_731159_733485*/
+-static void __lambda_1420(void *data, object clo, int argc, object *args) ;/*object self_7313728, object result_731158_733484*/
+-static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_7313729, object r_736153*/
+-static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_7313730, object r_736155*/
+-static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_7313731, object r_736154*/
+-static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_7313732, object r_736146*/
+-static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_7313733, object result_731155_733481, object my_91handler_731156_733482*/
+-static void __lambda_1419(void *data, object clo, int argc, object *args) ;/*object self_7313734, object result_731155_733481*/
+-static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_7313735, object r_736147*/
+-static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_7313736, object r_736150*/
+-static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_7313737, object r_736148*/
+-static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_7313738, object r_736149*/
+-static void __lambda_729(void *data, object clo, int argc, object *args) ;/*closure _,object k_736104, object exp_731147_733476, object rename_731148_733477, object compare_731149_733478*/
+-static void __lambda_728(void *data, object clo, int argc, object *args) ;/*closure _,object k_736095, object obj_731146_733475*/
+-static void __lambda_727(void *data, object clo, int argc, object *args) ;/*closure _,object k_736086, object obj_731145_733474*/
+-static void __lambda_726(void *data, object clo, int argc, object *args) ;/*closure _,object k_736082, object msg_731143_733472, object args_731144_733473_raw, ...*/
+-static void __lambda_725(void *data, object clo, int argc, object *args) ;/*closure _,object k_736073, object x_731141_733471*/
+-static void __lambda_707(void *data, object clo, int argc, object *args) ;/*closure _,object k_736037, object init_731114_733461, object o_731115_733462_raw, ...*/
+-static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_7313708, object converter_731118_733463*/
+-static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_7313709, object value_731121_733464*/
+-static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_7313710, object key_731124_733465*/
+-static void __lambda_1418(void *data, object clo, int argc, object *args) ;/*object self_7313711, object key_731124_733465*/
+-static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_7313712, object r_736040*/
+-static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_7313713, object r_736061*/
+-static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_7313714, object r_736041*/
+-static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_7313715, object r_736042*/
+-static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_7313716, object k_736043, object args_731126_733466_raw, ...*/
+-static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_7313721, object r_736055*/
+-static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_7313722, object cell_731139_733469*/
+-static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_7313723, object r_736053*/
+-static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_7313719, object r_736050*/
+-static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_7313720, object cell_731134_733468*/
+-static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_7313717, object pobj_731130_733467*/
+-static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_7313718, object r_736046*/
+-static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_7313724, object k_736062*/
+-static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_7313725, object k_736064, object x_731140_733470*/
+-static void __lambda_1465(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
+-static void __lambda_1464(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
+-static void __lambda_636(void *data, object clo, int argc, object *args) ;/*closure _,object k_735723, object expr_73790_73856_731007_733354, object rename_73791_73857_731008_733355, object compare_73792_73858_731009_733356*/
+-static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_7313636, object v_931_73798_73933_731057_733404*/
+-static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_7313637, object tmp_73860_73862_731010_733357*/
+-static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_7313638, object r_735724*/
+-static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_7313639, object k_735726*/
+-static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_7313640, object v_9330_73827_73899_731035_733382*/
+-static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_7313641, object tmp_73864_73866_731011_733358*/
+-static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_7313642, object v_9347_73844_73871_731013_733360*/
+-static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_7313643, object tmp_73868_73870_731012_733359*/
+-static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_7313644, object r_735729*/
+-static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_7313645, object k_735731*/
+-static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_7313646, object w_9349_73846_73875_731015_733362, object param_91ls51_73848_73876_731016_733363, object value_91ls52_73849_73877_731017_733364*/
+-static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_7313647, object lp_9350_73847_73878_731018_733365*/
+-static void __lambda_1417(void *data, object clo, int argc, object *args) ;/*object self_7313648, object lp_9350_73847_73878_731018_733365*/
+-static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_7313649, object k_735738, object w_9349_73846_73879_731019_733366, object param_91ls51_73848_73880_731020_733367, object value_91ls52_73849_73881_731021_733368*/
+-static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_7313650, object r_735740_7312973*/
+-static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_7313651, object r_735741_7312974_7312983*/
+-static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_7313652, object param_73882_731022_733369_7312975_7312984, object value_73883_731023_733370_7312976_7312985*/
+-static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_7313653, object r_735744_7312977_7312986*/
+-static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_7313654, object k_735759_738751_7312980_7312989, object param_73886_731026_733373_738752_7312981_7312990, object value_73887_731027_733374_738753_7312982_7312991*/
+-static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_7313655, object r_735758_738744_7312978_7312987*/
+-static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_7313656, object r_735753_738745_7312979_7312988*/
+-static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_7313657, object r_735737*/
+-static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_7313658, object r_735736*/
+-static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_7313659, object k_735780*/
+-static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_7313660, object r_735810*/
+-static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_7313661, object r_735829_738663*/
+-static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_7313662, object r_735832_738664*/
+-static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_7313663, object r_735835_738665*/
+-static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_7313664, object k_735845*/
+-static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_7313665, object v_935_73802_73941_731061_733408*/
+-static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_7313666, object w_937_73804_73945_731063_733410, object param_91ls9_73806_73946_731064_733411, object value_91ls10_73807_73947_731065_733412, object p_91ls11_73808_73948_731066_733413, object old_91ls12_73809_73949_731067_733414, object new_91ls13_73810_73950_731068_733415*/
+-static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_7313667, object lp_938_73805_73951_731069_733416*/
+-static void __lambda_1416(void *data, object clo, int argc, object *args) ;/*object self_7313668, object lp_938_73805_73951_731069_733416*/
+-static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_7313669, object k_735863, object w_937_73804_73952_731070_733417, object param_91ls9_73806_73953_731071_733418, object value_91ls10_73807_73954_731072_733419, object p_91ls11_73808_73955_731073_733420, object old_91ls12_73809_73956_731074_733421, object new_91ls13_73810_73957_731075_733422*/
+-static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_7313670, object r_735865_7312728*/
+-static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_7313671, object r_735866_7312729_7312779*/
+-static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_7313672, object r_735867_7312730_7312780_7312829*/
+-static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_7313673, object r_735868_7312731_7312781_7312830_7312878*/
+-static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_7313674, object r_735869_7312732_7312782_7312831_7312879_7312926*/
+-static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_7313675, object param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927, object value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928, object p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929, object old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930, object new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931*/
+-static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_7313676, object r_735880_7312738_7312788_7312837_7312885_7312932*/
+-static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_7313677, object k_736003_7312776_7312826_7312875_7312923_7312970, object p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971, object param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972*/
+-static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_7313678, object r_736002_7312739_7312789_7312838_7312886_7312933*/
+-static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_7313679, object r_735883_7312740_7312790_7312839_7312887_7312934*/
+-static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_7313680, object r_735889_7312741_7312791_7312840_7312888_7312935*/
+-static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_7313681, object k_735993_7312773_7312823_7312872_7312920_7312967, object old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968, object p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969*/
+-static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_7313682, object r_735992_7312742_7312792_7312841_7312889_7312936*/
+-static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_7313683, object r_735965_7312743_7312793_7312842_7312890_7312937*/
+-static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_7313684, object k_735968_7312767_7312817_7312866_7312914_7312961, object new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962, object p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963, object value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964*/
+-static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_7313685, object r_735984_7312771_7312821_7312870_7312918_7312965*/
+-static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_7313686, object r_735987_7312772_7312822_7312871_7312919_7312966*/
+-static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_7313687, object r_735967_7312744_7312794_7312843_7312891_7312938*/
+-static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_7313688, object r_735966_7312745_7312795_7312844_7312892_7312939*/
+-static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_7313689, object r_735892_7312746_7312796_7312845_7312893_7312940*/
+-static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_7313690, object r_735898_7312747_7312797_7312846_7312894_7312941*/
+-static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_7313691, object r_735940_7312748_7312798_7312847_7312895_7312942*/
+-static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_7313692, object k_735947_7312762_7312812_7312861_7312909_7312956, object p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957, object new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958*/
+-static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_7313693, object r_735955_7312765_7312815_7312864_7312912_7312959*/
+-static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_7313694, object r_735958_7312766_7312816_7312865_7312913_7312960*/
+-static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_7313695, object r_735946_7312749_7312799_7312848_7312896_7312943*/
+-static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_7313696, object r_735944_7312750_7312800_7312849_7312897_7312944*/
+-static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_7313697, object r_735941_738424_7312751_7312801_7312850_7312898_7312945*/
+-static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_7313698, object r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946*/
+-static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_7313699, object r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947*/
+-static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_7313700, object k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951, object p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952, object old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953*/
+-static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_7313701, object r_735925_738447_738475_738501_738526_7312760_7312810_7312859_7312907_7312954*/
+-static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_7313702, object r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955*/
+-static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_7313703, object r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948*/
+-static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_7313704, object r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949*/
+-static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_7313705, object r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950*/
+-static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_7313706, object r_735862*/
+-static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_7313707, object r_735861*/
+-static void __lambda_1463(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object count, object fill)*/
+-static void __lambda_635(void *data, object clo, int argc, object *args) ;/*closure _,object k_735717, object k_73784_733352, object fill_73785_733353_raw, ...*/
+-static void __lambda_634(void *data, object clo, int argc, object *args) ;/*closure _,object k_735714, object chars_73783_733351_raw, ...*/
+-static void __lambda_627(void *data, object clo, int argc, object *args) ;/*closure _,object k_735704, object type_127_73777_733346, object obj_73778_733347, object objs_73779_733348*/
+-static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_7313630, object r_735705*/
+-static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_7313631, object k_735707, object return_73781_733349*/
+-static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_7313632, object k_735710, object o_73782_733350*/
+-static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_7313633, object r_735709*/
+-static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_7313634, object r_735708*/
+-static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_7313635, object r_735706*/
+-static void __lambda_626(void *data, object clo, int argc, object *args) ;/*closure _,object k_735700, object sym1_73774_733343, object sym2_73775_733344, object syms_73776_733345_raw, ...*/
+-static void __lambda_625(void *data, object clo, int argc, object *args) ;/*closure _,object k_735696, object b1_73771_733340, object b2_73772_733341, object bs_73773_733342_raw, ...*/
+-static void __lambda_612(void *data, object clo, int argc, object *args) ;/*closure _,object k_735675, object vec_73759_733332, object fill_73760_733333, object opts_73761_733334_raw, ...*/
+-static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_7313614, object len_73762_733335, object start_73763_733336, object end_73764_733337, object loop_73765_733338*/
+-static void __lambda_1415(void *data, object clo, int argc, object *args) ;/*object self_7313615, object len_73762_733335*/
+-static void __lambda_1414(void *data, object clo, int argc, object *args) ;/*object self_7313616, object start_73763_733336*/
+-static void __lambda_1413(void *data, object clo, int argc, object *args) ;/*object self_7313617, object end_73764_733337*/
+-static void __lambda_1412(void *data, object clo, int argc, object *args) ;/*object self_7313618, object loop_73765_733338*/
+-static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_7313619, object r_735693*/
+-static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_7313620, object r_735676*/
+-static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_7313621, object r_735677*/
+-static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_7313622, object r_735685*/
+-static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_7313623, object r_735678*/
+-static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_7313624, object k_735681, object i_73766_733339*/
+-static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_7313625, object r_735682*/
+-static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_7313626, object r_735683*/
+-static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_7313627, object r_735680*/
+-static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_7313628, object r_735679*/
+-static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_7313629, object k_735686*/
+-static void __lambda_601(void *data, object clo, int argc, object *args) ;/*closure _,object k_735652, object to_73745_733322, object at_73746_733323, object from_73747_733324, object opts_73748_733325_raw, ...*/
+-static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_7313600, object len_73749_733326, object start_73750_733327, object end_73751_733328, object loop_73752_733329*/
+-static void __lambda_1411(void *data, object clo, int argc, object *args) ;/*object self_7313601, object len_73749_733326*/
+-static void __lambda_1410(void *data, object clo, int argc, object *args) ;/*object self_7313602, object start_73750_733327*/
+-static void __lambda_1409(void *data, object clo, int argc, object *args) ;/*object self_7313603, object end_73751_733328*/
+-static void __lambda_1408(void *data, object clo, int argc, object *args) ;/*object self_7313604, object loop_73752_733329*/
+-static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_7313605, object r_735653*/
+-static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_7313606, object r_735654*/
+-static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_7313607, object r_735664*/
+-static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_7313608, object r_735655*/
+-static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_7313609, object k_735658, object i_91at_73753_733330, object i_91from_73754_733331*/
+-static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_7313610, object r_735660*/
+-static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_7313611, object r_735657*/
+-static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_7313612, object r_735656*/
+-static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_7313613, object k_735665*/
+-static void __lambda_588(void *data, object clo, int argc, object *args) ;/*closure _,object k_735627, object vec_73733_733314, object opts_73734_733315_raw, ...*/
+-static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_7313584, object len_73735_733316, object start_73736_733317, object end_73737_733318, object loop_73738_733319*/
+-static void __lambda_1407(void *data, object clo, int argc, object *args) ;/*object self_7313585, object len_73735_733316*/
+-static void __lambda_1406(void *data, object clo, int argc, object *args) ;/*object self_7313586, object start_73736_733317*/
+-static void __lambda_1405(void *data, object clo, int argc, object *args) ;/*object self_7313587, object end_73737_733318*/
+-static void __lambda_1404(void *data, object clo, int argc, object *args) ;/*object self_7313588, object loop_73738_733319*/
+-static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_7313589, object r_735628*/
+-static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_7313590, object r_735629*/
+-static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_7313591, object r_735641*/
+-static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_7313592, object r_735630*/
+-static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_7313593, object k_735635, object i_73739_733320, object new_91vec_73740_733321*/
+-static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_7313594, object r_735637*/
+-static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_7313595, object r_735634*/
+-static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_7313596, object r_735631*/
+-static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_7313597, object r_735633*/
+-static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_7313598, object r_735632*/
+-static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_7313599, object k_735642*/
+-static void __lambda_585(void *data, object clo, int argc, object *args) ;/*closure _,object k_735622, object vecs_73732_733313_raw, ...*/
+-static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_7313582, object r_735624*/
+-static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_7313583, object r_735623*/
+-static void __lambda_582(void *data, object clo, int argc, object *args) ;/*closure _,object k_735615, object func_73726_733310, object vec1_73727_733311, object vecs_73728_733312_raw, ...*/
+-static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_7313580, object r_735618*/
+-static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_7313581, object r_735619*/
+-static void __lambda_578(void *data, object clo, int argc, object *args) ;/*closure _,object k_735607, object func_73720_733307, object vec1_73721_733308, object vecs_73722_733309_raw, ...*/
+-static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_7313577, object r_735611*/
+-static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_7313578, object r_735612*/
+-static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_7313579, object r_735608*/
+-static void __lambda_575(void *data, object clo, int argc, object *args) ;/*closure _,object k_735600, object func_73714_733304, object str1_73715_733305, object strs_73716_733306_raw, ...*/
+-static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_7313575, object r_735603*/
+-static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_7313576, object r_735604*/
+-static void __lambda_571(void *data, object clo, int argc, object *args) ;/*closure _,object k_735592, object func_73708_733301, object str1_73709_733302, object strs_73710_733303_raw, ...*/
+-static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_7313572, object r_735596*/
+-static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_7313573, object r_735597*/
+-static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_7313574, object r_735593*/
+-static void __lambda_559(void *data, object clo, int argc, object *args) ;/*closure _,object k_735571, object str_73696_733293, object fill_73697_733294, object opts_73698_733295_raw, ...*/
+-static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_7313557, object len_73699_733296, object start_73700_733297, object end_73701_733298, object loop_73702_733299*/
+-static void __lambda_1403(void *data, object clo, int argc, object *args) ;/*object self_7313558, object len_73699_733296*/
+-static void __lambda_1402(void *data, object clo, int argc, object *args) ;/*object self_7313559, object start_73700_733297*/
+-static void __lambda_1401(void *data, object clo, int argc, object *args) ;/*object self_7313560, object end_73701_733298*/
+-static void __lambda_1400(void *data, object clo, int argc, object *args) ;/*object self_7313561, object loop_73702_733299*/
+-static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_7313562, object r_735589*/
+-static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_7313563, object r_735572*/
+-static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_7313564, object r_735573*/
+-static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_7313565, object r_735581*/
+-static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_7313566, object r_735574*/
+-static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_7313567, object k_735577, object i_73703_733300*/
+-static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_7313568, object r_735578*/
+-static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_7313569, object r_735576*/
+-static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_7313570, object r_735575*/
+-static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_7313571, object k_735582*/
+-static void __lambda_549(void *data, object clo, int argc, object *args) ;/*closure _,object k_735548, object to_73682_733283, object at_73683_733284, object from_73684_733285, object opts_73685_733286_raw, ...*/
+-static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_7313544, object len_73686_733287, object start_73687_733288, object end_73688_733289, object loop_73689_733290*/
+-static void __lambda_1399(void *data, object clo, int argc, object *args) ;/*object self_7313545, object len_73686_733287*/
+-static void __lambda_1398(void *data, object clo, int argc, object *args) ;/*object self_7313546, object start_73687_733288*/
+-static void __lambda_1397(void *data, object clo, int argc, object *args) ;/*object self_7313547, object end_73688_733289*/
+-static void __lambda_1396(void *data, object clo, int argc, object *args) ;/*object self_7313548, object loop_73689_733290*/
+-static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_7313549, object r_735549*/
+-static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_7313550, object r_735550*/
+-static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_7313551, object r_735560*/
+-static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_7313552, object r_735551*/
+-static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_7313553, object k_735554, object i_91at_73690_733291, object i_91from_73691_733292*/
+-static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_7313554, object r_735553*/
+-static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_7313555, object r_735552*/
+-static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_7313556, object k_735561*/
+-static void __lambda_542(void *data, object clo, int argc, object *args) ;/*closure _,object k_735533, object str_73677_733278, object opts_73678_733279_raw, ...*/
+-static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_7313535, object len_73679_733280, object start_73680_733281, object end_73681_733282*/
+-static void __lambda_1395(void *data, object clo, int argc, object *args) ;/*object self_7313536, object len_73679_733280*/
+-static void __lambda_1394(void *data, object clo, int argc, object *args) ;/*object self_7313537, object start_73680_733281*/
+-static void __lambda_1393(void *data, object clo, int argc, object *args) ;/*object self_7313538, object end_73681_733282*/
+-static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_7313539, object r_735534*/
+-static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_7313540, object r_735535*/
+-static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_7313541, object r_735537*/
+-static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_7313542, object r_735536*/
+-static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_7313543, object k_735538*/
+-static void __lambda_540(void *data, object clo, int argc, object *args) ;/*closure _,object k_735528, object str_73675_733276, object opts_73676_733277_raw, ...*/
+-static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_7313534, object r_735529*/
+-static void __lambda_530(void *data, object clo, int argc, object *args) ;/*closure _,object k_735505, object str_73667_733268, object opts_73668_733269_raw, ...*/
+-static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_7313521, object len_73669_733270, object start_73670_733271, object end_73671_733272, object loop_73672_733273*/
+-static void __lambda_1392(void *data, object clo, int argc, object *args) ;/*object self_7313522, object len_73669_733270*/
+-static void __lambda_1391(void *data, object clo, int argc, object *args) ;/*object self_7313523, object start_73670_733271*/
+-static void __lambda_1390(void *data, object clo, int argc, object *args) ;/*object self_7313524, object end_73671_733272*/
+-static void __lambda_1389(void *data, object clo, int argc, object *args) ;/*object self_7313525, object loop_73672_733273*/
+-static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_7313526, object r_735506*/
+-static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_7313527, object r_735507*/
+-static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_7313528, object r_735517*/
+-static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_7313529, object r_735508*/
+-static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_7313530, object k_735512, object i_73673_733274, object lst_73674_733275*/
+-static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_7313531, object r_735511*/
+-static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_7313532, object r_735509*/
+-static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_7313533, object k_735518*/
+-static void __lambda_528(void *data, object clo, int argc, object *args) ;/*closure _,object k_735500, object vec_73664_733265, object opts_73665_733266_raw, ...*/
+-static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_7313520, object lst_73666_733267*/
+-static void __lambda_521(void *data, object clo, int argc, object *args) ;/*closure _,object k_735485, object str_73659_733260, object opts_73660_733261_raw, ...*/
+-static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_7313511, object len_73661_733262, object start_73662_733263, object end_73663_733264*/
+-static void __lambda_1388(void *data, object clo, int argc, object *args) ;/*object self_7313512, object len_73661_733262*/
+-static void __lambda_1387(void *data, object clo, int argc, object *args) ;/*object self_7313513, object start_73662_733263*/
+-static void __lambda_1386(void *data, object clo, int argc, object *args) ;/*object self_7313514, object end_73663_733264*/
+-static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_7313515, object r_735486*/
+-static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_7313516, object r_735487*/
+-static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_7313517, object r_735489*/
+-static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_7313518, object r_735488*/
+-static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_7313519, object k_735490*/
+-static void __lambda_514(void *data, object clo, int argc, object *args) ;/*closure _,object k_735470, object bv_73654_733255, object opts_73655_733256_raw, ...*/
+-static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_7313502, object len_73656_733257, object start_73657_733258, object end_73658_733259*/
+-static void __lambda_1385(void *data, object clo, int argc, object *args) ;/*object self_7313503, object len_73656_733257*/
+-static void __lambda_1384(void *data, object clo, int argc, object *args) ;/*object self_7313504, object start_73657_733258*/
+-static void __lambda_1383(void *data, object clo, int argc, object *args) ;/*object self_7313505, object end_73658_733259*/
+-static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_7313506, object r_735471*/
+-static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_7313507, object r_735472*/
+-static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_7313508, object r_735474*/
+-static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_7313509, object r_735473*/
+-static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_7313510, object k_735475*/
+-static void __lambda_493(void *data, object clo, int argc, object *args) ;/*closure _,object k_735433, object to_73619_733236, object at_73620_733237, object from_73621_733238, object o_73622_733239_raw, ...*/
+-static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_7313480, object end_73628_733241*/
+-static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_7313481, object r_735460*/
+-static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_7313482, object limit_73631_733242*/
+-static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_7313491, object i_73647_733249, object j_73648_733250*/
+-static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_7313492, object lp_73643_73649_733251*/
+-static void __lambda_1382(void *data, object clo, int argc, object *args) ;/*object self_7313493, object lp_73643_73649_733251*/
+-static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_7313494, object k_735450, object i_73650_733252, object j_73651_733253*/
+-static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_7313495, object r_735455*/
+-static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_7313496, object r_735452*/
+-static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_7313497, object r_735449*/
+-static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_7313498, object r_735448*/
+-static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_7313483, object i_73637_733243, object j_73638_733244*/
+-static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_7313484, object lp_73633_73639_733245*/
+-static void __lambda_1381(void *data, object clo, int argc, object *args) ;/*object self_7313485, object lp_73633_73639_733245*/
+-static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_7313486, object k_735440, object i_73640_733246, object j_73641_733247*/
+-static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_7313487, object r_735445*/
+-static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_7313488, object r_735442*/
+-static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_7313489, object r_735439*/
+-static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_7313490, object r_735438*/
+-static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_7313499, object k_735461*/
+-static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_7313500, object r_735462*/
+-static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_7313501, object k_735463*/
+-static void __lambda_486(void *data, object clo, int argc, object *args) ;/*closure _,object k_735418, object bv_73614_733231, object opts_73615_733232_raw, ...*/
+-static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_7313471, object len_73616_733233, object start_73617_733234, object end_73618_733235*/
+-static void __lambda_1380(void *data, object clo, int argc, object *args) ;/*object self_7313472, object len_73616_733233*/
+-static void __lambda_1379(void *data, object clo, int argc, object *args) ;/*object self_7313473, object start_73617_733234*/
+-static void __lambda_1378(void *data, object clo, int argc, object *args) ;/*object self_7313474, object end_73618_733235*/
+-static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_7313475, object r_735419*/
+-static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_7313476, object r_735420*/
+-static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_7313477, object r_735422*/
+-static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_7313478, object r_735421*/
+-static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_7313479, object k_735423*/
+-static void __lambda_476(void *data, object clo, int argc, object *args) ;/*closure _,object k_735395, object vec_73606_733223, object opts_73607_733224_raw, ...*/
+-static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_7313458, object len_73608_733225, object start_73609_733226, object end_73610_733227, object loop_73611_733228*/
+-static void __lambda_1377(void *data, object clo, int argc, object *args) ;/*object self_7313459, object len_73608_733225*/
+-static void __lambda_1376(void *data, object clo, int argc, object *args) ;/*object self_7313460, object start_73609_733226*/
+-static void __lambda_1375(void *data, object clo, int argc, object *args) ;/*object self_7313461, object end_73610_733227*/
+-static void __lambda_1374(void *data, object clo, int argc, object *args) ;/*object self_7313462, object loop_73611_733228*/
+-static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_7313463, object r_735396*/
+-static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_7313464, object r_735397*/
+-static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_7313465, object r_735407*/
+-static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_7313466, object r_735398*/
+-static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_7313467, object k_735402, object i_73612_733229, object lst_73613_733230*/
+-static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_7313468, object r_735401*/
+-static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_7313469, object r_735399*/
+-static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_7313470, object k_735408*/
+-static void __lambda_475(void *data, object clo, int argc, object *args) ;/*closure _,object k_735392, object objs_73605_733222_raw, ...*/
+-static void __lambda_474(void *data, object clo, int argc, object *args) ;/*closure _,object k_735388, object lst_73604_733221*/
+-static void __lambda_472(void *data, object clo, int argc, object *args) ;/*closure _,object k_735384, object lst_73600_733217, object k_73601_733218, object obj_73602_733219*/
+-static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_7313457, object kth_73603_733220*/
+-static void __lambda_470(void *data, object clo, int argc, object *args) ;/*closure _,object k_735380, object lst_73598_733215, object k_73599_733216*/
+-static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_7313456, object r_735381*/
+-static void __lambda_469(void *data, object clo, int argc, object *args) ;/*closure _,object k_735374, object lst_73596_733213, object k_73597_733214*/
+-static void __lambda_457(void *data, object clo, int argc, object *args) ;/*closure _,object k_735353, object f_73587_733205, object lis1_73588_733206, object lists_73589_733207_raw, ...*/
+-static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_7313455, object r_735368*/
+-static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_7313444, object lists_73591_733208*/
+-static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_7313445, object recur_73592_733209*/
+-static void __lambda_1373(void *data, object clo, int argc, object *args) ;/*object self_7313446, object recur_73592_733209*/
+-static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_7313447, object k_735359, object lists_73593_733210*/
+-static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_7313448, object k_735365*/
+-static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_7313449, object r_735360*/
+-static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_7313450, object k_735362, object cars_73594_733211, object cdrs_73595_733212*/
+-static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_7313451, object r_735364*/
+-static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_7313452, object r_735361*/
+-static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_7313453, object r_735358*/
+-static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_7313454, object r_735357*/
+-static void __lambda_455(void *data, object clo, int argc, object *args) ;/*closure _,object k_735342, object f_73580_733201, object lst1_73581_733202, object lst2_73582_733203*/
+-static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_7313443, object r_735344*/
+-static void __lambda_453(void *data, object clo, int argc, object *args) ;/*closure _,object k_735335, object f_73578_733199, object lst_73579_733200*/
+-static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_7313442, object r_735337*/
+-static void __lambda_450(void *data, object clo, int argc, object *args) ;/*closure _,object k_735323, object f_73571_733195, object lst1_73572_733196, object lst2_73573_733197*/
+-static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_7313440, object r_735325*/
+-static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_7313441, object r_735326*/
+-static void __lambda_447(void *data, object clo, int argc, object *args) ;/*closure _,object k_735315, object f_73569_733193, object lst_73570_733194*/
+-static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_7313438, object r_735317*/
+-static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_7313439, object r_735318*/
+-static void __lambda_432(void *data, object clo, int argc, object *args) ;/*closure _,object k_735296, object f_73557_733182, object lis1_73558_733183, object lists_73559_733184_raw, ...*/
+-static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_7313435, object k_735311, object x_73567_733191, object y_73568_733192*/
+-static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_7313436, object r_735312*/
+-static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_7313437, object r_735309*/
+-static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_7313423, object lists_73561_733185*/
+-static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_7313424, object recur_73562_733186*/
+-static void __lambda_1372(void *data, object clo, int argc, object *args) ;/*object self_7313425, object recur_73562_733186*/
+-static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_7313426, object k_735301, object lists_73563_733187*/
+-static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_7313427, object k_735308*/
+-static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_7313428, object r_735302*/
+-static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_7313429, object k_735304, object cars_73564_733188, object cdrs_73565_733189*/
+-static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_7313430, object x_73566_733190*/
+-static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_7313431, object r_735307*/
+-static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_7313432, object r_735303*/
+-static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_7313433, object r_735300*/
+-static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_7313434, object r_735299*/
+-static void __lambda_412(void *data, object clo, int argc, object *args) ;/*closure _,object k_735268, object lists_73545_733171*/
+-static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_7313403, object k_735270, object abort_73546_733172*/
+-static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_7313404, object lists_73548_733173*/
+-static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_7313405, object recur_73549_733174*/
+-static void __lambda_1371(void *data, object clo, int argc, object *args) ;/*object self_7313406, object recur_73549_733174*/
+-static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_7313407, object k_735273, object lists_73550_733175*/
+-static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_7313408, object k_735291*/
+-static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_7313409, object r_735275*/
+-static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_7313410, object k_735277, object list_73551_733176, object other_91lists_73552_733177*/
+-static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_7313411, object k_735290*/
+-static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_7313412, object r_735281*/
+-static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_7313413, object k_735283, object a_73553_733178, object d_73554_733179*/
+-static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_7313414, object k_735289*/
+-static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_7313415, object r_735284*/
+-static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_7313416, object k_735286, object cars_73555_733180, object cdrs_73556_733181*/
+-static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_7313417, object r_735285*/
+-static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_7313418, object r_735282*/
+-static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_7313419, object r_735276*/
+-static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_7313420, object r_735272*/
+-static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_7313421, object r_735271*/
+-static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_7313422, object r_735269*/
+-static void __lambda_411(void *data, object clo, int argc, object *args) ;/*closure _,object k_735263, object pair_73544_733170*/
+-static void __lambda_410(void *data, object clo, int argc, object *args) ;/*closure _,object k_735244, object expr_73535_733164, object rename_73536_733165, object compare_73537_733166*/
+-static void __lambda_403(void *data, object clo, int argc, object *args) ;/*closure _,object k_735232, object ls_73528_733158*/
+-static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_7313396, object ls_73530_733159, object res_73531_733160*/
+-static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_7313397, object lp_73532_733161*/
+-static void __lambda_1370(void *data, object clo, int argc, object *args) ;/*object self_7313398, object lp_73532_733161*/
+-static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_7313399, object k_735236, object ls_73533_733162, object res_73534_733163*/
+-static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_7313400, object r_735241_7312727*/
+-static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_7313401, object r_735235*/
+-static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_7313402, object r_735234*/
+-static void __lambda_396(void *data, object clo, int argc, object *args) ;/*closure _,object k_735219, object k_73522_733152, object fill_73523_733153_raw, ...*/
+-static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_7313388, object x_73524_733154, object make_73525_733155*/
+-static void __lambda_1369(void *data, object clo, int argc, object *args) ;/*object self_7313389, object x_73524_733154*/
+-static void __lambda_1368(void *data, object clo, int argc, object *args) ;/*object self_7313390, object make_73525_733155*/
+-static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_7313391, object r_735220*/
+-static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_7313392, object k_735223, object n_73526_733156, object obj_73527_733157*/
+-static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_7313393, object r_735225*/
+-static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_7313394, object r_735222*/
+-static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_7313395, object r_735221*/
+-static void __lambda_395(void *data, object clo, int argc, object *args) ;/*closure _,object k_735216, object objs_73521_733151_raw, ...*/
+-static void __lambda_386(void *data, object clo, int argc, object *args) ;/*closure _,object k_735201, object lst_73514_733141_raw, ...*/
+-static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_7313379, object append_912_733143*/
+-static void __lambda_1367(void *data, object clo, int argc, object *args) ;/*object self_7313380, object append_912_733143*/
+-static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_7313381, object k_735211, object inlist_73515_733145, object alist_73516_733146*/
+-static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_7313382, object k_735213, object ap_73517_733147, object in_73518_733148*/
+-static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_7313383, object r_735212*/
+-static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_7313384, object r_735210*/
+-static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_7313385, object r_735202*/
+-static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_7313386, object k_735208, object a_73519_733149, object b_73520_733150*/
+-static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_7313387, object r_735205*/
+-static object __lambda_1462(void *data, object ptr,object n_73513_733140) ;
+-static void __lambda_385(void *data, object clo, int argc, object *args) ;/*closure _,object k_735198, object n_73513_733140*/
+-static object __lambda_1461(void *data, object ptr,object n_73512_733139) ;
+-static void __lambda_384(void *data, object clo, int argc, object *args) ;/*closure _,object k_735195, object n_73512_733139*/
+-static object __lambda_1460(void *data, object ptr,object n_73511_733138) ;
+-static void __lambda_383(void *data, object clo, int argc, object *args) ;/*closure _,object k_735192, object n_73511_733138*/
+-static object __lambda_1459(void *data, object ptr, object o) ;
+-static void __lambda_1458(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object o)*/
+-static object __lambda_1457(void *data, object ptr,object x_73510_733137) ;
+-static void __lambda_382(void *data, object clo, int argc, object *args) ;/*closure _,object k_735189, object x_73510_733137*/
+-static void __lambda_381(void *data, object clo, int argc, object *args) ;/*closure _,object k_735185, object port_73509_733136_raw, ...*/
+-static void __lambda_379(void *data, object clo, int argc, object *args) ;/*closure _,object k_735179, object char_73507_733134, object port_73508_733135_raw, ...*/
+-static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_7313378, object r_735181*/
+-static object __lambda_1456(void *data, object ptr, object bv, object port, object start, object end) ;
+-static void __lambda_1455(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv, object port, object start, object end)*/
+-static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_735159, object vec_73501_733128, object opts_73502_733129_raw, ...*/
+-static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_7313365, object len_73503_733130, object port_73504_733131, object start_73505_733132, object end_73506_733133*/
+-static void __lambda_1366(void *data, object clo, int argc, object *args) ;/*object self_7313366, object len_73503_733130*/
+-static void __lambda_1365(void *data, object clo, int argc, object *args) ;/*object self_7313367, object port_73504_733131*/
+-static void __lambda_1364(void *data, object clo, int argc, object *args) ;/*object self_7313368, object start_73505_733132*/
+-static void __lambda_1363(void *data, object clo, int argc, object *args) ;/*object self_7313369, object end_73506_733133*/
+-static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_7313370, object r_735160*/
+-static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_7313371, object r_735172*/
+-static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_7313372, object r_735161*/
+-static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_7313373, object r_735162*/
+-static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_7313374, object r_735164*/
+-static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_7313375, object r_735163*/
+-static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_7313376, object k_735165*/
+-static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_7313377, object k_735173*/
+-static void __lambda_352(void *data, object clo, int argc, object *args) ;/*closure _,object k_735128, object vec_73473_733117, object o_73474_733118_raw, ...*/
+-static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_7313348, object in_73477_733119*/
+-static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_7313349, object start_73483_733121*/
+-static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_7313350, object end_73486_733122*/
+-static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_7313351, object res_73488_733123*/
+-static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_7313352, object len_73493_733124*/
+-static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_7313353, object lp_73494_73498_733126*/
+-static void __lambda_1362(void *data, object clo, int argc, object *args) ;/*object self_7313354, object lp_73494_73498_733126*/
+-static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_7313355, object k_735139, object i_73499_733127*/
+-static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_7313356, object r_735144*/
+-static void __lambda_368(void *data, object clo, int argc, object *args) ;/*object self_7313357, object r_735141*/
+-static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_7313358, object r_735138*/
+-static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_7313359, object r_735137*/
+-static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_7313360, object k_735146*/
+-static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_7313361, object r_735147*/
+-static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_7313362, object k_735148*/
+-static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_7313363, object k_735151*/
+-static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_7313364, object k_735155*/
+-static void __lambda_340(void *data, object clo, int argc, object *args) ;/*closure _,object k_735110, object k_73462_733110, object _191port_73463_733111_raw, ...*/
+-static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_7313334, object port_73464_733112, object bv_73465_733113, object loop_73466_733114*/
+-static void __lambda_1361(void *data, object clo, int argc, object *args) ;/*object self_7313335, object port_73464_733112*/
+-static void __lambda_1360(void *data, object clo, int argc, object *args) ;/*object self_7313336, object bv_73465_733113*/
+-static void __lambda_1359(void *data, object clo, int argc, object *args) ;/*object self_7313337, object loop_73466_733114*/
+-static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_7313338, object r_735123*/
+-static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_7313339, object r_735111*/
+-static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_7313340, object r_735122*/
+-static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_7313341, object r_735112*/
+-static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_7313342, object k_735115, object n_73467_733115*/
+-static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_7313343, object b_73468_733116*/
+-static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_7313344, object r_735120*/
+-static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_7313345, object r_735114*/
+-static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_7313346, object r_735113*/
+-static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_7313347, object k_735124*/
+-static void __lambda_336(void *data, object clo, int argc, object *args) ;/*closure _,object k_735095, object str_73451_733106, object opts_73452_733107_raw, ...*/
+-static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_7313332, object start_73460_733108, object end_73461_733109*/
+-static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_7313333, object r_735102*/
+-static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_7313331, object r_735097*/
+-static void __lambda_335(void *data, object clo, int argc, object *args) ;/*closure _,object k_735092, object str_73449_733104, object port_73450_733105*/
+-static void __lambda_333(void *data, object clo, int argc, object *args) ;/*closure _,object k_735088, object str_73448_733103*/
+-static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_7313330, object r_735089*/
+-static void __lambda_331(void *data, object clo, int argc, object *args) ;/*closure _,object k_735082, object port_73447_733102_raw, ...*/
+-static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_7313329, object r_735084*/
+-static void __lambda_329(void *data, object clo, int argc, object *args) ;/*closure _,object k_735077, object obj_73445_733101*/
+-static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_7313328, object r_735079_7312725*/
+-static void __lambda_328(void *data, object clo, int argc, object *args) ;/*closure _,object k_735073, object obj_73443_733100*/
+-static void __lambda_1454(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
+-static void __lambda_316(void *data, object clo, int argc, object *args) ;/*closure _,object k_735051, object k_73425_733090, object opts_73426_733091_raw, ...*/
+-static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_7313316, object port_73427_733092*/
+-static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_7313317, object r_735068*/
+-static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_7313318, object acc_73429_733093, object i_73430_733094*/
+-static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_7313319, object loop_73432_733096*/
+-static void __lambda_1358(void *data, object clo, int argc, object *args) ;/*object self_7313320, object loop_73432_733096*/
+-static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_7313321, object k_735057, object acc_73433_733097, object i_73434_733098, object chr_73435_733099*/
+-static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_7313324, object r_735066_738421*/
+-static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_7313323, object r_735061_738418_7312724*/
+-static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_7313322, object r_735059_7312723*/
+-static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_7313325, object r_735056*/
+-static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_7313326, object r_735055*/
+-static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_7313327, object k_735069*/
+-static void __lambda_306(void *data, object clo, int argc, object *args) ;/*closure _,object k_735035, object str_73410_733083, object port_73411_733084*/
+-static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_7313306, object r_735037*/
+-static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_7313307, object lis_73413_733085, object str_73414_733086*/
+-static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_7313308, object loop_73415_733087*/
+-static void __lambda_1357(void *data, object clo, int argc, object *args) ;/*object self_7313309, object loop_73415_733087*/
+-static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_7313310, object k_735040, object lis_73416_733088, object str_73417_733089*/
+-static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_7313313, object r_735047*/
+-static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_7313312, object r_735044_7312722*/
+-static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_7313311, object r_735042_7312721*/
+-static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_7313314, object r_735039*/
+-static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_7313315, object r_735038*/
+-static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_735025, object o_73395_733080_raw, ...*/
+-static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_7313302, object port_73398_733081*/
+-static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_7313303, object str_73401_733082*/
+-static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_7313304, object r_735030*/
+-static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_7313305, object k_735031*/
+-static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_735019, object port_73394_733079_raw, ...*/
+-static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_7313301, object r_735021*/
+-static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_735013, object port_73393_733078_raw, ...*/
+-static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_7313300, object r_735015*/
+-static void __lambda_295(void *data, object clo, int argc, object *args) ;/*closure _,object k_735007, object port_73392_733077_raw, ...*/
+-static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_7313299, object r_735009*/
+-static void __lambda_1453(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_293(void *data, object clo, int argc, object *args) ;/*closure _,object k_735001, object chr_73390_733075, object port_73391_733076_raw, ...*/
+-static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_7313298, object r_735003*/
+-static void __lambda_291(void *data, object clo, int argc, object *args) ;/*closure _,object k_734995, object port_73389_733074_raw, ...*/
+-static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_7313297, object r_734997*/
+-static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_734989, object port_73388_733073_raw, ...*/
+-static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_7313296, object r_734991*/
+-static void __lambda_1452(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object chr, object port)*/
+-static void __lambda_1451(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_1450(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
+-static void __lambda_287(void *data, object clo, int argc, object *args) ;/*closure _,object k_734982, object func_73385_733070, object end_73386_733071, object lst_73387_733072*/
+-static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_7313295, object r_734985*/
+-static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_734975, object func_73382_733067, object accum_73383_733068, object lst_73384_733069*/
+-static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_7313294, object r_734977*/
+-static void __lambda_284(void *data, object clo, int argc, object *args) ;/*closure _,object k_734970, object obj_73379_733064, object alist_73380_733065, object compare_73381_733066_raw, ...*/
+-static void __lambda_281(void *data, object clo, int argc, object *args) ;/*closure _,object k_734959, object obj_73368_733061, object lst_73369_733062, object cmp_127_73370_733063*/
+-static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_7313292, object r_734961*/
+-static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_7313293, object k_734963*/
+-static void __lambda_280(void *data, object clo, int argc, object *args) ;/*closure _,object k_734954, object obj_73365_733058, object lst_73366_733059, object compare_73367_733060_raw, ...*/
+-static void __lambda_278(void *data, object clo, int argc, object *args) ;/*closure _,object k_734947, object obj_73355_733055, object lst_73356_733056, object cmp_91proc_73357_733057*/
+-static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_7313291, object r_734949*/
+-static object __lambda_1449(void *data, object ptr,object str1_73353_733053, object str2_73354_733054) ;
+-static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_734943, object str1_73353_733053, object str2_73354_733054*/
+-static object __lambda_1448(void *data, object ptr,object str1_73351_733051, object str2_73352_733052) ;
+-static void __lambda_276(void *data, object clo, int argc, object *args) ;/*closure _,object k_734939, object str1_73351_733051, object str2_73352_733052*/
+-static object __lambda_1447(void *data, object ptr,object str1_73349_733049, object str2_73350_733050) ;
+-static void __lambda_275(void *data, object clo, int argc, object *args) ;/*closure _,object k_734935, object str1_73349_733049, object str2_73350_733050*/
+-static object __lambda_1446(void *data, object ptr,object str1_73347_733047, object str2_73348_733048) ;
+-static void __lambda_274(void *data, object clo, int argc, object *args) ;/*closure _,object k_734931, object str1_73347_733047, object str2_73348_733048*/
+-static object __lambda_1445(void *data, object ptr,object str1_73345_733045, object str2_73346_733046) ;
+-static void __lambda_273(void *data, object clo, int argc, object *args) ;/*closure _,object k_734927, object str1_73345_733045, object str2_73346_733046*/
+-static void __lambda_272(void *data, object clo, int argc, object *args) ;/*closure _,object k_734923, object str1_73342_733042, object str2_73343_733043, object strs_73344_733044_raw, ...*/
+-static void __lambda_271(void *data, object clo, int argc, object *args) ;/*closure _,object k_734919, object str1_73339_733039, object str2_73340_733040, object strs_73341_733041_raw, ...*/
+-static void __lambda_270(void *data, object clo, int argc, object *args) ;/*closure _,object k_734915, object str1_73336_733036, object str2_73337_733037, object strs_73338_733038_raw, ...*/
+-static void __lambda_269(void *data, object clo, int argc, object *args) ;/*closure _,object k_734911, object str1_73333_733033, object str2_73334_733034, object strs_73335_733035_raw, ...*/
+-static void __lambda_268(void *data, object clo, int argc, object *args) ;/*closure _,object k_734907, object str1_73330_733030, object str2_73331_733031, object strs_73332_733032_raw, ...*/
+-static void __lambda_267(void *data, object clo, int argc, object *args) ;/*closure _,object k_734903, object c1_73327_733027, object c2_73328_733028, object cs_73329_733029_raw, ...*/
+-static void __lambda_266(void *data, object clo, int argc, object *args) ;/*closure _,object k_734899, object c1_73324_733024, object c2_73325_733025, object cs_73326_733026_raw, ...*/
+-static void __lambda_265(void *data, object clo, int argc, object *args) ;/*closure _,object k_734895, object c1_73321_733021, object c2_73322_733022, object cs_73323_733023_raw, ...*/
+-static void __lambda_264(void *data, object clo, int argc, object *args) ;/*closure _,object k_734891, object c1_73318_733018, object c2_73319_733019, object cs_73320_733020_raw, ...*/
+-static void __lambda_263(void *data, object clo, int argc, object *args) ;/*closure _,object k_734887, object c1_73315_733015, object c2_73316_733016, object cs_73317_733017_raw, ...*/
+-static void __lambda_260(void *data, object clo, int argc, object *args) ;/*closure _,object k_734880, object cmp_73310_733010, object c_73311_733011, object cs_73312_733012*/
+-static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_7313289, object k_734882, object x_73313_733013, object y_73314_733014*/
+-static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_7313290, object r_734881*/
+-static void __lambda_258(void *data, object clo, int argc, object *args) ;/*closure _,object k_734872, object cmp_73300_733007, object x_73301_733008, object lst_73302_733009*/
+-static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_7313288, object r_734874*/
+-static void __lambda_256(void *data, object clo, int argc, object *args) ;/*closure _,object k_734867, object port_73297_733004, object proc_73298_733005*/
+-static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_7313287, object result_73299_733006*/
+-static void __lambda_252(void *data, object clo, int argc, object *args) ;/*closure _,object k_734861, object before_73293_733000, object thunk_73294_733001, object after_73295_733002*/
+-static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_7313284, object r_734862*/
+-static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_7313285, object result_73296_733003*/
+-static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_7313286, object r_734864*/
+-static void __lambda_250(void *data, object clo, int argc, object *args) ;/*closure _,object k_734849, object producer_73289_732997, object consumer_73290_732998*/
+-static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_7313283, object x_73291_732999*/
+-static void __lambda_249(void *data, object clo, int argc, object *args) ;/*closure _,object k_734839, object args_73287_732996_raw, ...*/
+-static void __lambda_248(void *data, object clo, int argc, object *args) ;/*closure _,object k_734833, object expr_73284_732993, object rename_73285_732994, object compare_73286_732995*/
+-static void __lambda_213(void *data, object clo, int argc, object *args) ;/*closure _,object k_734745, object expr_73254_732985, object rename_73255_732986, object compare_73256_732987*/
+-static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_7313248, object qq_732989*/
+-static void __lambda_1356(void *data, object clo, int argc, object *args) ;/*object self_7313249, object qq_732989*/
+-static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_7313250, object k_734749, object x_73257_732991, object d_73258_732992*/
+-static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_7313280, object r_734827*/
+-static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_7313277, object r_734822*/
+-static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_7313278, object r_734824*/
+-static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_7313279, object r_734823*/
+-static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_7313251, object r_734818*/
+-static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_7313252, object r_734751*/
+-static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_7313256, object r_734815*/
+-static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_7313257, object r_734762*/
+-static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_7313264, object r_734812*/
+-static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_7313265, object r_734779*/
+-static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_7313269, object r_734789*/
+-static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_7313272, object r_734799*/
+-static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_7313273, object r_734800*/
+-static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_7313274, object r_734801*/
+-static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_7313270, object r_734792*/
+-static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_7313271, object r_734794*/
+-static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_7313275, object k_734805*/
+-static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_7313276, object r_734808*/
+-static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_7313266, object r_734780*/
+-static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_7313267, object r_734785*/
+-static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_7313268, object r_734782*/
+-static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_7313261, object r_734770*/
+-static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_7313262, object r_734775*/
+-static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_7313263, object r_734772*/
+-static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_7313258, object r_734764*/
+-static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_7313259, object r_734765*/
+-static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_7313260, object r_734766*/
+-static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_7313253, object r_734753*/
+-static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_7313254, object r_734758*/
+-static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_7313255, object r_734755*/
+-static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_7313281, object r_734748*/
+-static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_7313282, object r_734746*/
+-static void __lambda_189(void *data, object clo, int argc, object *args) ;/*closure _,object k_734666, object expr_73227_732977, object rename_73228_732978, object compare_73229_732979*/
+-static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_7313225, object r_734723*/
+-static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_7313226, object r_734729*/
+-static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_7313227, object k_734733, object x_73253_732984*/
+-static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_7313228, object r_734739*/
+-static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_7313229, object r_734738*/
+-static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_7313230, object r_734731*/
+-static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_7313231, object r_734730*/
+-static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_7313232, object r_734724*/
+-static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_7313233, object body_73232_732980*/
+-static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_7313234, object wrap_73238_732982*/
+-static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_7313235, object r_734670*/
+-static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_7313236, object r_734672*/
+-static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_7313237, object k_734679, object x_73243_732983*/
+-static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_7313238, object r_734677*/
+-static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_7313239, object r_734674*/
+-static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_7313240, object k_734684*/
+-static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_7313246, object r_734710*/
+-static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_7313247, object r_734717*/
+-static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_7313241, object r_734686*/
+-static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_7313242, object r_734704*/
+-static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_7313243, object r_734692*/
+-static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_7313244, object r_734694*/
+-static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_7313245, object r_734696*/
+-static void __lambda_182(void *data, object clo, int argc, object *args) ;/*closure _,object k_734639, object exp_73221_732974, object rename_73222_732975, object compare_73223_732976*/
+-static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_7313219, object r_734640*/
+-static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_7313220, object r_734641*/
+-static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_7313221, object k_734658*/
+-static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_7313222, object r_734660*/
+-static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_7313223, object k_734661*/
+-static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_7313224, object r_734663*/
+-static void __lambda_175(void *data, object clo, int argc, object *args) ;/*closure _,object k_734616, object exp_73215_732971, object rename_73216_732972, object compare_73217_732973*/
+-static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_7313213, object r_734617*/
+-static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_7313214, object r_734618*/
+-static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_7313215, object k_734631*/
+-static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_7313216, object r_734633*/
+-static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_7313217, object k_734634*/
+-static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_7313218, object r_734636*/
+-static void __lambda_142(void *data, object clo, int argc, object *args) ;/*closure _,object k_734505, object expr_73172_732955, object rename_73173_732956, object compare_73174_732957*/
+-static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_7313178, object agg_91cond_732961, object body_732962, object clause_732963*/
+-static void __lambda_1355(void *data, object clo, int argc, object *args) ;/*object self_7313179, object agg_91cond_732961*/
+-static void __lambda_1354(void *data, object clo, int argc, object *args) ;/*object self_7313180, object body_732962*/
+-static void __lambda_1353(void *data, object clo, int argc, object *args) ;/*object self_7313181, object clause_732963*/
+-static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_7313182, object k_734600, object exprs_73175_732967*/
+-static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_7313183, object r_734611*/
+-static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_7313184, object r_734603*/
+-static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_7313186, object r_734609*/
+-static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_7313185, object r_734606*/
+-static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_7313187, object r_734599*/
+-static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_7313188, object r_734506*/
+-static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_7313189, object k_734579, object tmp_91sym_73189_732968, object lis_73190_732969*/
+-static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_7313190, object r_734594*/
+-static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_7313191, object r_734590*/
+-static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_7313192, object r_734586*/
+-static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_7313193, object r_734578*/
+-static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_7313194, object r_734507*/
+-static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_7313195, object k_734524, object ls_73194_732970*/
+-static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_7313196, object r_734575*/
+-static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_7313197, object r_734526*/
+-static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_7313204, object r_734554*/
+-static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_7313205, object r_734564*/
+-static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_7313206, object r_734556*/
+-static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_7313207, object r_734558*/
+-static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_7313208, object r_734560*/
+-static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_7313198, object r_734529*/
+-static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_7313199, object r_734539*/
+-static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_7313200, object r_734541*/
+-static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_7313201, object r_734545*/
+-static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_7313202, object r_734533*/
+-static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_7313203, object r_734535*/
+-static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_7313209, object r_734523*/
+-static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_7313210, object r_734508*/
+-static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_7313211, object r_734518*/
+-static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_7313212, object r_734513*/
+-static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_734441, object expr_73168_732951, object rename_73169_732952, object compare_73170_732953*/
+-static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_7313158, object r_734502*/
+-static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_7313159, object cl_73171_732954*/
+-static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_7313160, object r_734499*/
+-static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_7313161, object r_734444*/
+-static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_7313164, object r_734453*/
+-static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_7313173, object r_734479*/
+-static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_7313174, object r_734487*/
+-static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_7313175, object r_734483*/
+-static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_7313165, object r_734456*/
+-static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_7313166, object r_734476*/
+-static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_7313167, object r_734459*/
+-static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_7313168, object r_734460*/
+-static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_7313169, object r_734461*/
+-static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_7313170, object r_734463*/
+-static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_7313171, object k_734466*/
+-static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_7313172, object r_734470*/
+-static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_7313176, object k_734493*/
+-static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_7313177, object r_734495*/
+-static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_7313162, object r_734452*/
+-static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_7313163, object r_734447*/
+-static void __lambda_84(void *data, object clo, int argc, object *args) ;/*closure _,object k_734342, object expr_7388_732916, object rename_7389_732917, object compare_7390_732918*/
+-static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_7313117, object _191lib_117import_91_125filename_732923, object _191lib_117import_91_125library_91name_732924, object _191library_91exists_127_732925, object check_732926*/
+-static void __lambda_1352(void *data, object clo, int argc, object *args) ;/*object self_7313118, object _191lib_117import_91_125filename_732923*/
+-static void __lambda_1351(void *data, object clo, int argc, object *args) ;/*object self_7313119, object _191lib_117import_91_125library_91name_732924*/
+-static void __lambda_1350(void *data, object clo, int argc, object *args) ;/*object self_7313120, object _191library_91exists_127_732925*/
+-static void __lambda_1349(void *data, object clo, int argc, object *args) ;/*object self_7313121, object check_732926*/
+-static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_7313122, object k_734433, object import_7391_732931, object ext_7392_732932_raw, ...*/
+-static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_7313123, object r_734435*/
+-static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_7313124, object r_734434*/
+-static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_7313125, object r_734432*/
+-static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_7313126, object r_734343*/
+-static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_7313127, object k_734405, object import_7393_732933, object ext_7394_732934_raw, ...*/
+-static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_7313128, object k_734425, object i_73113_732940*/
+-static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_7313129, object r_734426*/
+-static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_7313130, object k_734427*/
+-static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_7313131, object r_734424*/
+-static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_7313132, object r_734423*/
+-static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_7313133, object r_734422*/
+-static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_7313134, object filename_85_73100_732936*/
+-static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_7313135, object filename_73103_732937*/
+-static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_7313136, object r_734409*/
+-static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_7313137, object r_734410*/
+-static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_7313138, object k_734413*/
+-static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_7313139, object r_734404*/
+-static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_7313140, object r_734344*/
+-static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_7313141, object k_734388, object import_73121_732941*/
+-static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_7313142, object r_734387*/
+-static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_7313143, object r_734345*/
+-static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_7313144, object k_734370, object x_73139_732945*/
+-static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_7313146, object r_734386*/
+-static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_7313145, object r_734378*/
+-static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_7313147, object r_734369*/
+-static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_7313148, object r_734346*/
+-static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_7313149, object ls_73145_732947*/
+-static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_7313150, object expand_73146_732948*/
+-static void __lambda_1348(void *data, object clo, int argc, object *args) ;/*object self_7313151, object expand_73146_732948*/
+-static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_7313152, object k_734350, object ls_73147_732949*/
+-static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_7313154, object r_734359*/
+-static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_7313155, object r_734360*/
+-static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_7313153, object r_734355*/
+-static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_7313156, object r_734349*/
+-static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_7313157, object r_734348*/
+-static void __lambda_75(void *data, object clo, int argc, object *args) ;/*closure _,object k_734323, object exp_7373_732905, object rename_7374_732906, object compare_7375_732907*/
+-static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_7313107, object dummy_91bind_732910, object singlet_127_732911*/
+-static void __lambda_1347(void *data, object clo, int argc, object *args) ;/*object self_7313108, object dummy_91bind_732910*/
+-static void __lambda_1346(void *data, object clo, int argc, object *args) ;/*object self_7313109, object singlet_127_732911*/
+-static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_7313110, object k_734337, object l_7376_732914*/
+-static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_7313111, object r_734336*/
+-static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_7313112, object r_734324*/
+-static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_7313113, object k_734328, object exps_7378_732915*/
+-static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_7313114, object r_734329*/
+-static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_7313115, object r_734327*/
+-static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_7313116, object r_734325*/
+-static void __lambda_58(void *data, object clo, int argc, object *args) ;/*closure _,object k_734292, object exp_7346_732892, object rename_7347_732893, object compare_7348_732894*/
+-static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_7313091, object k_734294, object k_7349_732895*/
+-static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_7313092, object k_734319, object obj_7350_732896*/
+-static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_7313093, object r_734320*/
+-static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_7313094, object r_734295*/
+-static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_7313095, object k_734297*/
+-static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_7313096, object k_734317, object b_7372_732904*/
+-static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_7313097, object r_734316*/
+-static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_7313098, object namings_7357_732899*/
+-static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_7313099, object names_7360_732900*/
+-static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_7313100, object k_734313, object binding_7371_732903*/
+-static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_7313101, object r_734312*/
+-static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_7313102, object sets_7363_732901*/
+-static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_7313103, object args_7366_732902*/
+-static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_7313104, object r_734309*/
+-static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_7313105, object r_734296*/
+-static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_7313106, object r_734293*/
+-static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_734247, object expr_7336_732888, object rename_7337_732889, object compare_7338_732890*/
+-static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_7313077, object r_734248*/
+-static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_7313078, object r_734249*/
+-static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_7313079, object r_734283*/
+-static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_7313081, object r_734256*/
+-static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_7313082, object r_734257*/
+-static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_7313083, object r_734263*/
+-static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_7313084, object k_734273*/
+-static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_7313085, object k_734277, object x_7342_732891*/
+-static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_7313086, object r_734275*/
+-static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_7313080, object r_734251*/
+-static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_7313087, object k_734284*/
+-static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_7313088, object r_734286*/
+-static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_7313089, object k_734287*/
+-static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_7313090, object r_734289*/
+-static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_734186, object expr_7323_732881, object rename_7324_732882, object compare_7325_732883*/
+-static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_7313059, object r_734187*/
+-static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_7313060, object r_734188*/
+-static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_7313061, object r_734190*/
+-static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_7313062, object k_734228, object x_7327_732885*/
+-static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_7313063, object r_734227*/
+-static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_7313064, object r_734191*/
+-static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_7313065, object r_734192*/
+-static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_7313066, object r_734193*/
+-static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_7313067, object vars_7328_732886, object vals_7329_732887*/
+-static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_7313071, object r_734222*/
+-static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_7313068, object r_734196*/
+-static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_7313069, object r_734201*/
+-static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_7313070, object r_734214*/
+-static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_7313072, object k_734233*/
+-static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_7313073, object k_734239*/
+-static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_7313074, object r_734241*/
+-static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_7313075, object k_734242*/
+-static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_7313076, object r_734244*/
+-static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_734161, object expr_7313_732878, object rename_7314_732879, object compare_7315_732880*/
+-static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_7313053, object r_734164*/
+-static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_7313054, object r_734178*/
+-static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_7313055, object r_734167*/
+-static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_7313056, object r_734168*/
+-static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_7313057, object r_734169*/
+-static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_7313058, object r_734171*/
+-static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_734147, object expr_733_732875, object rename_734_732876, object compare_735_732877*/
+-static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_7313051, object r_734150*/
+-static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_7313052, object r_734153*/
+-static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_734144*/
+-static void __lambda_11(void *data, object clo, int argc, object *args) ;/*closure _,object k_734140, object sym_732_732874*/
+-static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_7313050, object r_734141*/
+-static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_734119*/
+-static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_7313042, object feats_731_732873*/
+-static void __lambda_1345(void *data, object clo, int argc, object *args) ;/*object self_7313043, object feats_731_732873*/
+-static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_7313044, object r_734120*/
+-static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_7313045, object r_734128*/
+-static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_7313046, object r_734126*/
+-static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_7313047, object k_734129*/
+-static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_7313048, object r_734134*/
+-static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_7313049, object r_734131*/
++static void __lambda_1280(void *data, object clo, int argc, object *args) ;/*closure _,object k_737616*/
++static void __lambda_1281(void *data, object clo, int argc, object *args) ;/*object self_7313005, object r_737618*/
++static void __lambda_1282(void *data, object clo, int argc, object *args) ;/*object self_7313006, object r_737619*/
++static void __lambda_1283(void *data, object clo, int argc, object *args) ;/*object self_7313007, object r_737637*/
++static void __lambda_1284(void *data, object clo, int argc, object *args) ;/*object self_7313008, object r_737620*/
++static void __lambda_1285(void *data, object clo, int argc, object *args) ;/*object self_7313009, object r_737635*/
++static void __lambda_1286(void *data, object clo, int argc, object *args) ;/*object self_7313010, object r_737621*/
++static void __lambda_1287(void *data, object clo, int argc, object *args) ;/*object self_7313011, object r_737633*/
++static void __lambda_1288(void *data, object clo, int argc, object *args) ;/*object self_7313012, object r_737622*/
++static void __lambda_1289(void *data, object clo, int argc, object *args) ;/*object self_7313013, object r_737623*/
++static void __lambda_1290(void *data, object clo, int argc, object *args) ;/*object self_7313014, object r_737624*/
++static void __lambda_1291(void *data, object clo, int argc, object *args) ;/*object self_7313015, object r_737625*/
++static void __lambda_1292(void *data, object clo, int argc, object *args) ;/*object self_7313016, object r_737626*/
++static void __lambda_1293(void *data, object clo, int argc, object *args) ;/*object self_7313017, object r_737627*/
++static void __lambda_1294(void *data, object clo, int argc, object *args) ;/*object self_7313018, object r_737628*/
++static void __lambda_1295(void *data, object clo, int argc, object *args) ;/*object self_7313019, object r_737629*/
++static void __lambda_1296(void *data, object clo, int argc, object *args) ;/*object self_7313020, object r_737630*/
++static void __lambda_1297(void *data, object clo, int argc, object *args) ;/*object self_7313021, object r_737631*/
++static void __lambda_1222(void *data, object clo, int argc, object *args) ;/*closure _,object k_737302, object expr_732338_732378_732470_733609, object rename_732339_732379_732471_733610, object compare_732340_732380_732472_733611*/
++static void __lambda_1223(void *data, object clo, int argc, object *args) ;/*object self_7312947, object v_931_732346_732460_732520_733659*/
++static void __lambda_1231(void *data, object clo, int argc, object *args) ;/*object self_7312948, object tmp_732382_732384_732473_733612*/
++static void __lambda_1279(void *data, object clo, int argc, object *args) ;/*object self_7312949, object r_737303*/
++static void __lambda_1232(void *data, object clo, int argc, object *args) ;/*object self_7312950, object k_737305*/
++static void __lambda_1233(void *data, object clo, int argc, object *args) ;/*object self_7312951, object v_936_732351_732446_732511_733650*/
++static void __lambda_1236(void *data, object clo, int argc, object *args) ;/*object self_7312952, object tmp_732386_732388_732474_733613*/
++static void __lambda_1237(void *data, object clo, int argc, object *args) ;/*object self_7312953, object v_9313_732358_732407_732484_733623*/
++static void __lambda_1270(void *data, object clo, int argc, object *args) ;/*object self_7312954, object tmp_732390_732392_732475_733614*/
++static void __lambda_1271(void *data, object clo, int argc, object *args) ;/*object self_7312955, object v_9328_732373_732397_732477_733616*/
++static void __lambda_1277(void *data, object clo, int argc, object *args) ;/*object self_7312956, object tmp_732394_732396_732476_733615*/
++static void __lambda_1278(void *data, object clo, int argc, object *args) ;/*object self_7312957, object r_737309*/
++static void __lambda_1272(void *data, object clo, int argc, object *args) ;/*object self_7312958, object k_737311*/
++static void __lambda_1273(void *data, object clo, int argc, object *args) ;/*object self_7312959, object r_737320*/
++static void __lambda_1274(void *data, object clo, int argc, object *args) ;/*object self_7312960, object r_737328*/
++static void __lambda_1275(void *data, object clo, int argc, object *args) ;/*object self_7312961, object r_737338*/
++static void __lambda_1276(void *data, object clo, int argc, object *args) ;/*object self_7312962, object r_737334_7311423_7311432_7311440*/
++static void __lambda_1238(void *data, object clo, int argc, object *args) ;/*object self_7312963, object k_737350*/
++static void __lambda_1239(void *data, object clo, int argc, object *args) ;/*object self_7312964, object var0_732412_732487_733626*/
++static void __lambda_1240(void *data, object clo, int argc, object *args) ;/*object self_7312965, object ls_732342_732417_732490_733629, object i_732344_732418_732491_733630, object res_732343_732419_732492_733631*/
++static void __lambda_1241(void *data, object clo, int argc, object *args) ;/*object self_7312966, object lp_9317_732362_732420_732493_733632*/
++static void __lambda_1397(void *data, object clo, int argc, object *args) ;/*object self_7312967, object lp_9317_732362_732420_732493_733632*/
++static void __lambda_1244(void *data, object clo, int argc, object *args) ;/*object self_7312968, object k_737362, object ls_732342_732421_732494_733633, object i_732344_732422_732495_733634, object res_732343_732423_732496_733635*/
++static void __lambda_1245(void *data, object clo, int argc, object *args) ;/*object self_7312969, object r_737535_7311762*/
++static void __lambda_1246(void *data, object clo, int argc, object *args) ;/*object self_7312970, object v_9318_732363_732424_732497_733636_7311763*/
++static void __lambda_1247(void *data, object clo, int argc, object *args) ;/*object self_7312971, object r_737383_7311764*/
++static void __lambda_1248(void *data, object clo, int argc, object *args) ;/*object self_7312972, object r_737504_7311765*/
++static void __lambda_1249(void *data, object clo, int argc, object *args) ;/*object self_7312973, object r_737512_7311766*/
++static void __lambda_1250(void *data, object clo, int argc, object *args) ;/*object self_7312974, object r_737522_7311767*/
++static void __lambda_1251(void *data, object clo, int argc, object *args) ;/*object self_7312975, object r_737518_7310475_7310539_7310602_7311768*/
++static void __lambda_1262(void *data, object clo, int argc, object *args) ;/*object self_7312976, object k_737449_7310512_7310576_7310639_7310700_7310760_7310819_7310877_7310934_7310990_7311779, object var1_732445_732510_733649_7310513_7310577_7310640_7310701_7310761_7310820_7310878_7310935_7310991_7311780*/
++static void __lambda_1263(void *data, object clo, int argc, object *args) ;/*object self_7312977, object r_737450_7310514_7310578_7310641_7310702_7310762_7310821_7310879_7310936_7310992_7311781*/
++static void __lambda_1264(void *data, object clo, int argc, object *args) ;/*object self_7312978, object r_737458_7310515_7310579_7310642_7310703_7310763_7310822_7310880_7310937_7310993_7311782*/
++static void __lambda_1265(void *data, object clo, int argc, object *args) ;/*object self_7312979, object r_737489_7310516_7310580_7310643_7310704_7310764_7310823_7310881_7310938_7310994_7311783*/
++static void __lambda_1266(void *data, object clo, int argc, object *args) ;/*object self_7312980, object r_737495_7310517_7310581_7310644_7310705_7310765_7310824_7310882_7310939_7310995_7311784*/
++static void __lambda_1267(void *data, object clo, int argc, object *args) ;/*object self_7312981, object r_737471_7310523_7310587_7310650_7310711_7310771_7310830_7310888_7310945_7311001_7311268_7311286_7311303_7311319_7311334_7311785*/
++static void __lambda_1268(void *data, object clo, int argc, object *args) ;/*object self_7312982, object r_737479_7310524_7310588_7310651_7310712_7310772_7310831_7310889_7310946_7311002_7311269_7311287_7311304_7311320_7311335_7311786*/
++static void __lambda_1269(void *data, object clo, int argc, object *args) ;/*object self_7312983, object r_737467_7310530_7310594_7310657_7310718_7310778_7310837_7310895_7310952_7311008_7311275_7311293_7311310_7311326_7311341_7311353_7311364_7311374_7311383_7311391_7311787*/
++static void __lambda_1252(void *data, object clo, int argc, object *args) ;/*object self_7312984, object r_737448_7310482_7310546_7310609_7310670_7310730_7310789_7310847_7310904_7310960_7311769*/
++static void __lambda_1253(void *data, object clo, int argc, object *args) ;/*object self_7312985, object r_737389_7310483_7310547_7310610_7310671_7310731_7310790_7310848_7310905_7310961_7311770*/
++static void __lambda_1254(void *data, object clo, int argc, object *args) ;/*object self_7312986, object r_737394_7310484_7310548_7310611_7310672_7310732_7310791_7310849_7310906_7310962_7311771*/
++static void __lambda_1255(void *data, object clo, int argc, object *args) ;/*object self_7312987, object r_737402_7310485_7310549_7310612_7310673_7310733_7310792_7310850_7310907_7310963_7311772*/
++static void __lambda_1256(void *data, object clo, int argc, object *args) ;/*object self_7312988, object r_737433_7310486_7310550_7310613_7310674_7310734_7310793_7310851_7310908_7310964_7311773*/
++static void __lambda_1257(void *data, object clo, int argc, object *args) ;/*object self_7312989, object r_737439_7310487_7310551_7310614_7310675_7310735_7310794_7310852_7310909_7310965_7311774*/
++static void __lambda_1258(void *data, object clo, int argc, object *args) ;/*object self_7312990, object r_737415_7310493_7310557_7310620_7310681_7310741_7310800_7310858_7310915_7310971_7311020_7311043_7311065_7311086_7311106_7311775*/
++static void __lambda_1259(void *data, object clo, int argc, object *args) ;/*object self_7312991, object r_737423_7310494_7310558_7310621_7310682_7310742_7310801_7310859_7310916_7310972_7311021_7311044_7311066_7311087_7311107_7311776*/
++static void __lambda_1260(void *data, object clo, int argc, object *args) ;/*object self_7312992, object r_737411_7310500_7310564_7310627_7310688_7310748_7310807_7310865_7310922_7310978_7311027_7311050_7311072_7311093_7311113_7311130_7311146_7311161_7311175_7311188_7311777*/
++static void __lambda_1261(void *data, object clo, int argc, object *args) ;/*object self_7312993, object r_737387_7310509_7310573_7310636_7310697_7310757_7310816_7310874_7310931_7310987_7311036_7311059_7311081_7311102_7311122_7311139_7311155_7311170_7311184_7311197_7311208_7311218_7311227_7311235_7311242_7311248_7311253_7311257_7311778*/
++static void __lambda_1242(void *data, object clo, int argc, object *args) ;/*object self_7312994, object r_737361*/
++static void __lambda_1243(void *data, object clo, int argc, object *args) ;/*object self_7312995, object r_737360*/
++static void __lambda_1234(void *data, object clo, int argc, object *args) ;/*object self_7312996, object k_737542*/
++static void __lambda_1235(void *data, object clo, int argc, object *args) ;/*object self_7312997, object r_737555*/
++static void __lambda_1224(void *data, object clo, int argc, object *args) ;/*object self_7312998, object k_737564*/
++static void __lambda_1225(void *data, object clo, int argc, object *args) ;/*object self_7312999, object r_737574*/
++static void __lambda_1226(void *data, object clo, int argc, object *args) ;/*object self_7313000, object r_737577*/
++static void __lambda_1227(void *data, object clo, int argc, object *args) ;/*object self_7313001, object r_737583*/
++static void __lambda_1228(void *data, object clo, int argc, object *args) ;/*object self_7313002, object r_737602*/
++static void __lambda_1229(void *data, object clo, int argc, object *args) ;/*object self_7313003, object r_737592_7310385_7310398_7310410*/
++static void __lambda_1230(void *data, object clo, int argc, object *args) ;/*object self_7313004, object r_737595_7310386_7310399_7310411*/
++static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*closure _,object k_737133, object expr_732271_733590, object rename_732272_733591, object compare_732273_733592*/
++static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_7312917, object parent_732282_733595*/
++static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_7312918, object _191define_732300_733601*/
++static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_7312919, object _191lambda_732303_733602*/
++static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_7312920, object _191let_732306_733603*/
++static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_7312921, object _191register_732309_733604*/
++static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_7312922, object _191slot_91set_67_732312_733605*/
++static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_7312923, object _191type_191slot_191offset_732315_733606*/
++static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_7312924, object r_737148*/
++static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_7312925, object r_737149*/
++static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_7312926, object r_737282*/
++static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*object self_7312927, object r_737261*/
++static void __lambda_1219(void *data, object clo, int argc, object *args) ;/*object self_7312928, object k_737227, object f_732320_733607*/
++static void __lambda_1220(void *data, object clo, int argc, object *args) ;/*object self_7312929, object r_737235*/
++static void __lambda_1221(void *data, object clo, int argc, object *args) ;/*object self_7312930, object r_737237*/
++static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*object self_7312931, object r_737226*/
++static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_7312932, object r_737155*/
++static void __lambda_1216(void *data, object clo, int argc, object *args) ;/*object self_7312933, object k_737192, object f_732326_733608*/
++static void __lambda_1217(void *data, object clo, int argc, object *args) ;/*object self_7312934, object r_737201*/
++static void __lambda_1218(void *data, object clo, int argc, object *args) ;/*object self_7312935, object r_737203*/
++static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_7312936, object r_737191*/
++static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*object self_7312937, object r_737157*/
++static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_7312938, object r_737169*/
++static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_7312939, object r_737177*/
++static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*object self_7312940, object r_737179*/
++static void __lambda_1212(void *data, object clo, int argc, object *args) ;/*object self_7312941, object r_737178*/
++static void __lambda_1213(void *data, object clo, int argc, object *args) ;/*object self_7312942, object r_737156*/
++static void __lambda_1214(void *data, object clo, int argc, object *args) ;/*object self_7312943, object r_737154*/
++static void __lambda_1215(void *data, object clo, int argc, object *args) ;/*object self_7312944, object r_737152*/
++static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_7312945, object k_737288*/
++static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_7312946, object k_737296*/
++static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*closure _,object k_737126, object obj_732267_733588, object rtype_732268_733589*/
++static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_7312915, object r_737127*/
++static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_7312916, object r_737128*/
++static void __lambda_1467(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
++static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*closure _,object k_737115, object e_732258_733581, object lst1_732259_733582*/
++static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_7312909, object lis_732261_733583*/
++static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_7312910, object lp_732263_733585*/
++static void __lambda_1396(void *data, object clo, int argc, object *args) ;/*object self_7312911, object lp_732263_733585*/
++static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_7312912, object k_737118, object lis_732264_733586, object n_732265_733587*/
++static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_7312913, object r_737117*/
++static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_7312914, object r_737116*/
++static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*closure _,object k_737107, object sym_732253_733576, object name_732254_733577, object idx_732255_733578*/
++static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_7312906, object k_737108, object obj_732256_733579, object val_732257_733580*/
++static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_7312907, object r_737112*/
++static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_7312908, object r_737110*/
++static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*closure _,object k_737099, object sym_732249_733572, object name_732250_733573, object idx_732251_733574*/
++static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*object self_7312905, object k_737100, object obj_732252_733575*/
++static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*closure _,object k_737092, object name_732238_733568, object obj_732239_733569, object field_732240_733570*/
++static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_7312903, object idx_732243_733571*/
++static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*object self_7312904, object k_737095*/
++static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*closure _,object k_737088, object name_732233_733563, object obj_732234_733564, object idx_732235_733565, object val_732236_733566*/
++static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_7312901, object vec_732237_733567*/
++static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_7312902, object r_737089*/
++static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*closure _,object k_737084, object name_732230_733560, object sym_732231_733561*/
++static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*closure _,object k_737073, object make_732220_733555, object name_732221_733556*/
++static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_7312897, object k_737074, object args_732222_733557_raw, ...*/
++static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_7312898, object field_91values_732228_733559*/
++static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*object self_7312899, object r_737077*/
++static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_7312900, object k_737078*/
++static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*closure _,object k_737066, object make_732210_733550, object name_732211_733551*/
++static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*object self_7312895, object k_737067, object args_732212_733552_raw, ...*/
++static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_7312896, object field_91values_732218_733554*/
++static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*closure _,object k_737060, object pred_732206_733547, object name_732207_733548*/
++static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*object self_7312893, object k_737061, object obj_732208_733549*/
++static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_7312894, object r_737062*/
++static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*closure _,object k_737057, object name_732203_733544, object parent_732204_733545, object field_91tags_732205_733546*/
++static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*closure _,object k_736752, object expr_731845_731922_732097_733438, object rename_731846_731923_732098_733439, object compare_731847_731924_732099_733440*/
++static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_7312843, object v_931_731853_732078_732191_733532*/
++static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*object self_7312844, object tmp_731926_731928_732100_733441*/
++static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*object self_7312845, object r_736753*/
++static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_7312846, object k_736755*/
++static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_7312847, object v_9310_731862_732056_732177_733518*/
++static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_7312848, object tmp_731930_731932_732101_733442*/
++static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_7312849, object v_9321_731873_732029_732159_733500*/
++static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_7312850, object tmp_731934_731936_732102_733443*/
++static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_7312851, object v_9334_731886_732015_732150_733491*/
++static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_7312852, object tmp_731938_731940_732103_733444*/
++static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_7312853, object v_9341_731893_731996_732137_733478*/
++static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*object self_7312854, object tmp_731942_731944_732104_733445*/
++static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*object self_7312855, object v_9350_731902_731977_732124_733465*/
++static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_7312856, object tmp_731946_731948_732105_733446*/
++static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_7312857, object v_9359_731911_731953_732107_733448*/
++static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_7312858, object tmp_731950_731952_732106_733447*/
++static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*object self_7312859, object r_736762*/
++static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*object self_7312860, object k_736764*/
++static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_7312861, object r_736783*/
++static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_7312862, object r_736801*/
++static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*object self_7312863, object r_736794_7310337_7310346*/
++static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_7312864, object k_736808*/
++static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_7312865, object r_736824*/
++static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*object self_7312866, object r_736834*/
++static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_7312867, object k_736841*/
++static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_7312868, object r_736857*/
++static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_7312869, object r_736865*/
++static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_7312870, object k_736874*/
++static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_7312871, object r_736887*/
++static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_7312872, object k_736896*/
++static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_7312873, object r_736965*/
++static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_7312874, object r_736907*/
++static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_7312875, object r_736919*/
++static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_7312876, object r_736958*/
++static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_7312877, object r_736928_7310156_7310174_7310191*/
++static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_7312878, object r_736931_7310157_7310175_7310192*/
++static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_7312879, object r_736949_7310158_7310176_7310193*/
++static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_7312880, object r_736940_7310161_7310179_7310196_7310209_7310221*/
++static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_7312881, object k_736968*/
++static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_7312882, object r_737026*/
++static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_7312883, object r_736979*/
++static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_7312884, object r_736988*/
++static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_7312885, object r_737019*/
++static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_7312886, object r_736997_7310069_7310083_7310096*/
++static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*object self_7312887, object r_737000_7310070_7310084_7310097*/
++static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_7312888, object r_737010_7310071_7310085_7310098*/
++static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_7312889, object k_737029*/
++static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_7312890, object r_737051*/
++static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_7312891, object r_737037*/
++static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_7312892, object r_737046*/
++static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*closure _,object k_736539, object expr_731788_731803_731826_733423, object rename_731789_731804_731827_733424, object compare_731790_731805_731828_733425*/
++static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_7312812, object v_931_731796_731810_731830_733427*/
++static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_7312813, object tmp_731807_731809_731829_733426*/
++static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_7312814, object r_736540*/
++static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*object self_7312815, object k_736542*/
++static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_7312816, object r_736543*/
++static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_7312817, object k_736545*/
++static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_7312818, object r_736561*/
++static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_7312819, object r_736567*/
++static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*object self_7312820, object r_736744*/
++static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_7312821, object r_736576_738121*/
++static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_7312822, object r_736638_738122*/
++static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_7312823, object r_736738_738123*/
++static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_7312824, object r_736650_738125_738200*/
++static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_7312825, object r_736656_738126_738201*/
++static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_7312826, object r_736732_738127_738202*/
++static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_7312827, object r_736665_738129_738204_738275*/
++static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_7312828, object r_736671_738130_738205_738276*/
++static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_7312829, object r_736680_738131_738206_738277*/
++static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_7312830, object r_736725_738132_738207_738278*/
++static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*object self_7312831, object r_736689_738136_738211_738282_738348_738413_738477*/
++static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_7312832, object r_736694_738137_738212_738283_738349_738414_738478*/
++static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*object self_7312833, object r_736700_738138_738213_738284_738350_738415_738479*/
++static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_7312834, object r_736709_738139_738214_738285_738351_738416_738480*/
++static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_7312835, object r_736712_738140_738215_738286_738352_738417_738481*/
++static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_7312836, object r_736585_738167_738242_738313_738379_738444_738508_738566_738623_738679_738734_738788_738841_738893_738944_738994_739043_739091_739138_739184_739229_739273_739316_739358_739399_739439_739478_739516_739553_739589_739624_739658_739691*/
++static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_7312837, object r_736594_738168_738243_738314_738380_738445_738509_738567_738624_738680_738735_738789_738842_738894_738945_738995_739044_739092_739139_739185_739230_739274_739317_739359_739400_739440_739479_739517_739554_739590_739625_739659_739692*/
++static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_7312838, object r_736624_738169_738244_738315_738381_738446_738510_738568_738625_738681_738736_738790_738843_738895_738946_738996_739045_739093_739140_739186_739231_739275_739318_739360_739401_739441_739480_739518_739555_739591_739626_739660_739693*/
++static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_7312839, object r_736630_738170_738245_738316_738382_738447_738511_738569_738626_738682_738737_738791_738844_738896_738947_738997_739046_739094_739141_739187_739232_739276_739319_739361_739402_739442_739481_739519_739556_739592_739627_739661_739694*/
++static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_7312840, object r_736603_738176_738251_738322_738388_738453_738517_738575_738632_738688_738743_738797_738850_738902_738953_739003_739052_739100_739147_739193_739238_739282_739325_739367_739408_739448_739487_739525_739562_739598_739633_739667_739700_739728_739755_739781_739806_739830*/
++static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_7312841, object r_736609_738177_738252_738323_738389_738454_738518_738576_738633_738689_738744_738798_738851_738903_738954_739004_739053_739101_739148_739194_739239_739283_739326_739368_739409_739449_739488_739526_739563_739599_739634_739668_739701_739729_739756_739782_739807_739831*/
++static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_7312842, object r_736615_738178_738253_738324_738390_738455_738519_738577_738634_738690_738745_738799_738852_738904_738955_739005_739054_739102_739149_739195_739240_739284_739327_739369_739410_739450_739489_739527_739564_739600_739635_739669_739702_739730_739757_739783_739808_739832*/
++static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*closure _,object k_736514, object expr_731740_731753_731772_733411, object rename_731741_731754_731773_733412, object compare_731742_731755_731774_733413*/
++static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_7312805, object v_931_731748_731760_731776_733415*/
++static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*object self_7312806, object tmp_731757_731759_731775_733414*/
++static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_7312807, object r_736515*/
++static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_7312808, object k_736517*/
++static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_7312809, object r_736518*/
++static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_7312810, object k_736520*/
++static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_7312811, object r_736530*/
++static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*closure _,object k_736404, object expr_731606_731637_731698_733373, object rename_731607_731638_731699_733374, object compare_731608_731639_731700_733375*/
++static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_7312786, object v_931_731614_731692_731732_733407*/
++static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_7312787, object tmp_731641_731643_731701_733376*/
++static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_7312788, object r_736405*/
++static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_7312789, object k_736407*/
++static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*object self_7312790, object v_934_731617_731670_731717_733392*/
++static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_7312791, object tmp_731645_731647_731702_733377*/
++static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_7312792, object v_9315_731628_731652_731704_733379*/
++static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_7312793, object tmp_731649_731651_731703_733378*/
++static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_7312794, object r_736410*/
++static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_7312795, object k_736412*/
++static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_7312796, object r_736427*/
++static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*object self_7312797, object r_736450*/
++static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*object self_7312798, object r_736436_738045_738057_738068*/
++static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_7312799, object r_736444_738046_738058_738069*/
++static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*object self_7312800, object k_736461*/
++static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_7312801, object r_736480*/
++static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_7312802, object r_736489_738006_738014_738021*/
++static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_7312803, object k_736503*/
++static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_7312804, object r_736509*/
++static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*closure _,object k_736353, object expr_731521_731541_731576_733347, object rename_731522_731542_731577_733348, object compare_731523_731543_731578_733349*/
++static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_7312765, object v_931_731529_731548_731580_733351*/
++static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_7312766, object tmp_731545_731547_731579_733350*/
++static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*object self_7312767, object r_736354*/
++static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_7312768, object k_736356*/
++static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_7312769, object r_736357*/
++static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_7312770, object k_736359*/
++static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_7312771, object w_933_731531_731552_731582_733353, object var_91ls5_731533_731553_731583_733354, object val_91ls6_731534_731554_731584_733355*/
++static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_7312772, object lp_934_731532_731555_731585_733356*/
++static void __lambda_1395(void *data, object clo, int argc, object *args) ;/*object self_7312773, object lp_934_731532_731555_731585_733356*/
++static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*object self_7312774, object k_736366, object w_933_731531_731556_731586_733357, object var_91ls5_731533_731557_731587_733358, object val_91ls6_731534_731558_731588_733359*/
++static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*object self_7312775, object r_736368_7311739*/
++static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_7312776, object r_736369_7311740_7311751*/
++static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_7312777, object var_731559_731589_733360_7311741_7311752, object val_731560_731590_733361_7311742_7311753*/
++static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_7312778, object r_736372_7311743_7311754*/
++static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_7312779, object k_736380_7311747_7311758, object var_731563_731593_733364_7311748_7311759, object val_731564_731594_733365_7311749_7311760*/
++static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_7312780, object r_736381_7311750_7311761*/
++static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_7312781, object r_736379_7311744_7311755*/
++static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_7312782, object r_736378_7311745_7311756*/
++static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_7312783, object r_736376_7311746_7311757*/
++static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_7312784, object r_736365*/
++static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_7312785, object r_736364*/
++static void __lambda_810(void *data, object clo, int argc, object *args) ;/*closure _,object k_735895, object expr_731263_733204, object rename_731264_733205, object compare_731265_733206*/
++static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_7312533, object r_736350*/
++static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_7312534, object r_735896*/
++static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_7312535, object r_735897*/
++static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_7312536, object r_735898*/
++static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_7312537, object r_735899*/
++static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_7312538, object r_735900*/
++static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_7312539, object r_735901*/
++static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_7312540, object r_735902*/
++static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_7312541, object r_735903*/
++static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_7312542, object r_735904*/
++static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_7312543, object r_735905*/
++static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_7312544, object r_735906*/
++static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_7312545, object r_735907*/
++static void __lambda_824(void *data, object clo, int argc, object *args) ;/*object self_7312546, object r_735908*/
++static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_7312547, object r_735909*/
++static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_7312548, object r_735910*/
++static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_7312549, object r_735911*/
++static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_7312550, object r_735912*/
++static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_7312551, object r_735913*/
++static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_7312552, object r_735914*/
++static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_7312553, object r_735915*/
++static void __lambda_832(void *data, object clo, int argc, object *args) ;/*object self_7312554, object r_735916*/
++static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_7312555, object r_735917*/
++static void __lambda_834(void *data, object clo, int argc, object *args) ;/*object self_7312556, object r_735918*/
++static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_7312557, object r_735919*/
++static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_7312558, object r_735920*/
++static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_7312559, object r_735921*/
++static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_7312560, object r_735922*/
++static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_7312561, object r_735923*/
++static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_7312562, object r_735924*/
++static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_7312563, object r_735925*/
++static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_7312564, object r_735926*/
++static void __lambda_843(void *data, object clo, int argc, object *args) ;/*object self_7312565, object r_735927*/
++static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_7312566, object r_735928*/
++static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_7312567, object r_735929*/
++static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_7312568, object r_735930*/
++static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_7312569, object r_735931*/
++static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_7312570, object ellipsis_91specified_127_731266_733219, object count_731267_733220, object _191er_91macro_91transformer_731268_733221, object _191lambda_731269_733222, object _191let_731270_733223, object _191begin_731271_733224, object _191if_731272_733225, object _191and_731273_733226, object _191or_731274_733227, object _191eq_127_731275_733228, object _191equal_127_731276_733229, object _191car_731277_733230, object _191cdr_731278_733231, object _191cons_731279_733232, object _191pair_127_731280_733233, object _191null_127_731281_733234, object _191expr_731282_733235, object _191rename_731283_733236, object _191compare_731284_733237, object _191quote_731285_733238, object _191apply_731286_733239, object _191append_731287_733240, object _191map_731288_733241, object _191vector_127_731289_733242, object _191list_127_731290_733243, object _191len_731291_733244, object _191length_731292_
733245, object _191_91_731293_733246, object _191_125_123_731294_733247, object _191error_731295_733248, object _191ls_731296_733249, object _191res_731297_733250, object _191i_731298_733251, object _191reverse_731299_733252, object _191vector_91_125list_731300_733253, object _191list_91_125vector_731301_733254, object _191cons3_731302_733255*/
++static void __lambda_1394(void *data, object clo, int argc, object *args) ;/*object self_7312571, object count_731267_733220*/
++static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_7312572, object ellipsis_733256, object lits_733257, object forms_733258, object next_91symbol_733259, object expand_91pattern_733260, object ellipsis_91escape_127_733261, object ellipsis_127_733262, object ellipsis_91depth_733263, object ellipsis_91tail_733264, object all_91vars_733265, object free_91vars_733266, object expand_91template_733267*/
++static void __lambda_1393(void *data, object clo, int argc, object *args) ;/*object self_7312573, object ellipsis_733256*/
++static void __lambda_1392(void *data, object clo, int argc, object *args) ;/*object self_7312574, object lits_733257*/
++static void __lambda_1391(void *data, object clo, int argc, object *args) ;/*object self_7312575, object forms_733258*/
++static void __lambda_1390(void *data, object clo, int argc, object *args) ;/*object self_7312576, object next_91symbol_733259*/
++static void __lambda_1389(void *data, object clo, int argc, object *args) ;/*object self_7312577, object expand_91pattern_733260*/
++static void __lambda_1388(void *data, object clo, int argc, object *args) ;/*object self_7312578, object ellipsis_91escape_127_733261*/
++static void __lambda_1387(void *data, object clo, int argc, object *args) ;/*object self_7312579, object ellipsis_127_733262*/
++static void __lambda_1386(void *data, object clo, int argc, object *args) ;/*object self_7312580, object ellipsis_91depth_733263*/
++static void __lambda_1385(void *data, object clo, int argc, object *args) ;/*object self_7312581, object ellipsis_91tail_733264*/
++static void __lambda_1384(void *data, object clo, int argc, object *args) ;/*object self_7312582, object all_91vars_733265*/
++static void __lambda_1383(void *data, object clo, int argc, object *args) ;/*object self_7312583, object free_91vars_733266*/
++static void __lambda_1382(void *data, object clo, int argc, object *args) ;/*object self_7312584, object expand_91template_733267*/
++static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_7312585, object r_736312*/
++static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_7312586, object r_735932*/
++static void __lambda_853(void *data, object clo, int argc, object *args) ;/*object self_7312587, object r_736309*/
++static void __lambda_854(void *data, object clo, int argc, object *args) ;/*object self_7312588, object r_735933*/
++static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_7312589, object r_736306*/
++static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_7312590, object r_735934*/
++static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_7312591, object k_736300, object s_731303_733268*/
++static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_7312592, object r_736305*/
++static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_7312593, object r_736301*/
++static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*object self_7312594, object r_736304*/
++static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_7312595, object r_736303*/
++static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_7312596, object r_736299*/
++static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_7312597, object r_735935*/
++static void __lambda_958(void *data, object clo, int argc, object *args) ;/*object self_7312598, object k_736084, object pat_731304_733269, object tmpl_731305_733270*/
++static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*object self_7312599, object k_736297, object vars_731384_733300*/
++static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_7312600, object r_736298*/
++static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_7312601, object r_736088*/
++static void __lambda_960(void *data, object clo, int argc, object *args) ;/*object self_7312602, object p_731307_733271, object x_731308_733272, object vars_731310_733274, object k_731311_733275*/
++static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_7312603, object lp_731312_733276*/
++static void __lambda_1381(void *data, object clo, int argc, object *args) ;/*object self_7312604, object lp_731312_733276*/
++static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_7312605, object k_736091, object p_731313_733277, object x_731314_733278, object dim_731315_733279, object vars_731316_733280, object k_731317_733281*/
++static void __lambda_965(void *data, object clo, int argc, object *args) ;/*object self_7312606, object v_731318_733282*/
++static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_7312607, object r_736094*/
++static void __lambda_966(void *data, object clo, int argc, object *args) ;/*object self_7312608, object k_736095*/
++static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_7312609, object r_736096*/
++static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_7312616, object r_736109*/
++static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_7312658, object r_736295*/
++static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_7312657, object r_736293*/
++static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_7312655, object r_736289*/
++static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_7312656, object r_736288*/
++static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_7312652, object k_736283, object vars_731376_733299*/
++static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_7312653, object r_736282*/
++static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*object self_7312654, object r_736279*/
++static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_7312617, object r_736276*/
++static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_7312644, object k_736273, object x_731332_733284*/
++static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_7312645, object r_736274*/
++static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_7312646, object r_736271*/
++static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_7312647, object r_736272*/
++static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_7312648, object r_736166*/
++static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_7312649, object r_736168*/
++static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_7312650, object len_731335_733285, object _191lp_731336_733286*/
++static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*object self_7312651, object r_736188*/
++static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_7312618, object r_736111*/
++static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_7312620, object w_731352_733287*/
++static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_7312621, object _191lp_731355_733288*/
++static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_7312622, object new_91vars_731358_733289*/
++static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_7312623, object k_736159, object x_731372_733298*/
++static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_7312624, object r_736161*/
++static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_7312625, object r_736160*/
++static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_7312626, object r_736158*/
++static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_7312627, object ls_91vars_731361_733290*/
++static void __lambda_994(void *data, object clo, int argc, object *args) ;/*object self_7312628, object k_736151, object _191_731369_733295*/
++static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_7312629, object k_736156, object x_731370_733296, object l_731371_733297*/
++static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_7312630, object r_736155*/
++static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_7312631, object r_736154*/
++static void __lambda_997(void *data, object clo, int argc, object *args) ;/*object self_7312632, object r_736152*/
++static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_7312633, object r_736150*/
++static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_7312634, object once_731364_733291*/
++static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_7312635, object k_736143, object x_731366_733292*/
++static void __lambda_985(void *data, object clo, int argc, object *args) ;/*object self_7312636, object r_736142*/
++static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_7312637, object r_736141*/
++static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_7312638, object k_736137, object x_731367_733293, object l_731368_733294*/
++static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_7312639, object r_736136*/
++static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_7312640, object r_736133*/
++static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_7312641, object r_736135*/
++static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_7312642, object r_736134*/
++static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_7312643, object r_736130*/
++static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_7312619, object r_736115*/
++static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_7312610, object k_736108, object l_731322_733283*/
++static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_7312611, object r_736107*/
++static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_7312612, object r_736097*/
++static void __lambda_972(void *data, object clo, int argc, object *args) ;/*object self_7312615, object r_736103*/
++static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_7312613, object r_736101*/
++static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_7312614, object r_736099*/
++static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_7312659, object r_736090*/
++static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_7312660, object r_736089*/
++static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_7312661, object r_736083*/
++static void __lambda_861(void *data, object clo, int argc, object *args) ;/*object self_7312662, object r_735936*/
++static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_7312663, object k_736080, object x_731385_733301*/
++static void __lambda_862(void *data, object clo, int argc, object *args) ;/*object self_7312664, object r_736079*/
++static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_7312665, object r_735937*/
++static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_7312666, object k_736074, object x_731387_733302*/
++static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_7312667, object r_736073*/
++static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_7312668, object r_735938*/
++static void __lambda_953(void *data, object clo, int argc, object *args) ;/*object self_7312669, object k_736069, object x_731390_733303*/
++static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_7312670, object r_736070*/
++static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_7312671, object r_736071*/
++static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_7312672, object r_736068*/
++static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_7312673, object r_735939*/
++static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_7312674, object k_736065, object x_731391_733304*/
++static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_7312675, object r_736066*/
++static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_7312676, object r_736064*/
++static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_7312677, object r_735940*/
++static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_7312678, object k_736043, object x_731392_733305, object dim_731393_733306*/
++static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_7312679, object x_731395_733307, object dim_731396_733308, object vars_731397_733309*/
++static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_7312680, object lp_731398_733310*/
++static void __lambda_1380(void *data, object clo, int argc, object *args) ;/*object self_7312681, object lp_731398_733310*/
++static void __lambda_942(void *data, object clo, int argc, object *args) ;/*object self_7312682, object k_736047, object x_731399_733311, object dim_731400_733312, object vars_731401_733313*/
++static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_7312683, object r_736048*/
++static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_7312687, object r_736053*/
++static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_7312690, object r_736063*/
++static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_7312689, object r_736060*/
++static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_7312688, object r_736056*/
++static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_7312684, object k_736052, object lit_731405_733314*/
++static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_7312685, object r_736051*/
++static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_7312686, object r_736049*/
++static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_7312691, object r_736046*/
++static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_7312692, object r_736045*/
++static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_7312693, object r_736042*/
++static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_7312694, object r_735941*/
++static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_7312695, object k_736025, object x_731416_733315, object vars_731417_733316, object dim_731418_733317*/
++static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_7312696, object x_731420_733318, object free_731421_733319*/
++static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_7312697, object lp_731422_733320*/
++static void __lambda_1379(void *data, object clo, int argc, object *args) ;/*object self_7312698, object lp_731422_733320*/
++static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_7312699, object k_736029, object x_731423_733321, object free_731424_733322*/
++static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_7312700, object r_736030*/
++static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_7312707, object r_736041*/
++static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_7312706, object r_736038*/
++static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_7312701, object r_736031*/
++static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_7312702, object k_736032*/
++static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_7312703, object r_736033*/
++static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_7312704, object tmp_731431_731433_733323*/
++static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_7312705, object cell_731434_733324*/
++static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_7312708, object r_736028*/
++static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_7312709, object r_736027*/
++static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_7312710, object r_736024*/
++static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_7312711, object r_735942*/
++static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_7312712, object k_735958, object tmpl_731443_733325, object vars_731444_733326*/
++static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_7312713, object t_731446_733327*/
++static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_7312714, object lp_731448_733329*/
++static void __lambda_1378(void *data, object clo, int argc, object *args) ;/*object self_7312715, object lp_731448_733329*/
++static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_7312716, object k_735961, object t_731449_733330, object dim_731450_733331*/
++static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_7312717, object r_735962*/
++static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_7312752, object r_736021*/
++static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_7312753, object r_736020*/
++static void __lambda_892(void *data, object clo, int argc, object *args) ;/*object self_7312722, object r_735971*/
++static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_7312725, object r_735978*/
++static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_7312748, object r_736014*/
++static void __lambda_918(void *data, object clo, int argc, object *args) ;/*object self_7312749, object r_736017*/
++static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_7312750, object r_736015*/
++static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_7312751, object r_736016*/
++static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_7312726, object depth_731473_733335*/
++static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_7312727, object r_736013*/
++static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_7312728, object ell_91vars_731479_733337*/
++static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_7312729, object r_735983*/
++static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_7312730, object r_736007*/
++static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_7312731, object once_731491_733338*/
++static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_7312732, object nest_731494_733339*/
++static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_7312733, object d_731501_733341, object many_731502_733342*/
++static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_7312734, object lp_731448_731503_733343*/
++static void __lambda_1377(void *data, object clo, int argc, object *args) ;/*object self_7312735, object lp_731448_731503_733343*/
++static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_7312736, object k_735994, object d_731504_733344, object many_731505_733345*/
++static void __lambda_910(void *data, object clo, int argc, object *args) ;/*object self_7312737, object r_735993*/
++static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_7312738, object r_735992*/
++static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_7312739, object many_731497_733340*/
++static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_7312740, object r_735991*/
++static void __lambda_914(void *data, object clo, int argc, object *args) ;/*object self_7312741, object r_735990*/
++static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_7312742, object r_735989*/
++static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_7312743, object k_735998*/
++static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_7312744, object r_735999*/
++static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_7312745, object k_736002*/
++static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_7312746, object r_736004*/
++static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_7312747, object k_736008*/
++static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_7312723, object r_735972*/
++static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_7312724, object k_735973*/
++static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_7312718, object k_735968, object v_731461_733334*/
++static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_7312719, object r_735967*/
++static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_7312720, object tmp_731456_731458_733332*/
++static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_7312721, object cell_731459_733333*/
++static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_7312754, object r_735960*/
++static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_7312755, object r_735959*/
++static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_7312756, object r_735957*/
++static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_7312757, object r_735943*/
++static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_7312758, object k_735954, object clause_731516_733346*/
++static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_7312759, object r_735953*/
++static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_7312760, object r_735949*/
++static void __lambda_878(void *data, object clo, int argc, object *args) ;/*object self_7312761, object r_735952*/
++static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_7312762, object r_735948*/
++static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_7312763, object k_736307*/
++static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_7312764, object k_736310*/
++static void __lambda_809(void *data, object clo, int argc, object *args) ;/*closure _,object k_735892, object kar_731260_733201, object kdr_731261_733202, object source_731262_733203*/
++static void __lambda_807(void *data, object clo, int argc, object *args) ;/*closure _,object k_735888, object pred_731252_733198, object ls_731253_733199*/
++static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_7312532, object tmp_731256_731258_733200*/
++static void __lambda_805(void *data, object clo, int argc, object *args) ;/*closure _,object k_735881, object pred_731249_733196, object ls_731250_733197*/
++static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_7312531, object r_735883*/
++static void __lambda_1466(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv)*/
++static void __lambda_1465(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_1464(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_1463(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
++static void __lambda_1462(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object str)*/
++static void __lambda_1461(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_1460(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_1459(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_1458(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static object __lambda_1457(void *data, object ptr) ;
++static void __lambda_1456(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
++static object __lambda_1455(void *data, object ptr) ;
++static void __lambda_1454(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
++static object __lambda_1453(void *data, object ptr) ;
++static void __lambda_1452(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
++static void __lambda_1451(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z1, object z2)*/
++static object __lambda_1450(void *data, object ptr,object z_731248_733195) ;
++static void __lambda_804(void *data, object clo, int argc, object *args) ;/*closure _,object k_735874, object z_731248_733195*/
++static void __lambda_801(void *data, object clo, int argc, object *args) ;/*closure _,object k_735869, object n_731246_733193, object m_731247_733194*/
++static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_7312529, object r_735870*/
++static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_7312530, object r_735871*/
++static void __lambda_799(void *data, object clo, int argc, object *args) ;/*closure _,object k_735864, object n_731244_733191, object m_731245_733192*/
++static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_7312528, object r_735866*/
++static void __lambda_798(void *data, object clo, int argc, object *args) ;/*closure _,object k_735856, object n_731240_733188, object m_731241_733189*/
++static void __lambda_795(void *data, object clo, int argc, object *args) ;/*closure _,object k_735851, object n_731238_733186, object m_731239_733187*/
++static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_7312526, object r_735852*/
++static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_7312527, object r_735853*/
++static object __lambda_1449(void *data, object ptr,object x_731235_733184, object y_731236_733185) ;
++static void __lambda_794(void *data, object clo, int argc, object *args) ;/*closure _,object k_735838, object x_731235_733184, object y_731236_733185*/
++static object __lambda_1448(void *data, object ptr, object obj) ;
++static void __lambda_1447(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
++static void __lambda_1446(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
++static void __lambda_1445(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
++static void __lambda_793(void *data, object clo, int argc, object *args) ;/*closure _,object k_735831, object nums_731234_733183_raw, ...*/
++static void __lambda_791(void *data, object clo, int argc, object *args) ;/*closure _,object k_735825, object a_731232_733181, object b_731233_733182*/
++static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_7312525, object r_735828*/
++static void __lambda_790(void *data, object clo, int argc, object *args) ;/*closure _,object k_735818, object nums_731231_733180_raw, ...*/
++static void __lambda_788(void *data, object clo, int argc, object *args) ;/*closure _,object k_735813, object a_731229_733178, object b_731230_733179*/
++static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_7312524, object r_735815*/
++static void __lambda_785(void *data, object clo, int argc, object *args) ;/*closure _,object k_735803, object first_731225_733174, object rest_731226_733175_raw, ...*/
++static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_7312522, object k_735805, object old_731227_733176, object new_731228_733177*/
++static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_7312523, object r_735804*/
++static void __lambda_782(void *data, object clo, int argc, object *args) ;/*closure _,object k_735797, object first_731221_733170, object rest_731222_733171_raw, ...*/
++static void __lambda_784(void *data, object clo, int argc, object *args) ;/*object self_7312520, object k_735799, object old_731223_733172, object new_731224_733173*/
++static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_7312521, object r_735798*/
++static void __lambda_781(void *data, object clo, int argc, object *args) ;/*closure _,object k_735794, object x_731219_733168, object y_731220_733169*/
++static object __lambda_1444(void *data, object ptr, object z) ;
++static void __lambda_1443(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static void __lambda_780(void *data, object clo, int argc, object *args) ;/*closure _,object k_735788, object num_731218_733167*/
++static object __lambda_1442(void *data, object ptr, object num) ;
++static void __lambda_1441(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
++static object __lambda_1440(void *data, object ptr, object num) ;
++static void __lambda_1439(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
++static object __lambda_1438(void *data, object ptr, object z) ;
++static void __lambda_1437(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static void __lambda_774(void *data, object clo, int argc, object *args) ;/*closure _,object k_735771, object k_731208_733164*/
++static void __lambda_776(void *data, object clo, int argc, object *args) ;/*object self_7312515, object r_735772*/
++static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_7312516, object s_731213_733165*/
++static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_7312517, object k_735776*/
++static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_7312518, object r_735777*/
++static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_7312519, object k_735780*/
++static void __lambda_1436(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
++static void __lambda_1435(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
++static void __lambda_772(void *data, object clo, int argc, object *args) ;/*closure _,object k_735766, object num_731207_733163*/
++static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_7312514, object r_735768*/
++static void __lambda_770(void *data, object clo, int argc, object *args) ;/*closure _,object k_735761, object num_731206_733162*/
++static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_7312513, object r_735763*/
++static void __lambda_768(void *data, object clo, int argc, object *args) ;/*closure _,object k_735754, object a_731203_733159, object b_731204_733160*/
++static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_7312512, object res_731205_733161*/
++static void __lambda_1434(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num1, object num2)*/
++static void __lambda_1433(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
++static object __lambda_1432(void *data, object ptr, object z) ;
++static void __lambda_1431(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static object __lambda_1430(void *data, object ptr, object z) ;
++static void __lambda_1429(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static object __lambda_1428(void *data, object ptr, object z) ;
++static void __lambda_1427(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static object __lambda_1426(void *data, object ptr, object z) ;
++static void __lambda_1425(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static object __lambda_1424(void *data, object ptr, object z) ;
++static void __lambda_1423(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static object __lambda_1422(void *data, object ptr, object z) ;
++static void __lambda_1421(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
++static void __lambda_762(void *data, object clo, int argc, object *args) ;/*closure _,object k_735744, object pred_731190_733154, object lst_731191_733155*/
++static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_7312506, object l_731193_733156*/
++static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_7312507, object every_85_731194_733157*/
++static void __lambda_1376(void *data, object clo, int argc, object *args) ;/*object self_7312508, object every_85_731194_733157*/
++static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_7312509, object k_735748, object l_731195_733158*/
++static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_7312510, object r_735747*/
++static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_7312511, object r_735746*/
++static void __lambda_756(void *data, object clo, int argc, object *args) ;/*closure _,object k_735734, object pred_731177_733149, object lst_731178_733150*/
++static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_7312500, object l_731180_733151*/
++static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_7312501, object any_85_731181_733152*/
++static void __lambda_1375(void *data, object clo, int argc, object *args) ;/*object self_7312502, object any_85_731181_733152*/
++static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_7312503, object k_735738, object l_731182_733153*/
++static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_7312504, object r_735737*/
++static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_7312505, object r_735736*/
++static void __lambda_742(void *data, object clo, int argc, object *args) ;/*closure _,object k_735711, object reason_731161_733139, object expr_731162_733140, object args_731163_733141_raw, ...*/
++static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_7312486, object reason_95line_91loc_127_733143*/
++static void __lambda_1374(void *data, object clo, int argc, object *args) ;/*object self_7312487, object reason_95line_91loc_127_733143*/
++static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_7312488, object k_735729, object reason_731164_733145*/
++static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_7312489, object r_735731*/
++static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_7312490, object r_735728*/
++static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_7312491, object r_735712*/
++static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_7312492, object found_731168_733146*/
++static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_7312493, object msg_731174_733148*/
++static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_7312494, object k_735718*/
++static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_7312495, object r_735719*/
++static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_7312496, object r_735720*/
++static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_7312497, object r_735721*/
++static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_7312498, object k_735725*/
++static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_7312499, object r_735726*/
++static void __lambda_1420(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
++static void __lambda_1419(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object h)*/
++static void __lambda_730(void *data, object clo, int argc, object *args) ;/*closure _,object k_735693, object handler_731153_733132, object thunk_731154_733133*/
++static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_7312473, object k_735699, object obj_731157_733136*/
++static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_7312474, object result_731158_733137, object continuable_127_731159_733138*/
++static void __lambda_1373(void *data, object clo, int argc, object *args) ;/*object self_7312475, object result_731158_733137*/
++static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_7312476, object r_735701*/
++static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_7312477, object r_735703*/
++static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_7312478, object r_735702*/
++static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_7312479, object r_735694*/
++static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_7312480, object result_731155_733134, object my_91handler_731156_733135*/
++static void __lambda_1372(void *data, object clo, int argc, object *args) ;/*object self_7312481, object result_731155_733134*/
++static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_7312482, object r_735695*/
++static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_7312483, object r_735698*/
++static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_7312484, object r_735696*/
++static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_7312485, object r_735697*/
++static void __lambda_729(void *data, object clo, int argc, object *args) ;/*closure _,object k_735652, object exp_731147_733129, object rename_731148_733130, object compare_731149_733131*/
++static void __lambda_728(void *data, object clo, int argc, object *args) ;/*closure _,object k_735643, object obj_731146_733128*/
++static void __lambda_727(void *data, object clo, int argc, object *args) ;/*closure _,object k_735634, object obj_731145_733127*/
++static void __lambda_726(void *data, object clo, int argc, object *args) ;/*closure _,object k_735630, object msg_731143_733125, object args_731144_733126_raw, ...*/
++static void __lambda_725(void *data, object clo, int argc, object *args) ;/*closure _,object k_735621, object x_731141_733124*/
++static void __lambda_707(void *data, object clo, int argc, object *args) ;/*closure _,object k_735585, object init_731114_733114, object o_731115_733115_raw, ...*/
++static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_7312455, object converter_731118_733116*/
++static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_7312456, object value_731121_733117*/
++static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_7312457, object key_731124_733118*/
++static void __lambda_1371(void *data, object clo, int argc, object *args) ;/*object self_7312458, object key_731124_733118*/
++static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_7312459, object r_735588*/
++static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_7312460, object r_735609*/
++static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_7312461, object r_735589*/
++static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_7312462, object r_735590*/
++static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_7312463, object k_735591, object args_731126_733119_raw, ...*/
++static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_7312468, object r_735603*/
++static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_7312469, object cell_731139_733122*/
++static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_7312470, object r_735601*/
++static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_7312466, object r_735598*/
++static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_7312467, object cell_731134_733121*/
++static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_7312464, object pobj_731130_733120*/
++static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_7312465, object r_735594*/
++static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_7312471, object k_735610*/
++static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_7312472, object k_735612, object x_731140_733123*/
++static void __lambda_1418(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
++static void __lambda_1417(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
++static void __lambda_636(void *data, object clo, int argc, object *args) ;/*closure _,object k_735271, object expr_73790_73856_731007_733007, object rename_73791_73857_731008_733008, object compare_73792_73858_731009_733009*/
++static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_7312383, object v_931_73798_73933_731057_733057*/
++static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_7312384, object tmp_73860_73862_731010_733010*/
++static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_7312385, object r_735272*/
++static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_7312386, object k_735274*/
++static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_7312387, object v_9330_73827_73899_731035_733035*/
++static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_7312388, object tmp_73864_73866_731011_733011*/
++static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_7312389, object v_9347_73844_73871_731013_733013*/
++static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_7312390, object tmp_73868_73870_731012_733012*/
++static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_7312391, object r_735277*/
++static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_7312392, object k_735279*/
++static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_7312393, object w_9349_73846_73875_731015_733015, object param_91ls51_73848_73876_731016_733016, object value_91ls52_73849_73877_731017_733017*/
++static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_7312394, object lp_9350_73847_73878_731018_733018*/
++static void __lambda_1370(void *data, object clo, int argc, object *args) ;/*object self_7312395, object lp_9350_73847_73878_731018_733018*/
++static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_7312396, object k_735286, object w_9349_73846_73879_731019_733019, object param_91ls51_73848_73880_731020_733020, object value_91ls52_73849_73881_731021_733021*/
++static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_7312397, object r_735288_7311720*/
++static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_7312398, object r_735289_7311721_7311730*/
++static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_7312399, object param_73882_731022_733022_7311722_7311731, object value_73883_731023_733023_7311723_7311732*/
++static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_7312400, object r_735292_7311724_7311733*/
++static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_7312401, object k_735307_737976_7311727_7311736, object param_73886_731026_733026_737977_7311728_7311737, object value_73887_731027_733027_737978_7311729_7311738*/
++static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_7312402, object r_735306_737969_7311725_7311734*/
++static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_7312403, object r_735301_737970_7311726_7311735*/
++static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_7312404, object r_735285*/
++static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_7312405, object r_735284*/
++static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_7312406, object k_735328*/
++static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_7312407, object r_735358*/
++static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_7312408, object r_735377_737888*/
++static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_7312409, object r_735380_737889*/
++static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_7312410, object r_735383_737890*/
++static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_7312411, object k_735393*/
++static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_7312412, object v_935_73802_73941_731061_733061*/
++static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_7312413, object w_937_73804_73945_731063_733063, object param_91ls9_73806_73946_731064_733064, object value_91ls10_73807_73947_731065_733065, object p_91ls11_73808_73948_731066_733066, object old_91ls12_73809_73949_731067_733067, object new_91ls13_73810_73950_731068_733068*/
++static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_7312414, object lp_938_73805_73951_731069_733069*/
++static void __lambda_1369(void *data, object clo, int argc, object *args) ;/*object self_7312415, object lp_938_73805_73951_731069_733069*/
++static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_7312416, object k_735411, object w_937_73804_73952_731070_733070, object param_91ls9_73806_73953_731071_733071, object value_91ls10_73807_73954_731072_733072, object p_91ls11_73808_73955_731073_733073, object old_91ls12_73809_73956_731074_733074, object new_91ls13_73810_73957_731075_733075*/
++static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_7312417, object r_735413_7311475*/
++static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_7312418, object r_735414_7311476_7311526*/
++static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_7312419, object r_735415_7311477_7311527_7311576*/
++static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_7312420, object r_735416_7311478_7311528_7311577_7311625*/
++static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_7312421, object r_735417_7311479_7311529_7311578_7311626_7311673*/
++static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_7312422, object param_73958_731076_733076_7311480_7311530_7311579_7311627_7311674, object value_73959_731077_733077_7311481_7311531_7311580_7311628_7311675, object p_73960_731078_733078_7311482_7311532_7311581_7311629_7311676, object old_73961_731079_733079_7311483_7311533_7311582_7311630_7311677, object new_73962_731080_733080_7311484_7311534_7311583_7311631_7311678*/
++static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_7312423, object r_735428_7311485_7311535_7311584_7311632_7311679*/
++static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_7312424, object k_735551_7311523_7311573_7311622_7311670_7311717, object p_73973_731087_733087_7311524_7311574_7311623_7311671_7311718, object param_73974_731088_733088_7311525_7311575_7311624_7311672_7311719*/
++static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_7312425, object r_735550_7311486_7311536_7311585_7311633_7311680*/
++static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_7312426, object r_735431_7311487_7311537_7311586_7311634_7311681*/
++static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_7312427, object r_735437_7311488_7311538_7311587_7311635_7311682*/
++static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_7312428, object k_735541_7311520_7311570_7311619_7311667_7311714, object old_73975_731089_733089_7311521_7311571_7311620_7311668_7311715, object p_73976_731090_733090_7311522_7311572_7311621_7311669_7311716*/
++static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_7312429, object r_735540_7311489_7311539_7311588_7311636_7311683*/
++static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_7312430, object r_735513_7311490_7311540_7311589_7311637_7311684*/
++static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_7312431, object k_735516_7311514_7311564_7311613_7311661_7311708, object new_73977_731091_733091_7311515_7311565_7311614_7311662_7311709, object p_73978_731092_733092_7311516_7311566_7311615_7311663_7311710, object value_73979_731093_733093_7311517_7311567_7311616_7311664_7311711*/
++static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_7312432, object r_735532_7311518_7311568_7311617_7311665_7311712*/
++static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_7312433, object r_735535_7311519_7311569_7311618_7311666_7311713*/
++static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_7312434, object r_735515_7311491_7311541_7311590_7311638_7311685*/
++static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_7312435, object r_735514_7311492_7311542_7311591_7311639_7311686*/
++static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_7312436, object r_735440_7311493_7311543_7311592_7311640_7311687*/
++static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_7312437, object r_735446_7311494_7311544_7311593_7311641_7311688*/
++static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_7312438, object r_735488_7311495_7311545_7311594_7311642_7311689*/
++static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_7312439, object k_735495_7311509_7311559_7311608_7311656_7311703, object p_73980_731094_733094_7311510_7311560_7311609_7311657_7311704, object new_73981_731095_733095_7311511_7311561_7311610_7311658_7311705*/
++static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_7312440, object r_735503_7311512_7311562_7311611_7311659_7311706*/
++static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_7312441, object r_735506_7311513_7311563_7311612_7311660_7311707*/
++static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_7312442, object r_735494_7311496_7311546_7311595_7311643_7311690*/
++static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_7312443, object r_735492_7311497_7311547_7311596_7311644_7311691*/
++static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_7312444, object r_735489_737649_7311498_7311548_7311597_7311645_7311692*/
++static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_7312445, object r_735482_737651_737679_7311499_7311549_7311598_7311646_7311693*/
++static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_7312446, object r_735458_737654_737682_737708_737733_7311500_7311550_7311599_7311647_7311694*/
++static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_7312447, object k_735465_737669_737697_737723_737748_7311504_7311554_7311603_7311651_7311698, object p_73982_731096_733096_737670_737698_737724_737749_7311505_7311555_7311604_7311652_7311699, object old_73983_731097_733097_737671_737699_737725_737750_7311506_7311556_7311605_7311653_7311700*/
++static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_7312448, object r_735473_737672_737700_737726_737751_7311507_7311557_7311606_7311654_7311701*/
++static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_7312449, object r_735476_737673_737701_737727_737752_7311508_7311558_7311607_7311655_7311702*/
++static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_7312450, object r_735464_737655_737683_737709_737734_7311501_7311551_7311600_7311648_7311695*/
++static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_7312451, object r_735462_737656_737684_737710_737735_7311502_7311552_7311601_7311649_7311696*/
++static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_7312452, object r_735459_737657_737685_737711_737736_737757_7311503_7311553_7311602_7311650_7311697*/
++static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_7312453, object r_735410*/
++static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_7312454, object r_735409*/
++static void __lambda_1416(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object count, object fill)*/
++static void __lambda_635(void *data, object clo, int argc, object *args) ;/*closure _,object k_735265, object k_73784_733005, object fill_73785_733006_raw, ...*/
++static void __lambda_634(void *data, object clo, int argc, object *args) ;/*closure _,object k_735262, object chars_73783_733004_raw, ...*/
++static void __lambda_627(void *data, object clo, int argc, object *args) ;/*closure _,object k_735252, object type_127_73777_732999, object obj_73778_733000, object objs_73779_733001*/
++static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_7312377, object r_735253*/
++static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_7312378, object k_735255, object return_73781_733002*/
++static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_7312379, object k_735258, object o_73782_733003*/
++static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_7312380, object r_735257*/
++static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_7312381, object r_735256*/
++static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_7312382, object r_735254*/
++static void __lambda_626(void *data, object clo, int argc, object *args) ;/*closure _,object k_735248, object sym1_73774_732996, object sym2_73775_732997, object syms_73776_732998_raw, ...*/
++static void __lambda_625(void *data, object clo, int argc, object *args) ;/*closure _,object k_735244, object b1_73771_732993, object b2_73772_732994, object bs_73773_732995_raw, ...*/
++static void __lambda_612(void *data, object clo, int argc, object *args) ;/*closure _,object k_735223, object vec_73759_732985, object fill_73760_732986, object opts_73761_732987_raw, ...*/
++static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_7312361, object len_73762_732988, object start_73763_732989, object end_73764_732990, object loop_73765_732991*/
++static void __lambda_1368(void *data, object clo, int argc, object *args) ;/*object self_7312362, object len_73762_732988*/
++static void __lambda_1367(void *data, object clo, int argc, object *args) ;/*object self_7312363, object start_73763_732989*/
++static void __lambda_1366(void *data, object clo, int argc, object *args) ;/*object self_7312364, object end_73764_732990*/
++static void __lambda_1365(void *data, object clo, int argc, object *args) ;/*object self_7312365, object loop_73765_732991*/
++static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_7312366, object r_735241*/
++static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_7312367, object r_735224*/
++static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_7312368, object r_735225*/
++static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_7312369, object r_735233*/
++static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_7312370, object r_735226*/
++static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_7312371, object k_735229, object i_73766_732992*/
++static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_7312372, object r_735230*/
++static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_7312373, object r_735231*/
++static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_7312374, object r_735228*/
++static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_7312375, object r_735227*/
++static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_7312376, object k_735234*/
++static void __lambda_601(void *data, object clo, int argc, object *args) ;/*closure _,object k_735200, object to_73745_732975, object at_73746_732976, object from_73747_732977, object opts_73748_732978_raw, ...*/
++static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_7312347, object len_73749_732979, object start_73750_732980, object end_73751_732981, object loop_73752_732982*/
++static void __lambda_1364(void *data, object clo, int argc, object *args) ;/*object self_7312348, object len_73749_732979*/
++static void __lambda_1363(void *data, object clo, int argc, object *args) ;/*object self_7312349, object start_73750_732980*/
++static void __lambda_1362(void *data, object clo, int argc, object *args) ;/*object self_7312350, object end_73751_732981*/
++static void __lambda_1361(void *data, object clo, int argc, object *args) ;/*object self_7312351, object loop_73752_732982*/
++static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_7312352, object r_735201*/
++static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_7312353, object r_735202*/
++static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_7312354, object r_735212*/
++static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_7312355, object r_735203*/
++static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_7312356, object k_735206, object i_91at_73753_732983, object i_91from_73754_732984*/
++static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_7312357, object r_735208*/
++static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_7312358, object r_735205*/
++static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_7312359, object r_735204*/
++static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_7312360, object k_735213*/
++static void __lambda_588(void *data, object clo, int argc, object *args) ;/*closure _,object k_735175, object vec_73733_732967, object opts_73734_732968_raw, ...*/
++static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_7312331, object len_73735_732969, object start_73736_732970, object end_73737_732971, object loop_73738_732972*/
++static void __lambda_1360(void *data, object clo, int argc, object *args) ;/*object self_7312332, object len_73735_732969*/
++static void __lambda_1359(void *data, object clo, int argc, object *args) ;/*object self_7312333, object start_73736_732970*/
++static void __lambda_1358(void *data, object clo, int argc, object *args) ;/*object self_7312334, object end_73737_732971*/
++static void __lambda_1357(void *data, object clo, int argc, object *args) ;/*object self_7312335, object loop_73738_732972*/
++static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_7312336, object r_735176*/
++static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_7312337, object r_735177*/
++static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_7312338, object r_735189*/
++static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_7312339, object r_735178*/
++static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_7312340, object k_735183, object i_73739_732973, object new_91vec_73740_732974*/
++static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_7312341, object r_735185*/
++static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_7312342, object r_735182*/
++static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_7312343, object r_735179*/
++static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_7312344, object r_735181*/
++static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_7312345, object r_735180*/
++static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_7312346, object k_735190*/
++static void __lambda_585(void *data, object clo, int argc, object *args) ;/*closure _,object k_735170, object vecs_73732_732966_raw, ...*/
++static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_7312329, object r_735172*/
++static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_7312330, object r_735171*/
++static void __lambda_582(void *data, object clo, int argc, object *args) ;/*closure _,object k_735163, object func_73726_732963, object vec1_73727_732964, object vecs_73728_732965_raw, ...*/
++static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_7312327, object r_735166*/
++static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_7312328, object r_735167*/
++static void __lambda_578(void *data, object clo, int argc, object *args) ;/*closure _,object k_735155, object func_73720_732960, object vec1_73721_732961, object vecs_73722_732962_raw, ...*/
++static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_7312324, object r_735159*/
++static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_7312325, object r_735160*/
++static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_7312326, object r_735156*/
++static void __lambda_575(void *data, object clo, int argc, object *args) ;/*closure _,object k_735148, object func_73714_732957, object str1_73715_732958, object strs_73716_732959_raw, ...*/
++static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_7312322, object r_735151*/
++static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_7312323, object r_735152*/
++static void __lambda_571(void *data, object clo, int argc, object *args) ;/*closure _,object k_735140, object func_73708_732954, object str1_73709_732955, object strs_73710_732956_raw, ...*/
++static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_7312319, object r_735144*/
++static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_7312320, object r_735145*/
++static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_7312321, object r_735141*/
++static void __lambda_559(void *data, object clo, int argc, object *args) ;/*closure _,object k_735119, object str_73696_732946, object fill_73697_732947, object opts_73698_732948_raw, ...*/
++static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_7312304, object len_73699_732949, object start_73700_732950, object end_73701_732951, object loop_73702_732952*/
++static void __lambda_1356(void *data, object clo, int argc, object *args) ;/*object self_7312305, object len_73699_732949*/
++static void __lambda_1355(void *data, object clo, int argc, object *args) ;/*object self_7312306, object start_73700_732950*/
++static void __lambda_1354(void *data, object clo, int argc, object *args) ;/*object self_7312307, object end_73701_732951*/
++static void __lambda_1353(void *data, object clo, int argc, object *args) ;/*object self_7312308, object loop_73702_732952*/
++static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_7312309, object r_735137*/
++static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_7312310, object r_735120*/
++static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_7312311, object r_735121*/
++static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_7312312, object r_735129*/
++static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_7312313, object r_735122*/
++static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_7312314, object k_735125, object i_73703_732953*/
++static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_7312315, object r_735126*/
++static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_7312316, object r_735124*/
++static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_7312317, object r_735123*/
++static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_7312318, object k_735130*/
++static void __lambda_549(void *data, object clo, int argc, object *args) ;/*closure _,object k_735096, object to_73682_732936, object at_73683_732937, object from_73684_732938, object opts_73685_732939_raw, ...*/
++static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_7312291, object len_73686_732940, object start_73687_732941, object end_73688_732942, object loop_73689_732943*/
++static void __lambda_1352(void *data, object clo, int argc, object *args) ;/*object self_7312292, object len_73686_732940*/
++static void __lambda_1351(void *data, object clo, int argc, object *args) ;/*object self_7312293, object start_73687_732941*/
++static void __lambda_1350(void *data, object clo, int argc, object *args) ;/*object self_7312294, object end_73688_732942*/
++static void __lambda_1349(void *data, object clo, int argc, object *args) ;/*object self_7312295, object loop_73689_732943*/
++static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_7312296, object r_735097*/
++static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_7312297, object r_735098*/
++static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_7312298, object r_735108*/
++static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_7312299, object r_735099*/
++static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_7312300, object k_735102, object i_91at_73690_732944, object i_91from_73691_732945*/
++static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_7312301, object r_735101*/
++static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_7312302, object r_735100*/
++static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_7312303, object k_735109*/
++static void __lambda_542(void *data, object clo, int argc, object *args) ;/*closure _,object k_735081, object str_73677_732931, object opts_73678_732932_raw, ...*/
++static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_7312282, object len_73679_732933, object start_73680_732934, object end_73681_732935*/
++static void __lambda_1348(void *data, object clo, int argc, object *args) ;/*object self_7312283, object len_73679_732933*/
++static void __lambda_1347(void *data, object clo, int argc, object *args) ;/*object self_7312284, object start_73680_732934*/
++static void __lambda_1346(void *data, object clo, int argc, object *args) ;/*object self_7312285, object end_73681_732935*/
++static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_7312286, object r_735082*/
++static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_7312287, object r_735083*/
++static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_7312288, object r_735085*/
++static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_7312289, object r_735084*/
++static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_7312290, object k_735086*/
++static void __lambda_540(void *data, object clo, int argc, object *args) ;/*closure _,object k_735076, object str_73675_732929, object opts_73676_732930_raw, ...*/
++static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_7312281, object r_735077*/
++static void __lambda_530(void *data, object clo, int argc, object *args) ;/*closure _,object k_735053, object str_73667_732921, object opts_73668_732922_raw, ...*/
++static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_7312268, object len_73669_732923, object start_73670_732924, object end_73671_732925, object loop_73672_732926*/
++static void __lambda_1345(void *data, object clo, int argc, object *args) ;/*object self_7312269, object len_73669_732923*/
++static void __lambda_1344(void *data, object clo, int argc, object *args) ;/*object self_7312270, object start_73670_732924*/
++static void __lambda_1343(void *data, object clo, int argc, object *args) ;/*object self_7312271, object end_73671_732925*/
++static void __lambda_1342(void *data, object clo, int argc, object *args) ;/*object self_7312272, object loop_73672_732926*/
++static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_7312273, object r_735054*/
++static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_7312274, object r_735055*/
++static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_7312275, object r_735065*/
++static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_7312276, object r_735056*/
++static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_7312277, object k_735060, object i_73673_732927, object lst_73674_732928*/
++static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_7312278, object r_735059*/
++static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_7312279, object r_735057*/
++static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_7312280, object k_735066*/
++static void __lambda_528(void *data, object clo, int argc, object *args) ;/*closure _,object k_735048, object vec_73664_732918, object opts_73665_732919_raw, ...*/
++static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_7312267, object lst_73666_732920*/
++static void __lambda_521(void *data, object clo, int argc, object *args) ;/*closure _,object k_735033, object str_73659_732913, object opts_73660_732914_raw, ...*/
++static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_7312258, object len_73661_732915, object start_73662_732916, object end_73663_732917*/
++static void __lambda_1341(void *data, object clo, int argc, object *args) ;/*object self_7312259, object len_73661_732915*/
++static void __lambda_1340(void *data, object clo, int argc, object *args) ;/*object self_7312260, object start_73662_732916*/
++static void __lambda_1339(void *data, object clo, int argc, object *args) ;/*object self_7312261, object end_73663_732917*/
++static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_7312262, object r_735034*/
++static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_7312263, object r_735035*/
++static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_7312264, object r_735037*/
++static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_7312265, object r_735036*/
++static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_7312266, object k_735038*/
++static void __lambda_514(void *data, object clo, int argc, object *args) ;/*closure _,object k_735018, object bv_73654_732908, object opts_73655_732909_raw, ...*/
++static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_7312249, object len_73656_732910, object start_73657_732911, object end_73658_732912*/
++static void __lambda_1338(void *data, object clo, int argc, object *args) ;/*object self_7312250, object len_73656_732910*/
++static void __lambda_1337(void *data, object clo, int argc, object *args) ;/*object self_7312251, object start_73657_732911*/
++static void __lambda_1336(void *data, object clo, int argc, object *args) ;/*object self_7312252, object end_73658_732912*/
++static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_7312253, object r_735019*/
++static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_7312254, object r_735020*/
++static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_7312255, object r_735022*/
++static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_7312256, object r_735021*/
++static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_7312257, object k_735023*/
++static void __lambda_493(void *data, object clo, int argc, object *args) ;/*closure _,object k_734981, object to_73619_732889, object at_73620_732890, object from_73621_732891, object o_73622_732892_raw, ...*/
++static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_7312227, object end_73628_732894*/
++static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_7312228, object r_735008*/
++static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_7312229, object limit_73631_732895*/
++static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_7312238, object i_73647_732902, object j_73648_732903*/
++static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_7312239, object lp_73643_73649_732904*/
++static void __lambda_1335(void *data, object clo, int argc, object *args) ;/*object self_7312240, object lp_73643_73649_732904*/
++static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_7312241, object k_734998, object i_73650_732905, object j_73651_732906*/
++static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_7312242, object r_735003*/
++static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_7312243, object r_735000*/
++static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_7312244, object r_734997*/
++static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_7312245, object r_734996*/
++static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_7312230, object i_73637_732896, object j_73638_732897*/
++static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_7312231, object lp_73633_73639_732898*/
++static void __lambda_1334(void *data, object clo, int argc, object *args) ;/*object self_7312232, object lp_73633_73639_732898*/
++static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_7312233, object k_734988, object i_73640_732899, object j_73641_732900*/
++static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_7312234, object r_734993*/
++static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_7312235, object r_734990*/
++static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_7312236, object r_734987*/
++static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_7312237, object r_734986*/
++static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_7312246, object k_735009*/
++static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_7312247, object r_735010*/
++static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_7312248, object k_735011*/
++static void __lambda_486(void *data, object clo, int argc, object *args) ;/*closure _,object k_734966, object bv_73614_732884, object opts_73615_732885_raw, ...*/
++static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_7312218, object len_73616_732886, object start_73617_732887, object end_73618_732888*/
++static void __lambda_1333(void *data, object clo, int argc, object *args) ;/*object self_7312219, object len_73616_732886*/
++static void __lambda_1332(void *data, object clo, int argc, object *args) ;/*object self_7312220, object start_73617_732887*/
++static void __lambda_1331(void *data, object clo, int argc, object *args) ;/*object self_7312221, object end_73618_732888*/
++static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_7312222, object r_734967*/
++static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_7312223, object r_734968*/
++static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_7312224, object r_734970*/
++static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_7312225, object r_734969*/
++static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_7312226, object k_734971*/
++static void __lambda_476(void *data, object clo, int argc, object *args) ;/*closure _,object k_734943, object vec_73606_732876, object opts_73607_732877_raw, ...*/
++static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_7312205, object len_73608_732878, object start_73609_732879, object end_73610_732880, object loop_73611_732881*/
++static void __lambda_1330(void *data, object clo, int argc, object *args) ;/*object self_7312206, object len_73608_732878*/
++static void __lambda_1329(void *data, object clo, int argc, object *args) ;/*object self_7312207, object start_73609_732879*/
++static void __lambda_1328(void *data, object clo, int argc, object *args) ;/*object self_7312208, object end_73610_732880*/
++static void __lambda_1327(void *data, object clo, int argc, object *args) ;/*object self_7312209, object loop_73611_732881*/
++static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_7312210, object r_734944*/
++static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_7312211, object r_734945*/
++static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_7312212, object r_734955*/
++static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_7312213, object r_734946*/
++static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_7312214, object k_734950, object i_73612_732882, object lst_73613_732883*/
++static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_7312215, object r_734949*/
++static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_7312216, object r_734947*/
++static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_7312217, object k_734956*/
++static void __lambda_475(void *data, object clo, int argc, object *args) ;/*closure _,object k_734940, object objs_73605_732875_raw, ...*/
++static void __lambda_474(void *data, object clo, int argc, object *args) ;/*closure _,object k_734936, object lst_73604_732874*/
++static void __lambda_472(void *data, object clo, int argc, object *args) ;/*closure _,object k_734932, object lst_73600_732870, object k_73601_732871, object obj_73602_732872*/
++static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_7312204, object kth_73603_732873*/
++static void __lambda_470(void *data, object clo, int argc, object *args) ;/*closure _,object k_734928, object lst_73598_732868, object k_73599_732869*/
++static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_7312203, object r_734929*/
++static void __lambda_469(void *data, object clo, int argc, object *args) ;/*closure _,object k_734922, object lst_73596_732866, object k_73597_732867*/
++static void __lambda_457(void *data, object clo, int argc, object *args) ;/*closure _,object k_734901, object f_73587_732858, object lis1_73588_732859, object lists_73589_732860_raw, ...*/
++static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_7312202, object r_734916*/
++static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_7312191, object lists_73591_732861*/
++static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_7312192, object recur_73592_732862*/
++static void __lambda_1326(void *data, object clo, int argc, object *args) ;/*object self_7312193, object recur_73592_732862*/
++static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_7312194, object k_734907, object lists_73593_732863*/
++static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_7312195, object k_734913*/
++static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_7312196, object r_734908*/
++static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_7312197, object k_734910, object cars_73594_732864, object cdrs_73595_732865*/
++static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_7312198, object r_734912*/
++static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_7312199, object r_734909*/
++static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_7312200, object r_734906*/
++static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_7312201, object r_734905*/
++static void __lambda_455(void *data, object clo, int argc, object *args) ;/*closure _,object k_734890, object f_73580_732854, object lst1_73581_732855, object lst2_73582_732856*/
++static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_7312190, object r_734892*/
++static void __lambda_453(void *data, object clo, int argc, object *args) ;/*closure _,object k_734883, object f_73578_732852, object lst_73579_732853*/
++static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_7312189, object r_734885*/
++static void __lambda_450(void *data, object clo, int argc, object *args) ;/*closure _,object k_734871, object f_73571_732848, object lst1_73572_732849, object lst2_73573_732850*/
++static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_7312187, object r_734873*/
++static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_7312188, object r_734874*/
++static void __lambda_447(void *data, object clo, int argc, object *args) ;/*closure _,object k_734863, object f_73569_732846, object lst_73570_732847*/
++static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_7312185, object r_734865*/
++static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_7312186, object r_734866*/
++static void __lambda_432(void *data, object clo, int argc, object *args) ;/*closure _,object k_734844, object f_73557_732835, object lis1_73558_732836, object lists_73559_732837_raw, ...*/
++static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_7312182, object k_734859, object x_73567_732844, object y_73568_732845*/
++static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_7312183, object r_734860*/
++static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_7312184, object r_734857*/
++static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_7312170, object lists_73561_732838*/
++static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_7312171, object recur_73562_732839*/
++static void __lambda_1325(void *data, object clo, int argc, object *args) ;/*object self_7312172, object recur_73562_732839*/
++static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_7312173, object k_734849, object lists_73563_732840*/
++static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_7312174, object k_734856*/
++static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_7312175, object r_734850*/
++static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_7312176, object k_734852, object cars_73564_732841, object cdrs_73565_732842*/
++static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_7312177, object x_73566_732843*/
++static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_7312178, object r_734855*/
++static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_7312179, object r_734851*/
++static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_7312180, object r_734848*/
++static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_7312181, object r_734847*/
++static void __lambda_412(void *data, object clo, int argc, object *args) ;/*closure _,object k_734816, object lists_73545_732824*/
++static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_7312150, object k_734818, object abort_73546_732825*/
++static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_7312151, object lists_73548_732826*/
++static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_7312152, object recur_73549_732827*/
++static void __lambda_1324(void *data, object clo, int argc, object *args) ;/*object self_7312153, object recur_73549_732827*/
++static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_7312154, object k_734821, object lists_73550_732828*/
++static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_7312155, object k_734839*/
++static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_7312156, object r_734823*/
++static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_7312157, object k_734825, object list_73551_732829, object other_91lists_73552_732830*/
++static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_7312158, object k_734838*/
++static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_7312159, object r_734829*/
++static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_7312160, object k_734831, object a_73553_732831, object d_73554_732832*/
++static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_7312161, object k_734837*/
++static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_7312162, object r_734832*/
++static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_7312163, object k_734834, object cars_73555_732833, object cdrs_73556_732834*/
++static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_7312164, object r_734833*/
++static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_7312165, object r_734830*/
++static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_7312166, object r_734824*/
++static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_7312167, object r_734820*/
++static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_7312168, object r_734819*/
++static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_7312169, object r_734817*/
++static void __lambda_411(void *data, object clo, int argc, object *args) ;/*closure _,object k_734811, object pair_73544_732823*/
++static void __lambda_410(void *data, object clo, int argc, object *args) ;/*closure _,object k_734792, object expr_73535_732817, object rename_73536_732818, object compare_73537_732819*/
++static void __lambda_403(void *data, object clo, int argc, object *args) ;/*closure _,object k_734780, object ls_73528_732811*/
++static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_7312143, object ls_73530_732812, object res_73531_732813*/
++static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_7312144, object lp_73532_732814*/
++static void __lambda_1323(void *data, object clo, int argc, object *args) ;/*object self_7312145, object lp_73532_732814*/
++static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_7312146, object k_734784, object ls_73533_732815, object res_73534_732816*/
++static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_7312147, object r_734789_7311474*/
++static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_7312148, object r_734783*/
++static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_7312149, object r_734782*/
++static void __lambda_396(void *data, object clo, int argc, object *args) ;/*closure _,object k_734767, object k_73522_732805, object fill_73523_732806_raw, ...*/
++static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_7312135, object x_73524_732807, object make_73525_732808*/
++static void __lambda_1322(void *data, object clo, int argc, object *args) ;/*object self_7312136, object x_73524_732807*/
++static void __lambda_1321(void *data, object clo, int argc, object *args) ;/*object self_7312137, object make_73525_732808*/
++static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_7312138, object r_734768*/
++static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_7312139, object k_734771, object n_73526_732809, object obj_73527_732810*/
++static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_7312140, object r_734773*/
++static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_7312141, object r_734770*/
++static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_7312142, object r_734769*/
++static void __lambda_395(void *data, object clo, int argc, object *args) ;/*closure _,object k_734764, object objs_73521_732804_raw, ...*/
++static void __lambda_386(void *data, object clo, int argc, object *args) ;/*closure _,object k_734749, object lst_73514_732794_raw, ...*/
++static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_7312126, object append_912_732796*/
++static void __lambda_1320(void *data, object clo, int argc, object *args) ;/*object self_7312127, object append_912_732796*/
++static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_7312128, object k_734759, object inlist_73515_732798, object alist_73516_732799*/
++static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_7312129, object k_734761, object ap_73517_732800, object in_73518_732801*/
++static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_7312130, object r_734760*/
++static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_7312131, object r_734758*/
++static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_7312132, object r_734750*/
++static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_7312133, object k_734756, object a_73519_732802, object b_73520_732803*/
++static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_7312134, object r_734753*/
++static object __lambda_1415(void *data, object ptr,object n_73513_732793) ;
++static void __lambda_385(void *data, object clo, int argc, object *args) ;/*closure _,object k_734746, object n_73513_732793*/
++static object __lambda_1414(void *data, object ptr,object n_73512_732792) ;
++static void __lambda_384(void *data, object clo, int argc, object *args) ;/*closure _,object k_734743, object n_73512_732792*/
++static object __lambda_1413(void *data, object ptr,object n_73511_732791) ;
++static void __lambda_383(void *data, object clo, int argc, object *args) ;/*closure _,object k_734740, object n_73511_732791*/
++static object __lambda_1412(void *data, object ptr, object o) ;
++static void __lambda_1411(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object o)*/
++static object __lambda_1410(void *data, object ptr,object x_73510_732790) ;
++static void __lambda_382(void *data, object clo, int argc, object *args) ;/*closure _,object k_734737, object x_73510_732790*/
++static void __lambda_381(void *data, object clo, int argc, object *args) ;/*closure _,object k_734733, object port_73509_732789_raw, ...*/
++static void __lambda_379(void *data, object clo, int argc, object *args) ;/*closure _,object k_734727, object char_73507_732787, object port_73508_732788_raw, ...*/
++static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_7312125, object r_734729*/
++static object __lambda_1409(void *data, object ptr, object bv, object port, object start, object end) ;
++static void __lambda_1408(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv, object port, object start, object end)*/
++static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_734707, object vec_73501_732781, object opts_73502_732782_raw, ...*/
++static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_7312112, object len_73503_732783, object port_73504_732784, object start_73505_732785, object end_73506_732786*/
++static void __lambda_1319(void *data, object clo, int argc, object *args) ;/*object self_7312113, object len_73503_732783*/
++static void __lambda_1318(void *data, object clo, int argc, object *args) ;/*object self_7312114, object port_73504_732784*/
++static void __lambda_1317(void *data, object clo, int argc, object *args) ;/*object self_7312115, object start_73505_732785*/
++static void __lambda_1316(void *data, object clo, int argc, object *args) ;/*object self_7312116, object end_73506_732786*/
++static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_7312117, object r_734708*/
++static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_7312118, object r_734720*/
++static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_7312119, object r_734709*/
++static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_7312120, object r_734710*/
++static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_7312121, object r_734712*/
++static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_7312122, object r_734711*/
++static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_7312123, object k_734713*/
++static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_7312124, object k_734721*/
++static void __lambda_352(void *data, object clo, int argc, object *args) ;/*closure _,object k_734676, object vec_73473_732770, object o_73474_732771_raw, ...*/
++static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_7312095, object in_73477_732772*/
++static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_7312096, object start_73483_732774*/
++static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_7312097, object end_73486_732775*/
++static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_7312098, object res_73488_732776*/
++static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_7312099, object len_73493_732777*/
++static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_7312100, object lp_73494_73498_732779*/
++static void __lambda_1315(void *data, object clo, int argc, object *args) ;/*object self_7312101, object lp_73494_73498_732779*/
++static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_7312102, object k_734687, object i_73499_732780*/
++static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_7312103, object r_734692*/
++static void __lambda_368(void *data, object clo, int argc, object *args) ;/*object self_7312104, object r_734689*/
++static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_7312105, object r_734686*/
++static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_7312106, object r_734685*/
++static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_7312107, object k_734694*/
++static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_7312108, object r_734695*/
++static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_7312109, object k_734696*/
++static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_7312110, object k_734699*/
++static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_7312111, object k_734703*/
++static void __lambda_340(void *data, object clo, int argc, object *args) ;/*closure _,object k_734658, object k_73462_732763, object _191port_73463_732764_raw, ...*/
++static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_7312081, object port_73464_732765, object bv_73465_732766, object loop_73466_732767*/
++static void __lambda_1314(void *data, object clo, int argc, object *args) ;/*object self_7312082, object port_73464_732765*/
++static void __lambda_1313(void *data, object clo, int argc, object *args) ;/*object self_7312083, object bv_73465_732766*/
++static void __lambda_1312(void *data, object clo, int argc, object *args) ;/*object self_7312084, object loop_73466_732767*/
++static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_7312085, object r_734671*/
++static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_7312086, object r_734659*/
++static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_7312087, object r_734670*/
++static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_7312088, object r_734660*/
++static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_7312089, object k_734663, object n_73467_732768*/
++static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_7312090, object b_73468_732769*/
++static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_7312091, object r_734668*/
++static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_7312092, object r_734662*/
++static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_7312093, object r_734661*/
++static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_7312094, object k_734672*/
++static void __lambda_336(void *data, object clo, int argc, object *args) ;/*closure _,object k_734643, object str_73451_732759, object opts_73452_732760_raw, ...*/
++static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_7312079, object start_73460_732761, object end_73461_732762*/
++static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_7312080, object r_734650*/
++static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_7312078, object r_734645*/
++static void __lambda_335(void *data, object clo, int argc, object *args) ;/*closure _,object k_734640, object str_73449_732757, object port_73450_732758*/
++static void __lambda_333(void *data, object clo, int argc, object *args) ;/*closure _,object k_734636, object str_73448_732756*/
++static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_7312077, object r_734637*/
++static void __lambda_331(void *data, object clo, int argc, object *args) ;/*closure _,object k_734630, object port_73447_732755_raw, ...*/
++static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_7312076, object r_734632*/
++static void __lambda_329(void *data, object clo, int argc, object *args) ;/*closure _,object k_734625, object obj_73445_732754*/
++static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_7312075, object r_734627_7311472*/
++static void __lambda_328(void *data, object clo, int argc, object *args) ;/*closure _,object k_734621, object obj_73443_732753*/
++static void __lambda_1407(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
++static void __lambda_316(void *data, object clo, int argc, object *args) ;/*closure _,object k_734599, object k_73425_732743, object opts_73426_732744_raw, ...*/
++static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_7312063, object port_73427_732745*/
++static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_7312064, object r_734616*/
++static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_7312065, object acc_73429_732746, object i_73430_732747*/
++static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_7312066, object loop_73432_732749*/
++static void __lambda_1311(void *data, object clo, int argc, object *args) ;/*object self_7312067, object loop_73432_732749*/
++static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_7312068, object k_734605, object acc_73433_732750, object i_73434_732751, object chr_73435_732752*/
++static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_7312071, object r_734614_737646*/
++static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_7312070, object r_734609_737643_7311471*/
++static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_7312069, object r_734607_7311470*/
++static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_7312072, object r_734604*/
++static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_7312073, object r_734603*/
++static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_7312074, object k_734617*/
++static void __lambda_306(void *data, object clo, int argc, object *args) ;/*closure _,object k_734583, object str_73410_732736, object port_73411_732737*/
++static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_7312053, object r_734585*/
++static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_7312054, object lis_73413_732738, object str_73414_732739*/
++static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_7312055, object loop_73415_732740*/
++static void __lambda_1310(void *data, object clo, int argc, object *args) ;/*object self_7312056, object loop_73415_732740*/
++static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_7312057, object k_734588, object lis_73416_732741, object str_73417_732742*/
++static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_7312060, object r_734595*/
++static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_7312059, object r_734592_7311469*/
++static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_7312058, object r_734590_7311468*/
++static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_7312061, object r_734587*/
++static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_7312062, object r_734586*/
++static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_734573, object o_73395_732733_raw, ...*/
++static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_7312049, object port_73398_732734*/
++static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_7312050, object str_73401_732735*/
++static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_7312051, object r_734578*/
++static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_7312052, object k_734579*/
++static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_734567, object port_73394_732732_raw, ...*/
++static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_7312048, object r_734569*/
++static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_734561, object port_73393_732731_raw, ...*/
++static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_7312047, object r_734563*/
++static void __lambda_295(void *data, object clo, int argc, object *args) ;/*closure _,object k_734555, object port_73392_732730_raw, ...*/
++static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_7312046, object r_734557*/
++static void __lambda_1406(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_293(void *data, object clo, int argc, object *args) ;/*closure _,object k_734549, object chr_73390_732728, object port_73391_732729_raw, ...*/
++static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_7312045, object r_734551*/
++static void __lambda_291(void *data, object clo, int argc, object *args) ;/*closure _,object k_734543, object port_73389_732727_raw, ...*/
++static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_7312044, object r_734545*/
++static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_734537, object port_73388_732726_raw, ...*/
++static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_7312043, object r_734539*/
++static void __lambda_1405(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object chr, object port)*/
++static void __lambda_1404(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_1403(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
++static void __lambda_287(void *data, object clo, int argc, object *args) ;/*closure _,object k_734530, object func_73385_732723, object end_73386_732724, object lst_73387_732725*/
++static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_7312042, object r_734533*/
++static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_734523, object func_73382_732720, object accum_73383_732721, object lst_73384_732722*/
++static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_7312041, object r_734525*/
++static void __lambda_284(void *data, object clo, int argc, object *args) ;/*closure _,object k_734518, object obj_73379_732717, object alist_73380_732718, object compare_73381_732719_raw, ...*/
++static void __lambda_281(void *data, object clo, int argc, object *args) ;/*closure _,object k_734507, object obj_73368_732714, object lst_73369_732715, object cmp_127_73370_732716*/
++static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_7312039, object r_734509*/
++static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_7312040, object k_734511*/
++static void __lambda_280(void *data, object clo, int argc, object *args) ;/*closure _,object k_734502, object obj_73365_732711, object lst_73366_732712, object compare_73367_732713_raw, ...*/
++static void __lambda_278(void *data, object clo, int argc, object *args) ;/*closure _,object k_734495, object obj_73355_732708, object lst_73356_732709, object cmp_91proc_73357_732710*/
++static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_7312038, object r_734497*/
++static object __lambda_1402(void *data, object ptr,object str1_73353_732706, object str2_73354_732707) ;
++static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_734491, object str1_73353_732706, object str2_73354_732707*/
++static object __lambda_1401(void *data, object ptr,object str1_73351_732704, object str2_73352_732705) ;
++static void __lambda_276(void *data, object clo, int argc, object *args) ;/*closure _,object k_734487, object str1_73351_732704, object str2_73352_732705*/
++static object __lambda_1400(void *data, object ptr,object str1_73349_732702, object str2_73350_732703) ;
++static void __lambda_275(void *data, object clo, int argc, object *args) ;/*closure _,object k_734483, object str1_73349_732702, object str2_73350_732703*/
++static object __lambda_1399(void *data, object ptr,object str1_73347_732700, object str2_73348_732701) ;
++static void __lambda_274(void *data, object clo, int argc, object *args) ;/*closure _,object k_734479, object str1_73347_732700, object str2_73348_732701*/
++static object __lambda_1398(void *data, object ptr,object str1_73345_732698, object str2_73346_732699) ;
++static void __lambda_273(void *data, object clo, int argc, object *args) ;/*closure _,object k_734475, object str1_73345_732698, object str2_73346_732699*/
++static void __lambda_272(void *data, object clo, int argc, object *args) ;/*closure _,object k_734471, object str1_73342_732695, object str2_73343_732696, object strs_73344_732697_raw, ...*/
++static void __lambda_271(void *data, object clo, int argc, object *args) ;/*closure _,object k_734467, object str1_73339_732692, object str2_73340_732693, object strs_73341_732694_raw, ...*/
++static void __lambda_270(void *data, object clo, int argc, object *args) ;/*closure _,object k_734463, object str1_73336_732689, object str2_73337_732690, object strs_73338_732691_raw, ...*/
++static void __lambda_269(void *data, object clo, int argc, object *args) ;/*closure _,object k_734459, object str1_73333_732686, object str2_73334_732687, object strs_73335_732688_raw, ...*/
++static void __lambda_268(void *data, object clo, int argc, object *args) ;/*closure _,object k_734455, object str1_73330_732683, object str2_73331_732684, object strs_73332_732685_raw, ...*/
++static void __lambda_267(void *data, object clo, int argc, object *args) ;/*closure _,object k_734451, object c1_73327_732680, object c2_73328_732681, object cs_73329_732682_raw, ...*/
++static void __lambda_266(void *data, object clo, int argc, object *args) ;/*closure _,object k_734447, object c1_73324_732677, object c2_73325_732678, object cs_73326_732679_raw, ...*/
++static void __lambda_265(void *data, object clo, int argc, object *args) ;/*closure _,object k_734443, object c1_73321_732674, object c2_73322_732675, object cs_73323_732676_raw, ...*/
++static void __lambda_264(void *data, object clo, int argc, object *args) ;/*closure _,object k_734439, object c1_73318_732671, object c2_73319_732672, object cs_73320_732673_raw, ...*/
++static void __lambda_263(void *data, object clo, int argc, object *args) ;/*closure _,object k_734435, object c1_73315_732668, object c2_73316_732669, object cs_73317_732670_raw, ...*/
++static void __lambda_260(void *data, object clo, int argc, object *args) ;/*closure _,object k_734428, object cmp_73310_732663, object c_73311_732664, object cs_73312_732665*/
++static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_7312036, object k_734430, object x_73313_732666, object y_73314_732667*/
++static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_7312037, object r_734429*/
++static void __lambda_258(void *data, object clo, int argc, object *args) ;/*closure _,object k_734420, object cmp_73300_732660, object x_73301_732661, object lst_73302_732662*/
++static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_7312035, object r_734422*/
++static void __lambda_256(void *data, object clo, int argc, object *args) ;/*closure _,object k_734415, object port_73297_732657, object proc_73298_732658*/
++static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_7312034, object result_73299_732659*/
++static void __lambda_252(void *data, object clo, int argc, object *args) ;/*closure _,object k_734409, object before_73293_732653, object thunk_73294_732654, object after_73295_732655*/
++static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_7312031, object r_734410*/
++static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_7312032, object result_73296_732656*/
++static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_7312033, object r_734412*/
++static void __lambda_250(void *data, object clo, int argc, object *args) ;/*closure _,object k_734397, object producer_73289_732650, object consumer_73290_732651*/
++static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_7312030, object x_73291_732652*/
++static void __lambda_249(void *data, object clo, int argc, object *args) ;/*closure _,object k_734387, object args_73287_732649_raw, ...*/
++static void __lambda_248(void *data, object clo, int argc, object *args) ;/*closure _,object k_734381, object expr_73284_732646, object rename_73285_732647, object compare_73286_732648*/
++static void __lambda_213(void *data, object clo, int argc, object *args) ;/*closure _,object k_734293, object expr_73254_732638, object rename_73255_732639, object compare_73256_732640*/
++static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_7311995, object qq_732642*/
++static void __lambda_1309(void *data, object clo, int argc, object *args) ;/*object self_7311996, object qq_732642*/
++static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_7311997, object k_734297, object x_73257_732644, object d_73258_732645*/
++static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_7312027, object r_734375*/
++static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_7312024, object r_734370*/
++static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_7312025, object r_734372*/
++static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_7312026, object r_734371*/
++static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_7311998, object r_734366*/
++static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_7311999, object r_734299*/
++static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_7312003, object r_734363*/
++static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_7312004, object r_734310*/
++static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_7312011, object r_734360*/
++static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_7312012, object r_734327*/
++static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_7312016, object r_734337*/
++static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_7312019, object r_734347*/
++static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_7312020, object r_734348*/
++static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_7312021, object r_734349*/
++static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_7312017, object r_734340*/
++static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_7312018, object r_734342*/
++static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_7312022, object k_734353*/
++static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_7312023, object r_734356*/
++static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_7312013, object r_734328*/
++static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_7312014, object r_734333*/
++static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_7312015, object r_734330*/
++static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_7312008, object r_734318*/
++static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_7312009, object r_734323*/
++static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_7312010, object r_734320*/
++static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_7312005, object r_734312*/
++static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_7312006, object r_734313*/
++static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_7312007, object r_734314*/
++static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_7312000, object r_734301*/
++static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_7312001, object r_734306*/
++static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_7312002, object r_734303*/
++static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_7312028, object r_734296*/
++static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_7312029, object r_734294*/
++static void __lambda_189(void *data, object clo, int argc, object *args) ;/*closure _,object k_734214, object expr_73227_732630, object rename_73228_732631, object compare_73229_732632*/
++static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_7311972, object r_734271*/
++static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_7311973, object r_734277*/
++static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_7311974, object k_734281, object x_73253_732637*/
++static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_7311975, object r_734287*/
++static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_7311976, object r_734286*/
++static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_7311977, object r_734279*/
++static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_7311978, object r_734278*/
++static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_7311979, object r_734272*/
++static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_7311980, object body_73232_732633*/
++static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_7311981, object wrap_73238_732635*/
++static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_7311982, object r_734218*/
++static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_7311983, object r_734220*/
++static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_7311984, object k_734227, object x_73243_732636*/
++static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_7311985, object r_734225*/
++static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_7311986, object r_734222*/
++static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_7311987, object k_734232*/
++static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_7311993, object r_734258*/
++static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_7311994, object r_734265*/
++static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_7311988, object r_734234*/
++static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_7311989, object r_734252*/
++static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_7311990, object r_734240*/
++static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_7311991, object r_734242*/
++static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_7311992, object r_734244*/
++static void __lambda_182(void *data, object clo, int argc, object *args) ;/*closure _,object k_734187, object exp_73221_732627, object rename_73222_732628, object compare_73223_732629*/
++static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_7311966, object r_734188*/
++static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_7311967, object r_734189*/
++static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_7311968, object k_734206*/
++static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_7311969, object r_734208*/
++static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_7311970, object k_734209*/
++static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_7311971, object r_734211*/
++static void __lambda_175(void *data, object clo, int argc, object *args) ;/*closure _,object k_734164, object exp_73215_732624, object rename_73216_732625, object compare_73217_732626*/
++static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_7311960, object r_734165*/
++static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_7311961, object r_734166*/
++static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_7311962, object k_734179*/
++static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_7311963, object r_734181*/
++static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_7311964, object k_734182*/
++static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_7311965, object r_734184*/
++static void __lambda_142(void *data, object clo, int argc, object *args) ;/*closure _,object k_734053, object expr_73172_732608, object rename_73173_732609, object compare_73174_732610*/
++static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_7311925, object agg_91cond_732614, object body_732615, object clause_732616*/
++static void __lambda_1308(void *data, object clo, int argc, object *args) ;/*object self_7311926, object agg_91cond_732614*/
++static void __lambda_1307(void *data, object clo, int argc, object *args) ;/*object self_7311927, object body_732615*/
++static void __lambda_1306(void *data, object clo, int argc, object *args) ;/*object self_7311928, object clause_732616*/
++static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_7311929, object k_734148, object exprs_73175_732620*/
++static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_7311930, object r_734159*/
++static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_7311931, object r_734151*/
++static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_7311933, object r_734157*/
++static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_7311932, object r_734154*/
++static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_7311934, object r_734147*/
++static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_7311935, object r_734054*/
++static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_7311936, object k_734127, object tmp_91sym_73189_732621, object lis_73190_732622*/
++static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_7311937, object r_734142*/
++static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_7311938, object r_734138*/
++static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_7311939, object r_734134*/
++static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_7311940, object r_734126*/
++static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_7311941, object r_734055*/
++static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_7311942, object k_734072, object ls_73194_732623*/
++static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_7311943, object r_734123*/
++static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_7311944, object r_734074*/
++static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_7311951, object r_734102*/
++static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_7311952, object r_734112*/
++static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_7311953, object r_734104*/
++static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_7311954, object r_734106*/
++static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_7311955, object r_734108*/
++static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_7311945, object r_734077*/
++static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_7311946, object r_734087*/
++static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_7311947, object r_734089*/
++static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_7311948, object r_734093*/
++static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_7311949, object r_734081*/
++static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_7311950, object r_734083*/
++static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_7311956, object r_734071*/
++static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_7311957, object r_734056*/
++static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_7311958, object r_734066*/
++static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_7311959, object r_734061*/
++static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_733989, object expr_73168_732604, object rename_73169_732605, object compare_73170_732606*/
++static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_7311905, object r_734050*/
++static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_7311906, object cl_73171_732607*/
++static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_7311907, object r_734047*/
++static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_7311908, object r_733992*/
++static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_7311911, object r_734001*/
++static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_7311920, object r_734027*/
++static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_7311921, object r_734035*/
++static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_7311922, object r_734031*/
++static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_7311912, object r_734004*/
++static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_7311913, object r_734024*/
++static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_7311914, object r_734007*/
++static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_7311915, object r_734008*/
++static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_7311916, object r_734009*/
++static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_7311917, object r_734011*/
++static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_7311918, object k_734014*/
++static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_7311919, object r_734018*/
++static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_7311923, object k_734041*/
++static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_7311924, object r_734043*/
++static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_7311909, object r_734000*/
++static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_7311910, object r_733995*/
++static void __lambda_84(void *data, object clo, int argc, object *args) ;/*closure _,object k_733890, object expr_7388_732569, object rename_7389_732570, object compare_7390_732571*/
++static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_7311864, object _191lib_117import_91_125filename_732576, object _191lib_117import_91_125library_91name_732577, object _191library_91exists_127_732578, object check_732579*/
++static void __lambda_1305(void *data, object clo, int argc, object *args) ;/*object self_7311865, object _191lib_117import_91_125filename_732576*/
++static void __lambda_1304(void *data, object clo, int argc, object *args) ;/*object self_7311866, object _191lib_117import_91_125library_91name_732577*/
++static void __lambda_1303(void *data, object clo, int argc, object *args) ;/*object self_7311867, object _191library_91exists_127_732578*/
++static void __lambda_1302(void *data, object clo, int argc, object *args) ;/*object self_7311868, object check_732579*/
++static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_7311869, object k_733981, object import_7391_732584, object ext_7392_732585_raw, ...*/
++static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_7311870, object r_733983*/
++static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_7311871, object r_733982*/
++static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_7311872, object r_733980*/
++static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_7311873, object r_733891*/
++static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_7311874, object k_733953, object import_7393_732586, object ext_7394_732587_raw, ...*/
++static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_7311875, object k_733973, object i_73113_732593*/
++static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_7311876, object r_733974*/
++static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_7311877, object k_733975*/
++static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_7311878, object r_733972*/
++static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_7311879, object r_733971*/
++static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_7311880, object r_733970*/
++static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_7311881, object filename_85_73100_732589*/
++static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_7311882, object filename_73103_732590*/
++static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_7311883, object r_733957*/
++static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_7311884, object r_733958*/
++static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_7311885, object k_733961*/
++static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_7311886, object r_733952*/
++static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_7311887, object r_733892*/
++static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_7311888, object k_733936, object import_73121_732594*/
++static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_7311889, object r_733935*/
++static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_7311890, object r_733893*/
++static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_7311891, object k_733918, object x_73139_732598*/
++static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_7311893, object r_733934*/
++static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_7311892, object r_733926*/
++static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_7311894, object r_733917*/
++static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_7311895, object r_733894*/
++static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_7311896, object ls_73145_732600*/
++static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_7311897, object expand_73146_732601*/
++static void __lambda_1301(void *data, object clo, int argc, object *args) ;/*object self_7311898, object expand_73146_732601*/
++static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_7311899, object k_733898, object ls_73147_732602*/
++static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_7311901, object r_733907*/
++static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_7311902, object r_733908*/
++static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_7311900, object r_733903*/
++static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_7311903, object r_733897*/
++static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_7311904, object r_733896*/
++static void __lambda_75(void *data, object clo, int argc, object *args) ;/*closure _,object k_733871, object exp_7373_732558, object rename_7374_732559, object compare_7375_732560*/
++static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_7311854, object dummy_91bind_732563, object singlet_127_732564*/
++static void __lambda_1300(void *data, object clo, int argc, object *args) ;/*object self_7311855, object dummy_91bind_732563*/
++static void __lambda_1299(void *data, object clo, int argc, object *args) ;/*object self_7311856, object singlet_127_732564*/
++static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_7311857, object k_733885, object l_7376_732567*/
++static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_7311858, object r_733884*/
++static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_7311859, object r_733872*/
++static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_7311860, object k_733876, object exps_7378_732568*/
++static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_7311861, object r_733877*/
++static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_7311862, object r_733875*/
++static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_7311863, object r_733873*/
++static void __lambda_58(void *data, object clo, int argc, object *args) ;/*closure _,object k_733840, object exp_7346_732545, object rename_7347_732546, object compare_7348_732547*/
++static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_7311838, object k_733842, object k_7349_732548*/
++static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_7311839, object k_733867, object obj_7350_732549*/
++static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_7311840, object r_733868*/
++static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_7311841, object r_733843*/
++static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_7311842, object k_733845*/
++static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_7311843, object k_733865, object b_7372_732557*/
++static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_7311844, object r_733864*/
++static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_7311845, object namings_7357_732552*/
++static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_7311846, object names_7360_732553*/
++static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_7311847, object k_733861, object binding_7371_732556*/
++static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_7311848, object r_733860*/
++static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_7311849, object sets_7363_732554*/
++static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_7311850, object args_7366_732555*/
++static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_7311851, object r_733857*/
++static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_7311852, object r_733844*/
++static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_7311853, object r_733841*/
++static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_733795, object expr_7336_732541, object rename_7337_732542, object compare_7338_732543*/
++static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_7311824, object r_733796*/
++static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_7311825, object r_733797*/
++static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_7311826, object r_733831*/
++static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_7311828, object r_733804*/
++static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_7311829, object r_733805*/
++static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_7311830, object r_733811*/
++static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_7311831, object k_733821*/
++static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_7311832, object k_733825, object x_7342_732544*/
++static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_7311833, object r_733823*/
++static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_7311827, object r_733799*/
++static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_7311834, object k_733832*/
++static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_7311835, object r_733834*/
++static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_7311836, object k_733835*/
++static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_7311837, object r_733837*/
++static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_733734, object expr_7323_732534, object rename_7324_732535, object compare_7325_732536*/
++static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_7311806, object r_733735*/
++static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_7311807, object r_733736*/
++static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_7311808, object r_733738*/
++static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_7311809, object k_733776, object x_7327_732538*/
++static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_7311810, object r_733775*/
++static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_7311811, object r_733739*/
++static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_7311812, object r_733740*/
++static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_7311813, object r_733741*/
++static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_7311814, object vars_7328_732539, object vals_7329_732540*/
++static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_7311818, object r_733770*/
++static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_7311815, object r_733744*/
++static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_7311816, object r_733749*/
++static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_7311817, object r_733762*/
++static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_7311819, object k_733781*/
++static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_7311820, object k_733787*/
++static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_7311821, object r_733789*/
++static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_7311822, object k_733790*/
++static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_7311823, object r_733792*/
++static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_733709, object expr_7313_732531, object rename_7314_732532, object compare_7315_732533*/
++static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_7311800, object r_733712*/
++static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_7311801, object r_733726*/
++static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_7311802, object r_733715*/
++static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_7311803, object r_733716*/
++static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_7311804, object r_733717*/
++static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_7311805, object r_733719*/
++static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_733695, object expr_733_732528, object rename_734_732529, object compare_735_732530*/
++static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_7311798, object r_733698*/
++static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_7311799, object r_733701*/
++static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_733692*/
++static void __lambda_11(void *data, object clo, int argc, object *args) ;/*closure _,object k_733688, object sym_732_732527*/
++static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_7311797, object r_733689*/
++static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_733667*/
++static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_7311789, object feats_731_732526*/
++static void __lambda_1298(void *data, object clo, int argc, object *args) ;/*object self_7311790, object feats_731_732526*/
++static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_7311791, object r_733668*/
++static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_7311792, object r_733676*/
++static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_7311793, object r_733674*/
++static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_7311794, object k_733677*/
++static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_7311795, object r_733682*/
++static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_7311796, object r_733679*/
+ static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k, object f*/
+-static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_7313041, object _191, object result*/
++static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_7311788, object _191, object result*/
+
+-static void __lambda_1327(void *data, object _, int argc, object *args) /* closure _,object k_738391 */
++static void __lambda_1280(void *data, object _, int argc, object *args) /* closure _,object k_737616 */
+ {
+-object k_738391 = args[0];
++object k_737616 = args[0];
+ Cyc_st_add(data, "scheme/base.sld:lib-init:schemebase");
+
+-closureN_type c_7328755;
+-object e_7328860 [1];
+-c_7328755.hdr.mark = gc_color_red;
+- c_7328755.hdr.grayed = 0;
+-c_7328755.tag = closureN_tag;
+- c_7328755.fn = (function_type)__lambda_1328;
+-c_7328755.num_args = 1;
+-c_7328755.num_elements = 1;
+-c_7328755.elements = (object *)e_7328860;
+-c_7328755.elements[0] = k_738391;
++closureN_type c_7326296;
++object e_7326401 [1];
++c_7326296.hdr.mark = gc_color_red;
++ c_7326296.hdr.grayed = 0;
++c_7326296.tag = closureN_tag;
++ c_7326296.fn = (function_type)__lambda_1281;
++c_7326296.num_args = 1;
++c_7326296.num_elements = 1;
++c_7326296.elements = (object *)e_7326401;
++c_7326296.elements[0] = k_737616;
+
+
+-make_pair(c_7328867,quote_posix,NULL);c_7328867.hdr.immutable = 1;
++make_pair(c_7326408,quote_posix,NULL);c_7326408.hdr.immutable = 1;
+
+-make_pair(c_7328866,quote_full_91unicode,&c_7328867);c_7328866.hdr.immutable = 1;
++make_pair(c_7326407,quote_full_91unicode,&c_7326408);c_7326407.hdr.immutable = 1;
+
+-make_pair(c_7328865,quote_ieee_91float,&c_7328866);c_7328865.hdr.immutable = 1;
++make_pair(c_7326406,quote_ieee_91float,&c_7326407);c_7326406.hdr.immutable = 1;
+
+-make_pair(c_7328864,quote_r7rs,&c_7328865);c_7328864.hdr.immutable = 1;
++make_pair(c_7326405,quote_r7rs,&c_7326406);c_7326405.hdr.immutable = 1;
+
+-object c_7328863 = global_set_cps_id(data,(closure)&c_7328755,"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, &c_7328864);
+-return_closcall1(data,(closure)&c_7328755, c_7328863);;
++object c_7326404 = global_set_cps_id(data,(closure)&c_7326296,"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, &c_7326405);
++return_closcall1(data,(closure)&c_7326296, c_7326404);;
+ }
+
+-static void __lambda_1328(void *data, object self_7314305, int argc, object *args) /* object self_7314305, object r_738393 */
++static void __lambda_1281(void *data, object self_7313005, int argc, object *args) /* object self_7313005, object r_737618 */
+ {
+
+
+-closureN_type c_7328757;
+-object e_7328856 [1];
+-c_7328757.hdr.mark = gc_color_red;
+- c_7328757.hdr.grayed = 0;
+-c_7328757.tag = closureN_tag;
+- c_7328757.fn = (function_type)__lambda_1329;
+-c_7328757.num_args = 1;
+-c_7328757.num_elements = 1;
+-c_7328757.elements = (object *)e_7328856;
+-c_7328757.elements[0] = ((closureN)self_7314305)->elements[0];
++closureN_type c_7326298;
++object e_7326397 [1];
++c_7326298.hdr.mark = gc_color_red;
++ c_7326298.hdr.grayed = 0;
++c_7326298.tag = closureN_tag;
++ c_7326298.fn = (function_type)__lambda_1282;
++c_7326298.num_args = 1;
++c_7326298.num_elements = 1;
++c_7326298.elements = (object *)e_7326397;
++c_7326298.elements[0] = ((closureN)self_7313005)->elements[0];
+
+
+-object c_7328859 = global_set_cps_id(data,(closure)&c_7328757,"__glo_call_91with_91current_91continuation_scheme_base", __glo_call_91with_91current_91continuation_scheme_base, __glo_call_95cc_scheme_base);
+-return_closcall1(data,(closure)&c_7328757, c_7328859);;
++object c_7326400 = global_set_cps_id(data,(closure)&c_7326298,"__glo_call_91with_91current_91continuation_scheme_base", __glo_call_91with_91current_91continuation_scheme_base, __glo_call_95cc_scheme_base);
++return_closcall1(data,(closure)&c_7326298, c_7326400);;
+ }
+
+-static void __lambda_1329(void *data, object self_7314306, int argc, object *args) /* object self_7314306, object r_738394 */
++static void __lambda_1282(void *data, object self_7313006, int argc, object *args) /* object self_7313006, object r_737619 */
+ {
+
+
+-closureN_type c_7328759;
+-object e_7328852 [1];
+-c_7328759.hdr.mark = gc_color_red;
+- c_7328759.hdr.grayed = 0;
+-c_7328759.tag = closureN_tag;
+- c_7328759.fn = (function_type)__lambda_1330;
+-c_7328759.num_args = 1;
+-c_7328759.num_elements = 1;
+-c_7328759.elements = (object *)e_7328852;
+-c_7328759.elements[0] = ((closureN)self_7314306)->elements[0];
++closureN_type c_7326300;
++object e_7326393 [1];
++c_7326300.hdr.mark = gc_color_red;
++ c_7326300.hdr.grayed = 0;
++c_7326300.tag = closureN_tag;
++ c_7326300.fn = (function_type)__lambda_1283;
++c_7326300.num_args = 1;
++c_7326300.num_elements = 1;
++c_7326300.elements = (object *)e_7326393;
++c_7326300.elements[0] = ((closureN)self_7313006)->elements[0];
+
+
+-port_type c_7328855 = Cyc_stdout();
+-return_direct_with_clo2(data, __glo_make_91parameter_scheme_base, (((closure) __glo_make_91parameter_scheme_base)->fn), &c_7328759, &c_7328855);;
++port_type c_7326396 = Cyc_stdout();
++return_direct_with_clo2(data, __glo_make_91parameter_scheme_base, (((closure) __glo_make_91parameter_scheme_base)->fn), &c_7326300, &c_7326396);;
+ }
+
+-static void __lambda_1330(void *data, object self_7314307, int argc, object *args) /* object self_7314307, object r_738412 */
++static void __lambda_1283(void *data, object self_7313007, int argc, object *args) /* object self_7313007, object r_737637 */
+ {
+- object r_738412 = args[0];
++ object r_737637 = args[0];
+
+-closureN_type c_7328761;
+-object e_7328848 [1];
+-c_7328761.hdr.mark = gc_color_red;
+- c_7328761.hdr.grayed = 0;
+-c_7328761.tag = closureN_tag;
+- c_7328761.fn = (function_type)__lambda_1331;
+-c_7328761.num_args = 1;
+-c_7328761.num_elements = 1;
+-c_7328761.elements = (object *)e_7328848;
+-c_7328761.elements[0] = ((closureN)self_7314307)->elements[0];
++closureN_type c_7326302;
++object e_7326389 [1];
++c_7326302.hdr.mark = gc_color_red;
++ c_7326302.hdr.grayed = 0;
++c_7326302.tag = closureN_tag;
++ c_7326302.fn = (function_type)__lambda_1284;
++c_7326302.num_args = 1;
++c_7326302.num_elements = 1;
++c_7326302.elements = (object *)e_7326389;
++c_7326302.elements[0] = ((closureN)self_7313007)->elements[0];
+
+
+-object c_7328851 = global_set_cps_id(data,(closure)&c_7328761,"__glo_current_91output_91port_scheme_base", __glo_current_91output_91port_scheme_base, r_738412);
+-return_closcall1(data,(closure)&c_7328761, c_7328851);;
++object c_7326392 = global_set_cps_id(data,(closure)&c_7326302,"__glo_current_91output_91port_scheme_base", __glo_current_91output_91port_scheme_base, r_737637);
++return_closcall1(data,(closure)&c_7326302, c_7326392);;
+ }
+
+-static void __lambda_1331(void *data, object self_7314308, int argc, object *args) /* object self_7314308, object r_738395 */
++static void __lambda_1284(void *data, object self_7313008, int argc, object *args) /* object self_7313008, object r_737620 */
+ {
+
+
+-closureN_type c_7328763;
+-object e_7328844 [1];
+-c_7328763.hdr.mark = gc_color_red;
+- c_7328763.hdr.grayed = 0;
+-c_7328763.tag = closureN_tag;
+- c_7328763.fn = (function_type)__lambda_1332;
+-c_7328763.num_args = 1;
+-c_7328763.num_elements = 1;
+-c_7328763.elements = (object *)e_7328844;
+-c_7328763.elements[0] = ((closureN)self_7314308)->elements[0];
++closureN_type c_7326304;
++object e_7326385 [1];
++c_7326304.hdr.mark = gc_color_red;
++ c_7326304.hdr.grayed = 0;
++c_7326304.tag = closureN_tag;
++ c_7326304.fn = (function_type)__lambda_1285;
++c_7326304.num_args = 1;
++c_7326304.num_elements = 1;
++c_7326304.elements = (object *)e_7326385;
++c_7326304.elements[0] = ((closureN)self_7313008)->elements[0];
+
+
+-port_type c_7328847 = Cyc_stdin();
+-return_direct_with_clo2(data, __glo_make_91parameter_scheme_base, (((closure) __glo_make_91parameter_scheme_base)->fn), &c_7328763, &c_7328847);;
++port_type c_7326388 = Cyc_stdin();
++return_direct_with_clo2(data, __glo_make_91parameter_scheme_base, (((closure) __glo_make_91parameter_scheme_base)->fn), &c_7326304, &c_7326388);;
+ }
+
+-static void __lambda_1332(void *data, object self_7314309, int argc, object *args) /* object self_7314309, object r_738410 */
++static void __lambda_1285(void *data, object self_7313009, int argc, object *args) /* object self_7313009, object r_737635 */
+ {
+- object r_738410 = args[0];
++ object r_737635 = args[0];
+
+-closureN_type c_7328765;
+-object e_7328840 [1];
+-c_7328765.hdr.mark = gc_color_red;
+- c_7328765.hdr.grayed = 0;
+-c_7328765.tag = closureN_tag;
+- c_7328765.fn = (function_type)__lambda_1333;
+-c_7328765.num_args = 1;
+-c_7328765.num_elements = 1;
+-c_7328765.elements = (object *)e_7328840;
+-c_7328765.elements[0] = ((closureN)self_7314309)->elements[0];
++closureN_type c_7326306;
++object e_7326381 [1];
++c_7326306.hdr.mark = gc_color_red;
++ c_7326306.hdr.grayed = 0;
++c_7326306.tag = closureN_tag;
++ c_7326306.fn = (function_type)__lambda_1286;
++c_7326306.num_args = 1;
++c_7326306.num_elements = 1;
++c_7326306.elements = (object *)e_7326381;
++c_7326306.elements[0] = ((closureN)self_7313009)->elements[0];
+
+
+-object c_7328843 = global_set_cps_id(data,(closure)&c_7328765,"__glo_current_91input_91port_scheme_base", __glo_current_91input_91port_scheme_base, r_738410);
+-return_closcall1(data,(closure)&c_7328765, c_7328843);;
++object c_7326384 = global_set_cps_id(data,(closure)&c_7326306,"__glo_current_91input_91port_scheme_base", __glo_current_91input_91port_scheme_base, r_737635);
++return_closcall1(data,(closure)&c_7326306, c_7326384);;
+ }
+
+-static void __lambda_1333(void *data, object self_7314310, int argc, object *args) /* object self_7314310, object r_738396 */
++static void __lambda_1286(void *data, object self_7313010, int argc, object *args) /* object self_7313010, object r_737621 */
+ {
+
+
+-closureN_type c_7328767;
+-object e_7328836 [1];
+-c_7328767.hdr.mark = gc_color_red;
+- c_7328767.hdr.grayed = 0;
+-c_7328767.tag = closureN_tag;
+- c_7328767.fn = (function_type)__lambda_1334;
+-c_7328767.num_args = 1;
+-c_7328767.num_elements = 1;
+-c_7328767.elements = (object *)e_7328836;
+-c_7328767.elements[0] = ((closureN)self_7314310)->elements[0];
++closureN_type c_7326308;
++object e_7326377 [1];
++c_7326308.hdr.mark = gc_color_red;
++ c_7326308.hdr.grayed = 0;
++c_7326308.tag = closureN_tag;
++ c_7326308.fn = (function_type)__lambda_1287;
++c_7326308.num_args = 1;
++c_7326308.num_elements = 1;
++c_7326308.elements = (object *)e_7326377;
++c_7326308.elements[0] = ((closureN)self_7313010)->elements[0];
+
+
+-port_type c_7328839 = Cyc_stderr();
+-return_direct_with_clo2(data, __glo_make_91parameter_scheme_base, (((closure) __glo_make_91parameter_scheme_base)->fn), &c_7328767, &c_7328839);;
++port_type c_7326380 = Cyc_stderr();
++return_direct_with_clo2(data, __glo_make_91parameter_scheme_base, (((closure) __glo_make_91parameter_scheme_base)->fn), &c_7326308, &c_7326380);;
+ }
+
+-static void __lambda_1334(void *data, object self_7314311, int argc, object *args) /* object self_7314311, object r_738408 */
++static void __lambda_1287(void *data, object self_7313011, int argc, object *args) /* object self_7313011, object r_737633 */
+ {
+- object r_738408 = args[0];
++ object r_737633 = args[0];
+
+-closureN_type c_7328769;
+-object e_7328832 [1];
+-c_7328769.hdr.mark = gc_color_red;
+- c_7328769.hdr.grayed = 0;
+-c_7328769.tag = closureN_tag;
+- c_7328769.fn = (function_type)__lambda_1335;
+-c_7328769.num_args = 1;
+-c_7328769.num_elements = 1;
+-c_7328769.elements = (object *)e_7328832;
+-c_7328769.elements[0] = ((closureN)self_7314311)->elements[0];
++closureN_type c_7326310;
++object e_7326373 [1];
++c_7326310.hdr.mark = gc_color_red;
++ c_7326310.hdr.grayed = 0;
++c_7326310.tag = closureN_tag;
++ c_7326310.fn = (function_type)__lambda_1288;
++c_7326310.num_args = 1;
++c_7326310.num_elements = 1;
++c_7326310.elements = (object *)e_7326373;
++c_7326310.elements[0] = ((closureN)self_7313011)->elements[0];
+
+
+-object c_7328835 = global_set_cps_id(data,(closure)&c_7328769,"__glo_current_91error_91port_scheme_base", __glo_current_91error_91port_scheme_base, r_738408);
+-return_closcall1(data,(closure)&c_7328769, c_7328835);;
++object c_7326376 = global_set_cps_id(data,(closure)&c_7326310,"__glo_current_91error_91port_scheme_base", __glo_current_91error_91port_scheme_base, r_737633);
++return_closcall1(data,(closure)&c_7326310, c_7326376);;
+ }
+
+-static void __lambda_1335(void *data, object self_7314312, int argc, object *args) /* object self_7314312, object r_738397 */
++static void __lambda_1288(void *data, object self_7313012, int argc, object *args) /* object self_7313012, object r_737622 */
+ {
+
+
+-closureN_type c_7328771;
+-object e_7328828 [1];
+-c_7328771.hdr.mark = gc_color_red;
+- c_7328771.hdr.grayed = 0;
+-c_7328771.tag = closureN_tag;
+- c_7328771.fn = (function_type)__lambda_1336;
+-c_7328771.num_args = 1;
+-c_7328771.num_elements = 1;
+-c_7328771.elements = (object *)e_7328828;
+-c_7328771.elements[0] = ((closureN)self_7314312)->elements[0];
++closureN_type c_7326312;
++object e_7326369 [1];
++c_7326312.hdr.mark = gc_color_red;
++ c_7326312.hdr.grayed = 0;
++c_7326312.tag = closureN_tag;
++ c_7326312.fn = (function_type)__lambda_1289;
++c_7326312.num_args = 1;
++c_7326312.num_elements = 1;
++c_7326312.elements = (object *)e_7326369;
++c_7326312.elements[0] = ((closureN)self_7313012)->elements[0];
+
+
+-object c_7328831 = global_set_cps_id(data,(closure)&c_7328771,"__glo_error_91object_91message_scheme_base", __glo_error_91object_91message_scheme_base, primitive_car);
+-return_closcall1(data,(closure)&c_7328771, c_7328831);;
++object c_7326372 = global_set_cps_id(data,(closure)&c_7326312,"__glo_error_91object_91message_scheme_base", __glo_error_91object_91message_scheme_base, primitive_car);
++return_closcall1(data,(closure)&c_7326312, c_7326372);;
+ }
+
+-static void __lambda_1336(void *data, object self_7314313, int argc, object *args) /* object self_7314313, object r_738398 */
++static void __lambda_1289(void *data, object self_7313013, int argc, object *args) /* object self_7313013, object r_737623 */
+ {
+
+
+-closureN_type c_7328773;
+-object e_7328824 [1];
+-c_7328773.hdr.mark = gc_color_red;
+- c_7328773.hdr.grayed = 0;
+-c_7328773.tag = closureN_tag;
+- c_7328773.fn = (function_type)__lambda_1337;
+-c_7328773.num_args = 1;
+-c_7328773.num_elements = 1;
+-c_7328773.elements = (object *)e_7328824;
+-c_7328773.elements[0] = ((closureN)self_7314313)->elements[0];
++closureN_type c_7326314;
++object e_7326365 [1];
++c_7326314.hdr.mark = gc_color_red;
++ c_7326314.hdr.grayed = 0;
++c_7326314.tag = closureN_tag;
++ c_7326314.fn = (function_type)__lambda_1290;
++c_7326314.num_args = 1;
++c_7326314.num_elements = 1;
++c_7326314.elements = (object *)e_7326365;
++c_7326314.elements[0] = ((closureN)self_7313013)->elements[0];
+
+
+-object c_7328827 = global_set_cps_id(data,(closure)&c_7328773,"__glo_error_91object_91irritants_scheme_base", __glo_error_91object_91irritants_scheme_base, primitive_cdr);
+-return_closcall1(data,(closure)&c_7328773, c_7328827);;
++object c_7326368 = global_set_cps_id(data,(closure)&c_7326314,"__glo_error_91object_91irritants_scheme_base", __glo_error_91object_91irritants_scheme_base, primitive_cdr);
++return_closcall1(data,(closure)&c_7326314, c_7326368);;
+ }
+
+-static void __lambda_1337(void *data, object self_7314314, int argc, object *args) /* object self_7314314, object r_738399 */
++static void __lambda_1290(void *data, object self_7313014, int argc, object *args) /* object self_7313014, object r_737624 */
+ {
+
+
+-closureN_type c_7328775;
+-object e_7328820 [1];
+-c_7328775.hdr.mark = gc_color_red;
+- c_7328775.hdr.grayed = 0;
+-c_7328775.tag = closureN_tag;
+- c_7328775.fn = (function_type)__lambda_1338;
+-c_7328775.num_args = 1;
+-c_7328775.num_elements = 1;
+-c_7328775.elements = (object *)e_7328820;
+-c_7328775.elements[0] = ((closureN)self_7314314)->elements[0];
++closureN_type c_7326316;
++object e_7326361 [1];
++c_7326316.hdr.mark = gc_color_red;
++ c_7326316.hdr.grayed = 0;
++c_7326316.tag = closureN_tag;
++ c_7326316.fn = (function_type)__lambda_1291;
++c_7326316.num_args = 1;
++c_7326316.num_elements = 1;
++c_7326316.elements = (object *)e_7326361;
++c_7326316.elements[0] = ((closureN)self_7313014)->elements[0];
+
+
+-object c_7328823 = global_set_cps_id(data,(closure)&c_7328775,"__glo_rational_127_scheme_base", __glo_rational_127_scheme_base, primitive_number_127);
+-return_closcall1(data,(closure)&c_7328775, c_7328823);;
++object c_7326364 = global_set_cps_id(data,(closure)&c_7326316,"__glo_rational_127_scheme_base", __glo_rational_127_scheme_base, primitive_number_127);
++return_closcall1(data,(closure)&c_7326316, c_7326364);;
+ }
+
+-static void __lambda_1338(void *data, object self_7314315, int argc, object *args) /* object self_7314315, object r_738400 */
++static void __lambda_1291(void *data, object self_7313015, int argc, object *args) /* object self_7313015, object r_737625 */
+ {
+
+
+-closureN_type c_7328777;
+-object e_7328816 [1];
+-c_7328777.hdr.mark = gc_color_red;
+- c_7328777.hdr.grayed = 0;
+-c_7328777.tag = closureN_tag;
+- c_7328777.fn = (function_type)__lambda_1339;
+-c_7328777.num_args = 1;
+-c_7328777.num_elements = 1;
+-c_7328777.elements = (object *)e_7328816;
+-c_7328777.elements[0] = ((closureN)self_7314315)->elements[0];
++closureN_type c_7326318;
++object e_7326357 [1];
++c_7326318.hdr.mark = gc_color_red;
++ c_7326318.hdr.grayed = 0;
++c_7326318.tag = closureN_tag;
++ c_7326318.fn = (function_type)__lambda_1292;
++c_7326318.num_args = 1;
++c_7326318.num_elements = 1;
++c_7326318.elements = (object *)e_7326357;
++c_7326318.elements[0] = ((closureN)self_7313015)->elements[0];
+
+
+-object c_7328819 = global_set_cps_id(data,(closure)&c_7328777,"__glo_gcd_scheme_base", __glo_gcd_scheme_base, __glo_gcd_95entry_scheme_base);
+-return_closcall1(data,(closure)&c_7328777, c_7328819);;
++object c_7326360 = global_set_cps_id(data,(closure)&c_7326318,"__glo_gcd_scheme_base", __glo_gcd_scheme_base, __glo_gcd_95entry_scheme_base);
++return_closcall1(data,(closure)&c_7326318, c_7326360);;
+ }
+
+-static void __lambda_1339(void *data, object self_7314316, int argc, object *args) /* object self_7314316, object r_738401 */
++static void __lambda_1292(void *data, object self_7313016, int argc, object *args) /* object self_7313016, object r_737626 */
+ {
+
+
+-closureN_type c_7328779;
+-object e_7328812 [1];
+-c_7328779.hdr.mark = gc_color_red;
+- c_7328779.hdr.grayed = 0;
+-c_7328779.tag = closureN_tag;
+- c_7328779.fn = (function_type)__lambda_1340;
+-c_7328779.num_args = 1;
+-c_7328779.num_elements = 1;
+-c_7328779.elements = (object *)e_7328812;
+-c_7328779.elements[0] = ((closureN)self_7314316)->elements[0];
++closureN_type c_7326320;
++object e_7326353 [1];
++c_7326320.hdr.mark = gc_color_red;
++ c_7326320.hdr.grayed = 0;
++c_7326320.tag = closureN_tag;
++ c_7326320.fn = (function_type)__lambda_1293;
++c_7326320.num_args = 1;
++c_7326320.num_elements = 1;
++c_7326320.elements = (object *)e_7326353;
++c_7326320.elements[0] = ((closureN)self_7313016)->elements[0];
+
+
+-object c_7328815 = global_set_cps_id(data,(closure)&c_7328779,"__glo_lcm_scheme_base", __glo_lcm_scheme_base, __glo_lcm_95entry_scheme_base);
+-return_closcall1(data,(closure)&c_7328779, c_7328815);;
++object c_7326356 = global_set_cps_id(data,(closure)&c_7326320,"__glo_lcm_scheme_base", __glo_lcm_scheme_base, __glo_lcm_95entry_scheme_base);
++return_closcall1(data,(closure)&c_7326320, c_7326356);;
+ }
+
+-static void __lambda_1340(void *data, object self_7314317, int argc, object *args) /* object self_7314317, object r_738402 */
++static void __lambda_1293(void *data, object self_7313017, int argc, object *args) /* object self_7313017, object r_737627 */
+ {
+
+
+-closureN_type c_7328781;
+-object e_7328808 [1];
+-c_7328781.hdr.mark = gc_color_red;
+- c_7328781.hdr.grayed = 0;
+-c_7328781.tag = closureN_tag;
+- c_7328781.fn = (function_type)__lambda_1341;
+-c_7328781.num_args = 1;
+-c_7328781.num_elements = 1;
+-c_7328781.elements = (object *)e_7328808;
+-c_7328781.elements[0] = ((closureN)self_7314317)->elements[0];
++closureN_type c_7326322;
++object e_7326349 [1];
++c_7326322.hdr.mark = gc_color_red;
++ c_7326322.hdr.grayed = 0;
++c_7326322.tag = closureN_tag;
++ c_7326322.fn = (function_type)__lambda_1294;
++c_7326322.num_args = 1;
++c_7326322.num_elements = 1;
++c_7326322.elements = (object *)e_7326349;
++c_7326322.elements[0] = ((closureN)self_7313017)->elements[0];
+
+
+-object c_7328811 = global_set_cps_id(data,(closure)&c_7328781,"__glo_truncate_91quotient_scheme_base", __glo_truncate_91quotient_scheme_base, __glo_quotient_scheme_base);
+-return_closcall1(data,(closure)&c_7328781, c_7328811);;
++object c_7326352 = global_set_cps_id(data,(closure)&c_7326322,"__glo_truncate_91quotient_scheme_base", __glo_truncate_91quotient_scheme_base, __glo_quotient_scheme_base);
++return_closcall1(data,(closure)&c_7326322, c_7326352);;
+ }
+
+-static void __lambda_1341(void *data, object self_7314318, int argc, object *args) /* object self_7314318, object r_738403 */
++static void __lambda_1294(void *data, object self_7313018, int argc, object *args) /* object self_7313018, object r_737628 */
+ {
+
+
+-closureN_type c_7328783;
+-object e_7328804 [1];
+-c_7328783.hdr.mark = gc_color_red;
+- c_7328783.hdr.grayed = 0;
+-c_7328783.tag = closureN_tag;
+- c_7328783.fn = (function_type)__lambda_1342;
+-c_7328783.num_args = 1;
+-c_7328783.num_elements = 1;
+-c_7328783.elements = (object *)e_7328804;
+-c_7328783.elements[0] = ((closureN)self_7314318)->elements[0];
++closureN_type c_7326324;
++object e_7326345 [1];
++c_7326324.hdr.mark = gc_color_red;
++ c_7326324.hdr.grayed = 0;
++c_7326324.tag = closureN_tag;
++ c_7326324.fn = (function_type)__lambda_1295;
++c_7326324.num_args = 1;
++c_7326324.num_elements = 1;
++c_7326324.elements = (object *)e_7326345;
++c_7326324.elements[0] = ((closureN)self_7313018)->elements[0];
+
+
+-object c_7328807 = global_set_cps_id(data,(closure)&c_7328783,"__glo_truncate_91remainder_scheme_base", __glo_truncate_91remainder_scheme_base, __glo_remainder_scheme_base);
+-return_closcall1(data,(closure)&c_7328783, c_7328807);;
++object c_7326348 = global_set_cps_id(data,(closure)&c_7326324,"__glo_truncate_91remainder_scheme_base", __glo_truncate_91remainder_scheme_base, __glo_remainder_scheme_base);
++return_closcall1(data,(closure)&c_7326324, c_7326348);;
+ }
+
+-static void __lambda_1342(void *data, object self_7314319, int argc, object *args) /* object self_7314319, object r_738404 */
++static void __lambda_1295(void *data, object self_7313019, int argc, object *args) /* object self_7313019, object r_737629 */
+ {
+
+
+-closureN_type c_7328785;
+-object e_7328800 [1];
+-c_7328785.hdr.mark = gc_color_red;
+- c_7328785.hdr.grayed = 0;
+-c_7328785.tag = closureN_tag;
+- c_7328785.fn = (function_type)__lambda_1343;
+-c_7328785.num_args = 1;
+-c_7328785.num_elements = 1;
+-c_7328785.elements = (object *)e_7328800;
+-c_7328785.elements[0] = ((closureN)self_7314319)->elements[0];
++closureN_type c_7326326;
++object e_7326341 [1];
++c_7326326.hdr.mark = gc_color_red;
++ c_7326326.hdr.grayed = 0;
++c_7326326.tag = closureN_tag;
++ c_7326326.fn = (function_type)__lambda_1296;
++c_7326326.num_args = 1;
++c_7326326.num_elements = 1;
++c_7326326.elements = (object *)e_7326341;
++c_7326326.elements[0] = ((closureN)self_7313019)->elements[0];
+
+
+-object c_7328803 = global_set_cps_id(data,(closure)&c_7328785,"__glo_open_91output_91bytevector_scheme_base", __glo_open_91output_91bytevector_scheme_base, __glo_open_91output_91string_scheme_base);
+-return_closcall1(data,(closure)&c_7328785, c_7328803);;
++object c_7326344 = global_set_cps_id(data,(closure)&c_7326326,"__glo_open_91output_91bytevector_scheme_base", __glo_open_91output_91bytevector_scheme_base, __glo_open_91output_91string_scheme_base);
++return_closcall1(data,(closure)&c_7326326, c_7326344);;
+ }
+
+-static void __lambda_1343(void *data, object self_7314320, int argc, object *args) /* object self_7314320, object r_738405 */
++static void __lambda_1296(void *data, object self_7313020, int argc, object *args) /* object self_7313020, object r_737630 */
+ {
+
+
+-closureN_type c_7328787;
+-object e_7328796 [1];
+-c_7328787.hdr.mark = gc_color_red;
+- c_7328787.hdr.grayed = 0;
+-c_7328787.tag = closureN_tag;
+- c_7328787.fn = (function_type)__lambda_1344;
+-c_7328787.num_args = 1;
+-c_7328787.num_elements = 1;
+-c_7328787.elements = (object *)e_7328796;
+-c_7328787.elements[0] = ((closureN)self_7314320)->elements[0];
++closureN_type c_7326328;
++object e_7326337 [1];
++c_7326328.hdr.mark = gc_color_red;
++ c_7326328.hdr.grayed = 0;
++c_7326328.tag = closureN_tag;
++ c_7326328.fn = (function_type)__lambda_1297;
++c_7326328.num_args = 1;
++c_7326328.num_elements = 1;
++c_7326328.elements = (object *)e_7326337;
++c_7326328.elements[0] = ((closureN)self_7313020)->elements[0];
+
+
+-object c_7328799 = global_set_cps_id(data,(closure)&c_7328787,"__glo_identifier_127_scheme_base", __glo_identifier_127_scheme_base, primitive_symbol_127);
+-return_closcall1(data,(closure)&c_7328787, c_7328799);;
++object c_7326340 = global_set_cps_id(data,(closure)&c_7326328,"__glo_identifier_127_scheme_base", __glo_identifier_127_scheme_base, primitive_symbol_127);
++return_closcall1(data,(closure)&c_7326328, c_7326340);;
+ }
+
+-static void __lambda_1344(void *data, object self_7314321, int argc, object *args) /* object self_7314321, object r_738406 */
++static void __lambda_1297(void *data, object self_7313021, int argc, object *args) /* object self_7313021, object r_737631 */
+ {
+
+
+-complex_num_type local_7328795;
++complex_num_type local_7326336;
+
+-object c_7328792 = global_set_cps_id(data, ((closureN)self_7314321)->elements[0],"__glo_record_91marker_scheme_base", __glo_record_91marker_scheme_base, ((inline_function_type)
+- ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_7328795));
+-return_direct_with_clo1(data, ((closureN)self_7314321)->elements[0], (((closure) ((closureN)self_7314321)->elements[0])->fn), c_7328792);;
++object c_7326333 = global_set_cps_id(data, ((closureN)self_7313021)->elements[0],"__glo_record_91marker_scheme_base", __glo_record_91marker_scheme_base, ((inline_function_type)
++ ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_7326336));
++return_direct_with_clo1(data, ((closureN)self_7313021)->elements[0], (((closure) ((closureN)self_7313021)->elements[0])->fn), c_7326333);;
+ }
+
+-static void __lambda_1269(void *data, object _, int argc, object *args) /* closure _,object k_738077, object expr_732685_732725_732817_734061, object rename_732686_732726_732818_734062, object compare_732687_732727_732819_734063 */
++static void __lambda_1222(void *data, object _, int argc, object *args) /* closure _,object k_737302, object expr_732338_732378_732470_733609, object rename_732339_732379_732471_733610, object compare_732340_732380_732472_733611 */
+ {
+-object k_738077 = args[0]; object expr_732685_732725_732817_734061 = args[1]; object rename_732686_732726_732818_734062 = args[2];
++object k_737302 = args[0]; object expr_732338_732378_732470_733609 = args[1]; object rename_732339_732379_732471_733610 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:define-values");
+
+-closureN_type c_7328013;
+-object e_7328750 [3];
+-c_7328013.hdr.mark = gc_color_red;
+- c_7328013.hdr.grayed = 0;
+-c_7328013.tag = closureN_tag;
+- c_7328013.fn = (function_type)__lambda_1270;
+-c_7328013.num_args = 1;
+-c_7328013.num_elements = 3;
+-c_7328013.elements = (object *)e_7328750;
+-c_7328013.elements[0] = expr_732685_732725_732817_734061;
+-c_7328013.elements[1] = k_738077;
+-c_7328013.elements[2] = rename_732686_732726_732818_734062;
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7328013,__lambda_1270, Cyc_cdr(data, expr_732685_732725_732817_734061));;
+-}
++closureN_type c_7325554;
++object e_7326291 [3];
++c_7325554.hdr.mark = gc_color_red;
++ c_7325554.hdr.grayed = 0;
++c_7325554.tag = closureN_tag;
++ c_7325554.fn = (function_type)__lambda_1223;
++c_7325554.num_args = 1;
++c_7325554.num_elements = 3;
++c_7325554.elements = (object *)e_7326291;
++c_7325554.elements[0] = expr_732338_732378_732470_733609;
++c_7325554.elements[1] = k_737302;
++c_7325554.elements[2] = rename_732339_732379_732471_733610;
+
+-static void __lambda_1270(void *data, object self_7314247, int argc, object *args) /* object self_7314247, object v_931_732693_732807_732867_734111 */
+- {
+- object v_931_732693_732807_732867_734111 = args[0];
+-
+-closureN_type c_7328015;
+-object e_7328115 [2];
+-c_7328015.hdr.mark = gc_color_red;
+- c_7328015.hdr.grayed = 0;
+-c_7328015.tag = closureN_tag;
+- c_7328015.fn = (function_type)__lambda_1271;
+-c_7328015.num_args = 0;
+-c_7328015.num_elements = 2;
+-c_7328015.elements = (object *)e_7328115;
+-c_7328015.elements[0] = ((closureN)self_7314247)->elements[2];
+-c_7328015.elements[1] = v_931_732693_732807_732867_734111;
+
+
+-closureN_type c_7328116;
+-object e_7328749 [3];
+-c_7328116.hdr.mark = gc_color_red;
+- c_7328116.hdr.grayed = 0;
+-c_7328116.tag = closureN_tag;
+- c_7328116.fn = (function_type)__lambda_1278;
+-c_7328116.num_args = 1;
+-c_7328116.num_elements = 3;
+-c_7328116.elements = (object *)e_7328749;
+-c_7328116.elements[0] = ((closureN)self_7314247)->elements[0];
+-c_7328116.elements[1] = ((closureN)self_7314247)->elements[1];
+-c_7328116.elements[2] = ((closureN)self_7314247)->elements[2];
++return_direct_with_clo1(data,(closure)&c_7325554,__lambda_1223, Cyc_cdr(data, expr_732338_732378_732470_733609));;
++}
++
++static void __lambda_1223(void *data, object self_7312947, int argc, object *args) /* object self_7312947, object v_931_732346_732460_732520_733659 */
++ {
++ object v_931_732346_732460_732520_733659 = args[0];
++
++closureN_type c_7325556;
++object e_7325656 [2];
++c_7325556.hdr.mark = gc_color_red;
++ c_7325556.hdr.grayed = 0;
++c_7325556.tag = closureN_tag;
++ c_7325556.fn = (function_type)__lambda_1224;
++c_7325556.num_args = 0;
++c_7325556.num_elements = 2;
++c_7325556.elements = (object *)e_7325656;
++c_7325556.elements[0] = ((closureN)self_7312947)->elements[2];
++c_7325556.elements[1] = v_931_732346_732460_732520_733659;
++
++
++closureN_type c_7325657;
++object e_7326290 [3];
++c_7325657.hdr.mark = gc_color_red;
++ c_7325657.hdr.grayed = 0;
++c_7325657.tag = closureN_tag;
++ c_7325657.fn = (function_type)__lambda_1231;
++c_7325657.num_args = 1;
++c_7325657.num_elements = 3;
++c_7325657.elements = (object *)e_7326290;
++c_7325657.elements[0] = ((closureN)self_7312947)->elements[0];
++c_7325657.elements[1] = ((closureN)self_7312947)->elements[1];
++c_7325657.elements[2] = ((closureN)self_7312947)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7328015,__lambda_1271, &c_7328116);;
++return_direct_with_clo1(data,(closure)&c_7325556,__lambda_1224, &c_7325657);;
+ }
+
+-static void __lambda_1278(void *data, object self_7314248, int argc, object *args) /* object self_7314248, object tmp_732729_732731_732820_734064 */
++static void __lambda_1231(void *data, object self_7312948, int argc, object *args) /* object self_7312948, object tmp_732382_732384_732473_733612 */
+ {
+- object tmp_732729_732731_732820_734064 = args[0];
++ object tmp_732382_732384_732473_733612 = args[0];
+
+-closureN_type c_7328118;
+-object e_7328742 [3];
+-c_7328118.hdr.mark = gc_color_red;
+- c_7328118.hdr.grayed = 0;
+-c_7328118.tag = closureN_tag;
+- c_7328118.fn = (function_type)__lambda_1279;
+-c_7328118.num_args = 0;
+-c_7328118.num_elements = 3;
+-c_7328118.elements = (object *)e_7328742;
+-c_7328118.elements[0] = ((closureN)self_7314248)->elements[0];
+-c_7328118.elements[1] = ((closureN)self_7314248)->elements[2];
+-c_7328118.elements[2] = tmp_732729_732731_732820_734064;
+-
+-
+-closureN_type c_7328743;
+-object e_7328748 [1];
+-c_7328743.hdr.mark = gc_color_red;
+- c_7328743.hdr.grayed = 0;
+-c_7328743.tag = closureN_tag;
+- c_7328743.fn = (function_type)__lambda_1326;
+-c_7328743.num_args = 1;
+-c_7328743.num_elements = 1;
+-c_7328743.elements = (object *)e_7328748;
+-c_7328743.elements[0] = ((closureN)self_7314248)->elements[1];
++closureN_type c_7325659;
++object e_7326283 [3];
++c_7325659.hdr.mark = gc_color_red;
++ c_7325659.hdr.grayed = 0;
++c_7325659.tag = closureN_tag;
++ c_7325659.fn = (function_type)__lambda_1232;
++c_7325659.num_args = 0;
++c_7325659.num_elements = 3;
++c_7325659.elements = (object *)e_7326283;
++c_7325659.elements[0] = ((closureN)self_7312948)->elements[0];
++c_7325659.elements[1] = ((closureN)self_7312948)->elements[2];
++c_7325659.elements[2] = tmp_732382_732384_732473_733612;
++
++
++closureN_type c_7326284;
++object e_7326289 [1];
++c_7326284.hdr.mark = gc_color_red;
++ c_7326284.hdr.grayed = 0;
++c_7326284.tag = closureN_tag;
++ c_7326284.fn = (function_type)__lambda_1279;
++c_7326284.num_args = 1;
++c_7326284.num_elements = 1;
++c_7326284.elements = (object *)e_7326289;
++c_7326284.elements[0] = ((closureN)self_7312948)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7328118,__lambda_1279, &c_7328743);;
++return_direct_with_clo1(data,(closure)&c_7325659,__lambda_1232, &c_7326284);;
+ }
+
+-static void __lambda_1326(void *data, object self_7314249, int argc, object *args) /* object self_7314249, object r_738078 */
++static void __lambda_1279(void *data, object self_7312949, int argc, object *args) /* object self_7312949, object r_737303 */
+ {
+- object r_738078 = args[0];
++ object r_737303 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314249)->elements[0], (((closure) ((closureN)self_7314249)->elements[0])->fn), Cyc_car(data, r_738078));;
++return_direct_with_clo1(data, ((closureN)self_7312949)->elements[0], (((closure) ((closureN)self_7312949)->elements[0])->fn), Cyc_car(data, r_737303));;
+ }
+
+-static void __lambda_1279(void *data, object self_7314250, int argc, object *args) /* object self_7314250, object k_738080 */
++static void __lambda_1232(void *data, object self_7312950, int argc, object *args) /* object self_7312950, object k_737305 */
+ {
+- object k_738080 = args[0];
+- if( (boolean_f != ((closureN)self_7314250)->elements[2]) ){
+- return_direct_with_clo1(data, k_738080, (((closure) k_738080)->fn), ((closureN)self_7314250)->elements[2]);
++ object k_737305 = args[0];
++ if( (boolean_f != ((closureN)self_7312950)->elements[2]) ){
++ return_direct_with_clo1(data, k_737305, (((closure) k_737305)->fn), ((closureN)self_7312950)->elements[2]);
+ } else {
+
+-closureN_type c_7328123;
+-object e_7328738 [3];
+-c_7328123.hdr.mark = gc_color_red;
+- c_7328123.hdr.grayed = 0;
+-c_7328123.tag = closureN_tag;
+- c_7328123.fn = (function_type)__lambda_1280;
+-c_7328123.num_args = 1;
+-c_7328123.num_elements = 3;
+-c_7328123.elements = (object *)e_7328738;
+-c_7328123.elements[0] = ((closureN)self_7314250)->elements[0];
+-c_7328123.elements[1] = k_738080;
+-c_7328123.elements[2] = ((closureN)self_7314250)->elements[1];
++closureN_type c_7325664;
++object e_7326279 [3];
++c_7325664.hdr.mark = gc_color_red;
++ c_7325664.hdr.grayed = 0;
++c_7325664.tag = closureN_tag;
++ c_7325664.fn = (function_type)__lambda_1233;
++c_7325664.num_args = 1;
++c_7325664.num_elements = 3;
++c_7325664.elements = (object *)e_7326279;
++c_7325664.elements[0] = ((closureN)self_7312950)->elements[0];
++c_7325664.elements[1] = k_737305;
++c_7325664.elements[2] = ((closureN)self_7312950)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7328123,__lambda_1280, Cyc_cdr(data, ((closureN)self_7314250)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7325664,__lambda_1233, Cyc_cdr(data, ((closureN)self_7312950)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1280(void *data, object self_7314251, int argc, object *args) /* object self_7314251, object v_936_732698_732793_732858_734102 */
++static void __lambda_1233(void *data, object self_7312951, int argc, object *args) /* object self_7312951, object v_936_732351_732446_732511_733650 */
+ {
+- object v_936_732698_732793_732858_734102 = args[0];
++ object v_936_732351_732446_732511_733650 = args[0];
+
+-closureN_type c_7328125;
+-object e_7328186 [2];
+-c_7328125.hdr.mark = gc_color_red;
+- c_7328125.hdr.grayed = 0;
+-c_7328125.tag = closureN_tag;
+- c_7328125.fn = (function_type)__lambda_1281;
+-c_7328125.num_args = 0;
+-c_7328125.num_elements = 2;
+-c_7328125.elements = (object *)e_7328186;
+-c_7328125.elements[0] = ((closureN)self_7314251)->elements[2];
+-c_7328125.elements[1] = v_936_732698_732793_732858_734102;
++closureN_type c_7325666;
++object e_7325727 [2];
++c_7325666.hdr.mark = gc_color_red;
++ c_7325666.hdr.grayed = 0;
++c_7325666.tag = closureN_tag;
++ c_7325666.fn = (function_type)__lambda_1234;
++c_7325666.num_args = 0;
++c_7325666.num_elements = 2;
++c_7325666.elements = (object *)e_7325727;
++c_7325666.elements[0] = ((closureN)self_7312951)->elements[2];
++c_7325666.elements[1] = v_936_732351_732446_732511_733650;
+
+
+-closureN_type c_7328187;
+-object e_7328737 [3];
+-c_7328187.hdr.mark = gc_color_red;
+- c_7328187.hdr.grayed = 0;
+-c_7328187.tag = closureN_tag;
+- c_7328187.fn = (function_type)__lambda_1283;
+-c_7328187.num_args = 1;
+-c_7328187.num_elements = 3;
+-c_7328187.elements = (object *)e_7328737;
+-c_7328187.elements[0] = ((closureN)self_7314251)->elements[0];
+-c_7328187.elements[1] = ((closureN)self_7314251)->elements[1];
+-c_7328187.elements[2] = ((closureN)self_7314251)->elements[2];
++closureN_type c_7325728;
++object e_7326278 [3];
++c_7325728.hdr.mark = gc_color_red;
++ c_7325728.hdr.grayed = 0;
++c_7325728.tag = closureN_tag;
++ c_7325728.fn = (function_type)__lambda_1236;
++c_7325728.num_args = 1;
++c_7325728.num_elements = 3;
++c_7325728.elements = (object *)e_7326278;
++c_7325728.elements[0] = ((closureN)self_7312951)->elements[0];
++c_7325728.elements[1] = ((closureN)self_7312951)->elements[1];
++c_7325728.elements[2] = ((closureN)self_7312951)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7328125,__lambda_1281, &c_7328187);;
++return_direct_with_clo1(data,(closure)&c_7325666,__lambda_1234, &c_7325728);;
+ }
+
+-static void __lambda_1283(void *data, object self_7314252, int argc, object *args) /* object self_7314252, object tmp_732733_732735_732821_734065 */
++static void __lambda_1236(void *data, object self_7312952, int argc, object *args) /* object self_7312952, object tmp_732386_732388_732474_733613 */
+ {
+- object tmp_732733_732735_732821_734065 = args[0];
+- if( (boolean_f != tmp_732733_732735_732821_734065) ){
+- return_direct_with_clo1(data, ((closureN)self_7314252)->elements[1], (((closure) ((closureN)self_7314252)->elements[1])->fn), tmp_732733_732735_732821_734065);
++ object tmp_732386_732388_732474_733613 = args[0];
++ if( (boolean_f != tmp_732386_732388_732474_733613) ){
++ return_direct_with_clo1(data, ((closureN)self_7312952)->elements[1], (((closure) ((closureN)self_7312952)->elements[1])->fn), tmp_732386_732388_732474_733613);
+ } else {
+
+-closureN_type c_7328191;
+-object e_7328733 [3];
+-c_7328191.hdr.mark = gc_color_red;
+- c_7328191.hdr.grayed = 0;
+-c_7328191.tag = closureN_tag;
+- c_7328191.fn = (function_type)__lambda_1284;
+-c_7328191.num_args = 1;
+-c_7328191.num_elements = 3;
+-c_7328191.elements = (object *)e_7328733;
+-c_7328191.elements[0] = ((closureN)self_7314252)->elements[0];
+-c_7328191.elements[1] = ((closureN)self_7314252)->elements[1];
+-c_7328191.elements[2] = ((closureN)self_7314252)->elements[2];
++closureN_type c_7325732;
++object e_7326274 [3];
++c_7325732.hdr.mark = gc_color_red;
++ c_7325732.hdr.grayed = 0;
++c_7325732.tag = closureN_tag;
++ c_7325732.fn = (function_type)__lambda_1237;
++c_7325732.num_args = 1;
++c_7325732.num_elements = 3;
++c_7325732.elements = (object *)e_7326274;
++c_7325732.elements[0] = ((closureN)self_7312952)->elements[0];
++c_7325732.elements[1] = ((closureN)self_7312952)->elements[1];
++c_7325732.elements[2] = ((closureN)self_7312952)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7328191,__lambda_1284, Cyc_cdr(data, ((closureN)self_7314252)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7325732,__lambda_1237, Cyc_cdr(data, ((closureN)self_7312952)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1284(void *data, object self_7314253, int argc, object *args) /* object self_7314253, object v_9313_732705_732754_732831_734075 */
++static void __lambda_1237(void *data, object self_7312953, int argc, object *args) /* object self_7312953, object v_9313_732358_732407_732484_733623 */
+ {
+- object v_9313_732705_732754_732831_734075 = args[0];
++ object v_9313_732358_732407_732484_733623 = args[0];
+
+-closureN_type c_7328193;
+-object e_7328628 [2];
+-c_7328193.hdr.mark = gc_color_red;
+- c_7328193.hdr.grayed = 0;
+-c_7328193.tag = closureN_tag;
+- c_7328193.fn = (function_type)__lambda_1285;
+-c_7328193.num_args = 0;
+-c_7328193.num_elements = 2;
+-c_7328193.elements = (object *)e_7328628;
+-c_7328193.elements[0] = ((closureN)self_7314253)->elements[2];
+-c_7328193.elements[1] = v_9313_732705_732754_732831_734075;
++closureN_type c_7325734;
++object e_7326169 [2];
++c_7325734.hdr.mark = gc_color_red;
++ c_7325734.hdr.grayed = 0;
++c_7325734.tag = closureN_tag;
++ c_7325734.fn = (function_type)__lambda_1238;
++c_7325734.num_args = 0;
++c_7325734.num_elements = 2;
++c_7325734.elements = (object *)e_7326169;
++c_7325734.elements[0] = ((closureN)self_7312953)->elements[2];
++c_7325734.elements[1] = v_9313_732358_732407_732484_733623;
+
+
+-closureN_type c_7328629;
+-object e_7328732 [3];
+-c_7328629.hdr.mark = gc_color_red;
+- c_7328629.hdr.grayed = 0;
+-c_7328629.tag = closureN_tag;
+- c_7328629.fn = (function_type)__lambda_1317;
+-c_7328629.num_args = 1;
+-c_7328629.num_elements = 3;
+-c_7328629.elements = (object *)e_7328732;
+-c_7328629.elements[0] = ((closureN)self_7314253)->elements[0];
+-c_7328629.elements[1] = ((closureN)self_7314253)->elements[1];
+-c_7328629.elements[2] = ((closureN)self_7314253)->elements[2];
++closureN_type c_7326170;
++object e_7326273 [3];
++c_7326170.hdr.mark = gc_color_red;
++ c_7326170.hdr.grayed = 0;
++c_7326170.tag = closureN_tag;
++ c_7326170.fn = (function_type)__lambda_1270;
++c_7326170.num_args = 1;
++c_7326170.num_elements = 3;
++c_7326170.elements = (object *)e_7326273;
++c_7326170.elements[0] = ((closureN)self_7312953)->elements[0];
++c_7326170.elements[1] = ((closureN)self_7312953)->elements[1];
++c_7326170.elements[2] = ((closureN)self_7312953)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7328193,__lambda_1285, &c_7328629);;
++return_direct_with_clo1(data,(closure)&c_7325734,__lambda_1238, &c_7326170);;
+ }
+
+-static void __lambda_1317(void *data, object self_7314254, int argc, object *args) /* object self_7314254, object tmp_732737_732739_732822_734066 */
++static void __lambda_1270(void *data, object self_7312954, int argc, object *args) /* object self_7312954, object tmp_732390_732392_732475_733614 */
+ {
+- object tmp_732737_732739_732822_734066 = args[0];
+- if( (boolean_f != tmp_732737_732739_732822_734066) ){
+- return_direct_with_clo1(data, ((closureN)self_7314254)->elements[1], (((closure) ((closureN)self_7314254)->elements[1])->fn), tmp_732737_732739_732822_734066);
++ object tmp_732390_732392_732475_733614 = args[0];
++ if( (boolean_f != tmp_732390_732392_732475_733614) ){
++ return_direct_with_clo1(data, ((closureN)self_7312954)->elements[1], (((closure) ((closureN)self_7312954)->elements[1])->fn), tmp_732390_732392_732475_733614);
+ } else {
+
+-closureN_type c_7328633;
+-object e_7328728 [3];
+-c_7328633.hdr.mark = gc_color_red;
+- c_7328633.hdr.grayed = 0;
+-c_7328633.tag = closureN_tag;
+- c_7328633.fn = (function_type)__lambda_1318;
+-c_7328633.num_args = 1;
+-c_7328633.num_elements = 3;
+-c_7328633.elements = (object *)e_7328728;
+-c_7328633.elements[0] = ((closureN)self_7314254)->elements[0];
+-c_7328633.elements[1] = ((closureN)self_7314254)->elements[1];
+-c_7328633.elements[2] = ((closureN)self_7314254)->elements[2];
++closureN_type c_7326174;
++object e_7326269 [3];
++c_7326174.hdr.mark = gc_color_red;
++ c_7326174.hdr.grayed = 0;
++c_7326174.tag = closureN_tag;
++ c_7326174.fn = (function_type)__lambda_1271;
++c_7326174.num_args = 1;
++c_7326174.num_elements = 3;
++c_7326174.elements = (object *)e_7326269;
++c_7326174.elements[0] = ((closureN)self_7312954)->elements[0];
++c_7326174.elements[1] = ((closureN)self_7312954)->elements[1];
++c_7326174.elements[2] = ((closureN)self_7312954)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7328633,__lambda_1318, Cyc_cdr(data, ((closureN)self_7314254)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7326174,__lambda_1271, Cyc_cdr(data, ((closureN)self_7312954)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1318(void *data, object self_7314255, int argc, object *args) /* object self_7314255, object v_9328_732720_732744_732824_734068 */
++static void __lambda_1271(void *data, object self_7312955, int argc, object *args) /* object self_7312955, object v_9328_732373_732397_732477_733616 */
+ {
+- object v_9328_732720_732744_732824_734068 = args[0];
++ object v_9328_732373_732397_732477_733616 = args[0];
+
+-closureN_type c_7328635;
+-object e_7328713 [2];
+-c_7328635.hdr.mark = gc_color_red;
+- c_7328635.hdr.grayed = 0;
+-c_7328635.tag = closureN_tag;
+- c_7328635.fn = (function_type)__lambda_1319;
+-c_7328635.num_args = 0;
+-c_7328635.num_elements = 2;
+-c_7328635.elements = (object *)e_7328713;
+-c_7328635.elements[0] = ((closureN)self_7314255)->elements[2];
+-c_7328635.elements[1] = v_9328_732720_732744_732824_734068;
++closureN_type c_7326176;
++object e_7326254 [2];
++c_7326176.hdr.mark = gc_color_red;
++ c_7326176.hdr.grayed = 0;
++c_7326176.tag = closureN_tag;
++ c_7326176.fn = (function_type)__lambda_1272;
++c_7326176.num_args = 0;
++c_7326176.num_elements = 2;
++c_7326176.elements = (object *)e_7326254;
++c_7326176.elements[0] = ((closureN)self_7312955)->elements[2];
++c_7326176.elements[1] = v_9328_732373_732397_732477_733616;
+
+
+-closureN_type c_7328714;
+-object e_7328727 [2];
+-c_7328714.hdr.mark = gc_color_red;
+- c_7328714.hdr.grayed = 0;
+-c_7328714.tag = closureN_tag;
+- c_7328714.fn = (function_type)__lambda_1324;
+-c_7328714.num_args = 1;
+-c_7328714.num_elements = 2;
+-c_7328714.elements = (object *)e_7328727;
+-c_7328714.elements[0] = ((closureN)self_7314255)->elements[0];
+-c_7328714.elements[1] = ((closureN)self_7314255)->elements[1];
++closureN_type c_7326255;
++object e_7326268 [2];
++c_7326255.hdr.mark = gc_color_red;
++ c_7326255.hdr.grayed = 0;
++c_7326255.tag = closureN_tag;
++ c_7326255.fn = (function_type)__lambda_1277;
++c_7326255.num_args = 1;
++c_7326255.num_elements = 2;
++c_7326255.elements = (object *)e_7326268;
++c_7326255.elements[0] = ((closureN)self_7312955)->elements[0];
++c_7326255.elements[1] = ((closureN)self_7312955)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7328635,__lambda_1319, &c_7328714);;
++return_direct_with_clo1(data,(closure)&c_7326176,__lambda_1272, &c_7326255);;
+ }
+
+-static void __lambda_1324(void *data, object self_7314256, int argc, object *args) /* object self_7314256, object tmp_732741_732743_732823_734067 */
++static void __lambda_1277(void *data, object self_7312956, int argc, object *args) /* object self_7312956, object tmp_732394_732396_732476_733615 */
+ {
+- object tmp_732741_732743_732823_734067 = args[0];
+- if( (boolean_f != tmp_732741_732743_732823_734067) ){
+- return_direct_with_clo1(data, ((closureN)self_7314256)->elements[1], (((closure) ((closureN)self_7314256)->elements[1])->fn), tmp_732741_732743_732823_734067);
++ object tmp_732394_732396_732476_733615 = args[0];
++ if( (boolean_f != tmp_732394_732396_732476_733615) ){
++ return_direct_with_clo1(data, ((closureN)self_7312956)->elements[1], (((closure) ((closureN)self_7312956)->elements[1])->fn), tmp_732394_732396_732476_733615);
+ } else {
+
+-closureN_type c_7328718;
+-object e_7328724 [1];
+-c_7328718.hdr.mark = gc_color_red;
+- c_7328718.hdr.grayed = 0;
+-c_7328718.tag = closureN_tag;
+- c_7328718.fn = (function_type)__lambda_1325;
+-c_7328718.num_args = 1;
+-c_7328718.num_elements = 1;
+-c_7328718.elements = (object *)e_7328724;
+-c_7328718.elements[0] = ((closureN)self_7314256)->elements[1];
++closureN_type c_7326259;
++object e_7326265 [1];
++c_7326259.hdr.mark = gc_color_red;
++ c_7326259.hdr.grayed = 0;
++c_7326259.tag = closureN_tag;
++ c_7326259.fn = (function_type)__lambda_1278;
++c_7326259.num_args = 1;
++c_7326259.num_elements = 1;
++c_7326259.elements = (object *)e_7326265;
++c_7326259.elements[0] = ((closureN)self_7312956)->elements[1];
+
+
+-make_utf8_string_with_len(c_7328725, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7328718, &c_7328725, ((closureN)self_7314256)->elements[0]);}
++make_utf8_string_with_len(c_7326266, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7326259, &c_7326266, ((closureN)self_7312956)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1325(void *data, object self_7314257, int argc, object *args) /* object self_7314257, object r_738084 */
++static void __lambda_1278(void *data, object self_7312957, int argc, object *args) /* object self_7312957, object r_737309 */
+ {
+- object r_738084 = args[0];
++ object r_737309 = args[0];
+
+-pair_type local_7328723;
+-return_direct_with_clo1(data, ((closureN)self_7314257)->elements[0], (((closure) ((closureN)self_7314257)->elements[0])->fn), set_pair_as_expr(&local_7328723, r_738084, boolean_f));;
++pair_type local_7326264;
++return_direct_with_clo1(data, ((closureN)self_7312957)->elements[0], (((closure) ((closureN)self_7312957)->elements[0])->fn), set_pair_as_expr(&local_7326264, r_737309, boolean_f));;
+ }
+
+-static void __lambda_1319(void *data, object self_7314258, int argc, object *args) /* object self_7314258, object k_738086 */
++static void __lambda_1272(void *data, object self_7312958, int argc, object *args) /* object self_7312958, object k_737311 */
+ {
+- object k_738086 = args[0];
++ object k_737311 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314258)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312958)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314258)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312958)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314258)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312958)->elements[1])))) ){
+
+-closureN_type c_7328653;
+-object e_7328709 [3];
+-c_7328653.hdr.mark = gc_color_red;
+- c_7328653.hdr.grayed = 0;
+-c_7328653.tag = closureN_tag;
+- c_7328653.fn = (function_type)__lambda_1320;
+-c_7328653.num_args = 1;
+-c_7328653.num_elements = 3;
+-c_7328653.elements = (object *)e_7328709;
+-c_7328653.elements[0] = k_738086;
+-c_7328653.elements[1] = ((closureN)self_7314258)->elements[0];
+-c_7328653.elements[2] = ((closureN)self_7314258)->elements[1];
++closureN_type c_7326194;
++object e_7326250 [3];
++c_7326194.hdr.mark = gc_color_red;
++ c_7326194.hdr.grayed = 0;
++c_7326194.tag = closureN_tag;
++ c_7326194.fn = (function_type)__lambda_1273;
++c_7326194.num_args = 1;
++c_7326194.num_elements = 3;
++c_7326194.elements = (object *)e_7326250;
++c_7326194.elements[0] = k_737311;
++c_7326194.elements[1] = ((closureN)self_7312958)->elements[0];
++c_7326194.elements[2] = ((closureN)self_7312958)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314258)->elements[0], &c_7328653, quote_define);
++return_closcall2(data, ((closureN)self_7312958)->elements[0], &c_7326194, quote_define);
+ } else {
+- return_direct_with_clo1(data, k_738086, (((closure) k_738086)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737311, (((closure) k_737311)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738086, (((closure) k_738086)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737311, (((closure) k_737311)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738086, (((closure) k_738086)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737311, (((closure) k_737311)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1320(void *data, object self_7314259, int argc, object *args) /* object self_7314259, object r_738095 */
++static void __lambda_1273(void *data, object self_7312959, int argc, object *args) /* object self_7312959, object r_737320 */
+ {
+- object r_738095 = args[0];
++ object r_737320 = args[0];
+
+-closureN_type c_7328656;
+-object e_7328708 [4];
+-c_7328656.hdr.mark = gc_color_red;
+- c_7328656.hdr.grayed = 0;
+-c_7328656.tag = closureN_tag;
+- c_7328656.fn = (function_type)__lambda_1321;
+-c_7328656.num_args = 1;
+-c_7328656.num_elements = 4;
+-c_7328656.elements = (object *)e_7328708;
+-c_7328656.elements[0] = ((closureN)self_7314259)->elements[0];
+-c_7328656.elements[1] = r_738095;
+-c_7328656.elements[2] = ((closureN)self_7314259)->elements[1];
+-c_7328656.elements[3] = ((closureN)self_7314259)->elements[2];
++closureN_type c_7326197;
++object e_7326249 [4];
++c_7326197.hdr.mark = gc_color_red;
++ c_7326197.hdr.grayed = 0;
++c_7326197.tag = closureN_tag;
++ c_7326197.fn = (function_type)__lambda_1274;
++c_7326197.num_args = 1;
++c_7326197.num_elements = 4;
++c_7326197.elements = (object *)e_7326249;
++c_7326197.elements[0] = ((closureN)self_7312959)->elements[0];
++c_7326197.elements[1] = r_737320;
++c_7326197.elements[2] = ((closureN)self_7312959)->elements[1];
++c_7326197.elements[3] = ((closureN)self_7312959)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314259)->elements[1], &c_7328656, quote_call_91with_91values);;
++return_closcall2(data, ((closureN)self_7312959)->elements[1], &c_7326197, quote_call_91with_91values);;
+ }
+
+-static void __lambda_1321(void *data, object self_7314260, int argc, object *args) /* object self_7314260, object r_738103 */
++static void __lambda_1274(void *data, object self_7312960, int argc, object *args) /* object self_7312960, object r_737328 */
+ {
+- object r_738103 = args[0];
++ object r_737328 = args[0];
+
+-closureN_type c_7328659;
+-object e_7328707 [5];
+-c_7328659.hdr.mark = gc_color_red;
+- c_7328659.hdr.grayed = 0;
+-c_7328659.tag = closureN_tag;
+- c_7328659.fn = (function_type)__lambda_1322;
+-c_7328659.num_args = 1;
+-c_7328659.num_elements = 5;
+-c_7328659.elements = (object *)e_7328707;
+-c_7328659.elements[0] = ((closureN)self_7314260)->elements[0];
+-c_7328659.elements[1] = ((closureN)self_7314260)->elements[1];
+-c_7328659.elements[2] = r_738103;
+-c_7328659.elements[3] = ((closureN)self_7314260)->elements[2];
+-c_7328659.elements[4] = ((closureN)self_7314260)->elements[3];
++closureN_type c_7326200;
++object e_7326248 [5];
++c_7326200.hdr.mark = gc_color_red;
++ c_7326200.hdr.grayed = 0;
++c_7326200.tag = closureN_tag;
++ c_7326200.fn = (function_type)__lambda_1275;
++c_7326200.num_args = 1;
++c_7326200.num_elements = 5;
++c_7326200.elements = (object *)e_7326248;
++c_7326200.elements[0] = ((closureN)self_7312960)->elements[0];
++c_7326200.elements[1] = ((closureN)self_7312960)->elements[1];
++c_7326200.elements[2] = r_737328;
++c_7326200.elements[3] = ((closureN)self_7312960)->elements[2];
++c_7326200.elements[4] = ((closureN)self_7312960)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314260)->elements[2], &c_7328659, quote_lambda);;
++return_closcall2(data, ((closureN)self_7312960)->elements[2], &c_7326200, quote_lambda);;
+ }
+
+-static void __lambda_1322(void *data, object self_7314261, int argc, object *args) /* object self_7314261, object r_738113 */
++static void __lambda_1275(void *data, object self_7312961, int argc, object *args) /* object self_7312961, object r_737338 */
+ {
+- object r_738113 = args[0];
++ object r_737338 = args[0];
+
+-closureN_type c_7328662;
+-object e_7328706 [5];
+-c_7328662.hdr.mark = gc_color_red;
+- c_7328662.hdr.grayed = 0;
+-c_7328662.tag = closureN_tag;
+- c_7328662.fn = (function_type)__lambda_1323;
+-c_7328662.num_args = 1;
+-c_7328662.num_elements = 5;
+-c_7328662.elements = (object *)e_7328706;
+-c_7328662.elements[0] = ((closureN)self_7314261)->elements[0];
+-c_7328662.elements[1] = ((closureN)self_7314261)->elements[1];
+-c_7328662.elements[2] = ((closureN)self_7314261)->elements[2];
+-c_7328662.elements[3] = r_738113;
+-c_7328662.elements[4] = ((closureN)self_7314261)->elements[4];
++closureN_type c_7326203;
++object e_7326247 [5];
++c_7326203.hdr.mark = gc_color_red;
++ c_7326203.hdr.grayed = 0;
++c_7326203.tag = closureN_tag;
++ c_7326203.fn = (function_type)__lambda_1276;
++c_7326203.num_args = 1;
++c_7326203.num_elements = 5;
++c_7326203.elements = (object *)e_7326247;
++c_7326203.elements[0] = ((closureN)self_7312961)->elements[0];
++c_7326203.elements[1] = ((closureN)self_7312961)->elements[1];
++c_7326203.elements[2] = ((closureN)self_7312961)->elements[2];
++c_7326203.elements[3] = r_737338;
++c_7326203.elements[4] = ((closureN)self_7312961)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314261)->elements[3], &c_7328662, quote__list);;
++return_closcall2(data, ((closureN)self_7312961)->elements[3], &c_7326203, quote__list);;
+ }
+
+-static void __lambda_1323(void *data, object self_7314262, int argc, object *args) /* object self_7314262, object r_738109_7312676_7312685_7312693 */
++static void __lambda_1276(void *data, object self_7312962, int argc, object *args) /* object self_7312962, object r_737334_7311423_7311432_7311440 */
+ {
+- object r_738109_7312676_7312685_7312693 = args[0];
++ object r_737334_7311423_7311432_7311440 = args[0];
+
+-pair_type local_7328667;
++pair_type local_7326208;
+
+-pair_type local_7328670;
++pair_type local_7326211;
+
+-pair_type local_7328674;
++pair_type local_7326215;
+
+
+
+-pair_type local_7328680;
++pair_type local_7326221;
+
+-pair_type local_7328683;
++pair_type local_7326224;
+
+-pair_type local_7328687;
++pair_type local_7326228;
+
+-pair_type local_7328690;
++pair_type local_7326231;
+
+-pair_type local_7328694;
++pair_type local_7326235;
+
+-pair_type local_7328697;
++pair_type local_7326238;
+
+
+
+
+
+-pair_type local_7328705;
+-return_direct_with_clo1(data, ((closureN)self_7314262)->elements[0], (((closure) ((closureN)self_7314262)->elements[0])->fn), set_pair_as_expr(&local_7328667, set_pair_as_expr(&local_7328670, ((closureN)self_7314262)->elements[1], set_pair_as_expr(&local_7328674, Cyc_car(data, ((closureN)self_7314262)->elements[4]), set_pair_as_expr(&local_7328680, set_pair_as_expr(&local_7328683, ((closureN)self_7314262)->elements[2], set_pair_as_expr(&local_7328687, set_pair_as_expr(&local_7328690, ((closureN)self_7314262)->elements[3], set_pair_as_expr(&local_7328694, NULL, set_pair_as_expr(&local_7328697, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314262)->elements[4])), NULL))), set_pair_as_expr(&local_7328705, r_738109_7312676_7312685_7312693, NULL))), NULL))), boolean_f));;
++pair_type local_7326246;
++return_direct_with_clo1(data, ((closureN)self_7312962)->elements[0], (((closure) ((closureN)self_7312962)->elements[0])->fn), set_pair_as_expr(&local_7326208, set_pair_as_expr(&local_7326211, ((closureN)self_7312962)->elements[1], set_pair_as_expr(&local_7326215, Cyc_car(data, ((closureN)self_7312962)->elements[4]), set_pair_as_expr(&local_7326221, set_pair_as_expr(&local_7326224, ((closureN)self_7312962)->elements[2], set_pair_as_expr(&local_7326228, set_pair_as_expr(&local_7326231, ((closureN)self_7312962)->elements[3], set_pair_as_expr(&local_7326235, NULL, set_pair_as_expr(&local_7326238, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312962)->elements[4])), NULL))), set_pair_as_expr(&local_7326246, r_737334_7311423_7311432_7311440, NULL))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1285(void *data, object self_7314263, int argc, object *args) /* object self_7314263, object k_738125 */
++static void __lambda_1238(void *data, object self_7312963, int argc, object *args) /* object self_7312963, object k_737350 */
+ {
+- object k_738125 = args[0];
++ object k_737350 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314263)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312963)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314263)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312963)->elements[1]))) ){
+
+-closureN_type c_7328203;
+-object e_7328620 [3];
+-c_7328203.hdr.mark = gc_color_red;
+- c_7328203.hdr.grayed = 0;
+-c_7328203.tag = closureN_tag;
+- c_7328203.fn = (function_type)__lambda_1286;
+-c_7328203.num_args = 1;
+-c_7328203.num_elements = 3;
+-c_7328203.elements = (object *)e_7328620;
+-c_7328203.elements[0] = k_738125;
+-c_7328203.elements[1] = ((closureN)self_7314263)->elements[0];
+-c_7328203.elements[2] = ((closureN)self_7314263)->elements[1];
++closureN_type c_7325744;
++object e_7326161 [3];
++c_7325744.hdr.mark = gc_color_red;
++ c_7325744.hdr.grayed = 0;
++c_7325744.tag = closureN_tag;
++ c_7325744.fn = (function_type)__lambda_1239;
++c_7325744.num_args = 1;
++c_7325744.num_elements = 3;
++c_7325744.elements = (object *)e_7326161;
++c_7325744.elements[0] = k_737350;
++c_7325744.elements[1] = ((closureN)self_7312963)->elements[0];
++c_7325744.elements[2] = ((closureN)self_7312963)->elements[1];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7328203,__lambda_1286, Cyc_car(data, Cyc_car(data, ((closureN)self_7314263)->elements[1])));
++return_direct_with_clo1(data,(closure)&c_7325744,__lambda_1239, Cyc_car(data, Cyc_car(data, ((closureN)self_7312963)->elements[1])));
+ } else {
+- return_direct_with_clo1(data, k_738125, (((closure) k_738125)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737350, (((closure) k_737350)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738125, (((closure) k_738125)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737350, (((closure) k_737350)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1286(void *data, object self_7314264, int argc, object *args) /* object self_7314264, object var0_732759_732834_734078 */
++static void __lambda_1239(void *data, object self_7312964, int argc, object *args) /* object self_7312964, object var0_732412_732487_733626 */
+ {
+- object var0_732759_732834_734078 = args[0];
++ object var0_732412_732487_733626 = args[0];
+
+
+
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314264)->elements[2]))), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312964)->elements[2]))), obj_int2obj(1))) ){
+
+-closureN_type c_7328214;
+-object e_7328602 [4];
+-c_7328214.hdr.mark = gc_color_red;
+- c_7328214.hdr.grayed = 0;
+-c_7328214.tag = closureN_tag;
+- c_7328214.fn = (function_type)__lambda_1287;
+-c_7328214.num_args = 3;
+-c_7328214.num_elements = 4;
+-c_7328214.elements = (object *)e_7328602;
+-c_7328214.elements[0] = ((closureN)self_7314264)->elements[0];
+-c_7328214.elements[1] = ((closureN)self_7314264)->elements[1];
+-c_7328214.elements[2] = ((closureN)self_7314264)->elements[2];
+-c_7328214.elements[3] = var0_732759_732834_734078;
++closureN_type c_7325755;
++object e_7326143 [4];
++c_7325755.hdr.mark = gc_color_red;
++ c_7325755.hdr.grayed = 0;
++c_7325755.tag = closureN_tag;
++ c_7325755.fn = (function_type)__lambda_1240;
++c_7325755.num_args = 3;
++c_7325755.num_elements = 4;
++c_7325755.elements = (object *)e_7326143;
++c_7325755.elements[0] = ((closureN)self_7312964)->elements[0];
++c_7325755.elements[1] = ((closureN)self_7312964)->elements[1];
++c_7325755.elements[2] = ((closureN)self_7312964)->elements[2];
++c_7325755.elements[3] = var0_732412_732487_733626;
+
+
+
+
+
+
+-complex_num_type local_7328610;
++complex_num_type local_7326151;
+
+
+
+
+
+
+-return_direct_with_clo3(data,(closure)&c_7328214,__lambda_1287, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314264)->elements[2])), Cyc_fast_sub(data,&local_7328610, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314264)->elements[2]))), obj_int2obj(1)), NULL);
++return_direct_with_clo3(data,(closure)&c_7325755,__lambda_1240, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312964)->elements[2])), Cyc_fast_sub(data,&local_7326151, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312964)->elements[2]))), obj_int2obj(1)), NULL);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314264)->elements[0], (((closure) ((closureN)self_7314264)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312964)->elements[0], (((closure) ((closureN)self_7312964)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1287(void *data, object self_7314265, int argc, object *args) /* object self_7314265, object ls_732689_732764_732837_734081, object i_732691_732765_732838_734082, object res_732690_732766_732839_734083 */
++static void __lambda_1240(void *data, object self_7312965, int argc, object *args) /* object self_7312965, object ls_732342_732417_732490_733629, object i_732344_732418_732491_733630, object res_732343_732419_732492_733631 */
+ {
+- object ls_732689_732764_732837_734081 = args[0]; object i_732691_732765_732838_734082 = args[1]; object res_732690_732766_732839_734083 = args[2];
++ object ls_732342_732417_732490_733629 = args[0]; object i_732344_732418_732491_733630 = args[1]; object res_732343_732419_732492_733631 = args[2];
+
+-closureN_type c_7328216;
+-object e_7328601 [7];
+-c_7328216.hdr.mark = gc_color_red;
+- c_7328216.hdr.grayed = 0;
+-c_7328216.tag = closureN_tag;
+- c_7328216.fn = (function_type)__lambda_1288;
+-c_7328216.num_args = 1;
+-c_7328216.num_elements = 7;
+-c_7328216.elements = (object *)e_7328601;
+-c_7328216.elements[0] = i_732691_732765_732838_734082;
+-c_7328216.elements[1] = ((closureN)self_7314265)->elements[0];
+-c_7328216.elements[2] = ls_732689_732764_732837_734081;
+-c_7328216.elements[3] = ((closureN)self_7314265)->elements[1];
+-c_7328216.elements[4] = res_732690_732766_732839_734083;
+-c_7328216.elements[5] = ((closureN)self_7314265)->elements[2];
+-c_7328216.elements[6] = ((closureN)self_7314265)->elements[3];
++closureN_type c_7325757;
++object e_7326142 [7];
++c_7325757.hdr.mark = gc_color_red;
++ c_7325757.hdr.grayed = 0;
++c_7325757.tag = closureN_tag;
++ c_7325757.fn = (function_type)__lambda_1241;
++c_7325757.num_args = 1;
++c_7325757.num_elements = 7;
++c_7325757.elements = (object *)e_7326142;
++c_7325757.elements[0] = i_732344_732418_732491_733630;
++c_7325757.elements[1] = ((closureN)self_7312965)->elements[0];
++c_7325757.elements[2] = ls_732342_732417_732490_733629;
++c_7325757.elements[3] = ((closureN)self_7312965)->elements[1];
++c_7325757.elements[4] = res_732343_732419_732492_733631;
++c_7325757.elements[5] = ((closureN)self_7312965)->elements[2];
++c_7325757.elements[6] = ((closureN)self_7312965)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7328216,__lambda_1288, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7325757,__lambda_1241, boolean_f);;
+ }
+
+-static void __lambda_1288(void *data, object self_7314266, int argc, object *args) /* object self_7314266, object lp_9317_732709_732767_732840_734084 */
++static void __lambda_1241(void *data, object self_7312966, int argc, object *args) /* object self_7312966, object lp_9317_732362_732420_732493_733632 */
+ {
+- object lp_9317_732709_732767_732840_734084 = args[0];
++ object lp_9317_732362_732420_732493_733632 = args[0];
+
+-closureN_type c_7328218;
+-object e_7328597 [7];
+-c_7328218.hdr.mark = gc_color_red;
+- c_7328218.hdr.grayed = 0;
+-c_7328218.tag = closureN_tag;
+- c_7328218.fn = (function_type)__lambda_1444;
+-c_7328218.num_args = 1;
+-c_7328218.num_elements = 7;
+-c_7328218.elements = (object *)e_7328597;
+-c_7328218.elements[0] = ((closureN)self_7314266)->elements[0];
+-c_7328218.elements[1] = ((closureN)self_7314266)->elements[1];
+-c_7328218.elements[2] = ((closureN)self_7314266)->elements[2];
+-c_7328218.elements[3] = ((closureN)self_7314266)->elements[3];
+-c_7328218.elements[4] = ((closureN)self_7314266)->elements[4];
+-c_7328218.elements[5] = ((closureN)self_7314266)->elements[5];
+-c_7328218.elements[6] = ((closureN)self_7314266)->elements[6];
++closureN_type c_7325759;
++object e_7326138 [7];
++c_7325759.hdr.mark = gc_color_red;
++ c_7325759.hdr.grayed = 0;
++c_7325759.tag = closureN_tag;
++ c_7325759.fn = (function_type)__lambda_1397;
++c_7325759.num_args = 1;
++c_7325759.num_elements = 7;
++c_7325759.elements = (object *)e_7326138;
++c_7325759.elements[0] = ((closureN)self_7312966)->elements[0];
++c_7325759.elements[1] = ((closureN)self_7312966)->elements[1];
++c_7325759.elements[2] = ((closureN)self_7312966)->elements[2];
++c_7325759.elements[3] = ((closureN)self_7312966)->elements[3];
++c_7325759.elements[4] = ((closureN)self_7312966)->elements[4];
++c_7325759.elements[5] = ((closureN)self_7312966)->elements[5];
++c_7325759.elements[6] = ((closureN)self_7312966)->elements[6];
+
+
+-pair_type local_7328600;
+-return_direct_with_clo1(data,(closure)&c_7328218,__lambda_1444, set_cell_as_expr(&local_7328600, lp_9317_732709_732767_732840_734084));;
++pair_type local_7326141;
++return_direct_with_clo1(data,(closure)&c_7325759,__lambda_1397, set_cell_as_expr(&local_7326141, lp_9317_732362_732420_732493_733632));;
+ }
+
+-static void __lambda_1444(void *data, object self_7314267, int argc, object *args) /* object self_7314267, object lp_9317_732709_732767_732840_734084 */
++static void __lambda_1397(void *data, object self_7312967, int argc, object *args) /* object self_7312967, object lp_9317_732362_732420_732493_733632 */
+ {
+- object lp_9317_732709_732767_732840_734084 = args[0];
++ object lp_9317_732362_732420_732493_733632 = args[0];
+
+-closureN_type c_7328220;
+-object e_7328235 [5];
+-c_7328220.hdr.mark = gc_color_red;
+- c_7328220.hdr.grayed = 0;
+-c_7328220.tag = closureN_tag;
+- c_7328220.fn = (function_type)__lambda_1289;
+-c_7328220.num_args = 1;
+-c_7328220.num_elements = 5;
+-c_7328220.elements = (object *)e_7328235;
+-c_7328220.elements[0] = ((closureN)self_7314267)->elements[0];
+-c_7328220.elements[1] = ((closureN)self_7314267)->elements[1];
+-c_7328220.elements[2] = lp_9317_732709_732767_732840_734084;
+-c_7328220.elements[3] = ((closureN)self_7314267)->elements[2];
+-c_7328220.elements[4] = ((closureN)self_7314267)->elements[4];
++closureN_type c_7325761;
++object e_7325776 [5];
++c_7325761.hdr.mark = gc_color_red;
++ c_7325761.hdr.grayed = 0;
++c_7325761.tag = closureN_tag;
++ c_7325761.fn = (function_type)__lambda_1242;
++c_7325761.num_args = 1;
++c_7325761.num_elements = 5;
++c_7325761.elements = (object *)e_7325776;
++c_7325761.elements[0] = ((closureN)self_7312967)->elements[0];
++c_7325761.elements[1] = ((closureN)self_7312967)->elements[1];
++c_7325761.elements[2] = lp_9317_732362_732420_732493_733632;
++c_7325761.elements[3] = ((closureN)self_7312967)->elements[2];
++c_7325761.elements[4] = ((closureN)self_7312967)->elements[4];
+
+
+-closureN_type c_7328236;
+-object e_7328596 [4];
+-c_7328236.hdr.mark = gc_color_red;
+- c_7328236.hdr.grayed = 0;
+-c_7328236.tag = closureN_tag;
+- c_7328236.fn = (function_type)__lambda_1291;
+-c_7328236.num_args = 3;
+-c_7328236.num_elements = 4;
+-c_7328236.elements = (object *)e_7328596;
+-c_7328236.elements[0] = lp_9317_732709_732767_732840_734084;
+-c_7328236.elements[1] = ((closureN)self_7314267)->elements[3];
+-c_7328236.elements[2] = ((closureN)self_7314267)->elements[5];
+-c_7328236.elements[3] = ((closureN)self_7314267)->elements[6];
++closureN_type c_7325777;
++object e_7326137 [4];
++c_7325777.hdr.mark = gc_color_red;
++ c_7325777.hdr.grayed = 0;
++c_7325777.tag = closureN_tag;
++ c_7325777.fn = (function_type)__lambda_1244;
++c_7325777.num_args = 3;
++c_7325777.num_elements = 4;
++c_7325777.elements = (object *)e_7326137;
++c_7325777.elements[0] = lp_9317_732362_732420_732493_733632;
++c_7325777.elements[1] = ((closureN)self_7312967)->elements[3];
++c_7325777.elements[2] = ((closureN)self_7312967)->elements[5];
++c_7325777.elements[3] = ((closureN)self_7312967)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7328220,__lambda_1289, &c_7328236);;
++return_direct_with_clo1(data,(closure)&c_7325761,__lambda_1242, &c_7325777);;
+ }
+
+-static void __lambda_1291(void *data, object self_7314268, int argc, object *args) /* object self_7314268, object k_738137, object ls_732689_732768_732841_734085, object i_732691_732769_732842_734086, object res_732690_732770_732843_734087 */
++static void __lambda_1244(void *data, object self_7312968, int argc, object *args) /* object self_7312968, object k_737362, object ls_732342_732421_732494_733633, object i_732344_732422_732495_733634, object res_732343_732423_732496_733635 */
+ {
+- object k_738137 = args[0]; object ls_732689_732768_732841_734085 = args[1]; object i_732691_732769_732842_734086 = args[2]; object res_732690_732770_732843_734087 = args[3];
++ object k_737362 = args[0]; object ls_732342_732421_732494_733633 = args[1]; object i_732344_732422_732495_733634 = args[2]; object res_732343_732423_732496_733635 = args[3];
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, obj_int2obj(0), i_732691_732769_732842_734086)) ){
++if( (boolean_f != Cyc_num_fast_gte_op(data, obj_int2obj(0), i_732344_732422_732495_733634)) ){
+
+-closureN_type c_7328240;
+-object e_7328581 [5];
+-c_7328240.hdr.mark = gc_color_red;
+- c_7328240.hdr.grayed = 0;
+-c_7328240.tag = closureN_tag;
+- c_7328240.fn = (function_type)__lambda_1292;
+-c_7328240.num_args = 1;
+-c_7328240.num_elements = 5;
+-c_7328240.elements = (object *)e_7328581;
+-c_7328240.elements[0] = k_738137;
+-c_7328240.elements[1] = ls_732689_732768_732841_734085;
+-c_7328240.elements[2] = ((closureN)self_7314268)->elements[1];
+-c_7328240.elements[3] = ((closureN)self_7314268)->elements[2];
+-c_7328240.elements[4] = ((closureN)self_7314268)->elements[3];
++closureN_type c_7325781;
++object e_7326122 [5];
++c_7325781.hdr.mark = gc_color_red;
++ c_7325781.hdr.grayed = 0;
++c_7325781.tag = closureN_tag;
++ c_7325781.fn = (function_type)__lambda_1245;
++c_7325781.num_args = 1;
++c_7325781.num_elements = 5;
++c_7325781.elements = (object *)e_7326122;
++c_7325781.elements[0] = k_737362;
++c_7325781.elements[1] = ls_732342_732421_732494_733633;
++c_7325781.elements[2] = ((closureN)self_7312968)->elements[1];
++c_7325781.elements[3] = ((closureN)self_7312968)->elements[2];
++c_7325781.elements[4] = ((closureN)self_7312968)->elements[3];
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7328240, primitive_cons, NULL, res_732690_732770_732843_734087);
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7325781, primitive_cons, NULL, res_732343_732423_732496_733635);
+ } else {
+
+
+
+
+
+-complex_num_type local_7328590;
++complex_num_type local_7326131;
+
+-pair_type local_7328593;
++pair_type local_7326134;
+
+
+-return_closcall4(data, car(((closureN)self_7314268)->elements[0]), k_738137, Cyc_cdr(data, ls_732689_732768_732841_734085), Cyc_fast_sub(data,&local_7328590, i_732691_732769_732842_734086, obj_int2obj(1)), set_pair_as_expr(&local_7328593, Cyc_car(data, ls_732689_732768_732841_734085), res_732690_732770_732843_734087));}
++return_closcall4(data, car(((closureN)self_7312968)->elements[0]), k_737362, Cyc_cdr(data, ls_732342_732421_732494_733633), Cyc_fast_sub(data,&local_7326131, i_732344_732422_732495_733634, obj_int2obj(1)), set_pair_as_expr(&local_7326134, Cyc_car(data, ls_732342_732421_732494_733633), res_732343_732423_732496_733635));}
+ ;;
+ }
+
+-static void __lambda_1292(void *data, object self_7314269, int argc, object *args) /* object self_7314269, object r_738310_7313015 */
++static void __lambda_1245(void *data, object self_7312969, int argc, object *args) /* object self_7312969, object r_737535_7311762 */
+ {
+- object r_738310_7313015 = args[0];
++ object r_737535_7311762 = args[0];
+
+-closureN_type c_7328242;
+-object e_7328573 [4];
+-c_7328242.hdr.mark = gc_color_red;
+- c_7328242.hdr.grayed = 0;
+-c_7328242.tag = closureN_tag;
+- c_7328242.fn = (function_type)__lambda_1293;
+-c_7328242.num_args = 1;
+-c_7328242.num_elements = 4;
+-c_7328242.elements = (object *)e_7328573;
+-c_7328242.elements[0] = ((closureN)self_7314269)->elements[0];
+-c_7328242.elements[1] = ((closureN)self_7314269)->elements[2];
+-c_7328242.elements[2] = ((closureN)self_7314269)->elements[3];
+-c_7328242.elements[3] = ((closureN)self_7314269)->elements[4];
++closureN_type c_7325783;
++object e_7326114 [4];
++c_7325783.hdr.mark = gc_color_red;
++ c_7325783.hdr.grayed = 0;
++c_7325783.tag = closureN_tag;
++ c_7325783.fn = (function_type)__lambda_1246;
++c_7325783.num_args = 1;
++c_7325783.num_elements = 4;
++c_7325783.elements = (object *)e_7326114;
++c_7325783.elements[0] = ((closureN)self_7312969)->elements[0];
++c_7325783.elements[1] = ((closureN)self_7312969)->elements[2];
++c_7325783.elements[2] = ((closureN)self_7312969)->elements[3];
++c_7325783.elements[3] = ((closureN)self_7312969)->elements[4];
+
+
+-pair_type local_7328576;
++pair_type local_7326117;
+
+-pair_type local_7328580;
+-return_direct_with_clo1(data,(closure)&c_7328242,__lambda_1293, set_pair_as_expr(&local_7328576, ((closureN)self_7314269)->elements[1], set_pair_as_expr(&local_7328580, r_738310_7313015, NULL)));;
++pair_type local_7326121;
++return_direct_with_clo1(data,(closure)&c_7325783,__lambda_1246, set_pair_as_expr(&local_7326117, ((closureN)self_7312969)->elements[1], set_pair_as_expr(&local_7326121, r_737535_7311762, NULL)));;
+ }
+
+-static void __lambda_1293(void *data, object self_7314270, int argc, object *args) /* object self_7314270, object v_9318_732710_732771_732844_734088_7313016 */
++static void __lambda_1246(void *data, object self_7312970, int argc, object *args) /* object self_7312970, object v_9318_732363_732424_732497_733636_7311763 */
+ {
+- object v_9318_732710_732771_732844_734088_7313016 = args[0];
++ object v_9318_732363_732424_732497_733636_7311763 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(v_9318_732710_732771_732844_734088_7313016)) ){
++if( (boolean_f != Cyc_is_pair(v_9318_732363_732424_732497_733636_7311763)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, v_9318_732710_732771_732844_734088_7313016))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, v_9318_732363_732424_732497_733636_7311763))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, v_9318_732710_732771_732844_734088_7313016)))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, v_9318_732363_732424_732497_733636_7311763)))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, v_9318_732710_732771_732844_734088_7313016))) ){
+- complex_num_type local_7328261;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, v_9318_732363_732424_732497_733636_7311763))) ){
++ complex_num_type local_7325802;
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7328261, Cyc_car(data, Cyc_cdr(data, v_9318_732710_732771_732844_734088_7313016)))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325802, Cyc_car(data, Cyc_cdr(data, v_9318_732363_732424_732497_733636_7311763)))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, v_9318_732710_732771_732844_734088_7313016)))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, v_9318_732363_732424_732497_733636_7311763)))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314270)->elements[2]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312970)->elements[2]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314270)->elements[2])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312970)->elements[2])))) ){
+
+-closureN_type c_7328286;
+-object e_7328556 [5];
+-c_7328286.hdr.mark = gc_color_red;
+- c_7328286.hdr.grayed = 0;
+-c_7328286.tag = closureN_tag;
+- c_7328286.fn = (function_type)__lambda_1294;
+-c_7328286.num_args = 1;
+-c_7328286.num_elements = 5;
+-c_7328286.elements = (object *)e_7328556;
+-c_7328286.elements[0] = ((closureN)self_7314270)->elements[0];
+-c_7328286.elements[1] = ((closureN)self_7314270)->elements[1];
+-c_7328286.elements[2] = ((closureN)self_7314270)->elements[2];
+-c_7328286.elements[3] = v_9318_732710_732771_732844_734088_7313016;
+-c_7328286.elements[4] = ((closureN)self_7314270)->elements[3];
++closureN_type c_7325827;
++object e_7326097 [5];
++c_7325827.hdr.mark = gc_color_red;
++ c_7325827.hdr.grayed = 0;
++c_7325827.tag = closureN_tag;
++ c_7325827.fn = (function_type)__lambda_1247;
++c_7325827.num_args = 1;
++c_7325827.num_elements = 5;
++c_7325827.elements = (object *)e_7326097;
++c_7325827.elements[0] = ((closureN)self_7312970)->elements[0];
++c_7325827.elements[1] = ((closureN)self_7312970)->elements[1];
++c_7325827.elements[2] = ((closureN)self_7312970)->elements[2];
++c_7325827.elements[3] = v_9318_732363_732424_732497_733636_7311763;
++c_7325827.elements[4] = ((closureN)self_7312970)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314270)->elements[1], &c_7328286, quote_begin);
++return_closcall2(data, ((closureN)self_7312970)->elements[1], &c_7325827, quote_begin);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314270)->elements[0], (((closure) ((closureN)self_7314270)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312970)->elements[0], (((closure) ((closureN)self_7312970)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1294(void *data, object self_7314271, int argc, object *args) /* object self_7314271, object r_738158_7313017 */
++static void __lambda_1247(void *data, object self_7312971, int argc, object *args) /* object self_7312971, object r_737383_7311764 */
+ {
+- object r_738158_7313017 = args[0];
++ object r_737383_7311764 = args[0];
+
+-closureN_type c_7328289;
+-object e_7328555 [6];
+-c_7328289.hdr.mark = gc_color_red;
+- c_7328289.hdr.grayed = 0;
+-c_7328289.tag = closureN_tag;
+- c_7328289.fn = (function_type)__lambda_1295;
+-c_7328289.num_args = 1;
+-c_7328289.num_elements = 6;
+-c_7328289.elements = (object *)e_7328555;
+-c_7328289.elements[0] = ((closureN)self_7314271)->elements[0];
+-c_7328289.elements[1] = r_738158_7313017;
+-c_7328289.elements[2] = ((closureN)self_7314271)->elements[1];
+-c_7328289.elements[3] = ((closureN)self_7314271)->elements[2];
+-c_7328289.elements[4] = ((closureN)self_7314271)->elements[3];
+-c_7328289.elements[5] = ((closureN)self_7314271)->elements[4];
++closureN_type c_7325830;
++object e_7326096 [6];
++c_7325830.hdr.mark = gc_color_red;
++ c_7325830.hdr.grayed = 0;
++c_7325830.tag = closureN_tag;
++ c_7325830.fn = (function_type)__lambda_1248;
++c_7325830.num_args = 1;
++c_7325830.num_elements = 6;
++c_7325830.elements = (object *)e_7326096;
++c_7325830.elements[0] = ((closureN)self_7312971)->elements[0];
++c_7325830.elements[1] = r_737383_7311764;
++c_7325830.elements[2] = ((closureN)self_7312971)->elements[1];
++c_7325830.elements[3] = ((closureN)self_7312971)->elements[2];
++c_7325830.elements[4] = ((closureN)self_7312971)->elements[3];
++c_7325830.elements[5] = ((closureN)self_7312971)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314271)->elements[1], &c_7328289, quote_define);;
++return_closcall2(data, ((closureN)self_7312971)->elements[1], &c_7325830, quote_define);;
+ }
+
+-static void __lambda_1295(void *data, object self_7314272, int argc, object *args) /* object self_7314272, object r_738279_7313018 */
++static void __lambda_1248(void *data, object self_7312972, int argc, object *args) /* object self_7312972, object r_737504_7311765 */
+ {
+- object r_738279_7313018 = args[0];
++ object r_737504_7311765 = args[0];
+
+-closureN_type c_7328292;
+-object e_7328554 [7];
+-c_7328292.hdr.mark = gc_color_red;
+- c_7328292.hdr.grayed = 0;
+-c_7328292.tag = closureN_tag;
+- c_7328292.fn = (function_type)__lambda_1296;
+-c_7328292.num_args = 1;
+-c_7328292.num_elements = 7;
+-c_7328292.elements = (object *)e_7328554;
+-c_7328292.elements[0] = ((closureN)self_7314272)->elements[0];
+-c_7328292.elements[1] = ((closureN)self_7314272)->elements[1];
+-c_7328292.elements[2] = r_738279_7313018;
+-c_7328292.elements[3] = ((closureN)self_7314272)->elements[2];
+-c_7328292.elements[4] = ((closureN)self_7314272)->elements[3];
+-c_7328292.elements[5] = ((closureN)self_7314272)->elements[4];
+-c_7328292.elements[6] = ((closureN)self_7314272)->elements[5];
++closureN_type c_7325833;
++object e_7326095 [7];
++c_7325833.hdr.mark = gc_color_red;
++ c_7325833.hdr.grayed = 0;
++c_7325833.tag = closureN_tag;
++ c_7325833.fn = (function_type)__lambda_1249;
++c_7325833.num_args = 1;
++c_7325833.num_elements = 7;
++c_7325833.elements = (object *)e_7326095;
++c_7325833.elements[0] = ((closureN)self_7312972)->elements[0];
++c_7325833.elements[1] = ((closureN)self_7312972)->elements[1];
++c_7325833.elements[2] = r_737504_7311765;
++c_7325833.elements[3] = ((closureN)self_7312972)->elements[2];
++c_7325833.elements[4] = ((closureN)self_7312972)->elements[3];
++c_7325833.elements[5] = ((closureN)self_7312972)->elements[4];
++c_7325833.elements[6] = ((closureN)self_7312972)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7314272)->elements[2], &c_7328292, quote_call_91with_91values);;
++return_closcall2(data, ((closureN)self_7312972)->elements[2], &c_7325833, quote_call_91with_91values);;
+ }
+
+-static void __lambda_1296(void *data, object self_7314273, int argc, object *args) /* object self_7314273, object r_738287_7313019 */
++static void __lambda_1249(void *data, object self_7312973, int argc, object *args) /* object self_7312973, object r_737512_7311766 */
+ {
+- object r_738287_7313019 = args[0];
++ object r_737512_7311766 = args[0];
+
+-closureN_type c_7328295;
+-object e_7328553 [8];
+-c_7328295.hdr.mark = gc_color_red;
+- c_7328295.hdr.grayed = 0;
+-c_7328295.tag = closureN_tag;
+- c_7328295.fn = (function_type)__lambda_1297;
+-c_7328295.num_args = 1;
+-c_7328295.num_elements = 8;
+-c_7328295.elements = (object *)e_7328553;
+-c_7328295.elements[0] = ((closureN)self_7314273)->elements[0];
+-c_7328295.elements[1] = ((closureN)self_7314273)->elements[1];
+-c_7328295.elements[2] = ((closureN)self_7314273)->elements[2];
+-c_7328295.elements[3] = r_738287_7313019;
+-c_7328295.elements[4] = ((closureN)self_7314273)->elements[3];
+-c_7328295.elements[5] = ((closureN)self_7314273)->elements[4];
+-c_7328295.elements[6] = ((closureN)self_7314273)->elements[5];
+-c_7328295.elements[7] = ((closureN)self_7314273)->elements[6];
++closureN_type c_7325836;
++object e_7326094 [8];
++c_7325836.hdr.mark = gc_color_red;
++ c_7325836.hdr.grayed = 0;
++c_7325836.tag = closureN_tag;
++ c_7325836.fn = (function_type)__lambda_1250;
++c_7325836.num_args = 1;
++c_7325836.num_elements = 8;
++c_7325836.elements = (object *)e_7326094;
++c_7325836.elements[0] = ((closureN)self_7312973)->elements[0];
++c_7325836.elements[1] = ((closureN)self_7312973)->elements[1];
++c_7325836.elements[2] = ((closureN)self_7312973)->elements[2];
++c_7325836.elements[3] = r_737512_7311766;
++c_7325836.elements[4] = ((closureN)self_7312973)->elements[3];
++c_7325836.elements[5] = ((closureN)self_7312973)->elements[4];
++c_7325836.elements[6] = ((closureN)self_7312973)->elements[5];
++c_7325836.elements[7] = ((closureN)self_7312973)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7314273)->elements[3], &c_7328295, quote_lambda);;
++return_closcall2(data, ((closureN)self_7312973)->elements[3], &c_7325836, quote_lambda);;
+ }
+
+-static void __lambda_1297(void *data, object self_7314274, int argc, object *args) /* object self_7314274, object r_738297_7313020 */
++static void __lambda_1250(void *data, object self_7312974, int argc, object *args) /* object self_7312974, object r_737522_7311767 */
+ {
+- object r_738297_7313020 = args[0];
++ object r_737522_7311767 = args[0];
+
+-closureN_type c_7328298;
+-object e_7328552 [9];
+-c_7328298.hdr.mark = gc_color_red;
+- c_7328298.hdr.grayed = 0;
+-c_7328298.tag = closureN_tag;
+- c_7328298.fn = (function_type)__lambda_1298;
+-c_7328298.num_args = 1;
+-c_7328298.num_elements = 9;
+-c_7328298.elements = (object *)e_7328552;
+-c_7328298.elements[0] = ((closureN)self_7314274)->elements[0];
+-c_7328298.elements[1] = ((closureN)self_7314274)->elements[1];
+-c_7328298.elements[2] = ((closureN)self_7314274)->elements[2];
+-c_7328298.elements[3] = ((closureN)self_7314274)->elements[3];
+-c_7328298.elements[4] = r_738297_7313020;
+-c_7328298.elements[5] = ((closureN)self_7314274)->elements[4];
+-c_7328298.elements[6] = ((closureN)self_7314274)->elements[5];
+-c_7328298.elements[7] = ((closureN)self_7314274)->elements[6];
+-c_7328298.elements[8] = ((closureN)self_7314274)->elements[7];
++closureN_type c_7325839;
++object e_7326093 [9];
++c_7325839.hdr.mark = gc_color_red;
++ c_7325839.hdr.grayed = 0;
++c_7325839.tag = closureN_tag;
++ c_7325839.fn = (function_type)__lambda_1251;
++c_7325839.num_args = 1;
++c_7325839.num_elements = 9;
++c_7325839.elements = (object *)e_7326093;
++c_7325839.elements[0] = ((closureN)self_7312974)->elements[0];
++c_7325839.elements[1] = ((closureN)self_7312974)->elements[1];
++c_7325839.elements[2] = ((closureN)self_7312974)->elements[2];
++c_7325839.elements[3] = ((closureN)self_7312974)->elements[3];
++c_7325839.elements[4] = r_737522_7311767;
++c_7325839.elements[5] = ((closureN)self_7312974)->elements[4];
++c_7325839.elements[6] = ((closureN)self_7312974)->elements[5];
++c_7325839.elements[7] = ((closureN)self_7312974)->elements[6];
++c_7325839.elements[8] = ((closureN)self_7312974)->elements[7];
+
+-return_closcall2(data, ((closureN)self_7314274)->elements[4], &c_7328298, quote__list);;
++return_closcall2(data, ((closureN)self_7312974)->elements[4], &c_7325839, quote__list);;
+ }
+
+-static void __lambda_1298(void *data, object self_7314275, int argc, object *args) /* object self_7314275, object r_738293_7311728_7311792_7311855_7313021 */
++static void __lambda_1251(void *data, object self_7312975, int argc, object *args) /* object self_7312975, object r_737518_7310475_7310539_7310602_7311768 */
+ {
+- object r_738293_7311728_7311792_7311855_7313021 = args[0];
++ object r_737518_7310475_7310539_7310602_7311768 = args[0];
+
+-closureN_type c_7328300;
+-object e_7328458 [10];
+-c_7328300.hdr.mark = gc_color_red;
+- c_7328300.hdr.grayed = 0;
+-c_7328300.tag = closureN_tag;
+- c_7328300.fn = (function_type)__lambda_1299;
+-c_7328300.num_args = 1;
+-c_7328300.num_elements = 10;
+-c_7328300.elements = (object *)e_7328458;
+-c_7328300.elements[0] = ((closureN)self_7314275)->elements[0];
+-c_7328300.elements[1] = ((closureN)self_7314275)->elements[1];
+-c_7328300.elements[2] = ((closureN)self_7314275)->elements[2];
+-c_7328300.elements[3] = ((closureN)self_7314275)->elements[3];
+-c_7328300.elements[4] = r_738293_7311728_7311792_7311855_7313021;
+-c_7328300.elements[5] = ((closureN)self_7314275)->elements[4];
+-c_7328300.elements[6] = ((closureN)self_7314275)->elements[5];
+-c_7328300.elements[7] = ((closureN)self_7314275)->elements[6];
+-c_7328300.elements[8] = ((closureN)self_7314275)->elements[7];
+-c_7328300.elements[9] = ((closureN)self_7314275)->elements[8];
++closureN_type c_7325841;
++object e_7325999 [10];
++c_7325841.hdr.mark = gc_color_red;
++ c_7325841.hdr.grayed = 0;
++c_7325841.tag = closureN_tag;
++ c_7325841.fn = (function_type)__lambda_1252;
++c_7325841.num_args = 1;
++c_7325841.num_elements = 10;
++c_7325841.elements = (object *)e_7325999;
++c_7325841.elements[0] = ((closureN)self_7312975)->elements[0];
++c_7325841.elements[1] = ((closureN)self_7312975)->elements[1];
++c_7325841.elements[2] = ((closureN)self_7312975)->elements[2];
++c_7325841.elements[3] = ((closureN)self_7312975)->elements[3];
++c_7325841.elements[4] = r_737518_7310475_7310539_7310602_7311768;
++c_7325841.elements[5] = ((closureN)self_7312975)->elements[4];
++c_7325841.elements[6] = ((closureN)self_7312975)->elements[5];
++c_7325841.elements[7] = ((closureN)self_7312975)->elements[6];
++c_7325841.elements[8] = ((closureN)self_7312975)->elements[7];
++c_7325841.elements[9] = ((closureN)self_7312975)->elements[8];
+
+
+-closureN_type c_7328459;
+-object e_7328551 [2];
+-c_7328459.hdr.mark = gc_color_red;
+- c_7328459.hdr.grayed = 0;
+-c_7328459.tag = closureN_tag;
+- c_7328459.fn = (function_type)__lambda_1309;
+-c_7328459.num_args = 1;
+-c_7328459.num_elements = 2;
+-c_7328459.elements = (object *)e_7328551;
+-c_7328459.elements[0] = ((closureN)self_7314275)->elements[5];
+-c_7328459.elements[1] = ((closureN)self_7314275)->elements[8];
++closureN_type c_7326000;
++object e_7326092 [2];
++c_7326000.hdr.mark = gc_color_red;
++ c_7326000.hdr.grayed = 0;
++c_7326000.tag = closureN_tag;
++ c_7326000.fn = (function_type)__lambda_1262;
++c_7326000.num_args = 1;
++c_7326000.num_elements = 2;
++c_7326000.elements = (object *)e_7326092;
++c_7326000.elements[0] = ((closureN)self_7312975)->elements[5];
++c_7326000.elements[1] = ((closureN)self_7312975)->elements[8];
+
+-return_direct_with_clo1(data,(closure)&c_7328300,__lambda_1299, &c_7328459);;
++return_direct_with_clo1(data,(closure)&c_7325841,__lambda_1252, &c_7326000);;
+ }
+
+-static void __lambda_1309(void *data, object self_7314276, int argc, object *args) /* object self_7314276, object k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032, object var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033 */
++static void __lambda_1262(void *data, object self_7312976, int argc, object *args) /* object self_7312976, object k_737449_7310512_7310576_7310639_7310700_7310760_7310819_7310877_7310934_7310990_7311779, object var1_732445_732510_733649_7310513_7310577_7310640_7310701_7310761_7310820_7310878_7310935_7310991_7311780 */
+ {
+- object k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032 = args[0]; object var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033 = args[1];
++ object k_737449_7310512_7310576_7310639_7310700_7310760_7310819_7310877_7310934_7310990_7311779 = args[0]; object var1_732445_732510_733649_7310513_7310577_7310640_7310701_7310761_7310820_7310878_7310935_7310991_7311780 = args[1];
+
+-closureN_type c_7328462;
+-object e_7328550 [4];
+-c_7328462.hdr.mark = gc_color_red;
+- c_7328462.hdr.grayed = 0;
+-c_7328462.tag = closureN_tag;
+- c_7328462.fn = (function_type)__lambda_1310;
+-c_7328462.num_args = 1;
+-c_7328462.num_elements = 4;
+-c_7328462.elements = (object *)e_7328550;
+-c_7328462.elements[0] = k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032;
+-c_7328462.elements[1] = ((closureN)self_7314276)->elements[0];
+-c_7328462.elements[2] = ((closureN)self_7314276)->elements[1];
+-c_7328462.elements[3] = var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033;
++closureN_type c_7326003;
++object e_7326091 [4];
++c_7326003.hdr.mark = gc_color_red;
++ c_7326003.hdr.grayed = 0;
++c_7326003.tag = closureN_tag;
++ c_7326003.fn = (function_type)__lambda_1263;
++c_7326003.num_args = 1;
++c_7326003.num_elements = 4;
++c_7326003.elements = (object *)e_7326091;
++c_7326003.elements[0] = k_737449_7310512_7310576_7310639_7310700_7310760_7310819_7310877_7310934_7310990_7311779;
++c_7326003.elements[1] = ((closureN)self_7312976)->elements[0];
++c_7326003.elements[2] = ((closureN)self_7312976)->elements[1];
++c_7326003.elements[3] = var1_732445_732510_733649_7310513_7310577_7310640_7310701_7310761_7310820_7310878_7310935_7310991_7311780;
+
+-return_closcall2(data, ((closureN)self_7314276)->elements[0], &c_7328462, quote_define);;
++return_closcall2(data, ((closureN)self_7312976)->elements[0], &c_7326003, quote_define);;
+ }
+
+-static void __lambda_1310(void *data, object self_7314277, int argc, object *args) /* object self_7314277, object r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034 */
++static void __lambda_1263(void *data, object self_7312977, int argc, object *args) /* object self_7312977, object r_737450_7310514_7310578_7310641_7310702_7310762_7310821_7310879_7310936_7310992_7311781 */
+ {
+- object r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034 = args[0];
++ object r_737450_7310514_7310578_7310641_7310702_7310762_7310821_7310879_7310936_7310992_7311781 = args[0];
+
+-closureN_type c_7328465;
+-object e_7328549 [5];
+-c_7328465.hdr.mark = gc_color_red;
+- c_7328465.hdr.grayed = 0;
+-c_7328465.tag = closureN_tag;
+- c_7328465.fn = (function_type)__lambda_1311;
+-c_7328465.num_args = 1;
+-c_7328465.num_elements = 5;
+-c_7328465.elements = (object *)e_7328549;
+-c_7328465.elements[0] = ((closureN)self_7314277)->elements[0];
+-c_7328465.elements[1] = r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034;
+-c_7328465.elements[2] = ((closureN)self_7314277)->elements[1];
+-c_7328465.elements[3] = ((closureN)self_7314277)->elements[2];
+-c_7328465.elements[4] = ((closureN)self_7314277)->elements[3];
++closureN_type c_7326006;
++object e_7326090 [5];
++c_7326006.hdr.mark = gc_color_red;
++ c_7326006.hdr.grayed = 0;
++c_7326006.tag = closureN_tag;
++ c_7326006.fn = (function_type)__lambda_1264;
++c_7326006.num_args = 1;
++c_7326006.num_elements = 5;
++c_7326006.elements = (object *)e_7326090;
++c_7326006.elements[0] = ((closureN)self_7312977)->elements[0];
++c_7326006.elements[1] = r_737450_7310514_7310578_7310641_7310702_7310762_7310821_7310879_7310936_7310992_7311781;
++c_7326006.elements[2] = ((closureN)self_7312977)->elements[1];
++c_7326006.elements[3] = ((closureN)self_7312977)->elements[2];
++c_7326006.elements[4] = ((closureN)self_7312977)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314277)->elements[1], &c_7328465, quote_let);;
++return_closcall2(data, ((closureN)self_7312977)->elements[1], &c_7326006, quote_let);;
+ }
+
+-static void __lambda_1311(void *data, object self_7314278, int argc, object *args) /* object self_7314278, object r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035 */
++static void __lambda_1264(void *data, object self_7312978, int argc, object *args) /* object self_7312978, object r_737458_7310515_7310579_7310642_7310703_7310763_7310822_7310880_7310937_7310993_7311782 */
+ {
+- object r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035 = args[0];
++ object r_737458_7310515_7310579_7310642_7310703_7310763_7310822_7310880_7310937_7310993_7311782 = args[0];
+
+-closureN_type c_7328468;
+-object e_7328548 [6];
+-c_7328468.hdr.mark = gc_color_red;
+- c_7328468.hdr.grayed = 0;
+-c_7328468.tag = closureN_tag;
+- c_7328468.fn = (function_type)__lambda_1312;
+-c_7328468.num_args = 1;
+-c_7328468.num_elements = 6;
+-c_7328468.elements = (object *)e_7328548;
+-c_7328468.elements[0] = ((closureN)self_7314278)->elements[0];
+-c_7328468.elements[1] = ((closureN)self_7314278)->elements[1];
+-c_7328468.elements[2] = r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035;
+-c_7328468.elements[3] = ((closureN)self_7314278)->elements[2];
+-c_7328468.elements[4] = ((closureN)self_7314278)->elements[3];
+-c_7328468.elements[5] = ((closureN)self_7314278)->elements[4];
++closureN_type c_7326009;
++object e_7326089 [6];
++c_7326009.hdr.mark = gc_color_red;
++ c_7326009.hdr.grayed = 0;
++c_7326009.tag = closureN_tag;
++ c_7326009.fn = (function_type)__lambda_1265;
++c_7326009.num_args = 1;
++c_7326009.num_elements = 6;
++c_7326009.elements = (object *)e_7326089;
++c_7326009.elements[0] = ((closureN)self_7312978)->elements[0];
++c_7326009.elements[1] = ((closureN)self_7312978)->elements[1];
++c_7326009.elements[2] = r_737458_7310515_7310579_7310642_7310703_7310763_7310822_7310880_7310937_7310993_7311782;
++c_7326009.elements[3] = ((closureN)self_7312978)->elements[2];
++c_7326009.elements[4] = ((closureN)self_7312978)->elements[3];
++c_7326009.elements[5] = ((closureN)self_7312978)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314278)->elements[2], &c_7328468, quote_v);;
++return_closcall2(data, ((closureN)self_7312978)->elements[2], &c_7326009, quote_v);;
+ }
+
+-static void __lambda_1312(void *data, object self_7314279, int argc, object *args) /* object self_7314279, object r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036 */
++static void __lambda_1265(void *data, object self_7312979, int argc, object *args) /* object self_7312979, object r_737489_7310516_7310580_7310643_7310704_7310764_7310823_7310881_7310938_7310994_7311783 */
+ {
+- object r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036 = args[0];
++ object r_737489_7310516_7310580_7310643_7310704_7310764_7310823_7310881_7310938_7310994_7311783 = args[0];
+
+-closureN_type c_7328471;
+-object e_7328547 [7];
+-c_7328471.hdr.mark = gc_color_red;
+- c_7328471.hdr.grayed = 0;
+-c_7328471.tag = closureN_tag;
+- c_7328471.fn = (function_type)__lambda_1313;
+-c_7328471.num_args = 1;
+-c_7328471.num_elements = 7;
+-c_7328471.elements = (object *)e_7328547;
+-c_7328471.elements[0] = ((closureN)self_7314279)->elements[0];
+-c_7328471.elements[1] = ((closureN)self_7314279)->elements[1];
+-c_7328471.elements[2] = ((closureN)self_7314279)->elements[2];
+-c_7328471.elements[3] = r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036;
+-c_7328471.elements[4] = ((closureN)self_7314279)->elements[3];
+-c_7328471.elements[5] = ((closureN)self_7314279)->elements[4];
+-c_7328471.elements[6] = ((closureN)self_7314279)->elements[5];
++closureN_type c_7326012;
++object e_7326088 [7];
++c_7326012.hdr.mark = gc_color_red;
++ c_7326012.hdr.grayed = 0;
++c_7326012.tag = closureN_tag;
++ c_7326012.fn = (function_type)__lambda_1266;
++c_7326012.num_args = 1;
++c_7326012.num_elements = 7;
++c_7326012.elements = (object *)e_7326088;
++c_7326012.elements[0] = ((closureN)self_7312979)->elements[0];
++c_7326012.elements[1] = ((closureN)self_7312979)->elements[1];
++c_7326012.elements[2] = ((closureN)self_7312979)->elements[2];
++c_7326012.elements[3] = r_737489_7310516_7310580_7310643_7310704_7310764_7310823_7310881_7310938_7310994_7311783;
++c_7326012.elements[4] = ((closureN)self_7312979)->elements[3];
++c_7326012.elements[5] = ((closureN)self_7312979)->elements[4];
++c_7326012.elements[6] = ((closureN)self_7312979)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7314279)->elements[3], &c_7328471, quote_cadr);;
++return_closcall2(data, ((closureN)self_7312979)->elements[3], &c_7326012, quote_cadr);;
+ }
+
+-static void __lambda_1313(void *data, object self_7314280, int argc, object *args) /* object self_7314280, object r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037 */
++static void __lambda_1266(void *data, object self_7312980, int argc, object *args) /* object self_7312980, object r_737495_7310517_7310581_7310644_7310705_7310765_7310824_7310882_7310939_7310995_7311784 */
+ {
+- object r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037 = args[0];
++ object r_737495_7310517_7310581_7310644_7310705_7310765_7310824_7310882_7310939_7310995_7311784 = args[0];
+
+-closureN_type c_7328474;
+-object e_7328546 [8];
+-c_7328474.hdr.mark = gc_color_red;
+- c_7328474.hdr.grayed = 0;
+-c_7328474.tag = closureN_tag;
+- c_7328474.fn = (function_type)__lambda_1314;
+-c_7328474.num_args = 1;
+-c_7328474.num_elements = 8;
+-c_7328474.elements = (object *)e_7328546;
+-c_7328474.elements[0] = ((closureN)self_7314280)->elements[0];
+-c_7328474.elements[1] = ((closureN)self_7314280)->elements[1];
+-c_7328474.elements[2] = ((closureN)self_7314280)->elements[2];
+-c_7328474.elements[3] = ((closureN)self_7314280)->elements[3];
+-c_7328474.elements[4] = r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037;
+-c_7328474.elements[5] = ((closureN)self_7314280)->elements[4];
+-c_7328474.elements[6] = ((closureN)self_7314280)->elements[5];
+-c_7328474.elements[7] = ((closureN)self_7314280)->elements[6];
++closureN_type c_7326015;
++object e_7326087 [8];
++c_7326015.hdr.mark = gc_color_red;
++ c_7326015.hdr.grayed = 0;
++c_7326015.tag = closureN_tag;
++ c_7326015.fn = (function_type)__lambda_1267;
++c_7326015.num_args = 1;
++c_7326015.num_elements = 8;
++c_7326015.elements = (object *)e_7326087;
++c_7326015.elements[0] = ((closureN)self_7312980)->elements[0];
++c_7326015.elements[1] = ((closureN)self_7312980)->elements[1];
++c_7326015.elements[2] = ((closureN)self_7312980)->elements[2];
++c_7326015.elements[3] = ((closureN)self_7312980)->elements[3];
++c_7326015.elements[4] = r_737495_7310517_7310581_7310644_7310705_7310765_7310824_7310882_7310939_7310995_7311784;
++c_7326015.elements[5] = ((closureN)self_7312980)->elements[4];
++c_7326015.elements[6] = ((closureN)self_7312980)->elements[5];
++c_7326015.elements[7] = ((closureN)self_7312980)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7314280)->elements[4], &c_7328474, quote_set_91cdr_67);;
++return_closcall2(data, ((closureN)self_7312980)->elements[4], &c_7326015, quote_set_91cdr_67);;
+ }
+
+-static void __lambda_1314(void *data, object self_7314281, int argc, object *args) /* object self_7314281, object r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038 */
++static void __lambda_1267(void *data, object self_7312981, int argc, object *args) /* object self_7312981, object r_737471_7310523_7310587_7310650_7310711_7310771_7310830_7310888_7310945_7311001_7311268_7311286_7311303_7311319_7311334_7311785 */
+ {
+- object r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038 = args[0];
++ object r_737471_7310523_7310587_7310650_7310711_7310771_7310830_7310888_7310945_7311001_7311268_7311286_7311303_7311319_7311334_7311785 = args[0];
+
+-closureN_type c_7328477;
+-object e_7328545 [9];
+-c_7328477.hdr.mark = gc_color_red;
+- c_7328477.hdr.grayed = 0;
+-c_7328477.tag = closureN_tag;
+- c_7328477.fn = (function_type)__lambda_1315;
+-c_7328477.num_args = 1;
+-c_7328477.num_elements = 9;
+-c_7328477.elements = (object *)e_7328545;
+-c_7328477.elements[0] = ((closureN)self_7314281)->elements[0];
+-c_7328477.elements[1] = ((closureN)self_7314281)->elements[1];
+-c_7328477.elements[2] = ((closureN)self_7314281)->elements[2];
+-c_7328477.elements[3] = r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038;
+-c_7328477.elements[4] = ((closureN)self_7314281)->elements[3];
+-c_7328477.elements[5] = ((closureN)self_7314281)->elements[4];
+-c_7328477.elements[6] = ((closureN)self_7314281)->elements[5];
+-c_7328477.elements[7] = ((closureN)self_7314281)->elements[6];
+-c_7328477.elements[8] = ((closureN)self_7314281)->elements[7];
++closureN_type c_7326018;
++object e_7326086 [9];
++c_7326018.hdr.mark = gc_color_red;
++ c_7326018.hdr.grayed = 0;
++c_7326018.tag = closureN_tag;
++ c_7326018.fn = (function_type)__lambda_1268;
++c_7326018.num_args = 1;
++c_7326018.num_elements = 9;
++c_7326018.elements = (object *)e_7326086;
++c_7326018.elements[0] = ((closureN)self_7312981)->elements[0];
++c_7326018.elements[1] = ((closureN)self_7312981)->elements[1];
++c_7326018.elements[2] = ((closureN)self_7312981)->elements[2];
++c_7326018.elements[3] = r_737471_7310523_7310587_7310650_7310711_7310771_7310830_7310888_7310945_7311001_7311268_7311286_7311303_7311319_7311334_7311785;
++c_7326018.elements[4] = ((closureN)self_7312981)->elements[3];
++c_7326018.elements[5] = ((closureN)self_7312981)->elements[4];
++c_7326018.elements[6] = ((closureN)self_7312981)->elements[5];
++c_7326018.elements[7] = ((closureN)self_7312981)->elements[6];
++c_7326018.elements[8] = ((closureN)self_7312981)->elements[7];
+
+-return_closcall2(data, ((closureN)self_7314281)->elements[5], &c_7328477, quote_cddr);;
++return_closcall2(data, ((closureN)self_7312981)->elements[5], &c_7326018, quote_cddr);;
+ }
+
+-static void __lambda_1315(void *data, object self_7314282, int argc, object *args) /* object self_7314282, object r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039 */
++static void __lambda_1268(void *data, object self_7312982, int argc, object *args) /* object self_7312982, object r_737479_7310524_7310588_7310651_7310712_7310772_7310831_7310889_7310946_7311002_7311269_7311287_7311304_7311320_7311335_7311786 */
+ {
+- object r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039 = args[0];
++ object r_737479_7310524_7310588_7310651_7310712_7310772_7310831_7310889_7310946_7311002_7311269_7311287_7311304_7311320_7311335_7311786 = args[0];
+
+-closureN_type c_7328480;
+-object e_7328544 [9];
+-c_7328480.hdr.mark = gc_color_red;
+- c_7328480.hdr.grayed = 0;
+-c_7328480.tag = closureN_tag;
+- c_7328480.fn = (function_type)__lambda_1316;
+-c_7328480.num_args = 1;
+-c_7328480.num_elements = 9;
+-c_7328480.elements = (object *)e_7328544;
+-c_7328480.elements[0] = ((closureN)self_7314282)->elements[0];
+-c_7328480.elements[1] = ((closureN)self_7314282)->elements[1];
+-c_7328480.elements[2] = ((closureN)self_7314282)->elements[2];
+-c_7328480.elements[3] = ((closureN)self_7314282)->elements[3];
+-c_7328480.elements[4] = r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039;
+-c_7328480.elements[5] = ((closureN)self_7314282)->elements[4];
+-c_7328480.elements[6] = ((closureN)self_7314282)->elements[5];
+-c_7328480.elements[7] = ((closureN)self_7314282)->elements[7];
+-c_7328480.elements[8] = ((closureN)self_7314282)->elements[8];
++closureN_type c_7326021;
++object e_7326085 [9];
++c_7326021.hdr.mark = gc_color_red;
++ c_7326021.hdr.grayed = 0;
++c_7326021.tag = closureN_tag;
++ c_7326021.fn = (function_type)__lambda_1269;
++c_7326021.num_args = 1;
++c_7326021.num_elements = 9;
++c_7326021.elements = (object *)e_7326085;
++c_7326021.elements[0] = ((closureN)self_7312982)->elements[0];
++c_7326021.elements[1] = ((closureN)self_7312982)->elements[1];
++c_7326021.elements[2] = ((closureN)self_7312982)->elements[2];
++c_7326021.elements[3] = ((closureN)self_7312982)->elements[3];
++c_7326021.elements[4] = r_737479_7310524_7310588_7310651_7310712_7310772_7310831_7310889_7310946_7311002_7311269_7311287_7311304_7311320_7311335_7311786;
++c_7326021.elements[5] = ((closureN)self_7312982)->elements[4];
++c_7326021.elements[6] = ((closureN)self_7312982)->elements[5];
++c_7326021.elements[7] = ((closureN)self_7312982)->elements[7];
++c_7326021.elements[8] = ((closureN)self_7312982)->elements[8];
+
+-return_closcall2(data, ((closureN)self_7314282)->elements[6], &c_7328480, quote_v);;
++return_closcall2(data, ((closureN)self_7312982)->elements[6], &c_7326021, quote_v);;
+ }
+
+-static void __lambda_1316(void *data, object self_7314283, int argc, object *args) /* object self_7314283, object r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040 */
++static void __lambda_1269(void *data, object self_7312983, int argc, object *args) /* object self_7312983, object r_737467_7310530_7310594_7310657_7310718_7310778_7310837_7310895_7310952_7311008_7311275_7311293_7311310_7311326_7311341_7311353_7311364_7311374_7311383_7311391_7311787 */
+ {
+- object r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040 = args[0];
++ object r_737467_7310530_7310594_7310657_7310718_7310778_7310837_7310895_7310952_7311008_7311275_7311293_7311310_7311326_7311341_7311353_7311364_7311374_7311383_7311391_7311787 = args[0];
+
+-pair_type local_7328485;
++pair_type local_7326026;
+
+-pair_type local_7328489;
++pair_type local_7326030;
+
+-pair_type local_7328493;
++pair_type local_7326034;
+
+-pair_type local_7328496;
++pair_type local_7326037;
+
+-pair_type local_7328500;
++pair_type local_7326041;
+
+-pair_type local_7328503;
++pair_type local_7326044;
+
+-pair_type local_7328506;
++pair_type local_7326047;
+
+-pair_type local_7328510;
++pair_type local_7326051;
+
+-pair_type local_7328513;
++pair_type local_7326054;
+
+-pair_type local_7328517;
++pair_type local_7326058;
+
+-pair_type local_7328521;
++pair_type local_7326062;
+
+-pair_type local_7328524;
++pair_type local_7326065;
+
+-pair_type local_7328528;
++pair_type local_7326069;
+
+-pair_type local_7328532;
++pair_type local_7326073;
+
+-pair_type local_7328535;
++pair_type local_7326076;
+
+-pair_type local_7328539;
++pair_type local_7326080;
+
+-pair_type local_7328543;
+-return_direct_with_clo1(data, ((closureN)self_7314283)->elements[0], (((closure) ((closureN)self_7314283)->elements[0])->fn), set_pair_as_expr(&local_7328485, ((closureN)self_7314283)->elements[1], set_pair_as_expr(&local_7328489, ((closureN)self_7314283)->elements[8], set_pair_as_expr(&local_7328493, set_pair_as_expr(&local_7328496, ((closureN)self_7314283)->elements[2], set_pair_as_expr(&local_7328500, set_pair_as_expr(&local_7328503, set_pair_as_expr(&local_7328506, ((closureN)self_7314283)->elements[5], set_pair_as_expr(&local_7328510, set_pair_as_expr(&local_7328513, ((closureN)self_7314283)->elements[6], set_pair_as_expr(&local_7328517, ((closureN)self_7314283)->elements[7], NULL)), NULL)), NULL), set_pair_as_expr(&local_7328521, set_pair_as_expr(&local_7328524, ((closureN)self_7314283)->elements[3], set_pair_as_expr(&local_7328528, ((closureN)self_7314283)->elements[7], set_pair_as_expr(&local_7328532, set_pair_as_expr(&local_7328535, ((closureN)self_7314283)->ele
ments[4], set_pair_as_expr(&local_7328539, ((closureN)self_7314283)->elements[7], NULL)), NULL))), set_pair_as_expr(&local_7328543, r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040, NULL)))), NULL))));;
++pair_type local_7326084;
++return_direct_with_clo1(data, ((closureN)self_7312983)->elements[0], (((closure) ((closureN)self_7312983)->elements[0])->fn), set_pair_as_expr(&local_7326026, ((closureN)self_7312983)->elements[1], set_pair_as_expr(&local_7326030, ((closureN)self_7312983)->elements[8], set_pair_as_expr(&local_7326034, set_pair_as_expr(&local_7326037, ((closureN)self_7312983)->elements[2], set_pair_as_expr(&local_7326041, set_pair_as_expr(&local_7326044, set_pair_as_expr(&local_7326047, ((closureN)self_7312983)->elements[5], set_pair_as_expr(&local_7326051, set_pair_as_expr(&local_7326054, ((closureN)self_7312983)->elements[6], set_pair_as_expr(&local_7326058, ((closureN)self_7312983)->elements[7], NULL)), NULL)), NULL), set_pair_as_expr(&local_7326062, set_pair_as_expr(&local_7326065, ((closureN)self_7312983)->elements[3], set_pair_as_expr(&local_7326069, ((closureN)self_7312983)->elements[7], set_pair_as_expr(&local_7326073, set_pair_as_expr(&local_7326076, ((closureN)self_7312983)->ele
ments[4], set_pair_as_expr(&local_7326080, ((closureN)self_7312983)->elements[7], NULL)), NULL))), set_pair_as_expr(&local_7326084, r_737467_7310530_7310594_7310657_7310718_7310778_7310837_7310895_7310952_7311008_7311275_7311293_7311310_7311326_7311341_7311353_7311364_7311374_7311383_7311391_7311787, NULL)))), NULL))));;
+ }
+
+-static void __lambda_1299(void *data, object self_7314284, int argc, object *args) /* object self_7314284, object r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022 */
++static void __lambda_1252(void *data, object self_7312984, int argc, object *args) /* object self_7312984, object r_737448_7310482_7310546_7310609_7310670_7310730_7310789_7310847_7310904_7310960_7311769 */
+ {
+- object r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022 = args[0];
++ object r_737448_7310482_7310546_7310609_7310670_7310730_7310789_7310847_7310904_7310960_7311769 = args[0];
+
+-closureN_type c_7328302;
+-object e_7328452 [10];
+-c_7328302.hdr.mark = gc_color_red;
+- c_7328302.hdr.grayed = 0;
+-c_7328302.tag = closureN_tag;
+- c_7328302.fn = (function_type)__lambda_1300;
+-c_7328302.num_args = 1;
+-c_7328302.num_elements = 10;
+-c_7328302.elements = (object *)e_7328452;
+-c_7328302.elements[0] = ((closureN)self_7314284)->elements[0];
+-c_7328302.elements[1] = ((closureN)self_7314284)->elements[1];
+-c_7328302.elements[2] = ((closureN)self_7314284)->elements[2];
+-c_7328302.elements[3] = ((closureN)self_7314284)->elements[3];
+-c_7328302.elements[4] = ((closureN)self_7314284)->elements[4];
+-c_7328302.elements[5] = ((closureN)self_7314284)->elements[5];
+-c_7328302.elements[6] = ((closureN)self_7314284)->elements[6];
+-c_7328302.elements[7] = ((closureN)self_7314284)->elements[7];
+-c_7328302.elements[8] = ((closureN)self_7314284)->elements[8];
+-c_7328302.elements[9] = ((closureN)self_7314284)->elements[9];
++closureN_type c_7325843;
++object e_7325993 [10];
++c_7325843.hdr.mark = gc_color_red;
++ c_7325843.hdr.grayed = 0;
++c_7325843.tag = closureN_tag;
++ c_7325843.fn = (function_type)__lambda_1253;
++c_7325843.num_args = 1;
++c_7325843.num_elements = 10;
++c_7325843.elements = (object *)e_7325993;
++c_7325843.elements[0] = ((closureN)self_7312984)->elements[0];
++c_7325843.elements[1] = ((closureN)self_7312984)->elements[1];
++c_7325843.elements[2] = ((closureN)self_7312984)->elements[2];
++c_7325843.elements[3] = ((closureN)self_7312984)->elements[3];
++c_7325843.elements[4] = ((closureN)self_7312984)->elements[4];
++c_7325843.elements[5] = ((closureN)self_7312984)->elements[5];
++c_7325843.elements[6] = ((closureN)self_7312984)->elements[6];
++c_7325843.elements[7] = ((closureN)self_7312984)->elements[7];
++c_7325843.elements[8] = ((closureN)self_7312984)->elements[8];
++c_7325843.elements[9] = ((closureN)self_7312984)->elements[9];
+
+
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7328302, r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314284)->elements[8])));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325843, r_737448_7310482_7310546_7310609_7310670_7310730_7310789_7310847_7310904_7310960_7311769, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312984)->elements[8])));;
+ }
+
+-static void __lambda_1300(void *data, object self_7314285, int argc, object *args) /* object self_7314285, object r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023 */
++static void __lambda_1253(void *data, object self_7312985, int argc, object *args) /* object self_7312985, object r_737389_7310483_7310547_7310610_7310671_7310731_7310790_7310848_7310905_7310961_7311770 */
+ {
+- object r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023 = args[0];
++ object r_737389_7310483_7310547_7310610_7310671_7310731_7310790_7310848_7310905_7310961_7311770 = args[0];
+
+-closureN_type c_7328305;
+-object e_7328451 [11];
+-c_7328305.hdr.mark = gc_color_red;
+- c_7328305.hdr.grayed = 0;
+-c_7328305.tag = closureN_tag;
+- c_7328305.fn = (function_type)__lambda_1301;
+-c_7328305.num_args = 1;
+-c_7328305.num_elements = 11;
+-c_7328305.elements = (object *)e_7328451;
+-c_7328305.elements[0] = ((closureN)self_7314285)->elements[0];
+-c_7328305.elements[1] = ((closureN)self_7314285)->elements[1];
+-c_7328305.elements[2] = r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023;
+-c_7328305.elements[3] = ((closureN)self_7314285)->elements[2];
+-c_7328305.elements[4] = ((closureN)self_7314285)->elements[3];
+-c_7328305.elements[5] = ((closureN)self_7314285)->elements[4];
+-c_7328305.elements[6] = ((closureN)self_7314285)->elements[5];
+-c_7328305.elements[7] = ((closureN)self_7314285)->elements[6];
+-c_7328305.elements[8] = ((closureN)self_7314285)->elements[7];
+-c_7328305.elements[9] = ((closureN)self_7314285)->elements[8];
+-c_7328305.elements[10] = ((closureN)self_7314285)->elements[9];
++closureN_type c_7325846;
++object e_7325992 [11];
++c_7325846.hdr.mark = gc_color_red;
++ c_7325846.hdr.grayed = 0;
++c_7325846.tag = closureN_tag;
++ c_7325846.fn = (function_type)__lambda_1254;
++c_7325846.num_args = 1;
++c_7325846.num_elements = 11;
++c_7325846.elements = (object *)e_7325992;
++c_7325846.elements[0] = ((closureN)self_7312985)->elements[0];
++c_7325846.elements[1] = ((closureN)self_7312985)->elements[1];
++c_7325846.elements[2] = r_737389_7310483_7310547_7310610_7310671_7310731_7310790_7310848_7310905_7310961_7311770;
++c_7325846.elements[3] = ((closureN)self_7312985)->elements[2];
++c_7325846.elements[4] = ((closureN)self_7312985)->elements[3];
++c_7325846.elements[5] = ((closureN)self_7312985)->elements[4];
++c_7325846.elements[6] = ((closureN)self_7312985)->elements[5];
++c_7325846.elements[7] = ((closureN)self_7312985)->elements[6];
++c_7325846.elements[8] = ((closureN)self_7312985)->elements[7];
++c_7325846.elements[9] = ((closureN)self_7312985)->elements[8];
++c_7325846.elements[10] = ((closureN)self_7312985)->elements[9];
+
+-return_closcall2(data, ((closureN)self_7314285)->elements[6], &c_7328305, quote_define);;
++return_closcall2(data, ((closureN)self_7312985)->elements[6], &c_7325846, quote_define);;
+ }
+
+-static void __lambda_1301(void *data, object self_7314286, int argc, object *args) /* object self_7314286, object r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024 */
++static void __lambda_1254(void *data, object self_7312986, int argc, object *args) /* object self_7312986, object r_737394_7310484_7310548_7310611_7310672_7310732_7310791_7310849_7310906_7310962_7311771 */
+ {
+- object r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024 = args[0];
++ object r_737394_7310484_7310548_7310611_7310672_7310732_7310791_7310849_7310906_7310962_7311771 = args[0];
+
+-closureN_type c_7328308;
+-object e_7328450 [12];
+-c_7328308.hdr.mark = gc_color_red;
+- c_7328308.hdr.grayed = 0;
+-c_7328308.tag = closureN_tag;
+- c_7328308.fn = (function_type)__lambda_1302;
+-c_7328308.num_args = 1;
+-c_7328308.num_elements = 12;
+-c_7328308.elements = (object *)e_7328450;
+-c_7328308.elements[0] = ((closureN)self_7314286)->elements[0];
+-c_7328308.elements[1] = ((closureN)self_7314286)->elements[1];
+-c_7328308.elements[2] = ((closureN)self_7314286)->elements[2];
+-c_7328308.elements[3] = r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024;
+-c_7328308.elements[4] = ((closureN)self_7314286)->elements[3];
+-c_7328308.elements[5] = ((closureN)self_7314286)->elements[4];
+-c_7328308.elements[6] = ((closureN)self_7314286)->elements[5];
+-c_7328308.elements[7] = ((closureN)self_7314286)->elements[6];
+-c_7328308.elements[8] = ((closureN)self_7314286)->elements[7];
+-c_7328308.elements[9] = ((closureN)self_7314286)->elements[8];
+-c_7328308.elements[10] = ((closureN)self_7314286)->elements[9];
+-c_7328308.elements[11] = ((closureN)self_7314286)->elements[10];
++closureN_type c_7325849;
++object e_7325991 [12];
++c_7325849.hdr.mark = gc_color_red;
++ c_7325849.hdr.grayed = 0;
++c_7325849.tag = closureN_tag;
++ c_7325849.fn = (function_type)__lambda_1255;
++c_7325849.num_args = 1;
++c_7325849.num_elements = 12;
++c_7325849.elements = (object *)e_7325991;
++c_7325849.elements[0] = ((closureN)self_7312986)->elements[0];
++c_7325849.elements[1] = ((closureN)self_7312986)->elements[1];
++c_7325849.elements[2] = ((closureN)self_7312986)->elements[2];
++c_7325849.elements[3] = r_737394_7310484_7310548_7310611_7310672_7310732_7310791_7310849_7310906_7310962_7311771;
++c_7325849.elements[4] = ((closureN)self_7312986)->elements[3];
++c_7325849.elements[5] = ((closureN)self_7312986)->elements[4];
++c_7325849.elements[6] = ((closureN)self_7312986)->elements[5];
++c_7325849.elements[7] = ((closureN)self_7312986)->elements[6];
++c_7325849.elements[8] = ((closureN)self_7312986)->elements[7];
++c_7325849.elements[9] = ((closureN)self_7312986)->elements[8];
++c_7325849.elements[10] = ((closureN)self_7312986)->elements[9];
++c_7325849.elements[11] = ((closureN)self_7312986)->elements[10];
+
+-return_closcall2(data, ((closureN)self_7314286)->elements[7], &c_7328308, quote_let);;
++return_closcall2(data, ((closureN)self_7312986)->elements[7], &c_7325849, quote_let);;
+ }
+
+-static void __lambda_1302(void *data, object self_7314287, int argc, object *args) /* object self_7314287, object r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025 */
++static void __lambda_1255(void *data, object self_7312987, int argc, object *args) /* object self_7312987, object r_737402_7310485_7310549_7310612_7310673_7310733_7310792_7310850_7310907_7310963_7311772 */
+ {
+- object r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025 = args[0];
++ object r_737402_7310485_7310549_7310612_7310673_7310733_7310792_7310850_7310907_7310963_7311772 = args[0];
+
+-closureN_type c_7328311;
+-object e_7328449 [13];
+-c_7328311.hdr.mark = gc_color_red;
+- c_7328311.hdr.grayed = 0;
+-c_7328311.tag = closureN_tag;
+- c_7328311.fn = (function_type)__lambda_1303;
+-c_7328311.num_args = 1;
+-c_7328311.num_elements = 13;
+-c_7328311.elements = (object *)e_7328449;
+-c_7328311.elements[0] = ((closureN)self_7314287)->elements[0];
+-c_7328311.elements[1] = ((closureN)self_7314287)->elements[1];
+-c_7328311.elements[2] = ((closureN)self_7314287)->elements[2];
+-c_7328311.elements[3] = ((closureN)self_7314287)->elements[3];
+-c_7328311.elements[4] = r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025;
+-c_7328311.elements[5] = ((closureN)self_7314287)->elements[4];
+-c_7328311.elements[6] = ((closureN)self_7314287)->elements[5];
+-c_7328311.elements[7] = ((closureN)self_7314287)->elements[6];
+-c_7328311.elements[8] = ((closureN)self_7314287)->elements[7];
+-c_7328311.elements[9] = ((closureN)self_7314287)->elements[8];
+-c_7328311.elements[10] = ((closureN)self_7314287)->elements[9];
+-c_7328311.elements[11] = ((closureN)self_7314287)->elements[10];
+-c_7328311.elements[12] = ((closureN)self_7314287)->elements[11];
++closureN_type c_7325852;
++object e_7325990 [13];
++c_7325852.hdr.mark = gc_color_red;
++ c_7325852.hdr.grayed = 0;
++c_7325852.tag = closureN_tag;
++ c_7325852.fn = (function_type)__lambda_1256;
++c_7325852.num_args = 1;
++c_7325852.num_elements = 13;
++c_7325852.elements = (object *)e_7325990;
++c_7325852.elements[0] = ((closureN)self_7312987)->elements[0];
++c_7325852.elements[1] = ((closureN)self_7312987)->elements[1];
++c_7325852.elements[2] = ((closureN)self_7312987)->elements[2];
++c_7325852.elements[3] = ((closureN)self_7312987)->elements[3];
++c_7325852.elements[4] = r_737402_7310485_7310549_7310612_7310673_7310733_7310792_7310850_7310907_7310963_7311772;
++c_7325852.elements[5] = ((closureN)self_7312987)->elements[4];
++c_7325852.elements[6] = ((closureN)self_7312987)->elements[5];
++c_7325852.elements[7] = ((closureN)self_7312987)->elements[6];
++c_7325852.elements[8] = ((closureN)self_7312987)->elements[7];
++c_7325852.elements[9] = ((closureN)self_7312987)->elements[8];
++c_7325852.elements[10] = ((closureN)self_7312987)->elements[9];
++c_7325852.elements[11] = ((closureN)self_7312987)->elements[10];
++c_7325852.elements[12] = ((closureN)self_7312987)->elements[11];
+
+-return_closcall2(data, ((closureN)self_7314287)->elements[8], &c_7328311, quote_v);;
++return_closcall2(data, ((closureN)self_7312987)->elements[8], &c_7325852, quote_v);;
+ }
+
+-static void __lambda_1303(void *data, object self_7314288, int argc, object *args) /* object self_7314288, object r_738208_7311739_7311803_7311866_7311927_7311987_7312046_7312104_7312161_7312217_7313026 */
++static void __lambda_1256(void *data, object self_7312988, int argc, object *args) /* object self_7312988, object r_737433_7310486_7310550_7310613_7310674_7310734_7310793_7310851_7310908_7310964_7311773 */
+ {
+- object r_738208_7311739_7311803_7311866_7311927_7311987_7312046_7312104_7312161_7312217_7313026 = args[0];
++ object r_737433_7310486_7310550_7310613_7310674_7310734_7310793_7310851_7310908_7310964_7311773 = args[0];
+
+-closureN_type c_7328314;
+-object e_7328448 [14];
+-c_7328314.hdr.mark = gc_color_red;
+- c_7328314.hdr.grayed = 0;
+-c_7328314.tag = closureN_tag;
+- c_7328314.fn = (function_type)__lambda_1304;
+-c_7328314.num_args = 1;
+-c_7328314.num_elements = 14;
+-c_7328314.elements = (object *)e_7328448;
+-c_7328314.elements[0] = ((closureN)self_7314288)->elements[0];
+-c_7328314.elements[1] = ((closureN)self_7314288)->elements[1];
+-c_7328314.elements[2] = ((closureN)self_7314288)->elements[2];
+-c_7328314.elements[3] = ((closureN)self_7314288)->elements[3];
+-c_7328314.elements[4] = ((closureN)self_7314288)->elements[4];
+-c_7328314.elements[5] = r_738208_7311739_7311803_7311866_7311927_7311987_7312046_7312104_7312161_7312217_7313026;
+-c_7328314.elements[6] = ((closureN)self_7314288)->elements[5];
+-c_7328314.elements[7] = ((closureN)self_7314288)->elements[6];
+-c_7328314.elements[8] = ((closureN)self_7314288)->elements[7];
+-c_7328314.elements[9] = ((closureN)self_7314288)->elements[8];
+-c_7328314.elements[10] = ((closureN)self_7314288)->elements[9];
+-c_7328314.elements[11] = ((closureN)self_7314288)->elements[10];
+-c_7328314.elements[12] = ((closureN)self_7314288)->elements[11];
+-c_7328314.elements[13] = ((closureN)self_7314288)->elements[12];
++closureN_type c_7325855;
++object e_7325989 [14];
++c_7325855.hdr.mark = gc_color_red;
++ c_7325855.hdr.grayed = 0;
++c_7325855.tag = closureN_tag;
++ c_7325855.fn = (function_type)__lambda_1257;
++c_7325855.num_args = 1;
++c_7325855.num_elements = 14;
++c_7325855.elements = (object *)e_7325989;
++c_7325855.elements[0] = ((closureN)self_7312988)->elements[0];
++c_7325855.elements[1] = ((closureN)self_7312988)->elements[1];
++c_7325855.elements[2] = ((closureN)self_7312988)->elements[2];
++c_7325855.elements[3] = ((closureN)self_7312988)->elements[3];
++c_7325855.elements[4] = ((closureN)self_7312988)->elements[4];
++c_7325855.elements[5] = r_737433_7310486_7310550_7310613_7310674_7310734_7310793_7310851_7310908_7310964_7311773;
++c_7325855.elements[6] = ((closureN)self_7312988)->elements[5];
++c_7325855.elements[7] = ((closureN)self_7312988)->elements[6];
++c_7325855.elements[8] = ((closureN)self_7312988)->elements[7];
++c_7325855.elements[9] = ((closureN)self_7312988)->elements[8];
++c_7325855.elements[10] = ((closureN)self_7312988)->elements[9];
++c_7325855.elements[11] = ((closureN)self_7312988)->elements[10];
++c_7325855.elements[12] = ((closureN)self_7312988)->elements[11];
++c_7325855.elements[13] = ((closureN)self_7312988)->elements[12];
+
+-return_closcall2(data, ((closureN)self_7314288)->elements[9], &c_7328314, quote_cadr);;
++return_closcall2(data, ((closureN)self_7312988)->elements[9], &c_7325855, quote_cadr);;
+ }
+
+-static void __lambda_1304(void *data, object self_7314289, int argc, object *args) /* object self_7314289, object r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027 */
++static void __lambda_1257(void *data, object self_7312989, int argc, object *args) /* object self_7312989, object r_737439_7310487_7310551_7310614_7310675_7310735_7310794_7310852_7310909_7310965_7311774 */
+ {
+- object r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027 = args[0];
++ object r_737439_7310487_7310551_7310614_7310675_7310735_7310794_7310852_7310909_7310965_7311774 = args[0];
+
+-closureN_type c_7328317;
+-object e_7328447 [15];
+-c_7328317.hdr.mark = gc_color_red;
+- c_7328317.hdr.grayed = 0;
+-c_7328317.tag = closureN_tag;
+- c_7328317.fn = (function_type)__lambda_1305;
+-c_7328317.num_args = 1;
+-c_7328317.num_elements = 15;
+-c_7328317.elements = (object *)e_7328447;
+-c_7328317.elements[0] = ((closureN)self_7314289)->elements[0];
+-c_7328317.elements[1] = ((closureN)self_7314289)->elements[1];
+-c_7328317.elements[2] = ((closureN)self_7314289)->elements[2];
+-c_7328317.elements[3] = ((closureN)self_7314289)->elements[3];
+-c_7328317.elements[4] = ((closureN)self_7314289)->elements[4];
+-c_7328317.elements[5] = ((closureN)self_7314289)->elements[5];
+-c_7328317.elements[6] = r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027;
+-c_7328317.elements[7] = ((closureN)self_7314289)->elements[6];
+-c_7328317.elements[8] = ((closureN)self_7314289)->elements[7];
+-c_7328317.elements[9] = ((closureN)self_7314289)->elements[8];
+-c_7328317.elements[10] = ((closureN)self_7314289)->elements[9];
+-c_7328317.elements[11] = ((closureN)self_7314289)->elements[10];
+-c_7328317.elements[12] = ((closureN)self_7314289)->elements[11];
+-c_7328317.elements[13] = ((closureN)self_7314289)->elements[12];
+-c_7328317.elements[14] = ((closureN)self_7314289)->elements[13];
++closureN_type c_7325858;
++object e_7325988 [15];
++c_7325858.hdr.mark = gc_color_red;
++ c_7325858.hdr.grayed = 0;
++c_7325858.tag = closureN_tag;
++ c_7325858.fn = (function_type)__lambda_1258;
++c_7325858.num_args = 1;
++c_7325858.num_elements = 15;
++c_7325858.elements = (object *)e_7325988;
++c_7325858.elements[0] = ((closureN)self_7312989)->elements[0];
++c_7325858.elements[1] = ((closureN)self_7312989)->elements[1];
++c_7325858.elements[2] = ((closureN)self_7312989)->elements[2];
++c_7325858.elements[3] = ((closureN)self_7312989)->elements[3];
++c_7325858.elements[4] = ((closureN)self_7312989)->elements[4];
++c_7325858.elements[5] = ((closureN)self_7312989)->elements[5];
++c_7325858.elements[6] = r_737439_7310487_7310551_7310614_7310675_7310735_7310794_7310852_7310909_7310965_7311774;
++c_7325858.elements[7] = ((closureN)self_7312989)->elements[6];
++c_7325858.elements[8] = ((closureN)self_7312989)->elements[7];
++c_7325858.elements[9] = ((closureN)self_7312989)->elements[8];
++c_7325858.elements[10] = ((closureN)self_7312989)->elements[9];
++c_7325858.elements[11] = ((closureN)self_7312989)->elements[10];
++c_7325858.elements[12] = ((closureN)self_7312989)->elements[11];
++c_7325858.elements[13] = ((closureN)self_7312989)->elements[12];
++c_7325858.elements[14] = ((closureN)self_7312989)->elements[13];
+
+-return_closcall2(data, ((closureN)self_7314289)->elements[10], &c_7328317, quote_set_67);;
++return_closcall2(data, ((closureN)self_7312989)->elements[10], &c_7325858, quote_set_67);;
+ }
+
+-static void __lambda_1305(void *data, object self_7314290, int argc, object *args) /* object self_7314290, object r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028 */
++static void __lambda_1258(void *data, object self_7312990, int argc, object *args) /* object self_7312990, object r_737415_7310493_7310557_7310620_7310681_7310741_7310800_7310858_7310915_7310971_7311020_7311043_7311065_7311086_7311106_7311775 */
+ {
+- object r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028 = args[0];
++ object r_737415_7310493_7310557_7310620_7310681_7310741_7310800_7310858_7310915_7310971_7311020_7311043_7311065_7311086_7311106_7311775 = args[0];
+
+-closureN_type c_7328320;
+-object e_7328446 [16];
+-c_7328320.hdr.mark = gc_color_red;
+- c_7328320.hdr.grayed = 0;
+-c_7328320.tag = closureN_tag;
+- c_7328320.fn = (function_type)__lambda_1306;
+-c_7328320.num_args = 1;
+-c_7328320.num_elements = 16;
+-c_7328320.elements = (object *)e_7328446;
+-c_7328320.elements[0] = ((closureN)self_7314290)->elements[0];
+-c_7328320.elements[1] = ((closureN)self_7314290)->elements[1];
+-c_7328320.elements[2] = ((closureN)self_7314290)->elements[2];
+-c_7328320.elements[3] = ((closureN)self_7314290)->elements[3];
+-c_7328320.elements[4] = ((closureN)self_7314290)->elements[4];
+-c_7328320.elements[5] = r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028;
+-c_7328320.elements[6] = ((closureN)self_7314290)->elements[5];
+-c_7328320.elements[7] = ((closureN)self_7314290)->elements[6];
+-c_7328320.elements[8] = ((closureN)self_7314290)->elements[7];
+-c_7328320.elements[9] = ((closureN)self_7314290)->elements[8];
+-c_7328320.elements[10] = ((closureN)self_7314290)->elements[9];
+-c_7328320.elements[11] = ((closureN)self_7314290)->elements[10];
+-c_7328320.elements[12] = ((closureN)self_7314290)->elements[11];
+-c_7328320.elements[13] = ((closureN)self_7314290)->elements[12];
+-c_7328320.elements[14] = ((closureN)self_7314290)->elements[13];
+-c_7328320.elements[15] = ((closureN)self_7314290)->elements[14];
++closureN_type c_7325861;
++object e_7325987 [16];
++c_7325861.hdr.mark = gc_color_red;
++ c_7325861.hdr.grayed = 0;
++c_7325861.tag = closureN_tag;
++ c_7325861.fn = (function_type)__lambda_1259;
++c_7325861.num_args = 1;
++c_7325861.num_elements = 16;
++c_7325861.elements = (object *)e_7325987;
++c_7325861.elements[0] = ((closureN)self_7312990)->elements[0];
++c_7325861.elements[1] = ((closureN)self_7312990)->elements[1];
++c_7325861.elements[2] = ((closureN)self_7312990)->elements[2];
++c_7325861.elements[3] = ((closureN)self_7312990)->elements[3];
++c_7325861.elements[4] = ((closureN)self_7312990)->elements[4];
++c_7325861.elements[5] = r_737415_7310493_7310557_7310620_7310681_7310741_7310800_7310858_7310915_7310971_7311020_7311043_7311065_7311086_7311106_7311775;
++c_7325861.elements[6] = ((closureN)self_7312990)->elements[5];
++c_7325861.elements[7] = ((closureN)self_7312990)->elements[6];
++c_7325861.elements[8] = ((closureN)self_7312990)->elements[7];
++c_7325861.elements[9] = ((closureN)self_7312990)->elements[8];
++c_7325861.elements[10] = ((closureN)self_7312990)->elements[9];
++c_7325861.elements[11] = ((closureN)self_7312990)->elements[10];
++c_7325861.elements[12] = ((closureN)self_7312990)->elements[11];
++c_7325861.elements[13] = ((closureN)self_7312990)->elements[12];
++c_7325861.elements[14] = ((closureN)self_7312990)->elements[13];
++c_7325861.elements[15] = ((closureN)self_7312990)->elements[14];
+
+-return_closcall2(data, ((closureN)self_7314290)->elements[11], &c_7328320, quote_car);;
++return_closcall2(data, ((closureN)self_7312990)->elements[11], &c_7325861, quote_car);;
+ }
+
+-static void __lambda_1306(void *data, object self_7314291, int argc, object *args) /* object self_7314291, object r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029 */
++static void __lambda_1259(void *data, object self_7312991, int argc, object *args) /* object self_7312991, object r_737423_7310494_7310558_7310621_7310682_7310742_7310801_7310859_7310916_7310972_7311021_7311044_7311066_7311087_7311107_7311776 */
+ {
+- object r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029 = args[0];
++ object r_737423_7310494_7310558_7310621_7310682_7310742_7310801_7310859_7310916_7310972_7311021_7311044_7311066_7311087_7311107_7311776 = args[0];
+
+-closureN_type c_7328323;
+-object e_7328445 [16];
+-c_7328323.hdr.mark = gc_color_red;
+- c_7328323.hdr.grayed = 0;
+-c_7328323.tag = closureN_tag;
+- c_7328323.fn = (function_type)__lambda_1307;
+-c_7328323.num_args = 1;
+-c_7328323.num_elements = 16;
+-c_7328323.elements = (object *)e_7328445;
+-c_7328323.elements[0] = ((closureN)self_7314291)->elements[0];
+-c_7328323.elements[1] = ((closureN)self_7314291)->elements[1];
+-c_7328323.elements[2] = ((closureN)self_7314291)->elements[2];
+-c_7328323.elements[3] = ((closureN)self_7314291)->elements[3];
+-c_7328323.elements[4] = ((closureN)self_7314291)->elements[4];
+-c_7328323.elements[5] = ((closureN)self_7314291)->elements[5];
+-c_7328323.elements[6] = r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029;
+-c_7328323.elements[7] = ((closureN)self_7314291)->elements[6];
+-c_7328323.elements[8] = ((closureN)self_7314291)->elements[7];
+-c_7328323.elements[9] = ((closureN)self_7314291)->elements[8];
+-c_7328323.elements[10] = ((closureN)self_7314291)->elements[9];
+-c_7328323.elements[11] = ((closureN)self_7314291)->elements[10];
+-c_7328323.elements[12] = ((closureN)self_7314291)->elements[11];
+-c_7328323.elements[13] = ((closureN)self_7314291)->elements[13];
+-c_7328323.elements[14] = ((closureN)self_7314291)->elements[14];
+-c_7328323.elements[15] = ((closureN)self_7314291)->elements[15];
++closureN_type c_7325864;
++object e_7325986 [16];
++c_7325864.hdr.mark = gc_color_red;
++ c_7325864.hdr.grayed = 0;
++c_7325864.tag = closureN_tag;
++ c_7325864.fn = (function_type)__lambda_1260;
++c_7325864.num_args = 1;
++c_7325864.num_elements = 16;
++c_7325864.elements = (object *)e_7325986;
++c_7325864.elements[0] = ((closureN)self_7312991)->elements[0];
++c_7325864.elements[1] = ((closureN)self_7312991)->elements[1];
++c_7325864.elements[2] = ((closureN)self_7312991)->elements[2];
++c_7325864.elements[3] = ((closureN)self_7312991)->elements[3];
++c_7325864.elements[4] = ((closureN)self_7312991)->elements[4];
++c_7325864.elements[5] = ((closureN)self_7312991)->elements[5];
++c_7325864.elements[6] = r_737423_7310494_7310558_7310621_7310682_7310742_7310801_7310859_7310916_7310972_7311021_7311044_7311066_7311087_7311107_7311776;
++c_7325864.elements[7] = ((closureN)self_7312991)->elements[6];
++c_7325864.elements[8] = ((closureN)self_7312991)->elements[7];
++c_7325864.elements[9] = ((closureN)self_7312991)->elements[8];
++c_7325864.elements[10] = ((closureN)self_7312991)->elements[9];
++c_7325864.elements[11] = ((closureN)self_7312991)->elements[10];
++c_7325864.elements[12] = ((closureN)self_7312991)->elements[11];
++c_7325864.elements[13] = ((closureN)self_7312991)->elements[13];
++c_7325864.elements[14] = ((closureN)self_7312991)->elements[14];
++c_7325864.elements[15] = ((closureN)self_7312991)->elements[15];
+
+-return_closcall2(data, ((closureN)self_7314291)->elements[12], &c_7328323, quote_v);;
++return_closcall2(data, ((closureN)self_7312991)->elements[12], &c_7325864, quote_v);;
+ }
+
+-static void __lambda_1307(void *data, object self_7314292, int argc, object *args) /* object self_7314292, object r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030 */
++static void __lambda_1260(void *data, object self_7312992, int argc, object *args) /* object self_7312992, object r_737411_7310500_7310564_7310627_7310688_7310748_7310807_7310865_7310922_7310978_7311027_7311050_7311072_7311093_7311113_7311130_7311146_7311161_7311175_7311188_7311777 */
+ {
+- object r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030 = args[0];
++ object r_737411_7310500_7310564_7310627_7310688_7310748_7310807_7310865_7310922_7310978_7311027_7311050_7311072_7311093_7311113_7311130_7311146_7311161_7311175_7311188_7311777 = args[0];
+
+-closureN_type c_7328325;
+-object e_7328375 [8];
+-c_7328325.hdr.mark = gc_color_red;
+- c_7328325.hdr.grayed = 0;
+-c_7328325.tag = closureN_tag;
+- c_7328325.fn = (function_type)__lambda_1308;
+-c_7328325.num_args = 1;
+-c_7328325.num_elements = 8;
+-c_7328325.elements = (object *)e_7328375;
+-c_7328325.elements[0] = ((closureN)self_7314292)->elements[0];
+-c_7328325.elements[1] = ((closureN)self_7314292)->elements[1];
+-c_7328325.elements[2] = ((closureN)self_7314292)->elements[9];
+-c_7328325.elements[3] = ((closureN)self_7314292)->elements[10];
+-c_7328325.elements[4] = ((closureN)self_7314292)->elements[11];
+-c_7328325.elements[5] = ((closureN)self_7314292)->elements[12];
+-c_7328325.elements[6] = ((closureN)self_7314292)->elements[13];
+-c_7328325.elements[7] = ((closureN)self_7314292)->elements[15];
++closureN_type c_7325866;
++object e_7325916 [8];
++c_7325866.hdr.mark = gc_color_red;
++ c_7325866.hdr.grayed = 0;
++c_7325866.tag = closureN_tag;
++ c_7325866.fn = (function_type)__lambda_1261;
++c_7325866.num_args = 1;
++c_7325866.num_elements = 8;
++c_7325866.elements = (object *)e_7325916;
++c_7325866.elements[0] = ((closureN)self_7312992)->elements[0];
++c_7325866.elements[1] = ((closureN)self_7312992)->elements[1];
++c_7325866.elements[2] = ((closureN)self_7312992)->elements[9];
++c_7325866.elements[3] = ((closureN)self_7312992)->elements[10];
++c_7325866.elements[4] = ((closureN)self_7312992)->elements[11];
++c_7325866.elements[5] = ((closureN)self_7312992)->elements[12];
++c_7325866.elements[6] = ((closureN)self_7312992)->elements[13];
++c_7325866.elements[7] = ((closureN)self_7312992)->elements[15];
+
+
+-pair_type local_7328379;
++pair_type local_7325920;
+
+-pair_type local_7328382;
++pair_type local_7325923;
+
+-pair_type local_7328386;
++pair_type local_7325927;
+
+
+
+
+
+-pair_type local_7328394;
++pair_type local_7325935;
+
+-pair_type local_7328397;
++pair_type local_7325938;
+
+-pair_type local_7328401;
++pair_type local_7325942;
+
+-pair_type local_7328404;
++pair_type local_7325945;
+
+-pair_type local_7328407;
++pair_type local_7325948;
+
+-pair_type local_7328411;
++pair_type local_7325952;
+
+-pair_type local_7328414;
++pair_type local_7325955;
+
+-pair_type local_7328418;
++pair_type local_7325959;
+
+-pair_type local_7328422;
++pair_type local_7325963;
+
+-pair_type local_7328425;
++pair_type local_7325966;
+
+-pair_type local_7328429;
++pair_type local_7325970;
+
+-pair_type local_7328433;
++pair_type local_7325974;
+
+-pair_type local_7328436;
++pair_type local_7325977;
+
+-pair_type local_7328440;
++pair_type local_7325981;
+
+-pair_type local_7328444;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7328325, ((closureN)self_7314292)->elements[2], set_pair_as_expr(&local_7328379, set_pair_as_expr(&local_7328382, ((closureN)self_7314292)->elements[3], set_pair_as_expr(&local_7328386, Cyc_car(data, Cyc_car(data, ((closureN)self_7314292)->elements[14])), set_pair_as_expr(&local_7328394, set_pair_as_expr(&local_7328397, ((closureN)self_7314292)->elements[4], set_pair_as_expr(&local_7328401, set_pair_as_expr(&local_7328404, set_pair_as_expr(&local_7328407, ((closureN)self_7314292)->elements[7], set_pair_as_expr(&local_7328411, set_pair_as_expr(&local_7328414, ((closureN)self_7314292)->elements[8], set_pair_as_expr(&local_7328418, ((closureN)self_7314292)->elements[15], NULL)), NULL)), NULL), set_pair_as_expr(&local_7328422, set_pair_as_expr(&local_7328425, ((closureN)self_7314292)->elements[5], set_pair_as_expr(&local_7328429, ((closureN)self_7314292)->elements[15], set_
pair_as_expr(&local_7328433, set_pair_as_expr(&local_7328436, ((closureN)self_7314292)->elements[6], set_pair_as_expr(&local_7328440, ((closureN)self_7314292)->elements[15], NULL)), NULL))), set_pair_as_expr(&local_7328444, r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030, NULL)))), NULL))), NULL));;
++pair_type local_7325985;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325866, ((closureN)self_7312992)->elements[2], set_pair_as_expr(&local_7325920, set_pair_as_expr(&local_7325923, ((closureN)self_7312992)->elements[3], set_pair_as_expr(&local_7325927, Cyc_car(data, Cyc_car(data, ((closureN)self_7312992)->elements[14])), set_pair_as_expr(&local_7325935, set_pair_as_expr(&local_7325938, ((closureN)self_7312992)->elements[4], set_pair_as_expr(&local_7325942, set_pair_as_expr(&local_7325945, set_pair_as_expr(&local_7325948, ((closureN)self_7312992)->elements[7], set_pair_as_expr(&local_7325952, set_pair_as_expr(&local_7325955, ((closureN)self_7312992)->elements[8], set_pair_as_expr(&local_7325959, ((closureN)self_7312992)->elements[15], NULL)), NULL)), NULL), set_pair_as_expr(&local_7325963, set_pair_as_expr(&local_7325966, ((closureN)self_7312992)->elements[5], set_pair_as_expr(&local_7325970, ((closureN)self_7312992)->elements[15], set_
pair_as_expr(&local_7325974, set_pair_as_expr(&local_7325977, ((closureN)self_7312992)->elements[6], set_pair_as_expr(&local_7325981, ((closureN)self_7312992)->elements[15], NULL)), NULL))), set_pair_as_expr(&local_7325985, r_737411_7310500_7310564_7310627_7310688_7310748_7310807_7310865_7310922_7310978_7311027_7311050_7311072_7311093_7311113_7311130_7311146_7311161_7311175_7311188_7311777, NULL)))), NULL))), NULL));;
+ }
+
+-static void __lambda_1308(void *data, object self_7314293, int argc, object *args) /* object self_7314293, object r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031 */
++static void __lambda_1261(void *data, object self_7312993, int argc, object *args) /* object self_7312993, object r_737387_7310509_7310573_7310636_7310697_7310757_7310816_7310874_7310931_7310987_7311036_7311059_7311081_7311102_7311122_7311139_7311155_7311170_7311184_7311197_7311208_7311218_7311227_7311235_7311242_7311248_7311253_7311257_7311778 */
+ {
+- object r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031 = args[0];
++ object r_737387_7310509_7310573_7310636_7310697_7310757_7310816_7310874_7310931_7310987_7311036_7311059_7311081_7311102_7311122_7311139_7311155_7311170_7311184_7311197_7311208_7311218_7311227_7311235_7311242_7311248_7311253_7311257_7311778 = args[0];
+
+-pair_type local_7328330;
++pair_type local_7325871;
+
+-pair_type local_7328333;
++pair_type local_7325874;
+
+-pair_type local_7328337;
++pair_type local_7325878;
+
+-pair_type local_7328340;
++pair_type local_7325881;
+
+-pair_type local_7328344;
++pair_type local_7325885;
+
+-pair_type local_7328348;
++pair_type local_7325889;
+
+-pair_type local_7328351;
++pair_type local_7325892;
+
+-pair_type local_7328355;
++pair_type local_7325896;
+
+-pair_type local_7328358;
++pair_type local_7325899;
+
+-pair_type local_7328362;
++pair_type local_7325903;
+
+-pair_type local_7328365;
++pair_type local_7325906;
+
+
+
+
+
+-pair_type local_7328373;
+-return_direct_with_clo1(data, ((closureN)self_7314293)->elements[0], (((closure) ((closureN)self_7314293)->elements[0])->fn), set_pair_as_expr(&local_7328330, set_pair_as_expr(&local_7328333, ((closureN)self_7314293)->elements[1], set_pair_as_expr(&local_7328337, set_pair_as_expr(&local_7328340, ((closureN)self_7314293)->elements[2], set_pair_as_expr(&local_7328344, ((closureN)self_7314293)->elements[7], set_pair_as_expr(&local_7328348, set_pair_as_expr(&local_7328351, ((closureN)self_7314293)->elements[3], set_pair_as_expr(&local_7328355, set_pair_as_expr(&local_7328358, ((closureN)self_7314293)->elements[5], set_pair_as_expr(&local_7328362, NULL, set_pair_as_expr(&local_7328365, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314293)->elements[6])), NULL))), set_pair_as_expr(&local_7328373, ((closureN)self_7314293)->elements[4], NULL))), NULL))), r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_731239
2_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031)), boolean_f));;
++pair_type local_7325914;
++return_direct_with_clo1(data, ((closureN)self_7312993)->elements[0], (((closure) ((closureN)self_7312993)->elements[0])->fn), set_pair_as_expr(&local_7325871, set_pair_as_expr(&local_7325874, ((closureN)self_7312993)->elements[1], set_pair_as_expr(&local_7325878, set_pair_as_expr(&local_7325881, ((closureN)self_7312993)->elements[2], set_pair_as_expr(&local_7325885, ((closureN)self_7312993)->elements[7], set_pair_as_expr(&local_7325889, set_pair_as_expr(&local_7325892, ((closureN)self_7312993)->elements[3], set_pair_as_expr(&local_7325896, set_pair_as_expr(&local_7325899, ((closureN)self_7312993)->elements[5], set_pair_as_expr(&local_7325903, NULL, set_pair_as_expr(&local_7325906, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312993)->elements[6])), NULL))), set_pair_as_expr(&local_7325914, ((closureN)self_7312993)->elements[4], NULL))), NULL))), r_737387_7310509_7310573_7310636_7310697_7310757_7310816_7310874_7310931_7310987_7311036_7311059_7311081_7311102_7311122_731113
9_7311155_7311170_7311184_7311197_7311208_7311218_7311227_7311235_7311242_7311248_7311253_7311257_7311778)), boolean_f));;
+ }
+
+-static void __lambda_1289(void *data, object self_7314294, int argc, object *args) /* object self_7314294, object r_738136 */
++static void __lambda_1242(void *data, object self_7312994, int argc, object *args) /* object self_7312994, object r_737361 */
+ {
+- object r_738136 = args[0];
++ object r_737361 = args[0];
+
+-closureN_type c_7328222;
+-object e_7328231 [5];
+-c_7328222.hdr.mark = gc_color_red;
+- c_7328222.hdr.grayed = 0;
+-c_7328222.tag = closureN_tag;
+- c_7328222.fn = (function_type)__lambda_1290;
+-c_7328222.num_args = 1;
+-c_7328222.num_elements = 5;
+-c_7328222.elements = (object *)e_7328231;
+-c_7328222.elements[0] = ((closureN)self_7314294)->elements[0];
+-c_7328222.elements[1] = ((closureN)self_7314294)->elements[1];
+-c_7328222.elements[2] = ((closureN)self_7314294)->elements[2];
+-c_7328222.elements[3] = ((closureN)self_7314294)->elements[3];
+-c_7328222.elements[4] = ((closureN)self_7314294)->elements[4];
++closureN_type c_7325763;
++object e_7325772 [5];
++c_7325763.hdr.mark = gc_color_red;
++ c_7325763.hdr.grayed = 0;
++c_7325763.tag = closureN_tag;
++ c_7325763.fn = (function_type)__lambda_1243;
++c_7325763.num_args = 1;
++c_7325763.num_elements = 5;
++c_7325763.elements = (object *)e_7325772;
++c_7325763.elements[0] = ((closureN)self_7312994)->elements[0];
++c_7325763.elements[1] = ((closureN)self_7312994)->elements[1];
++c_7325763.elements[2] = ((closureN)self_7312994)->elements[2];
++c_7325763.elements[3] = ((closureN)self_7312994)->elements[3];
++c_7325763.elements[4] = ((closureN)self_7312994)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7328222,__lambda_1290, Cyc_set_cell(data, ((closureN)self_7314294)->elements[2], r_738136));;
++return_direct_with_clo1(data,(closure)&c_7325763,__lambda_1243, Cyc_set_cell(data, ((closureN)self_7312994)->elements[2], r_737361));;
+ }
+
+-static void __lambda_1290(void *data, object self_7314295, int argc, object *args) /* object self_7314295, object r_738135 */
++static void __lambda_1243(void *data, object self_7312995, int argc, object *args) /* object self_7312995, object r_737360 */
+ {
+
+
+
+-return_closcall4(data, car(((closureN)self_7314295)->elements[2]), ((closureN)self_7314295)->elements[1], ((closureN)self_7314295)->elements[3], ((closureN)self_7314295)->elements[0], ((closureN)self_7314295)->elements[4]);;
++return_closcall4(data, car(((closureN)self_7312995)->elements[2]), ((closureN)self_7312995)->elements[1], ((closureN)self_7312995)->elements[3], ((closureN)self_7312995)->elements[0], ((closureN)self_7312995)->elements[4]);;
+ }
+
+-static void __lambda_1281(void *data, object self_7314296, int argc, object *args) /* object self_7314296, object k_738317 */
++static void __lambda_1234(void *data, object self_7312996, int argc, object *args) /* object self_7312996, object k_737542 */
+ {
+- object k_738317 = args[0];
++ object k_737542 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314296)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312996)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314296)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312996)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314296)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312996)->elements[1])))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314296)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312996)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314296)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312996)->elements[1])))) ){
+
+-closureN_type c_7328155;
+-object e_7328180 [2];
+-c_7328155.hdr.mark = gc_color_red;
+- c_7328155.hdr.grayed = 0;
+-c_7328155.tag = closureN_tag;
+- c_7328155.fn = (function_type)__lambda_1282;
+-c_7328155.num_args = 1;
+-c_7328155.num_elements = 2;
+-c_7328155.elements = (object *)e_7328180;
+-c_7328155.elements[0] = k_738317;
+-c_7328155.elements[1] = ((closureN)self_7314296)->elements[1];
++closureN_type c_7325696;
++object e_7325721 [2];
++c_7325696.hdr.mark = gc_color_red;
++ c_7325696.hdr.grayed = 0;
++c_7325696.tag = closureN_tag;
++ c_7325696.fn = (function_type)__lambda_1235;
++c_7325696.num_args = 1;
++c_7325696.num_elements = 2;
++c_7325696.elements = (object *)e_7325721;
++c_7325696.elements[0] = k_737542;
++c_7325696.elements[1] = ((closureN)self_7312996)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314296)->elements[0], &c_7328155, quote_define);
++return_closcall2(data, ((closureN)self_7312996)->elements[0], &c_7325696, quote_define);
+ } else {
+- return_direct_with_clo1(data, k_738317, (((closure) k_738317)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737542, (((closure) k_737542)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738317, (((closure) k_738317)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737542, (((closure) k_737542)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738317, (((closure) k_738317)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737542, (((closure) k_737542)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738317, (((closure) k_738317)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737542, (((closure) k_737542)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738317, (((closure) k_738317)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737542, (((closure) k_737542)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1282(void *data, object self_7314297, int argc, object *args) /* object self_7314297, object r_738330 */
++static void __lambda_1235(void *data, object self_7312997, int argc, object *args) /* object self_7312997, object r_737555 */
+ {
+- object r_738330 = args[0];
++ object r_737555 = args[0];
+
+-pair_type local_7328160;
++pair_type local_7325701;
+
+-pair_type local_7328163;
++pair_type local_7325704;
+
+-pair_type local_7328166;
++pair_type local_7325707;
+
+
+
+
+
+-pair_type local_7328174;
++pair_type local_7325715;
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314297)->elements[0], (((closure) ((closureN)self_7314297)->elements[0])->fn), set_pair_as_expr(&local_7328160, set_pair_as_expr(&local_7328163, r_738330, set_pair_as_expr(&local_7328166, Cyc_car(data, Cyc_car(data, ((closureN)self_7314297)->elements[1])), set_pair_as_expr(&local_7328174, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314297)->elements[1])), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312997)->elements[0], (((closure) ((closureN)self_7312997)->elements[0])->fn), set_pair_as_expr(&local_7325701, set_pair_as_expr(&local_7325704, r_737555, set_pair_as_expr(&local_7325707, Cyc_car(data, Cyc_car(data, ((closureN)self_7312997)->elements[1])), set_pair_as_expr(&local_7325715, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312997)->elements[1])), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1271(void *data, object self_7314298, int argc, object *args) /* object self_7314298, object k_738339 */
++static void __lambda_1224(void *data, object self_7312998, int argc, object *args) /* object self_7312998, object k_737564 */
+ {
+- object k_738339 = args[0];
++ object k_737564 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314298)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312998)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7314298)->elements[1]))) ){
++if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7312998)->elements[1]))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314298)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312998)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314298)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312998)->elements[1])))) ){
+
+-closureN_type c_7328038;
+-object e_7328110 [3];
+-c_7328038.hdr.mark = gc_color_red;
+- c_7328038.hdr.grayed = 0;
+-c_7328038.tag = closureN_tag;
+- c_7328038.fn = (function_type)__lambda_1272;
+-c_7328038.num_args = 1;
+-c_7328038.num_elements = 3;
+-c_7328038.elements = (object *)e_7328110;
+-c_7328038.elements[0] = k_738339;
+-c_7328038.elements[1] = ((closureN)self_7314298)->elements[0];
+-c_7328038.elements[2] = ((closureN)self_7314298)->elements[1];
++closureN_type c_7325579;
++object e_7325651 [3];
++c_7325579.hdr.mark = gc_color_red;
++ c_7325579.hdr.grayed = 0;
++c_7325579.tag = closureN_tag;
++ c_7325579.fn = (function_type)__lambda_1225;
++c_7325579.num_args = 1;
++c_7325579.num_elements = 3;
++c_7325579.elements = (object *)e_7325651;
++c_7325579.elements[0] = k_737564;
++c_7325579.elements[1] = ((closureN)self_7312998)->elements[0];
++c_7325579.elements[2] = ((closureN)self_7312998)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314298)->elements[0], &c_7328038, quote_define);
++return_closcall2(data, ((closureN)self_7312998)->elements[0], &c_7325579, quote_define);
+ } else {
+- return_direct_with_clo1(data, k_738339, (((closure) k_738339)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737564, (((closure) k_737564)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738339, (((closure) k_738339)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737564, (((closure) k_737564)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738339, (((closure) k_738339)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737564, (((closure) k_737564)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738339, (((closure) k_738339)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737564, (((closure) k_737564)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1272(void *data, object self_7314299, int argc, object *args) /* object self_7314299, object r_738349 */
++static void __lambda_1225(void *data, object self_7312999, int argc, object *args) /* object self_7312999, object r_737574 */
+ {
+- object r_738349 = args[0];
++ object r_737574 = args[0];
+
+-closureN_type c_7328041;
+-object e_7328109 [4];
+-c_7328041.hdr.mark = gc_color_red;
+- c_7328041.hdr.grayed = 0;
+-c_7328041.tag = closureN_tag;
+- c_7328041.fn = (function_type)__lambda_1273;
+-c_7328041.num_args = 1;
+-c_7328041.num_elements = 4;
+-c_7328041.elements = (object *)e_7328109;
+-c_7328041.elements[0] = ((closureN)self_7314299)->elements[0];
+-c_7328041.elements[1] = r_738349;
+-c_7328041.elements[2] = ((closureN)self_7314299)->elements[1];
+-c_7328041.elements[3] = ((closureN)self_7314299)->elements[2];
++closureN_type c_7325582;
++object e_7325650 [4];
++c_7325582.hdr.mark = gc_color_red;
++ c_7325582.hdr.grayed = 0;
++c_7325582.tag = closureN_tag;
++ c_7325582.fn = (function_type)__lambda_1226;
++c_7325582.num_args = 1;
++c_7325582.num_elements = 4;
++c_7325582.elements = (object *)e_7325650;
++c_7325582.elements[0] = ((closureN)self_7312999)->elements[0];
++c_7325582.elements[1] = r_737574;
++c_7325582.elements[2] = ((closureN)self_7312999)->elements[1];
++c_7325582.elements[3] = ((closureN)self_7312999)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314299)->elements[1], &c_7328041, quote_dummy);;
++return_closcall2(data, ((closureN)self_7312999)->elements[1], &c_7325582, quote_dummy);;
+ }
+
+-static void __lambda_1273(void *data, object self_7314300, int argc, object *args) /* object self_7314300, object r_738352 */
++static void __lambda_1226(void *data, object self_7313000, int argc, object *args) /* object self_7313000, object r_737577 */
+ {
+- object r_738352 = args[0];
++ object r_737577 = args[0];
+
+-closureN_type c_7328044;
+-object e_7328108 [5];
+-c_7328044.hdr.mark = gc_color_red;
+- c_7328044.hdr.grayed = 0;
+-c_7328044.tag = closureN_tag;
+- c_7328044.fn = (function_type)__lambda_1274;
+-c_7328044.num_args = 1;
+-c_7328044.num_elements = 5;
+-c_7328044.elements = (object *)e_7328108;
+-c_7328044.elements[0] = ((closureN)self_7314300)->elements[0];
+-c_7328044.elements[1] = ((closureN)self_7314300)->elements[1];
+-c_7328044.elements[2] = r_738352;
+-c_7328044.elements[3] = ((closureN)self_7314300)->elements[2];
+-c_7328044.elements[4] = ((closureN)self_7314300)->elements[3];
++closureN_type c_7325585;
++object e_7325649 [5];
++c_7325585.hdr.mark = gc_color_red;
++ c_7325585.hdr.grayed = 0;
++c_7325585.tag = closureN_tag;
++ c_7325585.fn = (function_type)__lambda_1227;
++c_7325585.num_args = 1;
++c_7325585.num_elements = 5;
++c_7325585.elements = (object *)e_7325649;
++c_7325585.elements[0] = ((closureN)self_7313000)->elements[0];
++c_7325585.elements[1] = ((closureN)self_7313000)->elements[1];
++c_7325585.elements[2] = r_737577;
++c_7325585.elements[3] = ((closureN)self_7313000)->elements[2];
++c_7325585.elements[4] = ((closureN)self_7313000)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314300)->elements[2], &c_7328044, quote_call_91with_91values);;
++return_closcall2(data, ((closureN)self_7313000)->elements[2], &c_7325585, quote_call_91with_91values);;
+ }
+
+-static void __lambda_1274(void *data, object self_7314301, int argc, object *args) /* object self_7314301, object r_738358 */
++static void __lambda_1227(void *data, object self_7313001, int argc, object *args) /* object self_7313001, object r_737583 */
+ {
+- object r_738358 = args[0];
++ object r_737583 = args[0];
+
+-closureN_type c_7328047;
+-object e_7328107 [6];
+-c_7328047.hdr.mark = gc_color_red;
+- c_7328047.hdr.grayed = 0;
+-c_7328047.tag = closureN_tag;
+- c_7328047.fn = (function_type)__lambda_1275;
+-c_7328047.num_args = 1;
+-c_7328047.num_elements = 6;
+-c_7328047.elements = (object *)e_7328107;
+-c_7328047.elements[0] = ((closureN)self_7314301)->elements[0];
+-c_7328047.elements[1] = ((closureN)self_7314301)->elements[1];
+-c_7328047.elements[2] = ((closureN)self_7314301)->elements[2];
+-c_7328047.elements[3] = r_738358;
+-c_7328047.elements[4] = ((closureN)self_7314301)->elements[3];
+-c_7328047.elements[5] = ((closureN)self_7314301)->elements[4];
++closureN_type c_7325588;
++object e_7325648 [6];
++c_7325588.hdr.mark = gc_color_red;
++ c_7325588.hdr.grayed = 0;
++c_7325588.tag = closureN_tag;
++ c_7325588.fn = (function_type)__lambda_1228;
++c_7325588.num_args = 1;
++c_7325588.num_elements = 6;
++c_7325588.elements = (object *)e_7325648;
++c_7325588.elements[0] = ((closureN)self_7313001)->elements[0];
++c_7325588.elements[1] = ((closureN)self_7313001)->elements[1];
++c_7325588.elements[2] = ((closureN)self_7313001)->elements[2];
++c_7325588.elements[3] = r_737583;
++c_7325588.elements[4] = ((closureN)self_7313001)->elements[3];
++c_7325588.elements[5] = ((closureN)self_7313001)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314301)->elements[3], &c_7328047, quote_lambda);;
++return_closcall2(data, ((closureN)self_7313001)->elements[3], &c_7325588, quote_lambda);;
+ }
+
+-static void __lambda_1275(void *data, object self_7314302, int argc, object *args) /* object self_7314302, object r_738377 */
++static void __lambda_1228(void *data, object self_7313002, int argc, object *args) /* object self_7313002, object r_737602 */
+ {
+- object r_738377 = args[0];
++ object r_737602 = args[0];
+
+-closureN_type c_7328050;
+-object e_7328106 [7];
+-c_7328050.hdr.mark = gc_color_red;
+- c_7328050.hdr.grayed = 0;
+-c_7328050.tag = closureN_tag;
+- c_7328050.fn = (function_type)__lambda_1276;
+-c_7328050.num_args = 1;
+-c_7328050.num_elements = 7;
+-c_7328050.elements = (object *)e_7328106;
+-c_7328050.elements[0] = ((closureN)self_7314302)->elements[0];
+-c_7328050.elements[1] = ((closureN)self_7314302)->elements[1];
+-c_7328050.elements[2] = ((closureN)self_7314302)->elements[2];
+-c_7328050.elements[3] = ((closureN)self_7314302)->elements[3];
+-c_7328050.elements[4] = r_738377;
+-c_7328050.elements[5] = ((closureN)self_7314302)->elements[4];
+-c_7328050.elements[6] = ((closureN)self_7314302)->elements[5];
++closureN_type c_7325591;
++object e_7325647 [7];
++c_7325591.hdr.mark = gc_color_red;
++ c_7325591.hdr.grayed = 0;
++c_7325591.tag = closureN_tag;
++ c_7325591.fn = (function_type)__lambda_1229;
++c_7325591.num_args = 1;
++c_7325591.num_elements = 7;
++c_7325591.elements = (object *)e_7325647;
++c_7325591.elements[0] = ((closureN)self_7313002)->elements[0];
++c_7325591.elements[1] = ((closureN)self_7313002)->elements[1];
++c_7325591.elements[2] = ((closureN)self_7313002)->elements[2];
++c_7325591.elements[3] = ((closureN)self_7313002)->elements[3];
++c_7325591.elements[4] = r_737602;
++c_7325591.elements[5] = ((closureN)self_7313002)->elements[4];
++c_7325591.elements[6] = ((closureN)self_7313002)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7314302)->elements[4], &c_7328050, quote_lambda);;
++return_closcall2(data, ((closureN)self_7313002)->elements[4], &c_7325591, quote_lambda);;
+ }
+
+-static void __lambda_1276(void *data, object self_7314303, int argc, object *args) /* object self_7314303, object r_738367_7311638_7311651_7311663 */
++static void __lambda_1229(void *data, object self_7313003, int argc, object *args) /* object self_7313003, object r_737592_7310385_7310398_7310410 */
+ {
+- object r_738367_7311638_7311651_7311663 = args[0];
++ object r_737592_7310385_7310398_7310410 = args[0];
+
+-closureN_type c_7328053;
+-object e_7328105 [7];
+-c_7328053.hdr.mark = gc_color_red;
+- c_7328053.hdr.grayed = 0;
+-c_7328053.tag = closureN_tag;
+- c_7328053.fn = (function_type)__lambda_1277;
+-c_7328053.num_args = 1;
+-c_7328053.num_elements = 7;
+-c_7328053.elements = (object *)e_7328105;
+-c_7328053.elements[0] = ((closureN)self_7314303)->elements[0];
+-c_7328053.elements[1] = ((closureN)self_7314303)->elements[1];
+-c_7328053.elements[2] = ((closureN)self_7314303)->elements[2];
+-c_7328053.elements[3] = ((closureN)self_7314303)->elements[3];
+-c_7328053.elements[4] = r_738367_7311638_7311651_7311663;
+-c_7328053.elements[5] = ((closureN)self_7314303)->elements[4];
+-c_7328053.elements[6] = ((closureN)self_7314303)->elements[6];
++closureN_type c_7325594;
++object e_7325646 [7];
++c_7325594.hdr.mark = gc_color_red;
++ c_7325594.hdr.grayed = 0;
++c_7325594.tag = closureN_tag;
++ c_7325594.fn = (function_type)__lambda_1230;
++c_7325594.num_args = 1;
++c_7325594.num_elements = 7;
++c_7325594.elements = (object *)e_7325646;
++c_7325594.elements[0] = ((closureN)self_7313003)->elements[0];
++c_7325594.elements[1] = ((closureN)self_7313003)->elements[1];
++c_7325594.elements[2] = ((closureN)self_7313003)->elements[2];
++c_7325594.elements[3] = ((closureN)self_7313003)->elements[3];
++c_7325594.elements[4] = r_737592_7310385_7310398_7310410;
++c_7325594.elements[5] = ((closureN)self_7313003)->elements[4];
++c_7325594.elements[6] = ((closureN)self_7313003)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7314303)->elements[5], &c_7328053, quote_args);;
++return_closcall2(data, ((closureN)self_7313003)->elements[5], &c_7325594, quote_args);;
+ }
+
+-static void __lambda_1277(void *data, object self_7314304, int argc, object *args) /* object self_7314304, object r_738370_7311639_7311652_7311664 */
++static void __lambda_1230(void *data, object self_7313004, int argc, object *args) /* object self_7313004, object r_737595_7310386_7310399_7310411 */
+ {
+- object r_738370_7311639_7311652_7311664 = args[0];
++ object r_737595_7310386_7310399_7310411 = args[0];
+
+-pair_type local_7328058;
++pair_type local_7325599;
+
+-pair_type local_7328061;
++pair_type local_7325602;
+
+-pair_type local_7328065;
++pair_type local_7325606;
+
+-pair_type local_7328069;
++pair_type local_7325610;
+
+-pair_type local_7328072;
++pair_type local_7325613;
+
+-pair_type local_7328076;
++pair_type local_7325617;
+
+-pair_type local_7328079;
++pair_type local_7325620;
+
+-pair_type local_7328083;
++pair_type local_7325624;
+
+-pair_type local_7328086;
++pair_type local_7325627;
+
+
+
+
+
+-pair_type local_7328094;
++pair_type local_7325635;
+
+-pair_type local_7328097;
++pair_type local_7325638;
+
+-pair_type local_7328101;
++pair_type local_7325642;
+
+-pair_type local_7328104;
+-return_direct_with_clo1(data, ((closureN)self_7314304)->elements[0], (((closure) ((closureN)self_7314304)->elements[0])->fn), set_pair_as_expr(&local_7328058, set_pair_as_expr(&local_7328061, ((closureN)self_7314304)->elements[1], set_pair_as_expr(&local_7328065, ((closureN)self_7314304)->elements[2], set_pair_as_expr(&local_7328069, set_pair_as_expr(&local_7328072, ((closureN)self_7314304)->elements[3], set_pair_as_expr(&local_7328076, set_pair_as_expr(&local_7328079, ((closureN)self_7314304)->elements[5], set_pair_as_expr(&local_7328083, NULL, set_pair_as_expr(&local_7328086, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314304)->elements[6])), NULL))), set_pair_as_expr(&local_7328094, set_pair_as_expr(&local_7328097, ((closureN)self_7314304)->elements[4], set_pair_as_expr(&local_7328101, r_738370_7311639_7311652_7311664, set_pair_as_expr(&local_7328104, boolean_f, NULL))), NULL))), NULL))), boolean_f));;
++pair_type local_7325645;
++return_direct_with_clo1(data, ((closureN)self_7313004)->elements[0], (((closure) ((closureN)self_7313004)->elements[0])->fn), set_pair_as_expr(&local_7325599, set_pair_as_expr(&local_7325602, ((closureN)self_7313004)->elements[1], set_pair_as_expr(&local_7325606, ((closureN)self_7313004)->elements[2], set_pair_as_expr(&local_7325610, set_pair_as_expr(&local_7325613, ((closureN)self_7313004)->elements[3], set_pair_as_expr(&local_7325617, set_pair_as_expr(&local_7325620, ((closureN)self_7313004)->elements[5], set_pair_as_expr(&local_7325624, NULL, set_pair_as_expr(&local_7325627, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313004)->elements[6])), NULL))), set_pair_as_expr(&local_7325635, set_pair_as_expr(&local_7325638, ((closureN)self_7313004)->elements[4], set_pair_as_expr(&local_7325642, r_737595_7310386_7310399_7310411, set_pair_as_expr(&local_7325645, boolean_f, NULL))), NULL))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1238(void *data, object _, int argc, object *args) /* closure _,object k_737908, object expr_732618_734042, object rename_732619_734043, object compare_732620_734044 */
++static void __lambda_1191(void *data, object _, int argc, object *args) /* closure _,object k_737133, object expr_732271_733590, object rename_732272_733591, object compare_732273_733592 */
+ {
+-object k_737908 = args[0]; object expr_732618_734042 = args[1]; object rename_732619_734043 = args[2];
+- object name_732626_734046;
++object k_737133 = args[0]; object expr_732271_733590 = args[1]; object rename_732272_733591 = args[2];
++ object name_732279_733594;
+ Cyc_st_add(data, "scheme/base.sld:define-record-type");
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, expr_732618_734042))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, expr_732271_733590))) ){
+
+
+- name_732626_734046 = Cyc_car(data, Cyc_cadr(data, expr_732618_734042));
++ name_732279_733594 = Cyc_car(data, Cyc_cadr(data, expr_732271_733590));
+ } else {
+
+- name_732626_734046 = Cyc_cadr(data, expr_732618_734042);}
++ name_732279_733594 = Cyc_cadr(data, expr_732271_733590);}
+ ;
+-closureN_type c_7327563;
+-object e_7327576 [1];
+-c_7327563.hdr.mark = gc_color_red;
+- c_7327563.hdr.grayed = 0;
+-c_7327563.tag = closureN_tag;
+- c_7327563.fn = (function_type)__lambda_1239;
+-c_7327563.num_args = 0;
+-c_7327563.num_elements = 1;
+-c_7327563.elements = (object *)e_7327576;
+-c_7327563.elements[0] = expr_732618_734042;
++closureN_type c_7325104;
++object e_7325117 [1];
++c_7325104.hdr.mark = gc_color_red;
++ c_7325104.hdr.grayed = 0;
++c_7325104.tag = closureN_tag;
++ c_7325104.fn = (function_type)__lambda_1192;
++c_7325104.num_args = 0;
++c_7325104.num_elements = 1;
++c_7325104.elements = (object *)e_7325117;
++c_7325104.elements[0] = expr_732271_733590;
+
+
+-closureN_type c_7327577;
+-object e_7328010 [4];
+-c_7327577.hdr.mark = gc_color_red;
+- c_7327577.hdr.grayed = 0;
+-c_7327577.tag = closureN_tag;
+- c_7327577.fn = (function_type)__lambda_1240;
+-c_7327577.num_args = 1;
+-c_7327577.num_elements = 4;
+-c_7327577.elements = (object *)e_7328010;
+-c_7327577.elements[0] = expr_732618_734042;
+-c_7327577.elements[1] = k_737908;
+-c_7327577.elements[2] = name_732626_734046;
+-c_7327577.elements[3] = rename_732619_734043;
++closureN_type c_7325118;
++object e_7325551 [4];
++c_7325118.hdr.mark = gc_color_red;
++ c_7325118.hdr.grayed = 0;
++c_7325118.tag = closureN_tag;
++ c_7325118.fn = (function_type)__lambda_1193;
++c_7325118.num_args = 1;
++c_7325118.num_elements = 4;
++c_7325118.elements = (object *)e_7325551;
++c_7325118.elements[0] = expr_732271_733590;
++c_7325118.elements[1] = k_737133;
++c_7325118.elements[2] = name_732279_733594;
++c_7325118.elements[3] = rename_732272_733591;
+
+-return_direct_with_clo1(data,(closure)&c_7327563,__lambda_1239, &c_7327577);;
++return_direct_with_clo1(data,(closure)&c_7325104,__lambda_1192, &c_7325118);;
+ }
+
+-static void __lambda_1240(void *data, object self_7314217, int argc, object *args) /* object self_7314217, object parent_732629_734047 */
++static void __lambda_1193(void *data, object self_7312917, int argc, object *args) /* object self_7312917, object parent_732282_733595 */
+ {
+- object parent_732629_734047 = args[0];
++ object parent_732282_733595 = args[0];
+
+-closureN_type c_7327580;
+-object e_7328009 [5];
+-c_7327580.hdr.mark = gc_color_red;
+- c_7327580.hdr.grayed = 0;
+-c_7327580.tag = closureN_tag;
+- c_7327580.fn = (function_type)__lambda_1241;
+-c_7327580.num_args = 1;
+-c_7327580.num_elements = 5;
+-c_7327580.elements = (object *)e_7328009;
+-c_7327580.elements[0] = ((closureN)self_7314217)->elements[0];
+-c_7327580.elements[1] = ((closureN)self_7314217)->elements[1];
+-c_7327580.elements[2] = ((closureN)self_7314217)->elements[2];
+-c_7327580.elements[3] = parent_732629_734047;
+-c_7327580.elements[4] = ((closureN)self_7314217)->elements[3];
++closureN_type c_7325121;
++object e_7325550 [5];
++c_7325121.hdr.mark = gc_color_red;
++ c_7325121.hdr.grayed = 0;
++c_7325121.tag = closureN_tag;
++ c_7325121.fn = (function_type)__lambda_1194;
++c_7325121.num_args = 1;
++c_7325121.num_elements = 5;
++c_7325121.elements = (object *)e_7325550;
++c_7325121.elements[0] = ((closureN)self_7312917)->elements[0];
++c_7325121.elements[1] = ((closureN)self_7312917)->elements[1];
++c_7325121.elements[2] = ((closureN)self_7312917)->elements[2];
++c_7325121.elements[3] = parent_732282_733595;
++c_7325121.elements[4] = ((closureN)self_7312917)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314217)->elements[3], &c_7327580, quote_define);;
++return_closcall2(data, ((closureN)self_7312917)->elements[3], &c_7325121, quote_define);;
+ }
+
+-static void __lambda_1241(void *data, object self_7314218, int argc, object *args) /* object self_7314218, object _191define_732647_734053 */
++static void __lambda_1194(void *data, object self_7312918, int argc, object *args) /* object self_7312918, object _191define_732300_733601 */
+ {
+- object _191define_732647_734053 = args[0];
++ object _191define_732300_733601 = args[0];
+
+-closureN_type c_7327583;
+-object e_7328008 [6];
+-c_7327583.hdr.mark = gc_color_red;
+- c_7327583.hdr.grayed = 0;
+-c_7327583.tag = closureN_tag;
+- c_7327583.fn = (function_type)__lambda_1242;
+-c_7327583.num_args = 1;
+-c_7327583.num_elements = 6;
+-c_7327583.elements = (object *)e_7328008;
+-c_7327583.elements[0] = _191define_732647_734053;
+-c_7327583.elements[1] = ((closureN)self_7314218)->elements[0];
+-c_7327583.elements[2] = ((closureN)self_7314218)->elements[1];
+-c_7327583.elements[3] = ((closureN)self_7314218)->elements[2];
+-c_7327583.elements[4] = ((closureN)self_7314218)->elements[3];
+-c_7327583.elements[5] = ((closureN)self_7314218)->elements[4];
++closureN_type c_7325124;
++object e_7325549 [6];
++c_7325124.hdr.mark = gc_color_red;
++ c_7325124.hdr.grayed = 0;
++c_7325124.tag = closureN_tag;
++ c_7325124.fn = (function_type)__lambda_1195;
++c_7325124.num_args = 1;
++c_7325124.num_elements = 6;
++c_7325124.elements = (object *)e_7325549;
++c_7325124.elements[0] = _191define_732300_733601;
++c_7325124.elements[1] = ((closureN)self_7312918)->elements[0];
++c_7325124.elements[2] = ((closureN)self_7312918)->elements[1];
++c_7325124.elements[3] = ((closureN)self_7312918)->elements[2];
++c_7325124.elements[4] = ((closureN)self_7312918)->elements[3];
++c_7325124.elements[5] = ((closureN)self_7312918)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314218)->elements[4], &c_7327583, quote_lambda);;
++return_closcall2(data, ((closureN)self_7312918)->elements[4], &c_7325124, quote_lambda);;
+ }
+
+-static void __lambda_1242(void *data, object self_7314219, int argc, object *args) /* object self_7314219, object _191lambda_732650_734054 */
++static void __lambda_1195(void *data, object self_7312919, int argc, object *args) /* object self_7312919, object _191lambda_732303_733602 */
+ {
+- object _191lambda_732650_734054 = args[0];
++ object _191lambda_732303_733602 = args[0];
+
+-closureN_type c_7327586;
+-object e_7328007 [7];
+-c_7327586.hdr.mark = gc_color_red;
+- c_7327586.hdr.grayed = 0;
+-c_7327586.tag = closureN_tag;
+- c_7327586.fn = (function_type)__lambda_1243;
+-c_7327586.num_args = 1;
+-c_7327586.num_elements = 7;
+-c_7327586.elements = (object *)e_7328007;
+-c_7327586.elements[0] = ((closureN)self_7314219)->elements[0];
+-c_7327586.elements[1] = _191lambda_732650_734054;
+-c_7327586.elements[2] = ((closureN)self_7314219)->elements[1];
+-c_7327586.elements[3] = ((closureN)self_7314219)->elements[2];
+-c_7327586.elements[4] = ((closureN)self_7314219)->elements[3];
+-c_7327586.elements[5] = ((closureN)self_7314219)->elements[4];
+-c_7327586.elements[6] = ((closureN)self_7314219)->elements[5];
++closureN_type c_7325127;
++object e_7325548 [7];
++c_7325127.hdr.mark = gc_color_red;
++ c_7325127.hdr.grayed = 0;
++c_7325127.tag = closureN_tag;
++ c_7325127.fn = (function_type)__lambda_1196;
++c_7325127.num_args = 1;
++c_7325127.num_elements = 7;
++c_7325127.elements = (object *)e_7325548;
++c_7325127.elements[0] = ((closureN)self_7312919)->elements[0];
++c_7325127.elements[1] = _191lambda_732303_733602;
++c_7325127.elements[2] = ((closureN)self_7312919)->elements[1];
++c_7325127.elements[3] = ((closureN)self_7312919)->elements[2];
++c_7325127.elements[4] = ((closureN)self_7312919)->elements[3];
++c_7325127.elements[5] = ((closureN)self_7312919)->elements[4];
++c_7325127.elements[6] = ((closureN)self_7312919)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7314219)->elements[5], &c_7327586, quote_let);;
++return_closcall2(data, ((closureN)self_7312919)->elements[5], &c_7325127, quote_let);;
+ }
+
+-static void __lambda_1243(void *data, object self_7314220, int argc, object *args) /* object self_7314220, object _191let_732653_734055 */
++static void __lambda_1196(void *data, object self_7312920, int argc, object *args) /* object self_7312920, object _191let_732306_733603 */
+ {
+
+
+-closureN_type c_7327589;
+-object e_7328006 [7];
+-c_7327589.hdr.mark = gc_color_red;
+- c_7327589.hdr.grayed = 0;
+-c_7327589.tag = closureN_tag;
+- c_7327589.fn = (function_type)__lambda_1244;
+-c_7327589.num_args = 1;
+-c_7327589.num_elements = 7;
+-c_7327589.elements = (object *)e_7328006;
+-c_7327589.elements[0] = ((closureN)self_7314220)->elements[0];
+-c_7327589.elements[1] = ((closureN)self_7314220)->elements[1];
+-c_7327589.elements[2] = ((closureN)self_7314220)->elements[2];
+-c_7327589.elements[3] = ((closureN)self_7314220)->elements[3];
+-c_7327589.elements[4] = ((closureN)self_7314220)->elements[4];
+-c_7327589.elements[5] = ((closureN)self_7314220)->elements[5];
+-c_7327589.elements[6] = ((closureN)self_7314220)->elements[6];
++closureN_type c_7325130;
++object e_7325547 [7];
++c_7325130.hdr.mark = gc_color_red;
++ c_7325130.hdr.grayed = 0;
++c_7325130.tag = closureN_tag;
++ c_7325130.fn = (function_type)__lambda_1197;
++c_7325130.num_args = 1;
++c_7325130.num_elements = 7;
++c_7325130.elements = (object *)e_7325547;
++c_7325130.elements[0] = ((closureN)self_7312920)->elements[0];
++c_7325130.elements[1] = ((closureN)self_7312920)->elements[1];
++c_7325130.elements[2] = ((closureN)self_7312920)->elements[2];
++c_7325130.elements[3] = ((closureN)self_7312920)->elements[3];
++c_7325130.elements[4] = ((closureN)self_7312920)->elements[4];
++c_7325130.elements[5] = ((closureN)self_7312920)->elements[5];
++c_7325130.elements[6] = ((closureN)self_7312920)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7314220)->elements[6], &c_7327589, quote_register_91simple_91type);;
++return_closcall2(data, ((closureN)self_7312920)->elements[6], &c_7325130, quote_register_91simple_91type);;
+ }
+
+-static void __lambda_1244(void *data, object self_7314221, int argc, object *args) /* object self_7314221, object _191register_732656_734056 */
++static void __lambda_1197(void *data, object self_7312921, int argc, object *args) /* object self_7312921, object _191register_732309_733604 */
+ {
+- object _191register_732656_734056 = args[0];
++ object _191register_732309_733604 = args[0];
+
+-closureN_type c_7327592;
+-object e_7328005 [8];
+-c_7327592.hdr.mark = gc_color_red;
+- c_7327592.hdr.grayed = 0;
+-c_7327592.tag = closureN_tag;
+- c_7327592.fn = (function_type)__lambda_1245;
+-c_7327592.num_args = 1;
+-c_7327592.num_elements = 8;
+-c_7327592.elements = (object *)e_7328005;
+-c_7327592.elements[0] = ((closureN)self_7314221)->elements[0];
+-c_7327592.elements[1] = ((closureN)self_7314221)->elements[1];
+-c_7327592.elements[2] = _191register_732656_734056;
+-c_7327592.elements[3] = ((closureN)self_7314221)->elements[2];
+-c_7327592.elements[4] = ((closureN)self_7314221)->elements[3];
+-c_7327592.elements[5] = ((closureN)self_7314221)->elements[4];
+-c_7327592.elements[6] = ((closureN)self_7314221)->elements[5];
+-c_7327592.elements[7] = ((closureN)self_7314221)->elements[6];
++closureN_type c_7325133;
++object e_7325546 [8];
++c_7325133.hdr.mark = gc_color_red;
++ c_7325133.hdr.grayed = 0;
++c_7325133.tag = closureN_tag;
++ c_7325133.fn = (function_type)__lambda_1198;
++c_7325133.num_args = 1;
++c_7325133.num_elements = 8;
++c_7325133.elements = (object *)e_7325546;
++c_7325133.elements[0] = ((closureN)self_7312921)->elements[0];
++c_7325133.elements[1] = ((closureN)self_7312921)->elements[1];
++c_7325133.elements[2] = _191register_732309_733604;
++c_7325133.elements[3] = ((closureN)self_7312921)->elements[2];
++c_7325133.elements[4] = ((closureN)self_7312921)->elements[3];
++c_7325133.elements[5] = ((closureN)self_7312921)->elements[4];
++c_7325133.elements[6] = ((closureN)self_7312921)->elements[5];
++c_7325133.elements[7] = ((closureN)self_7312921)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7314221)->elements[6], &c_7327592, quote_slot_91set_67);;
++return_closcall2(data, ((closureN)self_7312921)->elements[6], &c_7325133, quote_slot_91set_67);;
+ }
+
+-static void __lambda_1245(void *data, object self_7314222, int argc, object *args) /* object self_7314222, object _191slot_91set_67_732659_734057 */
++static void __lambda_1198(void *data, object self_7312922, int argc, object *args) /* object self_7312922, object _191slot_91set_67_732312_733605 */
+ {
+
+
+-closureN_type c_7327595;
+-object e_7328004 [8];
+-c_7327595.hdr.mark = gc_color_red;
+- c_7327595.hdr.grayed = 0;
+-c_7327595.tag = closureN_tag;
+- c_7327595.fn = (function_type)__lambda_1246;
+-c_7327595.num_args = 1;
+-c_7327595.num_elements = 8;
+-c_7327595.elements = (object *)e_7328004;
+-c_7327595.elements[0] = ((closureN)self_7314222)->elements[0];
+-c_7327595.elements[1] = ((closureN)self_7314222)->elements[1];
+-c_7327595.elements[2] = ((closureN)self_7314222)->elements[2];
+-c_7327595.elements[3] = ((closureN)self_7314222)->elements[3];
+-c_7327595.elements[4] = ((closureN)self_7314222)->elements[4];
+-c_7327595.elements[5] = ((closureN)self_7314222)->elements[5];
+-c_7327595.elements[6] = ((closureN)self_7314222)->elements[6];
+-c_7327595.elements[7] = ((closureN)self_7314222)->elements[7];
++closureN_type c_7325136;
++object e_7325545 [8];
++c_7325136.hdr.mark = gc_color_red;
++ c_7325136.hdr.grayed = 0;
++c_7325136.tag = closureN_tag;
++ c_7325136.fn = (function_type)__lambda_1199;
++c_7325136.num_args = 1;
++c_7325136.num_elements = 8;
++c_7325136.elements = (object *)e_7325545;
++c_7325136.elements[0] = ((closureN)self_7312922)->elements[0];
++c_7325136.elements[1] = ((closureN)self_7312922)->elements[1];
++c_7325136.elements[2] = ((closureN)self_7312922)->elements[2];
++c_7325136.elements[3] = ((closureN)self_7312922)->elements[3];
++c_7325136.elements[4] = ((closureN)self_7312922)->elements[4];
++c_7325136.elements[5] = ((closureN)self_7312922)->elements[5];
++c_7325136.elements[6] = ((closureN)self_7312922)->elements[6];
++c_7325136.elements[7] = ((closureN)self_7312922)->elements[7];
+
+-return_closcall2(data, ((closureN)self_7314222)->elements[7], &c_7327595, quote_type_91slot_91offset);;
++return_closcall2(data, ((closureN)self_7312922)->elements[7], &c_7325136, quote_type_91slot_91offset);;
+ }
+
+-static void __lambda_1246(void *data, object self_7314223, int argc, object *args) /* object self_7314223, object _191type_191slot_191offset_732662_734058 */
++static void __lambda_1199(void *data, object self_7312923, int argc, object *args) /* object self_7312923, object _191type_191slot_191offset_732315_733606 */
+ {
+- object _191type_191slot_191offset_732662_734058 = args[0];
++ object _191type_191slot_191offset_732315_733606 = args[0];
+
+-closureN_type c_7327597;
+-object e_7327610 [2];
+-c_7327597.hdr.mark = gc_color_red;
+- c_7327597.hdr.grayed = 0;
+-c_7327597.tag = closureN_tag;
+- c_7327597.fn = (function_type)__lambda_1247;
+-c_7327597.num_args = 0;
+-c_7327597.num_elements = 2;
+-c_7327597.elements = (object *)e_7327610;
+-c_7327597.elements[0] = ((closureN)self_7314223)->elements[3];
+-c_7327597.elements[1] = ((closureN)self_7314223)->elements[5];
++closureN_type c_7325138;
++object e_7325151 [2];
++c_7325138.hdr.mark = gc_color_red;
++ c_7325138.hdr.grayed = 0;
++c_7325138.tag = closureN_tag;
++ c_7325138.fn = (function_type)__lambda_1200;
++c_7325138.num_args = 0;
++c_7325138.num_elements = 2;
++c_7325138.elements = (object *)e_7325151;
++c_7325138.elements[0] = ((closureN)self_7312923)->elements[3];
++c_7325138.elements[1] = ((closureN)self_7312923)->elements[5];
+
+
+-closureN_type c_7327611;
+-object e_7328003 [9];
+-c_7327611.hdr.mark = gc_color_red;
+- c_7327611.hdr.grayed = 0;
+-c_7327611.tag = closureN_tag;
+- c_7327611.fn = (function_type)__lambda_1248;
+-c_7327611.num_args = 1;
+-c_7327611.num_elements = 9;
+-c_7327611.elements = (object *)e_7328003;
+-c_7327611.elements[0] = ((closureN)self_7314223)->elements[0];
+-c_7327611.elements[1] = ((closureN)self_7314223)->elements[1];
+-c_7327611.elements[2] = ((closureN)self_7314223)->elements[2];
+-c_7327611.elements[3] = _191type_191slot_191offset_732662_734058;
+-c_7327611.elements[4] = ((closureN)self_7314223)->elements[3];
+-c_7327611.elements[5] = ((closureN)self_7314223)->elements[4];
+-c_7327611.elements[6] = ((closureN)self_7314223)->elements[5];
+-c_7327611.elements[7] = ((closureN)self_7314223)->elements[6];
+-c_7327611.elements[8] = ((closureN)self_7314223)->elements[7];
++closureN_type c_7325152;
++object e_7325544 [9];
++c_7325152.hdr.mark = gc_color_red;
++ c_7325152.hdr.grayed = 0;
++c_7325152.tag = closureN_tag;
++ c_7325152.fn = (function_type)__lambda_1201;
++c_7325152.num_args = 1;
++c_7325152.num_elements = 9;
++c_7325152.elements = (object *)e_7325544;
++c_7325152.elements[0] = ((closureN)self_7312923)->elements[0];
++c_7325152.elements[1] = ((closureN)self_7312923)->elements[1];
++c_7325152.elements[2] = ((closureN)self_7312923)->elements[2];
++c_7325152.elements[3] = _191type_191slot_191offset_732315_733606;
++c_7325152.elements[4] = ((closureN)self_7312923)->elements[3];
++c_7325152.elements[5] = ((closureN)self_7312923)->elements[4];
++c_7325152.elements[6] = ((closureN)self_7312923)->elements[5];
++c_7325152.elements[7] = ((closureN)self_7312923)->elements[6];
++c_7325152.elements[8] = ((closureN)self_7312923)->elements[7];
+
+-return_direct_with_clo1(data,(closure)&c_7327597,__lambda_1247, &c_7327611);;
++return_direct_with_clo1(data,(closure)&c_7325138,__lambda_1200, &c_7325152);;
+ }
+
+-static void __lambda_1248(void *data, object self_7314224, int argc, object *args) /* object self_7314224, object r_737923 */
++static void __lambda_1201(void *data, object self_7312924, int argc, object *args) /* object self_7312924, object r_737148 */
+ {
+
+
+-closureN_type c_7327614;
+-object e_7328002 [9];
+-c_7327614.hdr.mark = gc_color_red;
+- c_7327614.hdr.grayed = 0;
+-c_7327614.tag = closureN_tag;
+- c_7327614.fn = (function_type)__lambda_1249;
+-c_7327614.num_args = 1;
+-c_7327614.num_elements = 9;
+-c_7327614.elements = (object *)e_7328002;
+-c_7327614.elements[0] = ((closureN)self_7314224)->elements[0];
+-c_7327614.elements[1] = ((closureN)self_7314224)->elements[1];
+-c_7327614.elements[2] = ((closureN)self_7314224)->elements[2];
+-c_7327614.elements[3] = ((closureN)self_7314224)->elements[3];
+-c_7327614.elements[4] = ((closureN)self_7314224)->elements[4];
+-c_7327614.elements[5] = ((closureN)self_7314224)->elements[5];
+-c_7327614.elements[6] = ((closureN)self_7314224)->elements[6];
+-c_7327614.elements[7] = ((closureN)self_7314224)->elements[7];
+-c_7327614.elements[8] = ((closureN)self_7314224)->elements[8];
++closureN_type c_7325155;
++object e_7325543 [9];
++c_7325155.hdr.mark = gc_color_red;
++ c_7325155.hdr.grayed = 0;
++c_7325155.tag = closureN_tag;
++ c_7325155.fn = (function_type)__lambda_1202;
++c_7325155.num_args = 1;
++c_7325155.num_elements = 9;
++c_7325155.elements = (object *)e_7325543;
++c_7325155.elements[0] = ((closureN)self_7312924)->elements[0];
++c_7325155.elements[1] = ((closureN)self_7312924)->elements[1];
++c_7325155.elements[2] = ((closureN)self_7312924)->elements[2];
++c_7325155.elements[3] = ((closureN)self_7312924)->elements[3];
++c_7325155.elements[4] = ((closureN)self_7312924)->elements[4];
++c_7325155.elements[5] = ((closureN)self_7312924)->elements[5];
++c_7325155.elements[6] = ((closureN)self_7312924)->elements[6];
++c_7325155.elements[7] = ((closureN)self_7312924)->elements[7];
++c_7325155.elements[8] = ((closureN)self_7312924)->elements[8];
+
+-return_closcall2(data, ((closureN)self_7314224)->elements[8], &c_7327614, quote_begin);;
++return_closcall2(data, ((closureN)self_7312924)->elements[8], &c_7325155, quote_begin);;
+ }
+
+-static void __lambda_1249(void *data, object self_7314225, int argc, object *args) /* object self_7314225, object r_737924 */
++static void __lambda_1202(void *data, object self_7312925, int argc, object *args) /* object self_7312925, object r_737149 */
+ {
+- object r_737924 = args[0];
++ object r_737149 = args[0];
+
+-closureN_type c_7327616;
+-object e_7327996 [10];
+-c_7327616.hdr.mark = gc_color_red;
+- c_7327616.hdr.grayed = 0;
+-c_7327616.tag = closureN_tag;
+- c_7327616.fn = (function_type)__lambda_1250;
+-c_7327616.num_args = 1;
+-c_7327616.num_elements = 10;
+-c_7327616.elements = (object *)e_7327996;
+-c_7327616.elements[0] = ((closureN)self_7314225)->elements[0];
+-c_7327616.elements[1] = ((closureN)self_7314225)->elements[1];
+-c_7327616.elements[2] = ((closureN)self_7314225)->elements[2];
+-c_7327616.elements[3] = ((closureN)self_7314225)->elements[3];
+-c_7327616.elements[4] = ((closureN)self_7314225)->elements[4];
+-c_7327616.elements[5] = ((closureN)self_7314225)->elements[5];
+-c_7327616.elements[6] = ((closureN)self_7314225)->elements[6];
+-c_7327616.elements[7] = ((closureN)self_7314225)->elements[7];
+-c_7327616.elements[8] = r_737924;
+-c_7327616.elements[9] = ((closureN)self_7314225)->elements[8];
++closureN_type c_7325157;
++object e_7325537 [10];
++c_7325157.hdr.mark = gc_color_red;
++ c_7325157.hdr.grayed = 0;
++c_7325157.tag = closureN_tag;
++ c_7325157.fn = (function_type)__lambda_1203;
++c_7325157.num_args = 1;
++c_7325157.num_elements = 10;
++c_7325157.elements = (object *)e_7325537;
++c_7325157.elements[0] = ((closureN)self_7312925)->elements[0];
++c_7325157.elements[1] = ((closureN)self_7312925)->elements[1];
++c_7325157.elements[2] = ((closureN)self_7312925)->elements[2];
++c_7325157.elements[3] = ((closureN)self_7312925)->elements[3];
++c_7325157.elements[4] = ((closureN)self_7312925)->elements[4];
++c_7325157.elements[5] = ((closureN)self_7312925)->elements[5];
++c_7325157.elements[6] = ((closureN)self_7312925)->elements[6];
++c_7325157.elements[7] = ((closureN)self_7312925)->elements[7];
++c_7325157.elements[8] = r_737149;
++c_7325157.elements[9] = ((closureN)self_7312925)->elements[8];
+
+
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7327616, primitive_car, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314225)->elements[4])));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325157, primitive_car, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312925)->elements[4])));;
+ }
+
+-static void __lambda_1250(void *data, object self_7314226, int argc, object *args) /* object self_7314226, object r_738057 */
++static void __lambda_1203(void *data, object self_7312926, int argc, object *args) /* object self_7312926, object r_737282 */
+ {
+- object r_738057 = args[0];
++ object r_737282 = args[0];
+
+-closureN_type c_7327619;
+-object e_7327995 [11];
+-c_7327619.hdr.mark = gc_color_red;
+- c_7327619.hdr.grayed = 0;
+-c_7327619.tag = closureN_tag;
+- c_7327619.fn = (function_type)__lambda_1251;
+-c_7327619.num_args = 1;
+-c_7327619.num_elements = 11;
+-c_7327619.elements = (object *)e_7327995;
+-c_7327619.elements[0] = ((closureN)self_7314226)->elements[0];
+-c_7327619.elements[1] = ((closureN)self_7314226)->elements[1];
+-c_7327619.elements[2] = ((closureN)self_7314226)->elements[2];
+-c_7327619.elements[3] = ((closureN)self_7314226)->elements[3];
+-c_7327619.elements[4] = ((closureN)self_7314226)->elements[4];
+-c_7327619.elements[5] = ((closureN)self_7314226)->elements[5];
+-c_7327619.elements[6] = ((closureN)self_7314226)->elements[6];
+-c_7327619.elements[7] = ((closureN)self_7314226)->elements[7];
+-c_7327619.elements[8] = ((closureN)self_7314226)->elements[8];
+-c_7327619.elements[9] = r_738057;
+-c_7327619.elements[10] = ((closureN)self_7314226)->elements[9];
++closureN_type c_7325160;
++object e_7325536 [11];
++c_7325160.hdr.mark = gc_color_red;
++ c_7325160.hdr.grayed = 0;
++c_7325160.tag = closureN_tag;
++ c_7325160.fn = (function_type)__lambda_1204;
++c_7325160.num_args = 1;
++c_7325160.num_elements = 11;
++c_7325160.elements = (object *)e_7325536;
++c_7325160.elements[0] = ((closureN)self_7312926)->elements[0];
++c_7325160.elements[1] = ((closureN)self_7312926)->elements[1];
++c_7325160.elements[2] = ((closureN)self_7312926)->elements[2];
++c_7325160.elements[3] = ((closureN)self_7312926)->elements[3];
++c_7325160.elements[4] = ((closureN)self_7312926)->elements[4];
++c_7325160.elements[5] = ((closureN)self_7312926)->elements[5];
++c_7325160.elements[6] = ((closureN)self_7312926)->elements[6];
++c_7325160.elements[7] = ((closureN)self_7312926)->elements[7];
++c_7325160.elements[8] = ((closureN)self_7312926)->elements[8];
++c_7325160.elements[9] = r_737282;
++c_7325160.elements[10] = ((closureN)self_7312926)->elements[9];
+
+-return_closcall2(data, ((closureN)self_7314226)->elements[9], &c_7327619, quote_make_91type_91predicate);;
++return_closcall2(data, ((closureN)self_7312926)->elements[9], &c_7325160, quote_make_91type_91predicate);;
+ }
+
+-static void __lambda_1251(void *data, object self_7314227, int argc, object *args) /* object self_7314227, object r_738036 */
++static void __lambda_1204(void *data, object self_7312927, int argc, object *args) /* object self_7312927, object r_737261 */
+ {
+- object r_738036 = args[0];
++ object r_737261 = args[0];
+
+-closureN_type c_7327621;
+-object e_7327916 [12];
+-c_7327621.hdr.mark = gc_color_red;
+- c_7327621.hdr.grayed = 0;
+-c_7327621.tag = closureN_tag;
+- c_7327621.fn = (function_type)__lambda_1252;
+-c_7327621.num_args = 1;
+-c_7327621.num_elements = 12;
+-c_7327621.elements = (object *)e_7327916;
+-c_7327621.elements[0] = ((closureN)self_7314227)->elements[0];
+-c_7327621.elements[1] = ((closureN)self_7314227)->elements[1];
+-c_7327621.elements[2] = ((closureN)self_7314227)->elements[2];
+-c_7327621.elements[3] = ((closureN)self_7314227)->elements[3];
+-c_7327621.elements[4] = ((closureN)self_7314227)->elements[4];
+-c_7327621.elements[5] = ((closureN)self_7314227)->elements[5];
+-c_7327621.elements[6] = ((closureN)self_7314227)->elements[6];
+-c_7327621.elements[7] = ((closureN)self_7314227)->elements[7];
+-c_7327621.elements[8] = ((closureN)self_7314227)->elements[8];
+-c_7327621.elements[9] = r_738036;
+-c_7327621.elements[10] = ((closureN)self_7314227)->elements[9];
+-c_7327621.elements[11] = ((closureN)self_7314227)->elements[10];
++closureN_type c_7325162;
++object e_7325457 [12];
++c_7325162.hdr.mark = gc_color_red;
++ c_7325162.hdr.grayed = 0;
++c_7325162.tag = closureN_tag;
++ c_7325162.fn = (function_type)__lambda_1205;
++c_7325162.num_args = 1;
++c_7325162.num_elements = 12;
++c_7325162.elements = (object *)e_7325457;
++c_7325162.elements[0] = ((closureN)self_7312927)->elements[0];
++c_7325162.elements[1] = ((closureN)self_7312927)->elements[1];
++c_7325162.elements[2] = ((closureN)self_7312927)->elements[2];
++c_7325162.elements[3] = ((closureN)self_7312927)->elements[3];
++c_7325162.elements[4] = ((closureN)self_7312927)->elements[4];
++c_7325162.elements[5] = ((closureN)self_7312927)->elements[5];
++c_7325162.elements[6] = ((closureN)self_7312927)->elements[6];
++c_7325162.elements[7] = ((closureN)self_7312927)->elements[7];
++c_7325162.elements[8] = ((closureN)self_7312927)->elements[8];
++c_7325162.elements[9] = r_737261;
++c_7325162.elements[10] = ((closureN)self_7312927)->elements[9];
++c_7325162.elements[11] = ((closureN)self_7312927)->elements[10];
+
+
+-closureN_type c_7327917;
+-object e_7327994 [4];
+-c_7327917.hdr.mark = gc_color_red;
+- c_7327917.hdr.grayed = 0;
+-c_7327917.tag = closureN_tag;
+- c_7327917.fn = (function_type)__lambda_1266;
+-c_7327917.num_args = 1;
+-c_7327917.num_elements = 4;
+-c_7327917.elements = (object *)e_7327994;
+-c_7327917.elements[0] = ((closureN)self_7314227)->elements[0];
+-c_7327917.elements[1] = ((closureN)self_7314227)->elements[3];
+-c_7327917.elements[2] = ((closureN)self_7314227)->elements[6];
+-c_7327917.elements[3] = ((closureN)self_7314227)->elements[10];
++closureN_type c_7325458;
++object e_7325535 [4];
++c_7325458.hdr.mark = gc_color_red;
++ c_7325458.hdr.grayed = 0;
++c_7325458.tag = closureN_tag;
++ c_7325458.fn = (function_type)__lambda_1219;
++c_7325458.num_args = 1;
++c_7325458.num_elements = 4;
++c_7325458.elements = (object *)e_7325535;
++c_7325458.elements[0] = ((closureN)self_7312927)->elements[0];
++c_7325458.elements[1] = ((closureN)self_7312927)->elements[3];
++c_7325458.elements[2] = ((closureN)self_7312927)->elements[6];
++c_7325458.elements[3] = ((closureN)self_7312927)->elements[10];
+
+-return_direct_with_clo1(data,(closure)&c_7327621,__lambda_1252, &c_7327917);;
++return_direct_with_clo1(data,(closure)&c_7325162,__lambda_1205, &c_7325458);;
+ }
+
+-static void __lambda_1266(void *data, object self_7314228, int argc, object *args) /* object self_7314228, object k_738002, object f_732667_734059 */
++static void __lambda_1219(void *data, object self_7312928, int argc, object *args) /* object self_7312928, object k_737227, object f_732320_733607 */
+ {
+- object k_738002 = args[0]; object f_732667_734059 = args[1];
++ object k_737227 = args[0]; object f_732320_733607 = args[1];
+
+-if( (boolean_f != Cyc_is_pair(f_732667_734059)) ){
++if( (boolean_f != Cyc_is_pair(f_732320_733607)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732667_734059))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732320_733607))) ){
+
+-closureN_type c_7327926;
+-object e_7327991 [5];
+-c_7327926.hdr.mark = gc_color_red;
+- c_7327926.hdr.grayed = 0;
+-c_7327926.tag = closureN_tag;
+- c_7327926.fn = (function_type)__lambda_1267;
+-c_7327926.num_args = 1;
+-c_7327926.num_elements = 5;
+-c_7327926.elements = (object *)e_7327991;
+-c_7327926.elements[0] = ((closureN)self_7314228)->elements[0];
+-c_7327926.elements[1] = ((closureN)self_7314228)->elements[1];
+-c_7327926.elements[2] = f_732667_734059;
+-c_7327926.elements[3] = k_738002;
+-c_7327926.elements[4] = ((closureN)self_7314228)->elements[2];
++closureN_type c_7325467;
++object e_7325532 [5];
++c_7325467.hdr.mark = gc_color_red;
++ c_7325467.hdr.grayed = 0;
++c_7325467.tag = closureN_tag;
++ c_7325467.fn = (function_type)__lambda_1220;
++c_7325467.num_args = 1;
++c_7325467.num_elements = 5;
++c_7325467.elements = (object *)e_7325532;
++c_7325467.elements[0] = ((closureN)self_7312928)->elements[0];
++c_7325467.elements[1] = ((closureN)self_7312928)->elements[1];
++c_7325467.elements[2] = f_732320_733607;
++c_7325467.elements[3] = k_737227;
++c_7325467.elements[4] = ((closureN)self_7312928)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314228)->elements[3], &c_7327926, quote_make_91getter);
++return_closcall2(data, ((closureN)self_7312928)->elements[3], &c_7325467, quote_make_91getter);
+ } else {
+- return_direct_with_clo1(data, k_738002, (((closure) k_738002)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737227, (((closure) k_737227)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_738002, (((closure) k_738002)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737227, (((closure) k_737227)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1267(void *data, object self_7314229, int argc, object *args) /* object self_7314229, object r_738010 */
++static void __lambda_1220(void *data, object self_7312929, int argc, object *args) /* object self_7312929, object r_737235 */
+ {
+- object r_738010 = args[0];
++ object r_737235 = args[0];
+
+-closureN_type c_7327928;
+-object e_7327984 [6];
+-c_7327928.hdr.mark = gc_color_red;
+- c_7327928.hdr.grayed = 0;
+-c_7327928.tag = closureN_tag;
+- c_7327928.fn = (function_type)__lambda_1268;
+-c_7327928.num_args = 1;
+-c_7327928.num_elements = 6;
+-c_7327928.elements = (object *)e_7327984;
+-c_7327928.elements[0] = ((closureN)self_7314229)->elements[0];
+-c_7327928.elements[1] = ((closureN)self_7314229)->elements[1];
+-c_7327928.elements[2] = ((closureN)self_7314229)->elements[2];
+-c_7327928.elements[3] = ((closureN)self_7314229)->elements[3];
+-c_7327928.elements[4] = ((closureN)self_7314229)->elements[4];
+-c_7327928.elements[5] = r_738010;
++closureN_type c_7325469;
++object e_7325525 [6];
++c_7325469.hdr.mark = gc_color_red;
++ c_7325469.hdr.grayed = 0;
++c_7325469.tag = closureN_tag;
++ c_7325469.fn = (function_type)__lambda_1221;
++c_7325469.num_args = 1;
++c_7325469.num_elements = 6;
++c_7325469.elements = (object *)e_7325525;
++c_7325469.elements[0] = ((closureN)self_7312929)->elements[0];
++c_7325469.elements[1] = ((closureN)self_7312929)->elements[1];
++c_7325469.elements[2] = ((closureN)self_7312929)->elements[2];
++c_7325469.elements[3] = ((closureN)self_7312929)->elements[3];
++c_7325469.elements[4] = ((closureN)self_7312929)->elements[4];
++c_7325469.elements[5] = r_737235;
+
+
+
+
+-object c_7327987 = Cyc_symbol2string(data,(closure)&c_7327928,Cyc_cadr(data, ((closureN)self_7314229)->elements[2]));
+-return_closcall1(data,(closure)&c_7327928, c_7327987);;
++object c_7325528 = Cyc_symbol2string(data,(closure)&c_7325469,Cyc_cadr(data, ((closureN)self_7312929)->elements[2]));
++return_closcall1(data,(closure)&c_7325469, c_7325528);;
+ }
+
+-static void __lambda_1268(void *data, object self_7314230, int argc, object *args) /* object self_7314230, object r_738012 */
++static void __lambda_1221(void *data, object self_7312930, int argc, object *args) /* object self_7312930, object r_737237 */
+ {
+- object r_738012 = args[0];
++ object r_737237 = args[0];
+
+-pair_type local_7327933;
++pair_type local_7325474;
+
+-pair_type local_7327937;
++pair_type local_7325478;
+
+
+
+-pair_type local_7327943;
++pair_type local_7325484;
+
+-pair_type local_7327946;
++pair_type local_7325487;
+
+-pair_type local_7327950;
++pair_type local_7325491;
+
+-pair_type local_7327953;
++pair_type local_7325494;
+
+-pair_type local_7327956;
++pair_type local_7325497;
+
+-pair_type local_7327959;
++pair_type local_7325500;
+
+-pair_type local_7327963;
++pair_type local_7325504;
+
+-pair_type local_7327966;
++pair_type local_7325507;
+
+-pair_type local_7327970;
++pair_type local_7325511;
+
+-pair_type local_7327974;
++pair_type local_7325515;
+
+-pair_type local_7327977;
++pair_type local_7325518;
+
+-pair_type local_7327980;
++pair_type local_7325521;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314230)->elements[3], (((closure) ((closureN)self_7314230)->elements[3])->fn), set_pair_as_expr(&local_7327933, ((closureN)self_7314230)->elements[0], set_pair_as_expr(&local_7327937, Cyc_cadr(data, ((closureN)self_7314230)->elements[2]), set_pair_as_expr(&local_7327943, set_pair_as_expr(&local_7327946, ((closureN)self_7314230)->elements[5], set_pair_as_expr(&local_7327950, r_738012, set_pair_as_expr(&local_7327953, set_pair_as_expr(&local_7327956, quote_quote, set_pair_as_expr(&local_7327959, ((closureN)self_7314230)->elements[4], NULL)), set_pair_as_expr(&local_7327963, set_pair_as_expr(&local_7327966, ((closureN)self_7314230)->elements[1], set_pair_as_expr(&local_7327970, ((closureN)self_7314230)->elements[4], set_pair_as_expr(&local_7327974, set_pair_as_expr(&local_7327977, quote_quote, set_pair_as_expr(&local_7327980, Cyc_car(data, ((closureN)self_7314230)->elements[2]), NULL)), NULL))), NULL)))), NULL))));;
++return_direct_with_clo1(data, ((closureN)self_7312930)->elements[3], (((closure) ((closureN)self_7312930)->elements[3])->fn), set_pair_as_expr(&local_7325474, ((closureN)self_7312930)->elements[0], set_pair_as_expr(&local_7325478, Cyc_cadr(data, ((closureN)self_7312930)->elements[2]), set_pair_as_expr(&local_7325484, set_pair_as_expr(&local_7325487, ((closureN)self_7312930)->elements[5], set_pair_as_expr(&local_7325491, r_737237, set_pair_as_expr(&local_7325494, set_pair_as_expr(&local_7325497, quote_quote, set_pair_as_expr(&local_7325500, ((closureN)self_7312930)->elements[4], NULL)), set_pair_as_expr(&local_7325504, set_pair_as_expr(&local_7325507, ((closureN)self_7312930)->elements[1], set_pair_as_expr(&local_7325511, ((closureN)self_7312930)->elements[4], set_pair_as_expr(&local_7325515, set_pair_as_expr(&local_7325518, quote_quote, set_pair_as_expr(&local_7325521, Cyc_car(data, ((closureN)self_7312930)->elements[2]), NULL)), NULL))), NULL)))), NULL))));;
+ }
+
+-static void __lambda_1252(void *data, object self_7314231, int argc, object *args) /* object self_7314231, object r_738001 */
++static void __lambda_1205(void *data, object self_7312931, int argc, object *args) /* object self_7312931, object r_737226 */
+ {
+- object r_738001 = args[0];
++ object r_737226 = args[0];
+
+-closureN_type c_7327623;
+-object e_7327910 [12];
+-c_7327623.hdr.mark = gc_color_red;
+- c_7327623.hdr.grayed = 0;
+-c_7327623.tag = closureN_tag;
+- c_7327623.fn = (function_type)__lambda_1253;
+-c_7327623.num_args = 1;
+-c_7327623.num_elements = 12;
+-c_7327623.elements = (object *)e_7327910;
+-c_7327623.elements[0] = ((closureN)self_7314231)->elements[0];
+-c_7327623.elements[1] = ((closureN)self_7314231)->elements[1];
+-c_7327623.elements[2] = ((closureN)self_7314231)->elements[2];
+-c_7327623.elements[3] = ((closureN)self_7314231)->elements[3];
+-c_7327623.elements[4] = ((closureN)self_7314231)->elements[4];
+-c_7327623.elements[5] = ((closureN)self_7314231)->elements[5];
+-c_7327623.elements[6] = ((closureN)self_7314231)->elements[6];
+-c_7327623.elements[7] = ((closureN)self_7314231)->elements[7];
+-c_7327623.elements[8] = ((closureN)self_7314231)->elements[8];
+-c_7327623.elements[9] = ((closureN)self_7314231)->elements[9];
+-c_7327623.elements[10] = ((closureN)self_7314231)->elements[10];
+-c_7327623.elements[11] = ((closureN)self_7314231)->elements[11];
++closureN_type c_7325164;
++object e_7325451 [12];
++c_7325164.hdr.mark = gc_color_red;
++ c_7325164.hdr.grayed = 0;
++c_7325164.tag = closureN_tag;
++ c_7325164.fn = (function_type)__lambda_1206;
++c_7325164.num_args = 1;
++c_7325164.num_elements = 12;
++c_7325164.elements = (object *)e_7325451;
++c_7325164.elements[0] = ((closureN)self_7312931)->elements[0];
++c_7325164.elements[1] = ((closureN)self_7312931)->elements[1];
++c_7325164.elements[2] = ((closureN)self_7312931)->elements[2];
++c_7325164.elements[3] = ((closureN)self_7312931)->elements[3];
++c_7325164.elements[4] = ((closureN)self_7312931)->elements[4];
++c_7325164.elements[5] = ((closureN)self_7312931)->elements[5];
++c_7325164.elements[6] = ((closureN)self_7312931)->elements[6];
++c_7325164.elements[7] = ((closureN)self_7312931)->elements[7];
++c_7325164.elements[8] = ((closureN)self_7312931)->elements[8];
++c_7325164.elements[9] = ((closureN)self_7312931)->elements[9];
++c_7325164.elements[10] = ((closureN)self_7312931)->elements[10];
++c_7325164.elements[11] = ((closureN)self_7312931)->elements[11];
+
+
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7327623, r_738001, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314231)->elements[4])));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325164, r_737226, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312931)->elements[4])));;
+ }
+
+-static void __lambda_1253(void *data, object self_7314232, int argc, object *args) /* object self_7314232, object r_737930 */
++static void __lambda_1206(void *data, object self_7312932, int argc, object *args) /* object self_7312932, object r_737155 */
+ {
+- object r_737930 = args[0];
++ object r_737155 = args[0];
+
+-closureN_type c_7327625;
+-object e_7327822 [12];
+-c_7327625.hdr.mark = gc_color_red;
+- c_7327625.hdr.grayed = 0;
+-c_7327625.tag = closureN_tag;
+- c_7327625.fn = (function_type)__lambda_1254;
+-c_7327625.num_args = 1;
+-c_7327625.num_elements = 12;
+-c_7327625.elements = (object *)e_7327822;
+-c_7327625.elements[0] = ((closureN)self_7314232)->elements[0];
+-c_7327625.elements[1] = ((closureN)self_7314232)->elements[1];
+-c_7327625.elements[2] = ((closureN)self_7314232)->elements[2];
+-c_7327625.elements[3] = ((closureN)self_7314232)->elements[4];
+-c_7327625.elements[4] = ((closureN)self_7314232)->elements[5];
+-c_7327625.elements[5] = ((closureN)self_7314232)->elements[6];
+-c_7327625.elements[6] = ((closureN)self_7314232)->elements[7];
+-c_7327625.elements[7] = ((closureN)self_7314232)->elements[8];
+-c_7327625.elements[8] = r_737930;
+-c_7327625.elements[9] = ((closureN)self_7314232)->elements[9];
+-c_7327625.elements[10] = ((closureN)self_7314232)->elements[10];
+-c_7327625.elements[11] = ((closureN)self_7314232)->elements[11];
++closureN_type c_7325166;
++object e_7325363 [12];
++c_7325166.hdr.mark = gc_color_red;
++ c_7325166.hdr.grayed = 0;
++c_7325166.tag = closureN_tag;
++ c_7325166.fn = (function_type)__lambda_1207;
++c_7325166.num_args = 1;
++c_7325166.num_elements = 12;
++c_7325166.elements = (object *)e_7325363;
++c_7325166.elements[0] = ((closureN)self_7312932)->elements[0];
++c_7325166.elements[1] = ((closureN)self_7312932)->elements[1];
++c_7325166.elements[2] = ((closureN)self_7312932)->elements[2];
++c_7325166.elements[3] = ((closureN)self_7312932)->elements[4];
++c_7325166.elements[4] = ((closureN)self_7312932)->elements[5];
++c_7325166.elements[5] = ((closureN)self_7312932)->elements[6];
++c_7325166.elements[6] = ((closureN)self_7312932)->elements[7];
++c_7325166.elements[7] = ((closureN)self_7312932)->elements[8];
++c_7325166.elements[8] = r_737155;
++c_7325166.elements[9] = ((closureN)self_7312932)->elements[9];
++c_7325166.elements[10] = ((closureN)self_7312932)->elements[10];
++c_7325166.elements[11] = ((closureN)self_7312932)->elements[11];
+
+
+-closureN_type c_7327823;
+-object e_7327909 [4];
+-c_7327823.hdr.mark = gc_color_red;
+- c_7327823.hdr.grayed = 0;
+-c_7327823.tag = closureN_tag;
+- c_7327823.fn = (function_type)__lambda_1263;
+-c_7327823.num_args = 1;
+-c_7327823.num_elements = 4;
+-c_7327823.elements = (object *)e_7327909;
+-c_7327823.elements[0] = ((closureN)self_7314232)->elements[0];
+-c_7327823.elements[1] = ((closureN)self_7314232)->elements[3];
+-c_7327823.elements[2] = ((closureN)self_7314232)->elements[6];
+-c_7327823.elements[3] = ((closureN)self_7314232)->elements[11];
++closureN_type c_7325364;
++object e_7325450 [4];
++c_7325364.hdr.mark = gc_color_red;
++ c_7325364.hdr.grayed = 0;
++c_7325364.tag = closureN_tag;
++ c_7325364.fn = (function_type)__lambda_1216;
++c_7325364.num_args = 1;
++c_7325364.num_elements = 4;
++c_7325364.elements = (object *)e_7325450;
++c_7325364.elements[0] = ((closureN)self_7312932)->elements[0];
++c_7325364.elements[1] = ((closureN)self_7312932)->elements[3];
++c_7325364.elements[2] = ((closureN)self_7312932)->elements[6];
++c_7325364.elements[3] = ((closureN)self_7312932)->elements[11];
+
+-return_direct_with_clo1(data,(closure)&c_7327625,__lambda_1254, &c_7327823);;
++return_direct_with_clo1(data,(closure)&c_7325166,__lambda_1207, &c_7325364);;
+ }
+
+-static void __lambda_1263(void *data, object self_7314233, int argc, object *args) /* object self_7314233, object k_737967, object f_732673_734060 */
++static void __lambda_1216(void *data, object self_7312933, int argc, object *args) /* object self_7312933, object k_737192, object f_732326_733608 */
+ {
+- object k_737967 = args[0]; object f_732673_734060 = args[1];
++ object k_737192 = args[0]; object f_732326_733608 = args[1];
+
+-if( (boolean_f != Cyc_is_pair(f_732673_734060)) ){
++if( (boolean_f != Cyc_is_pair(f_732326_733608)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732673_734060))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732326_733608))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, f_732673_734060))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, f_732326_733608))) ){
+
+-closureN_type c_7327836;
+-object e_7327905 [5];
+-c_7327836.hdr.mark = gc_color_red;
+- c_7327836.hdr.grayed = 0;
+-c_7327836.tag = closureN_tag;
+- c_7327836.fn = (function_type)__lambda_1264;
+-c_7327836.num_args = 1;
+-c_7327836.num_elements = 5;
+-c_7327836.elements = (object *)e_7327905;
+-c_7327836.elements[0] = ((closureN)self_7314233)->elements[0];
+-c_7327836.elements[1] = ((closureN)self_7314233)->elements[1];
+-c_7327836.elements[2] = f_732673_734060;
+-c_7327836.elements[3] = k_737967;
+-c_7327836.elements[4] = ((closureN)self_7314233)->elements[2];
++closureN_type c_7325377;
++object e_7325446 [5];
++c_7325377.hdr.mark = gc_color_red;
++ c_7325377.hdr.grayed = 0;
++c_7325377.tag = closureN_tag;
++ c_7325377.fn = (function_type)__lambda_1217;
++c_7325377.num_args = 1;
++c_7325377.num_elements = 5;
++c_7325377.elements = (object *)e_7325446;
++c_7325377.elements[0] = ((closureN)self_7312933)->elements[0];
++c_7325377.elements[1] = ((closureN)self_7312933)->elements[1];
++c_7325377.elements[2] = f_732326_733608;
++c_7325377.elements[3] = k_737192;
++c_7325377.elements[4] = ((closureN)self_7312933)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314233)->elements[3], &c_7327836, quote_make_91setter);
++return_closcall2(data, ((closureN)self_7312933)->elements[3], &c_7325377, quote_make_91setter);
+ } else {
+- return_direct_with_clo1(data, k_737967, (((closure) k_737967)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737192, (((closure) k_737192)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737967, (((closure) k_737967)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737192, (((closure) k_737192)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737967, (((closure) k_737967)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737192, (((closure) k_737192)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1264(void *data, object self_7314234, int argc, object *args) /* object self_7314234, object r_737976 */
++static void __lambda_1217(void *data, object self_7312934, int argc, object *args) /* object self_7312934, object r_737201 */
+ {
+- object r_737976 = args[0];
++ object r_737201 = args[0];
+
+-closureN_type c_7327838;
+-object e_7327896 [6];
+-c_7327838.hdr.mark = gc_color_red;
+- c_7327838.hdr.grayed = 0;
+-c_7327838.tag = closureN_tag;
+- c_7327838.fn = (function_type)__lambda_1265;
+-c_7327838.num_args = 1;
+-c_7327838.num_elements = 6;
+-c_7327838.elements = (object *)e_7327896;
+-c_7327838.elements[0] = ((closureN)self_7314234)->elements[0];
+-c_7327838.elements[1] = ((closureN)self_7314234)->elements[1];
+-c_7327838.elements[2] = ((closureN)self_7314234)->elements[2];
+-c_7327838.elements[3] = ((closureN)self_7314234)->elements[3];
+-c_7327838.elements[4] = ((closureN)self_7314234)->elements[4];
+-c_7327838.elements[5] = r_737976;
++closureN_type c_7325379;
++object e_7325437 [6];
++c_7325379.hdr.mark = gc_color_red;
++ c_7325379.hdr.grayed = 0;
++c_7325379.tag = closureN_tag;
++ c_7325379.fn = (function_type)__lambda_1218;
++c_7325379.num_args = 1;
++c_7325379.num_elements = 6;
++c_7325379.elements = (object *)e_7325437;
++c_7325379.elements[0] = ((closureN)self_7312934)->elements[0];
++c_7325379.elements[1] = ((closureN)self_7312934)->elements[1];
++c_7325379.elements[2] = ((closureN)self_7312934)->elements[2];
++c_7325379.elements[3] = ((closureN)self_7312934)->elements[3];
++c_7325379.elements[4] = ((closureN)self_7312934)->elements[4];
++c_7325379.elements[5] = r_737201;
+
+
+
+
+
+
+-object c_7327899 = Cyc_symbol2string(data,(closure)&c_7327838,Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314234)->elements[2])));
+-return_closcall1(data,(closure)&c_7327838, c_7327899);;
++object c_7325440 = Cyc_symbol2string(data,(closure)&c_7325379,Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312934)->elements[2])));
++return_closcall1(data,(closure)&c_7325379, c_7325440);;
+ }
+
+-static void __lambda_1265(void *data, object self_7314235, int argc, object *args) /* object self_7314235, object r_737978 */
++static void __lambda_1218(void *data, object self_7312935, int argc, object *args) /* object self_7312935, object r_737203 */
+ {
+- object r_737978 = args[0];
++ object r_737203 = args[0];
+
+-pair_type local_7327843;
++pair_type local_7325384;
+
+-pair_type local_7327847;
++pair_type local_7325388;
+
+
+
+
+
+-pair_type local_7327855;
++pair_type local_7325396;
+
+-pair_type local_7327858;
++pair_type local_7325399;
+
+-pair_type local_7327862;
++pair_type local_7325403;
+
+-pair_type local_7327865;
++pair_type local_7325406;
+
+-pair_type local_7327868;
++pair_type local_7325409;
+
+-pair_type local_7327871;
++pair_type local_7325412;
+
+-pair_type local_7327875;
++pair_type local_7325416;
+
+-pair_type local_7327878;
++pair_type local_7325419;
+
+-pair_type local_7327882;
++pair_type local_7325423;
+
+-pair_type local_7327886;
++pair_type local_7325427;
+
+-pair_type local_7327889;
++pair_type local_7325430;
+
+-pair_type local_7327892;
++pair_type local_7325433;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314235)->elements[3], (((closure) ((closureN)self_7314235)->elements[3])->fn), set_pair_as_expr(&local_7327843, ((closureN)self_7314235)->elements[0], set_pair_as_expr(&local_7327847, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314235)->elements[2])), set_pair_as_expr(&local_7327855, set_pair_as_expr(&local_7327858, ((closureN)self_7314235)->elements[5], set_pair_as_expr(&local_7327862, r_737978, set_pair_as_expr(&local_7327865, set_pair_as_expr(&local_7327868, quote_quote, set_pair_as_expr(&local_7327871, ((closureN)self_7314235)->elements[4], NULL)), set_pair_as_expr(&local_7327875, set_pair_as_expr(&local_7327878, ((closureN)self_7314235)->elements[1], set_pair_as_expr(&local_7327882, ((closureN)self_7314235)->elements[4], set_pair_as_expr(&local_7327886, set_pair_as_expr(&local_7327889, quote_quote, set_pair_as_expr(&local_7327892, Cyc_car(data, ((closureN)self_7314235)->elements[2]), NULL)), NULL))), NULL)))), NULL)))
);;
++return_direct_with_clo1(data, ((closureN)self_7312935)->elements[3], (((closure) ((closureN)self_7312935)->elements[3])->fn), set_pair_as_expr(&local_7325384, ((closureN)self_7312935)->elements[0], set_pair_as_expr(&local_7325388, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312935)->elements[2])), set_pair_as_expr(&local_7325396, set_pair_as_expr(&local_7325399, ((closureN)self_7312935)->elements[5], set_pair_as_expr(&local_7325403, r_737203, set_pair_as_expr(&local_7325406, set_pair_as_expr(&local_7325409, quote_quote, set_pair_as_expr(&local_7325412, ((closureN)self_7312935)->elements[4], NULL)), set_pair_as_expr(&local_7325416, set_pair_as_expr(&local_7325419, ((closureN)self_7312935)->elements[1], set_pair_as_expr(&local_7325423, ((closureN)self_7312935)->elements[4], set_pair_as_expr(&local_7325427, set_pair_as_expr(&local_7325430, quote_quote, set_pair_as_expr(&local_7325433, Cyc_car(data, ((closureN)self_7312935)->elements[2]), NULL)), NULL))), NULL)))), NULL)))
);;
+ }
+
+-static void __lambda_1254(void *data, object self_7314236, int argc, object *args) /* object self_7314236, object r_737966 */
++static void __lambda_1207(void *data, object self_7312936, int argc, object *args) /* object self_7312936, object r_737191 */
+ {
+- object r_737966 = args[0];
++ object r_737191 = args[0];
+
+-closureN_type c_7327627;
+-object e_7327816 [12];
+-c_7327627.hdr.mark = gc_color_red;
+- c_7327627.hdr.grayed = 0;
+-c_7327627.tag = closureN_tag;
+- c_7327627.fn = (function_type)__lambda_1255;
+-c_7327627.num_args = 1;
+-c_7327627.num_elements = 12;
+-c_7327627.elements = (object *)e_7327816;
+-c_7327627.elements[0] = ((closureN)self_7314236)->elements[0];
+-c_7327627.elements[1] = ((closureN)self_7314236)->elements[1];
+-c_7327627.elements[2] = ((closureN)self_7314236)->elements[2];
+-c_7327627.elements[3] = ((closureN)self_7314236)->elements[3];
+-c_7327627.elements[4] = ((closureN)self_7314236)->elements[4];
+-c_7327627.elements[5] = ((closureN)self_7314236)->elements[5];
+-c_7327627.elements[6] = ((closureN)self_7314236)->elements[6];
+-c_7327627.elements[7] = ((closureN)self_7314236)->elements[7];
+-c_7327627.elements[8] = ((closureN)self_7314236)->elements[8];
+-c_7327627.elements[9] = ((closureN)self_7314236)->elements[9];
+-c_7327627.elements[10] = ((closureN)self_7314236)->elements[10];
+-c_7327627.elements[11] = ((closureN)self_7314236)->elements[11];
++closureN_type c_7325168;
++object e_7325357 [12];
++c_7325168.hdr.mark = gc_color_red;
++ c_7325168.hdr.grayed = 0;
++c_7325168.tag = closureN_tag;
++ c_7325168.fn = (function_type)__lambda_1208;
++c_7325168.num_args = 1;
++c_7325168.num_elements = 12;
++c_7325168.elements = (object *)e_7325357;
++c_7325168.elements[0] = ((closureN)self_7312936)->elements[0];
++c_7325168.elements[1] = ((closureN)self_7312936)->elements[1];
++c_7325168.elements[2] = ((closureN)self_7312936)->elements[2];
++c_7325168.elements[3] = ((closureN)self_7312936)->elements[3];
++c_7325168.elements[4] = ((closureN)self_7312936)->elements[4];
++c_7325168.elements[5] = ((closureN)self_7312936)->elements[5];
++c_7325168.elements[6] = ((closureN)self_7312936)->elements[6];
++c_7325168.elements[7] = ((closureN)self_7312936)->elements[7];
++c_7325168.elements[8] = ((closureN)self_7312936)->elements[8];
++c_7325168.elements[9] = ((closureN)self_7312936)->elements[9];
++c_7325168.elements[10] = ((closureN)self_7312936)->elements[10];
++c_7325168.elements[11] = ((closureN)self_7312936)->elements[11];
+
+
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7327627, r_737966, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314236)->elements[3])));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325168, r_737191, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312936)->elements[3])));;
+ }
+
+-static void __lambda_1255(void *data, object self_7314237, int argc, object *args) /* object self_7314237, object r_737932 */
++static void __lambda_1208(void *data, object self_7312937, int argc, object *args) /* object self_7312937, object r_737157 */
+ {
+- object r_737932 = args[0];
++ object r_737157 = args[0];
+
+-closureN_type c_7327630;
+-object e_7327815 [13];
+-c_7327630.hdr.mark = gc_color_red;
+- c_7327630.hdr.grayed = 0;
+-c_7327630.tag = closureN_tag;
+- c_7327630.fn = (function_type)__lambda_1256;
+-c_7327630.num_args = 1;
+-c_7327630.num_elements = 13;
+-c_7327630.elements = (object *)e_7327815;
+-c_7327630.elements[0] = ((closureN)self_7314237)->elements[0];
+-c_7327630.elements[1] = ((closureN)self_7314237)->elements[1];
+-c_7327630.elements[2] = ((closureN)self_7314237)->elements[2];
+-c_7327630.elements[3] = ((closureN)self_7314237)->elements[3];
+-c_7327630.elements[4] = ((closureN)self_7314237)->elements[4];
+-c_7327630.elements[5] = ((closureN)self_7314237)->elements[5];
+-c_7327630.elements[6] = ((closureN)self_7314237)->elements[6];
+-c_7327630.elements[7] = ((closureN)self_7314237)->elements[7];
+-c_7327630.elements[8] = ((closureN)self_7314237)->elements[8];
+-c_7327630.elements[9] = r_737932;
+-c_7327630.elements[10] = ((closureN)self_7314237)->elements[9];
+-c_7327630.elements[11] = ((closureN)self_7314237)->elements[10];
+-c_7327630.elements[12] = ((closureN)self_7314237)->elements[11];
++closureN_type c_7325171;
++object e_7325356 [13];
++c_7325171.hdr.mark = gc_color_red;
++ c_7325171.hdr.grayed = 0;
++c_7325171.tag = closureN_tag;
++ c_7325171.fn = (function_type)__lambda_1209;
++c_7325171.num_args = 1;
++c_7325171.num_elements = 13;
++c_7325171.elements = (object *)e_7325356;
++c_7325171.elements[0] = ((closureN)self_7312937)->elements[0];
++c_7325171.elements[1] = ((closureN)self_7312937)->elements[1];
++c_7325171.elements[2] = ((closureN)self_7312937)->elements[2];
++c_7325171.elements[3] = ((closureN)self_7312937)->elements[3];
++c_7325171.elements[4] = ((closureN)self_7312937)->elements[4];
++c_7325171.elements[5] = ((closureN)self_7312937)->elements[5];
++c_7325171.elements[6] = ((closureN)self_7312937)->elements[6];
++c_7325171.elements[7] = ((closureN)self_7312937)->elements[7];
++c_7325171.elements[8] = ((closureN)self_7312937)->elements[8];
++c_7325171.elements[9] = r_737157;
++c_7325171.elements[10] = ((closureN)self_7312937)->elements[9];
++c_7325171.elements[11] = ((closureN)self_7312937)->elements[10];
++c_7325171.elements[12] = ((closureN)self_7312937)->elements[11];
+
+-return_closcall2(data, ((closureN)self_7314237)->elements[11], &c_7327630, quote_vector);;
++return_closcall2(data, ((closureN)self_7312937)->elements[11], &c_7325171, quote_vector);;
+ }
+
+-static void __lambda_1256(void *data, object self_7314238, int argc, object *args) /* object self_7314238, object r_737944 */
++static void __lambda_1209(void *data, object self_7312938, int argc, object *args) /* object self_7312938, object r_737169 */
+ {
+- object r_737944 = args[0];
++ object r_737169 = args[0];
+
+-closureN_type c_7327633;
+-object e_7327814 [13];
+-c_7327633.hdr.mark = gc_color_red;
+- c_7327633.hdr.grayed = 0;
+-c_7327633.tag = closureN_tag;
+- c_7327633.fn = (function_type)__lambda_1257;
+-c_7327633.num_args = 1;
+-c_7327633.num_elements = 13;
+-c_7327633.elements = (object *)e_7327814;
+-c_7327633.elements[0] = ((closureN)self_7314238)->elements[0];
+-c_7327633.elements[1] = ((closureN)self_7314238)->elements[1];
+-c_7327633.elements[2] = ((closureN)self_7314238)->elements[2];
+-c_7327633.elements[3] = ((closureN)self_7314238)->elements[3];
+-c_7327633.elements[4] = ((closureN)self_7314238)->elements[4];
+-c_7327633.elements[5] = ((closureN)self_7314238)->elements[5];
+-c_7327633.elements[6] = ((closureN)self_7314238)->elements[6];
+-c_7327633.elements[7] = ((closureN)self_7314238)->elements[7];
+-c_7327633.elements[8] = ((closureN)self_7314238)->elements[8];
+-c_7327633.elements[9] = ((closureN)self_7314238)->elements[9];
+-c_7327633.elements[10] = r_737944;
+-c_7327633.elements[11] = ((closureN)self_7314238)->elements[10];
+-c_7327633.elements[12] = ((closureN)self_7314238)->elements[11];
++closureN_type c_7325174;
++object e_7325355 [13];
++c_7325174.hdr.mark = gc_color_red;
++ c_7325174.hdr.grayed = 0;
++c_7325174.tag = closureN_tag;
++ c_7325174.fn = (function_type)__lambda_1210;
++c_7325174.num_args = 1;
++c_7325174.num_elements = 13;
++c_7325174.elements = (object *)e_7325355;
++c_7325174.elements[0] = ((closureN)self_7312938)->elements[0];
++c_7325174.elements[1] = ((closureN)self_7312938)->elements[1];
++c_7325174.elements[2] = ((closureN)self_7312938)->elements[2];
++c_7325174.elements[3] = ((closureN)self_7312938)->elements[3];
++c_7325174.elements[4] = ((closureN)self_7312938)->elements[4];
++c_7325174.elements[5] = ((closureN)self_7312938)->elements[5];
++c_7325174.elements[6] = ((closureN)self_7312938)->elements[6];
++c_7325174.elements[7] = ((closureN)self_7312938)->elements[7];
++c_7325174.elements[8] = ((closureN)self_7312938)->elements[8];
++c_7325174.elements[9] = ((closureN)self_7312938)->elements[9];
++c_7325174.elements[10] = r_737169;
++c_7325174.elements[11] = ((closureN)self_7312938)->elements[10];
++c_7325174.elements[12] = ((closureN)self_7312938)->elements[11];
+
+-return_closcall2(data, ((closureN)self_7314238)->elements[12], &c_7327633, quote_vector);;
++return_closcall2(data, ((closureN)self_7312938)->elements[12], &c_7325174, quote_vector);;
+ }
+
+-static void __lambda_1257(void *data, object self_7314239, int argc, object *args) /* object self_7314239, object r_737952 */
++static void __lambda_1210(void *data, object self_7312939, int argc, object *args) /* object self_7312939, object r_737177 */
+ {
+- object r_737952 = args[0];
++ object r_737177 = args[0];
+
+-closureN_type c_7327635;
+-object e_7327798 [14];
+-c_7327635.hdr.mark = gc_color_red;
+- c_7327635.hdr.grayed = 0;
+-c_7327635.tag = closureN_tag;
+- c_7327635.fn = (function_type)__lambda_1258;
+-c_7327635.num_args = 1;
+-c_7327635.num_elements = 14;
+-c_7327635.elements = (object *)e_7327798;
+-c_7327635.elements[0] = ((closureN)self_7314239)->elements[0];
+-c_7327635.elements[1] = ((closureN)self_7314239)->elements[1];
+-c_7327635.elements[2] = ((closureN)self_7314239)->elements[2];
+-c_7327635.elements[3] = ((closureN)self_7314239)->elements[3];
+-c_7327635.elements[4] = ((closureN)self_7314239)->elements[4];
+-c_7327635.elements[5] = ((closureN)self_7314239)->elements[5];
+-c_7327635.elements[6] = ((closureN)self_7314239)->elements[6];
+-c_7327635.elements[7] = ((closureN)self_7314239)->elements[7];
+-c_7327635.elements[8] = ((closureN)self_7314239)->elements[8];
+-c_7327635.elements[9] = ((closureN)self_7314239)->elements[9];
+-c_7327635.elements[10] = ((closureN)self_7314239)->elements[10];
+-c_7327635.elements[11] = r_737952;
+-c_7327635.elements[12] = ((closureN)self_7314239)->elements[11];
+-c_7327635.elements[13] = ((closureN)self_7314239)->elements[12];
++closureN_type c_7325176;
++object e_7325339 [14];
++c_7325176.hdr.mark = gc_color_red;
++ c_7325176.hdr.grayed = 0;
++c_7325176.tag = closureN_tag;
++ c_7325176.fn = (function_type)__lambda_1211;
++c_7325176.num_args = 1;
++c_7325176.num_elements = 14;
++c_7325176.elements = (object *)e_7325339;
++c_7325176.elements[0] = ((closureN)self_7312939)->elements[0];
++c_7325176.elements[1] = ((closureN)self_7312939)->elements[1];
++c_7325176.elements[2] = ((closureN)self_7312939)->elements[2];
++c_7325176.elements[3] = ((closureN)self_7312939)->elements[3];
++c_7325176.elements[4] = ((closureN)self_7312939)->elements[4];
++c_7325176.elements[5] = ((closureN)self_7312939)->elements[5];
++c_7325176.elements[6] = ((closureN)self_7312939)->elements[6];
++c_7325176.elements[7] = ((closureN)self_7312939)->elements[7];
++c_7325176.elements[8] = ((closureN)self_7312939)->elements[8];
++c_7325176.elements[9] = ((closureN)self_7312939)->elements[9];
++c_7325176.elements[10] = ((closureN)self_7312939)->elements[10];
++c_7325176.elements[11] = r_737177;
++c_7325176.elements[12] = ((closureN)self_7312939)->elements[11];
++c_7325176.elements[13] = ((closureN)self_7312939)->elements[12];
+
+
+-complex_num_type local_7327801;
++complex_num_type local_7325342;
+
+
+
+@@ -5219,1517 +5170,1517 @@ complex_num_type local_7327801;
+
+
+
+-return_direct_with_clo2(data, __glo_make_91list_scheme_base, (((closure) __glo_make_91list_scheme_base)->fn), &c_7327635, Cyc_fast_sub(data,&local_7327801, Cyc_length(data, Cyc_cddddr(data, ((closureN)self_7314239)->elements[3])), Cyc_length(data, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314239)->elements[3])))));;
++return_direct_with_clo2(data, __glo_make_91list_scheme_base, (((closure) __glo_make_91list_scheme_base)->fn), &c_7325176, Cyc_fast_sub(data,&local_7325342, Cyc_length(data, Cyc_cddddr(data, ((closureN)self_7312939)->elements[3])), Cyc_length(data, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312939)->elements[3])))));;
+ }
+
+-static void __lambda_1258(void *data, object self_7314240, int argc, object *args) /* object self_7314240, object r_737954 */
++static void __lambda_1211(void *data, object self_7312940, int argc, object *args) /* object self_7312940, object r_737179 */
+ {
+- object r_737954 = args[0];
++ object r_737179 = args[0];
+
+-closureN_type c_7327637;
+-object e_7327792 [14];
+-c_7327637.hdr.mark = gc_color_red;
+- c_7327637.hdr.grayed = 0;
+-c_7327637.tag = closureN_tag;
+- c_7327637.fn = (function_type)__lambda_1259;
+-c_7327637.num_args = 1;
+-c_7327637.num_elements = 14;
+-c_7327637.elements = (object *)e_7327792;
+-c_7327637.elements[0] = ((closureN)self_7314240)->elements[0];
+-c_7327637.elements[1] = ((closureN)self_7314240)->elements[1];
+-c_7327637.elements[2] = ((closureN)self_7314240)->elements[2];
+-c_7327637.elements[3] = ((closureN)self_7314240)->elements[3];
+-c_7327637.elements[4] = ((closureN)self_7314240)->elements[4];
+-c_7327637.elements[5] = ((closureN)self_7314240)->elements[5];
+-c_7327637.elements[6] = ((closureN)self_7314240)->elements[6];
+-c_7327637.elements[7] = ((closureN)self_7314240)->elements[7];
+-c_7327637.elements[8] = ((closureN)self_7314240)->elements[8];
+-c_7327637.elements[9] = ((closureN)self_7314240)->elements[9];
+-c_7327637.elements[10] = ((closureN)self_7314240)->elements[10];
+-c_7327637.elements[11] = ((closureN)self_7314240)->elements[11];
+-c_7327637.elements[12] = ((closureN)self_7314240)->elements[12];
+-c_7327637.elements[13] = ((closureN)self_7314240)->elements[13];
++closureN_type c_7325178;
++object e_7325333 [14];
++c_7325178.hdr.mark = gc_color_red;
++ c_7325178.hdr.grayed = 0;
++c_7325178.tag = closureN_tag;
++ c_7325178.fn = (function_type)__lambda_1212;
++c_7325178.num_args = 1;
++c_7325178.num_elements = 14;
++c_7325178.elements = (object *)e_7325333;
++c_7325178.elements[0] = ((closureN)self_7312940)->elements[0];
++c_7325178.elements[1] = ((closureN)self_7312940)->elements[1];
++c_7325178.elements[2] = ((closureN)self_7312940)->elements[2];
++c_7325178.elements[3] = ((closureN)self_7312940)->elements[3];
++c_7325178.elements[4] = ((closureN)self_7312940)->elements[4];
++c_7325178.elements[5] = ((closureN)self_7312940)->elements[5];
++c_7325178.elements[6] = ((closureN)self_7312940)->elements[6];
++c_7325178.elements[7] = ((closureN)self_7312940)->elements[7];
++c_7325178.elements[8] = ((closureN)self_7312940)->elements[8];
++c_7325178.elements[9] = ((closureN)self_7312940)->elements[9];
++c_7325178.elements[10] = ((closureN)self_7312940)->elements[10];
++c_7325178.elements[11] = ((closureN)self_7312940)->elements[11];
++c_7325178.elements[12] = ((closureN)self_7312940)->elements[12];
++c_7325178.elements[13] = ((closureN)self_7312940)->elements[13];
+
+
+
+
+
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7327637, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314240)->elements[3])), r_737954);;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325178, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312940)->elements[3])), r_737179);;
+ }
+
+-static void __lambda_1259(void *data, object self_7314241, int argc, object *args) /* object self_7314241, object r_737953 */
++static void __lambda_1212(void *data, object self_7312941, int argc, object *args) /* object self_7312941, object r_737178 */
+ {
+- object r_737953 = args[0];
++ object r_737178 = args[0];
+
+-closureN_type c_7327639;
+-object e_7327730 [10];
+-c_7327639.hdr.mark = gc_color_red;
+- c_7327639.hdr.grayed = 0;
+-c_7327639.tag = closureN_tag;
+- c_7327639.fn = (function_type)__lambda_1260;
+-c_7327639.num_args = 1;
+-c_7327639.num_elements = 10;
+-c_7327639.elements = (object *)e_7327730;
+-c_7327639.elements[0] = ((closureN)self_7314241)->elements[0];
+-c_7327639.elements[1] = ((closureN)self_7314241)->elements[2];
+-c_7327639.elements[2] = ((closureN)self_7314241)->elements[3];
+-c_7327639.elements[3] = ((closureN)self_7314241)->elements[4];
+-c_7327639.elements[4] = ((closureN)self_7314241)->elements[5];
+-c_7327639.elements[5] = ((closureN)self_7314241)->elements[6];
+-c_7327639.elements[6] = ((closureN)self_7314241)->elements[7];
+-c_7327639.elements[7] = ((closureN)self_7314241)->elements[8];
+-c_7327639.elements[8] = ((closureN)self_7314241)->elements[12];
+-c_7327639.elements[9] = ((closureN)self_7314241)->elements[13];
++closureN_type c_7325180;
++object e_7325271 [10];
++c_7325180.hdr.mark = gc_color_red;
++ c_7325180.hdr.grayed = 0;
++c_7325180.tag = closureN_tag;
++ c_7325180.fn = (function_type)__lambda_1213;
++c_7325180.num_args = 1;
++c_7325180.num_elements = 10;
++c_7325180.elements = (object *)e_7325271;
++c_7325180.elements[0] = ((closureN)self_7312941)->elements[0];
++c_7325180.elements[1] = ((closureN)self_7312941)->elements[2];
++c_7325180.elements[2] = ((closureN)self_7312941)->elements[3];
++c_7325180.elements[3] = ((closureN)self_7312941)->elements[4];
++c_7325180.elements[4] = ((closureN)self_7312941)->elements[5];
++c_7325180.elements[5] = ((closureN)self_7312941)->elements[6];
++c_7325180.elements[6] = ((closureN)self_7312941)->elements[7];
++c_7325180.elements[7] = ((closureN)self_7312941)->elements[8];
++c_7325180.elements[8] = ((closureN)self_7312941)->elements[12];
++c_7325180.elements[9] = ((closureN)self_7312941)->elements[13];
+
+
+-pair_type local_7327734;
++pair_type local_7325275;
+
+-pair_type local_7327737;
++pair_type local_7325278;
+
+-pair_type local_7327741;
++pair_type local_7325282;
+
+
+
+
+
+-pair_type local_7327749;
++pair_type local_7325290;
+
+-pair_type local_7327752;
++pair_type local_7325293;
+
+-pair_type local_7327756;
++pair_type local_7325297;
+
+
+
+
+
+-pair_type local_7327764;
++pair_type local_7325305;
+
+-pair_type local_7327767;
++pair_type local_7325308;
+
+-pair_type local_7327771;
++pair_type local_7325312;
+
+-pair_type local_7327774;
++pair_type local_7325315;
+
+-pair_type local_7327777;
++pair_type local_7325318;
+
+-pair_type local_7327780;
++pair_type local_7325321;
+
+-pair_type local_7327783;
++pair_type local_7325324;
+
+-pair_type local_7327787;
++pair_type local_7325328;
+
+-pair_type local_7327790;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7327639, ((closureN)self_7314241)->elements[9], set_pair_as_expr(&local_7327734, set_pair_as_expr(&local_7327737, ((closureN)self_7314241)->elements[0], set_pair_as_expr(&local_7327741, Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7314241)->elements[3])), set_pair_as_expr(&local_7327749, set_pair_as_expr(&local_7327752, ((closureN)self_7314241)->elements[1], set_pair_as_expr(&local_7327756, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314241)->elements[3])), set_pair_as_expr(&local_7327764, set_pair_as_expr(&local_7327767, ((closureN)self_7314241)->elements[10], set_pair_as_expr(&local_7327771, set_pair_as_expr(&local_7327774, quote_make_91record_91marker, NULL), set_pair_as_expr(&local_7327777, set_pair_as_expr(&local_7327780, quote_quote, set_pair_as_expr(&local_7327783, ((closureN)self_7314241)->elements[5], NULL)), set_pair_as_expr(&local_7327787, set_pair_as_exp
r(&local_7327790, ((closureN)self_7314241)->elements[11], r_737953), NULL)))), NULL))), NULL))), NULL));;
++pair_type local_7325331;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325180, ((closureN)self_7312941)->elements[9], set_pair_as_expr(&local_7325275, set_pair_as_expr(&local_7325278, ((closureN)self_7312941)->elements[0], set_pair_as_expr(&local_7325282, Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7312941)->elements[3])), set_pair_as_expr(&local_7325290, set_pair_as_expr(&local_7325293, ((closureN)self_7312941)->elements[1], set_pair_as_expr(&local_7325297, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312941)->elements[3])), set_pair_as_expr(&local_7325305, set_pair_as_expr(&local_7325308, ((closureN)self_7312941)->elements[10], set_pair_as_expr(&local_7325312, set_pair_as_expr(&local_7325315, quote_make_91record_91marker, NULL), set_pair_as_expr(&local_7325318, set_pair_as_expr(&local_7325321, quote_quote, set_pair_as_expr(&local_7325324, ((closureN)self_7312941)->elements[5], NULL)), set_pair_as_expr(&local_7325328, set_pair_as_exp
r(&local_7325331, ((closureN)self_7312941)->elements[11], r_737178), NULL)))), NULL))), NULL))), NULL));;
+ }
+
+-static void __lambda_1260(void *data, object self_7314242, int argc, object *args) /* object self_7314242, object r_737931 */
++static void __lambda_1213(void *data, object self_7312942, int argc, object *args) /* object self_7312942, object r_737156 */
+ {
+- object r_737931 = args[0];
++ object r_737156 = args[0];
+
+-closureN_type c_7327641;
+-object e_7327728 [9];
+-c_7327641.hdr.mark = gc_color_red;
+- c_7327641.hdr.grayed = 0;
+-c_7327641.tag = closureN_tag;
+- c_7327641.fn = (function_type)__lambda_1261;
+-c_7327641.num_args = 1;
+-c_7327641.num_elements = 9;
+-c_7327641.elements = (object *)e_7327728;
+-c_7327641.elements[0] = ((closureN)self_7314242)->elements[0];
+-c_7327641.elements[1] = ((closureN)self_7314242)->elements[1];
+-c_7327641.elements[2] = ((closureN)self_7314242)->elements[2];
+-c_7327641.elements[3] = ((closureN)self_7314242)->elements[3];
+-c_7327641.elements[4] = ((closureN)self_7314242)->elements[4];
+-c_7327641.elements[5] = ((closureN)self_7314242)->elements[5];
+-c_7327641.elements[6] = ((closureN)self_7314242)->elements[6];
+-c_7327641.elements[7] = ((closureN)self_7314242)->elements[8];
+-c_7327641.elements[8] = ((closureN)self_7314242)->elements[9];
++closureN_type c_7325182;
++object e_7325269 [9];
++c_7325182.hdr.mark = gc_color_red;
++ c_7325182.hdr.grayed = 0;
++c_7325182.tag = closureN_tag;
++ c_7325182.fn = (function_type)__lambda_1214;
++c_7325182.num_args = 1;
++c_7325182.num_elements = 9;
++c_7325182.elements = (object *)e_7325269;
++c_7325182.elements[0] = ((closureN)self_7312942)->elements[0];
++c_7325182.elements[1] = ((closureN)self_7312942)->elements[1];
++c_7325182.elements[2] = ((closureN)self_7312942)->elements[2];
++c_7325182.elements[3] = ((closureN)self_7312942)->elements[3];
++c_7325182.elements[4] = ((closureN)self_7312942)->elements[4];
++c_7325182.elements[5] = ((closureN)self_7312942)->elements[5];
++c_7325182.elements[6] = ((closureN)self_7312942)->elements[6];
++c_7325182.elements[7] = ((closureN)self_7312942)->elements[8];
++c_7325182.elements[8] = ((closureN)self_7312942)->elements[9];
+
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7327641, ((closureN)self_7314242)->elements[7], r_737931);;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325182, ((closureN)self_7312942)->elements[7], r_737156);;
+ }
+
+-static void __lambda_1261(void *data, object self_7314243, int argc, object *args) /* object self_7314243, object r_737929 */
++static void __lambda_1214(void *data, object self_7312943, int argc, object *args) /* object self_7312943, object r_737154 */
+ {
+- object r_737929 = args[0];
++ object r_737154 = args[0];
+
+-closureN_type c_7327643;
+-object e_7327692 [7];
+-c_7327643.hdr.mark = gc_color_red;
+- c_7327643.hdr.grayed = 0;
+-c_7327643.tag = closureN_tag;
+- c_7327643.fn = (function_type)__lambda_1262;
+-c_7327643.num_args = 1;
+-c_7327643.num_elements = 7;
+-c_7327643.elements = (object *)e_7327692;
+-c_7327643.elements[0] = ((closureN)self_7314243)->elements[0];
+-c_7327643.elements[1] = ((closureN)self_7314243)->elements[1];
+-c_7327643.elements[2] = ((closureN)self_7314243)->elements[3];
+-c_7327643.elements[3] = ((closureN)self_7314243)->elements[4];
+-c_7327643.elements[4] = ((closureN)self_7314243)->elements[5];
+-c_7327643.elements[5] = ((closureN)self_7314243)->elements[6];
+-c_7327643.elements[6] = ((closureN)self_7314243)->elements[8];
++closureN_type c_7325184;
++object e_7325233 [7];
++c_7325184.hdr.mark = gc_color_red;
++ c_7325184.hdr.grayed = 0;
++c_7325184.tag = closureN_tag;
++ c_7325184.fn = (function_type)__lambda_1215;
++c_7325184.num_args = 1;
++c_7325184.num_elements = 7;
++c_7325184.elements = (object *)e_7325233;
++c_7325184.elements[0] = ((closureN)self_7312943)->elements[0];
++c_7325184.elements[1] = ((closureN)self_7312943)->elements[1];
++c_7325184.elements[2] = ((closureN)self_7312943)->elements[3];
++c_7325184.elements[3] = ((closureN)self_7312943)->elements[4];
++c_7325184.elements[4] = ((closureN)self_7312943)->elements[5];
++c_7325184.elements[5] = ((closureN)self_7312943)->elements[6];
++c_7325184.elements[6] = ((closureN)self_7312943)->elements[8];
+
+
+-pair_type local_7327695;
++pair_type local_7325236;
+
+-pair_type local_7327698;
++pair_type local_7325239;
+
+-pair_type local_7327702;
++pair_type local_7325243;
+
+
+
+
+
+-pair_type local_7327710;
++pair_type local_7325251;
+
+-pair_type local_7327713;
++pair_type local_7325254;
+
+-pair_type local_7327717;
++pair_type local_7325258;
+
+-pair_type local_7327720;
++pair_type local_7325261;
+
+-pair_type local_7327723;
++pair_type local_7325264;
+
+-pair_type local_7327726;
+-return_direct_with_clo1(data,(closure)&c_7327643,__lambda_1262, set_pair_as_expr(&local_7327695, set_pair_as_expr(&local_7327698, ((closureN)self_7314243)->elements[0], set_pair_as_expr(&local_7327702, Cyc_cadr(data, Cyc_cddr(data, ((closureN)self_7314243)->elements[2])), set_pair_as_expr(&local_7327710, set_pair_as_expr(&local_7327713, ((closureN)self_7314243)->elements[7], set_pair_as_expr(&local_7327717, obj_int2obj(0), set_pair_as_expr(&local_7327720, set_pair_as_expr(&local_7327723, quote_quote, set_pair_as_expr(&local_7327726, ((closureN)self_7314243)->elements[4], NULL)), NULL))), NULL))), r_737929));;
++pair_type local_7325267;
++return_direct_with_clo1(data,(closure)&c_7325184,__lambda_1215, set_pair_as_expr(&local_7325236, set_pair_as_expr(&local_7325239, ((closureN)self_7312943)->elements[0], set_pair_as_expr(&local_7325243, Cyc_cadr(data, Cyc_cddr(data, ((closureN)self_7312943)->elements[2])), set_pair_as_expr(&local_7325251, set_pair_as_expr(&local_7325254, ((closureN)self_7312943)->elements[7], set_pair_as_expr(&local_7325258, obj_int2obj(0), set_pair_as_expr(&local_7325261, set_pair_as_expr(&local_7325264, quote_quote, set_pair_as_expr(&local_7325267, ((closureN)self_7312943)->elements[4], NULL)), NULL))), NULL))), r_737154));;
+ }
+
+-static void __lambda_1262(void *data, object self_7314244, int argc, object *args) /* object self_7314244, object r_737927 */
++static void __lambda_1215(void *data, object self_7312944, int argc, object *args) /* object self_7312944, object r_737152 */
+ {
+- object r_737927 = args[0];
++ object r_737152 = args[0];
+
+-pair_type local_7327648;
++pair_type local_7325189;
+
+-pair_type local_7327652;
++pair_type local_7325193;
+
+-pair_type local_7327655;
++pair_type local_7325196;
+
+-pair_type local_7327659;
++pair_type local_7325200;
+
+-pair_type local_7327663;
++pair_type local_7325204;
+
+-pair_type local_7327666;
++pair_type local_7325207;
+
+-pair_type local_7327670;
++pair_type local_7325211;
+
+-pair_type local_7327673;
++pair_type local_7325214;
+
+-pair_type local_7327676;
++pair_type local_7325217;
+
+-pair_type local_7327680;
++pair_type local_7325221;
+
+-pair_type local_7327684;
++pair_type local_7325225;
+
+-pair_type local_7327687;
++pair_type local_7325228;
+
+-pair_type local_7327690;
+-return_direct_with_clo1(data, ((closureN)self_7314244)->elements[2], (((closure) ((closureN)self_7314244)->elements[2])->fn), set_pair_as_expr(&local_7327648, ((closureN)self_7314244)->elements[5], set_pair_as_expr(&local_7327652, set_pair_as_expr(&local_7327655, ((closureN)self_7314244)->elements[0], set_pair_as_expr(&local_7327659, ((closureN)self_7314244)->elements[3], set_pair_as_expr(&local_7327663, set_pair_as_expr(&local_7327666, ((closureN)self_7314244)->elements[1], set_pair_as_expr(&local_7327670, set_pair_as_expr(&local_7327673, quote_quote, set_pair_as_expr(&local_7327676, ((closureN)self_7314244)->elements[3], NULL)), set_pair_as_expr(&local_7327680, ((closureN)self_7314244)->elements[4], set_pair_as_expr(&local_7327684, set_pair_as_expr(&local_7327687, quote_quote, set_pair_as_expr(&local_7327690, ((closureN)self_7314244)->elements[6], NULL)), NULL)))), NULL))), r_737927)));;
++pair_type local_7325231;
++return_direct_with_clo1(data, ((closureN)self_7312944)->elements[2], (((closure) ((closureN)self_7312944)->elements[2])->fn), set_pair_as_expr(&local_7325189, ((closureN)self_7312944)->elements[5], set_pair_as_expr(&local_7325193, set_pair_as_expr(&local_7325196, ((closureN)self_7312944)->elements[0], set_pair_as_expr(&local_7325200, ((closureN)self_7312944)->elements[3], set_pair_as_expr(&local_7325204, set_pair_as_expr(&local_7325207, ((closureN)self_7312944)->elements[1], set_pair_as_expr(&local_7325211, set_pair_as_expr(&local_7325214, quote_quote, set_pair_as_expr(&local_7325217, ((closureN)self_7312944)->elements[3], NULL)), set_pair_as_expr(&local_7325221, ((closureN)self_7312944)->elements[4], set_pair_as_expr(&local_7325225, set_pair_as_expr(&local_7325228, quote_quote, set_pair_as_expr(&local_7325231, ((closureN)self_7312944)->elements[6], NULL)), NULL)))), NULL))), r_737152)));;
+ }
+
+-static void __lambda_1247(void *data, object self_7314245, int argc, object *args) /* object self_7314245, object k_738063 */
++static void __lambda_1200(void *data, object self_7312945, int argc, object *args) /* object self_7312945, object k_737288 */
+ {
+- object k_738063 = args[0];
++ object k_737288 = args[0];
+
+
+
+-if( (boolean_f != Cyc_eq(((closureN)self_7314245)->elements[1], Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7314245)->elements[0])))) ){
++if( (boolean_f != Cyc_eq(((closureN)self_7312945)->elements[1], Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7312945)->elements[0])))) ){
+
+-make_utf8_string_with_len(c_7327607, "same binding for record rtd and constructor", 43, 43);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_738063, &c_7327607, ((closureN)self_7314245)->elements[1]);
++make_utf8_string_with_len(c_7325148, "same binding for record rtd and constructor", 43, 43);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_737288, &c_7325148, ((closureN)self_7312945)->elements[1]);
+ } else {
+- return_direct_with_clo1(data, k_738063, (((closure) k_738063)->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, k_737288, (((closure) k_737288)->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_1239(void *data, object self_7314246, int argc, object *args) /* object self_7314246, object k_738071 */
++static void __lambda_1192(void *data, object self_7312946, int argc, object *args) /* object self_7312946, object k_737296 */
+ {
+- object k_738071 = args[0];
++ object k_737296 = args[0];
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, ((closureN)self_7314246)->elements[0]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, ((closureN)self_7312946)->elements[0]))) ){
+
+
+
+
+-return_direct_with_clo1(data, k_738071,__lambda_1240, Cyc_cadr(data, Cyc_cadr(data, ((closureN)self_7314246)->elements[0])));
++return_direct_with_clo1(data, k_737296,__lambda_1193, Cyc_cadr(data, Cyc_cadr(data, ((closureN)self_7312946)->elements[0])));
+ } else {
+- return_direct_with_clo1(data, k_738071,__lambda_1240, boolean_f);}
++ return_direct_with_clo1(data, k_737296,__lambda_1193, boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1235(void *data, object _, int argc, object *args) /* closure _,object k_737901, object obj_732614_734040, object rtype_732615_734041 */
++static void __lambda_1188(void *data, object _, int argc, object *args) /* closure _,object k_737126, object obj_732267_733588, object rtype_732268_733589 */
+ {
+-object k_737901 = args[0]; object obj_732614_734040 = args[1]; object rtype_732615_734041 = args[2];
++object k_737126 = args[0]; object obj_732267_733588 = args[1]; object rtype_732268_733589 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:is-a?");
+
+-closureN_type c_7327528;
+-object e_7327547 [3];
+-c_7327528.hdr.mark = gc_color_red;
+- c_7327528.hdr.grayed = 0;
+-c_7327528.tag = closureN_tag;
+- c_7327528.fn = (function_type)__lambda_1236;
+-c_7327528.num_args = 1;
+-c_7327528.num_elements = 3;
+-c_7327528.elements = (object *)e_7327547;
+-c_7327528.elements[0] = k_737901;
+-c_7327528.elements[1] = obj_732614_734040;
+-c_7327528.elements[2] = rtype_732615_734041;
++closureN_type c_7325069;
++object e_7325088 [3];
++c_7325069.hdr.mark = gc_color_red;
++ c_7325069.hdr.grayed = 0;
++c_7325069.tag = closureN_tag;
++ c_7325069.fn = (function_type)__lambda_1189;
++c_7325069.num_args = 1;
++c_7325069.num_elements = 3;
++c_7325069.elements = (object *)e_7325088;
++c_7325069.elements[0] = k_737126;
++c_7325069.elements[1] = obj_732267_733588;
++c_7325069.elements[2] = rtype_732268_733589;
+
+-return_direct_with_clo2(data, __glo_record_127_scheme_base, (((closure) __glo_record_127_scheme_base)->fn), &c_7327528, obj_732614_734040);;
++return_direct_with_clo2(data, __glo_record_127_scheme_base, (((closure) __glo_record_127_scheme_base)->fn), &c_7325069, obj_732267_733588);;
+ }
+
+-static void __lambda_1236(void *data, object self_7314215, int argc, object *args) /* object self_7314215, object r_737902 */
++static void __lambda_1189(void *data, object self_7312915, int argc, object *args) /* object self_7312915, object r_737127 */
+ {
+- object r_737902 = args[0];
+- if( (boolean_f != r_737902) ){
++ object r_737127 = args[0];
++ if( (boolean_f != r_737127) ){
+
+-closureN_type c_7327530;
+-object e_7327543 [3];
+-c_7327530.hdr.mark = gc_color_red;
+- c_7327530.hdr.grayed = 0;
+-c_7327530.tag = closureN_tag;
+- c_7327530.fn = (function_type)__lambda_1237;
+-c_7327530.num_args = 1;
+-c_7327530.num_elements = 3;
+-c_7327530.elements = (object *)e_7327543;
+-c_7327530.elements[0] = ((closureN)self_7314215)->elements[0];
+-c_7327530.elements[1] = ((closureN)self_7314215)->elements[1];
+-c_7327530.elements[2] = ((closureN)self_7314215)->elements[2];
++closureN_type c_7325071;
++object e_7325084 [3];
++c_7325071.hdr.mark = gc_color_red;
++ c_7325071.hdr.grayed = 0;
++c_7325071.tag = closureN_tag;
++ c_7325071.fn = (function_type)__lambda_1190;
++c_7325071.num_args = 1;
++c_7325071.num_elements = 3;
++c_7325071.elements = (object *)e_7325084;
++c_7325071.elements[0] = ((closureN)self_7312915)->elements[0];
++c_7325071.elements[1] = ((closureN)self_7312915)->elements[1];
++c_7325071.elements[2] = ((closureN)self_7312915)->elements[2];
+
+-return_direct_with_clo2(data, __glo_record_127_scheme_base, (((closure) __glo_record_127_scheme_base)->fn), &c_7327530, ((closureN)self_7314215)->elements[2]);
++return_direct_with_clo2(data, __glo_record_127_scheme_base, (((closure) __glo_record_127_scheme_base)->fn), &c_7325071, ((closureN)self_7312915)->elements[2]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314215)->elements[0], (((closure) ((closureN)self_7314215)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312915)->elements[0], (((closure) ((closureN)self_7312915)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1237(void *data, object self_7314216, int argc, object *args) /* object self_7314216, object r_737903 */
++static void __lambda_1190(void *data, object self_7312916, int argc, object *args) /* object self_7312916, object r_737128 */
+ {
+- object r_737903 = args[0];
+- if( (boolean_f != r_737903) ){
++ object r_737128 = args[0];
++ if( (boolean_f != r_737128) ){
+
+
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314216)->elements[0], (((closure) ((closureN)self_7314216)->elements[0])->fn), equalp(Cyc_vector_ref(data, ((closureN)self_7314216)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_7314216)->elements[2], obj_int2obj(1))));
++return_direct_with_clo1(data, ((closureN)self_7312916)->elements[0], (((closure) ((closureN)self_7312916)->elements[0])->fn), equalp(Cyc_vector_ref(data, ((closureN)self_7312916)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_7312916)->elements[2], obj_int2obj(1))));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314216)->elements[0], (((closure) ((closureN)self_7314216)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312916)->elements[0], (((closure) ((closureN)self_7312916)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1514(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, Cyc_is_record(obj)); }
+-static void __lambda_1229(void *data, object _, int argc, object *args) /* closure _,object k_737890, object e_732605_734033, object lst1_732606_734034 */
++static void __lambda_1467(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, Cyc_is_record(obj)); }
++static void __lambda_1182(void *data, object _, int argc, object *args) /* closure _,object k_737115, object e_732258_733581, object lst1_732259_733582 */
+ {
+-object k_737890 = args[0]; object e_732605_734033 = args[1]; object lst1_732606_734034 = args[2];
++object k_737115 = args[0]; object e_732258_733581 = args[1]; object lst1_732259_733582 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:_list-index");
+
+-closureN_type c_7327479;
+-object e_7327524 [2];
+-c_7327479.hdr.mark = gc_color_red;
+- c_7327479.hdr.grayed = 0;
+-c_7327479.tag = closureN_tag;
+- c_7327479.fn = (function_type)__lambda_1230;
+-c_7327479.num_args = 1;
+-c_7327479.num_elements = 2;
+-c_7327479.elements = (object *)e_7327524;
+-c_7327479.elements[0] = e_732605_734033;
+-c_7327479.elements[1] = k_737890;
+-
+-return_direct_with_clo1(data,(closure)&c_7327479,__lambda_1230, lst1_732606_734034);;
+-}
+-
+-static void __lambda_1230(void *data, object self_7314209, int argc, object *args) /* object self_7314209, object lis_732608_734035 */
+- {
+- object lis_732608_734035 = args[0];
+-
+-closureN_type c_7327481;
+-object e_7327523 [3];
+-c_7327481.hdr.mark = gc_color_red;
+- c_7327481.hdr.grayed = 0;
+-c_7327481.tag = closureN_tag;
+- c_7327481.fn = (function_type)__lambda_1231;
+-c_7327481.num_args = 1;
+-c_7327481.num_elements = 3;
+-c_7327481.elements = (object *)e_7327523;
+-c_7327481.elements[0] = ((closureN)self_7314209)->elements[0];
+-c_7327481.elements[1] = ((closureN)self_7314209)->elements[1];
+-c_7327481.elements[2] = lis_732608_734035;
++closureN_type c_7325020;
++object e_7325065 [2];
++c_7325020.hdr.mark = gc_color_red;
++ c_7325020.hdr.grayed = 0;
++c_7325020.tag = closureN_tag;
++ c_7325020.fn = (function_type)__lambda_1183;
++c_7325020.num_args = 1;
++c_7325020.num_elements = 2;
++c_7325020.elements = (object *)e_7325065;
++c_7325020.elements[0] = e_732258_733581;
++c_7325020.elements[1] = k_737115;
++
++return_direct_with_clo1(data,(closure)&c_7325020,__lambda_1183, lst1_732259_733582);;
++}
++
++static void __lambda_1183(void *data, object self_7312909, int argc, object *args) /* object self_7312909, object lis_732261_733583 */
++ {
++ object lis_732261_733583 = args[0];
++
++closureN_type c_7325022;
++object e_7325064 [3];
++c_7325022.hdr.mark = gc_color_red;
++ c_7325022.hdr.grayed = 0;
++c_7325022.tag = closureN_tag;
++ c_7325022.fn = (function_type)__lambda_1184;
++c_7325022.num_args = 1;
++c_7325022.num_elements = 3;
++c_7325022.elements = (object *)e_7325064;
++c_7325022.elements[0] = ((closureN)self_7312909)->elements[0];
++c_7325022.elements[1] = ((closureN)self_7312909)->elements[1];
++c_7325022.elements[2] = lis_732261_733583;
+
+-return_direct_with_clo1(data,(closure)&c_7327481,__lambda_1231, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7325022,__lambda_1184, boolean_f);;
+ }
+
+-static void __lambda_1231(void *data, object self_7314210, int argc, object *args) /* object self_7314210, object lp_732610_734037 */
++static void __lambda_1184(void *data, object self_7312910, int argc, object *args) /* object self_7312910, object lp_732263_733585 */
+ {
+- object lp_732610_734037 = args[0];
++ object lp_732263_733585 = args[0];
+
+-closureN_type c_7327483;
+-object e_7327519 [3];
+-c_7327483.hdr.mark = gc_color_red;
+- c_7327483.hdr.grayed = 0;
+-c_7327483.tag = closureN_tag;
+- c_7327483.fn = (function_type)__lambda_1443;
+-c_7327483.num_args = 1;
+-c_7327483.num_elements = 3;
+-c_7327483.elements = (object *)e_7327519;
+-c_7327483.elements[0] = ((closureN)self_7314210)->elements[0];
+-c_7327483.elements[1] = ((closureN)self_7314210)->elements[1];
+-c_7327483.elements[2] = ((closureN)self_7314210)->elements[2];
++closureN_type c_7325024;
++object e_7325060 [3];
++c_7325024.hdr.mark = gc_color_red;
++ c_7325024.hdr.grayed = 0;
++c_7325024.tag = closureN_tag;
++ c_7325024.fn = (function_type)__lambda_1396;
++c_7325024.num_args = 1;
++c_7325024.num_elements = 3;
++c_7325024.elements = (object *)e_7325060;
++c_7325024.elements[0] = ((closureN)self_7312910)->elements[0];
++c_7325024.elements[1] = ((closureN)self_7312910)->elements[1];
++c_7325024.elements[2] = ((closureN)self_7312910)->elements[2];
+
+
+-pair_type local_7327522;
+-return_direct_with_clo1(data,(closure)&c_7327483,__lambda_1443, set_cell_as_expr(&local_7327522, lp_732610_734037));;
++pair_type local_7325063;
++return_direct_with_clo1(data,(closure)&c_7325024,__lambda_1396, set_cell_as_expr(&local_7325063, lp_732263_733585));;
+ }
+
+-static void __lambda_1443(void *data, object self_7314211, int argc, object *args) /* object self_7314211, object lp_732610_734037 */
++static void __lambda_1396(void *data, object self_7312911, int argc, object *args) /* object self_7312911, object lp_732263_733585 */
+ {
+- object lp_732610_734037 = args[0];
++ object lp_732263_733585 = args[0];
+
+-closureN_type c_7327485;
+-object e_7327498 [3];
+-c_7327485.hdr.mark = gc_color_red;
+- c_7327485.hdr.grayed = 0;
+-c_7327485.tag = closureN_tag;
+- c_7327485.fn = (function_type)__lambda_1232;
+-c_7327485.num_args = 1;
+-c_7327485.num_elements = 3;
+-c_7327485.elements = (object *)e_7327498;
+-c_7327485.elements[0] = ((closureN)self_7314211)->elements[1];
+-c_7327485.elements[1] = ((closureN)self_7314211)->elements[2];
+-c_7327485.elements[2] = lp_732610_734037;
++closureN_type c_7325026;
++object e_7325039 [3];
++c_7325026.hdr.mark = gc_color_red;
++ c_7325026.hdr.grayed = 0;
++c_7325026.tag = closureN_tag;
++ c_7325026.fn = (function_type)__lambda_1185;
++c_7325026.num_args = 1;
++c_7325026.num_elements = 3;
++c_7325026.elements = (object *)e_7325039;
++c_7325026.elements[0] = ((closureN)self_7312911)->elements[1];
++c_7325026.elements[1] = ((closureN)self_7312911)->elements[2];
++c_7325026.elements[2] = lp_732263_733585;
+
+
+-closureN_type c_7327499;
+-object e_7327518 [2];
+-c_7327499.hdr.mark = gc_color_red;
+- c_7327499.hdr.grayed = 0;
+-c_7327499.tag = closureN_tag;
+- c_7327499.fn = (function_type)__lambda_1234;
+-c_7327499.num_args = 2;
+-c_7327499.num_elements = 2;
+-c_7327499.elements = (object *)e_7327518;
+-c_7327499.elements[0] = ((closureN)self_7314211)->elements[0];
+-c_7327499.elements[1] = lp_732610_734037;
++closureN_type c_7325040;
++object e_7325059 [2];
++c_7325040.hdr.mark = gc_color_red;
++ c_7325040.hdr.grayed = 0;
++c_7325040.tag = closureN_tag;
++ c_7325040.fn = (function_type)__lambda_1187;
++c_7325040.num_args = 2;
++c_7325040.num_elements = 2;
++c_7325040.elements = (object *)e_7325059;
++c_7325040.elements[0] = ((closureN)self_7312911)->elements[0];
++c_7325040.elements[1] = lp_732263_733585;
+
+-return_direct_with_clo1(data,(closure)&c_7327485,__lambda_1232, &c_7327499);;
++return_direct_with_clo1(data,(closure)&c_7325026,__lambda_1185, &c_7325040);;
+ }
+
+-static void __lambda_1234(void *data, object self_7314212, int argc, object *args) /* object self_7314212, object k_737893, object lis_732611_734038, object n_732612_734039 */
++static void __lambda_1187(void *data, object self_7312912, int argc, object *args) /* object self_7312912, object k_737118, object lis_732264_733586, object n_732265_733587 */
+ {
+- object k_737893 = args[0]; object lis_732611_734038 = args[1]; object n_732612_734039 = args[2];
++ object k_737118 = args[0]; object lis_732264_733586 = args[1]; object n_732265_733587 = args[2];
+
+-if( (boolean_f != Cyc_is_null(lis_732611_734038)) ){
+- return_direct_with_clo1(data, k_737893, (((closure) k_737893)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(lis_732264_733586)) ){
++ return_direct_with_clo1(data, k_737118, (((closure) k_737118)->fn), boolean_f);
+ } else {
+
+
+-if( (boolean_f != Cyc_eq(((closureN)self_7314212)->elements[0], Cyc_car(data, lis_732611_734038))) ){
+- return_direct_with_clo1(data, k_737893, (((closure) k_737893)->fn), n_732612_734039);
++if( (boolean_f != Cyc_eq(((closureN)self_7312912)->elements[0], Cyc_car(data, lis_732264_733586))) ){
++ return_direct_with_clo1(data, k_737118, (((closure) k_737118)->fn), n_732265_733587);
+ } else {
+
+
+
+
+
+-complex_num_type local_7327517;
+-return_closcall3(data, car(((closureN)self_7314212)->elements[1]), k_737893, Cyc_cdr(data, lis_732611_734038), Cyc_fast_sum(data,&local_7327517, n_732612_734039, obj_int2obj(1)));}
++complex_num_type local_7325058;
++return_closcall3(data, car(((closureN)self_7312912)->elements[1]), k_737118, Cyc_cdr(data, lis_732264_733586), Cyc_fast_sum(data,&local_7325058, n_732265_733587, obj_int2obj(1)));}
+ ;}
+ ;;
+ }
+
+-static void __lambda_1232(void *data, object self_7314213, int argc, object *args) /* object self_7314213, object r_737892 */
++static void __lambda_1185(void *data, object self_7312913, int argc, object *args) /* object self_7312913, object r_737117 */
+ {
+- object r_737892 = args[0];
++ object r_737117 = args[0];
+
+-closureN_type c_7327487;
+-object e_7327494 [3];
+-c_7327487.hdr.mark = gc_color_red;
+- c_7327487.hdr.grayed = 0;
+-c_7327487.tag = closureN_tag;
+- c_7327487.fn = (function_type)__lambda_1233;
+-c_7327487.num_args = 1;
+-c_7327487.num_elements = 3;
+-c_7327487.elements = (object *)e_7327494;
+-c_7327487.elements[0] = ((closureN)self_7314213)->elements[0];
+-c_7327487.elements[1] = ((closureN)self_7314213)->elements[1];
+-c_7327487.elements[2] = ((closureN)self_7314213)->elements[2];
++closureN_type c_7325028;
++object e_7325035 [3];
++c_7325028.hdr.mark = gc_color_red;
++ c_7325028.hdr.grayed = 0;
++c_7325028.tag = closureN_tag;
++ c_7325028.fn = (function_type)__lambda_1186;
++c_7325028.num_args = 1;
++c_7325028.num_elements = 3;
++c_7325028.elements = (object *)e_7325035;
++c_7325028.elements[0] = ((closureN)self_7312913)->elements[0];
++c_7325028.elements[1] = ((closureN)self_7312913)->elements[1];
++c_7325028.elements[2] = ((closureN)self_7312913)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7327487,__lambda_1233, Cyc_set_cell(data, ((closureN)self_7314213)->elements[2], r_737892));;
++return_direct_with_clo1(data,(closure)&c_7325028,__lambda_1186, Cyc_set_cell(data, ((closureN)self_7312913)->elements[2], r_737117));;
+ }
+
+-static void __lambda_1233(void *data, object self_7314214, int argc, object *args) /* object self_7314214, object r_737891 */
++static void __lambda_1186(void *data, object self_7312914, int argc, object *args) /* object self_7312914, object r_737116 */
+ {
+
+
+
+-return_closcall3(data, car(((closureN)self_7314214)->elements[2]), ((closureN)self_7314214)->elements[0], ((closureN)self_7314214)->elements[1], obj_int2obj(0));;
++return_closcall3(data, car(((closureN)self_7312914)->elements[2]), ((closureN)self_7312914)->elements[0], ((closureN)self_7312914)->elements[1], obj_int2obj(0));;
+ }
+
+-static void __lambda_1225(void *data, object _, int argc, object *args) /* closure _,object k_737882, object sym_732600_734028, object name_732601_734029, object idx_732602_734030 */
++static void __lambda_1178(void *data, object _, int argc, object *args) /* closure _,object k_737107, object sym_732253_733576, object name_732254_733577, object idx_732255_733578 */
+ {
+-object k_737882 = args[0]; object name_732601_734029 = args[2]; object idx_732602_734030 = args[3];
++object k_737107 = args[0]; object name_732254_733577 = args[2]; object idx_732255_733578 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:make-setter");
+
+-closureN_type c_7327449;
+-object e_7327476 [2];
+-c_7327449.hdr.mark = gc_color_red;
+- c_7327449.hdr.grayed = 0;
+-c_7327449.tag = closureN_tag;
+- c_7327449.fn = (function_type)__lambda_1226;
+-c_7327449.num_args = 2;
+-c_7327449.num_elements = 2;
+-c_7327449.elements = (object *)e_7327476;
+-c_7327449.elements[0] = idx_732602_734030;
+-c_7327449.elements[1] = name_732601_734029;
++closureN_type c_7324990;
++object e_7325017 [2];
++c_7324990.hdr.mark = gc_color_red;
++ c_7324990.hdr.grayed = 0;
++c_7324990.tag = closureN_tag;
++ c_7324990.fn = (function_type)__lambda_1179;
++c_7324990.num_args = 2;
++c_7324990.num_elements = 2;
++c_7324990.elements = (object *)e_7325017;
++c_7324990.elements[0] = idx_732255_733578;
++c_7324990.elements[1] = name_732254_733577;
+
+-return_direct_with_clo1(data, k_737882, (((closure) k_737882)->fn), &c_7327449);;
++return_direct_with_clo1(data, k_737107, (((closure) k_737107)->fn), &c_7324990);;
+ }
+
+-static void __lambda_1226(void *data, object self_7314206, int argc, object *args) /* object self_7314206, object k_737883, object obj_732603_734031, object val_732604_734032 */
++static void __lambda_1179(void *data, object self_7312906, int argc, object *args) /* object self_7312906, object k_737108, object obj_732256_733579, object val_732257_733580 */
+ {
+- object k_737883 = args[0]; object obj_732603_734031 = args[1]; object val_732604_734032 = args[2];
++ object k_737108 = args[0]; object obj_732256_733579 = args[1]; object val_732257_733580 = args[2];
+
+-closureN_type c_7327451;
+-object e_7327473 [5];
+-c_7327451.hdr.mark = gc_color_red;
+- c_7327451.hdr.grayed = 0;
+-c_7327451.tag = closureN_tag;
+- c_7327451.fn = (function_type)__lambda_1227;
+-c_7327451.num_args = 1;
+-c_7327451.num_elements = 5;
+-c_7327451.elements = (object *)e_7327473;
+-c_7327451.elements[0] = ((closureN)self_7314206)->elements[0];
+-c_7327451.elements[1] = k_737883;
+-c_7327451.elements[2] = ((closureN)self_7314206)->elements[1];
+-c_7327451.elements[3] = obj_732603_734031;
+-c_7327451.elements[4] = val_732604_734032;
++closureN_type c_7324992;
++object e_7325014 [5];
++c_7324992.hdr.mark = gc_color_red;
++ c_7324992.hdr.grayed = 0;
++c_7324992.tag = closureN_tag;
++ c_7324992.fn = (function_type)__lambda_1180;
++c_7324992.num_args = 1;
++c_7324992.num_elements = 5;
++c_7324992.elements = (object *)e_7325014;
++c_7324992.elements[0] = ((closureN)self_7312906)->elements[0];
++c_7324992.elements[1] = k_737108;
++c_7324992.elements[2] = ((closureN)self_7312906)->elements[1];
++c_7324992.elements[3] = obj_732256_733579;
++c_7324992.elements[4] = val_732257_733580;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7327451,__lambda_1227, Cyc_vector_ref(data, obj_732603_734031, obj_int2obj(1)));;
++return_direct_with_clo1(data,(closure)&c_7324992,__lambda_1180, Cyc_vector_ref(data, obj_732256_733579, obj_int2obj(1)));;
+ }
+
+-static void __lambda_1227(void *data, object self_7314207, int argc, object *args) /* object self_7314207, object r_737887 */
++static void __lambda_1180(void *data, object self_7312907, int argc, object *args) /* object self_7312907, object r_737112 */
+ {
+- object r_737887 = args[0];
++ object r_737112 = args[0];
+
+-if( (boolean_f != Cyc_eq(r_737887, ((closureN)self_7314207)->elements[2])) ){
++if( (boolean_f != Cyc_eq(r_737112, ((closureN)self_7312907)->elements[2])) ){
+
+-closureN_type c_7327456;
+-object e_7327464 [3];
+-c_7327456.hdr.mark = gc_color_red;
+- c_7327456.hdr.grayed = 0;
+-c_7327456.tag = closureN_tag;
+- c_7327456.fn = (function_type)__lambda_1228;
+-c_7327456.num_args = 1;
+-c_7327456.num_elements = 3;
+-c_7327456.elements = (object *)e_7327464;
+-c_7327456.elements[0] = ((closureN)self_7314207)->elements[0];
+-c_7327456.elements[1] = ((closureN)self_7314207)->elements[1];
+-c_7327456.elements[2] = ((closureN)self_7314207)->elements[4];
++closureN_type c_7324997;
++object e_7325005 [3];
++c_7324997.hdr.mark = gc_color_red;
++ c_7324997.hdr.grayed = 0;
++c_7324997.tag = closureN_tag;
++ c_7324997.fn = (function_type)__lambda_1181;
++c_7324997.num_args = 1;
++c_7324997.num_elements = 3;
++c_7324997.elements = (object *)e_7325005;
++c_7324997.elements[0] = ((closureN)self_7312907)->elements[0];
++c_7324997.elements[1] = ((closureN)self_7312907)->elements[1];
++c_7324997.elements[2] = ((closureN)self_7312907)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7327456,__lambda_1228, Cyc_vector_ref(data, ((closureN)self_7314207)->elements[3], obj_int2obj(2)));
++return_direct_with_clo1(data,(closure)&c_7324997,__lambda_1181, Cyc_vector_ref(data, ((closureN)self_7312907)->elements[3], obj_int2obj(2)));
+ } else {
+
+-make_utf8_string_with_len(c_7327470, "Invalid type", 12, 12);
+-return_direct_with_clo5(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7314207)->elements[1], &c_7327470, ((closureN)self_7314207)->elements[3], quote_expected, ((closureN)self_7314207)->elements[2]);}
++make_utf8_string_with_len(c_7325011, "Invalid type", 12, 12);
++return_direct_with_clo5(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7312907)->elements[1], &c_7325011, ((closureN)self_7312907)->elements[3], quote_expected, ((closureN)self_7312907)->elements[2]);}
+ ;;
+ }
+
+-static void __lambda_1228(void *data, object self_7314208, int argc, object *args) /* object self_7314208, object r_737885 */
++static void __lambda_1181(void *data, object self_7312908, int argc, object *args) /* object self_7312908, object r_737110 */
+ {
+- object r_737885 = args[0];
++ object r_737110 = args[0];
+
+-object c_7327461 = Cyc_vector_set_cps(data, ((closureN)self_7314208)->elements[1],r_737885, ((closureN)self_7314208)->elements[0], ((closureN)self_7314208)->elements[2]);
+-return_direct_with_clo1(data, ((closureN)self_7314208)->elements[1], (((closure) ((closureN)self_7314208)->elements[1])->fn), c_7327461);;
++object c_7325002 = Cyc_vector_set_cps(data, ((closureN)self_7312908)->elements[1],r_737110, ((closureN)self_7312908)->elements[0], ((closureN)self_7312908)->elements[2]);
++return_direct_with_clo1(data, ((closureN)self_7312908)->elements[1], (((closure) ((closureN)self_7312908)->elements[1])->fn), c_7325002);;
+ }
+
+-static void __lambda_1223(void *data, object _, int argc, object *args) /* closure _,object k_737874, object sym_732596_734024, object name_732597_734025, object idx_732598_734026 */
++static void __lambda_1176(void *data, object _, int argc, object *args) /* closure _,object k_737099, object sym_732249_733572, object name_732250_733573, object idx_732251_733574 */
+ {
+-object k_737874 = args[0]; object name_732597_734025 = args[2]; object idx_732598_734026 = args[3];
++object k_737099 = args[0]; object name_732250_733573 = args[2]; object idx_732251_733574 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:make-getter");
+
+-closureN_type c_7327431;
+-object e_7327446 [2];
+-c_7327431.hdr.mark = gc_color_red;
+- c_7327431.hdr.grayed = 0;
+-c_7327431.tag = closureN_tag;
+- c_7327431.fn = (function_type)__lambda_1224;
+-c_7327431.num_args = 1;
+-c_7327431.num_elements = 2;
+-c_7327431.elements = (object *)e_7327446;
+-c_7327431.elements[0] = idx_732598_734026;
+-c_7327431.elements[1] = name_732597_734025;
++closureN_type c_7324972;
++object e_7324987 [2];
++c_7324972.hdr.mark = gc_color_red;
++ c_7324972.hdr.grayed = 0;
++c_7324972.tag = closureN_tag;
++ c_7324972.fn = (function_type)__lambda_1177;
++c_7324972.num_args = 1;
++c_7324972.num_elements = 2;
++c_7324972.elements = (object *)e_7324987;
++c_7324972.elements[0] = idx_732251_733574;
++c_7324972.elements[1] = name_732250_733573;
+
+-return_direct_with_clo1(data, k_737874, (((closure) k_737874)->fn), &c_7327431);;
++return_direct_with_clo1(data, k_737099, (((closure) k_737099)->fn), &c_7324972);;
+ }
+
+-static void __lambda_1224(void *data, object self_7314205, int argc, object *args) /* object self_7314205, object k_737875, object obj_732599_734027 */
++static void __lambda_1177(void *data, object self_7312905, int argc, object *args) /* object self_7312905, object k_737100, object obj_732252_733575 */
+ {
+- object k_737875 = args[0]; object obj_732599_734027 = args[1];
++ object k_737100 = args[0]; object obj_732252_733575 = args[1];
+
+
+-if( (boolean_f != Cyc_eq(Cyc_vector_ref(data, obj_732599_734027, obj_int2obj(1)), ((closureN)self_7314205)->elements[1])) ){
++if( (boolean_f != Cyc_eq(Cyc_vector_ref(data, obj_732252_733575, obj_int2obj(1)), ((closureN)self_7312905)->elements[1])) ){
+
+
+
+
+-return_direct_with_clo1(data, k_737875, (((closure) k_737875)->fn), Cyc_vector_ref(data, Cyc_vector_ref(data, obj_732599_734027, obj_int2obj(2)), ((closureN)self_7314205)->elements[0]));
++return_direct_with_clo1(data, k_737100, (((closure) k_737100)->fn), Cyc_vector_ref(data, Cyc_vector_ref(data, obj_732252_733575, obj_int2obj(2)), ((closureN)self_7312905)->elements[0]));
+ } else {
+
+-make_utf8_string_with_len(c_7327444, "Invalid type", 12, 12);
+-return_direct_with_clo5(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_737875, &c_7327444, obj_732599_734027, quote_expected, ((closureN)self_7314205)->elements[1]);}
++make_utf8_string_with_len(c_7324985, "Invalid type", 12, 12);
++return_direct_with_clo5(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_737100, &c_7324985, obj_732252_733575, quote_expected, ((closureN)self_7312905)->elements[1]);}
+ ;;
+ }
+
+-static void __lambda_1220(void *data, object _, int argc, object *args) /* closure _,object k_737867, object name_732585_734020, object obj_732586_734021, object field_732587_734022 */
++static void __lambda_1173(void *data, object _, int argc, object *args) /* closure _,object k_737092, object name_732238_733568, object obj_732239_733569, object field_732240_733570 */
+ {
+-object k_737867 = args[0]; object name_732585_734020 = args[1]; object obj_732586_734021 = args[2]; object field_732587_734022 = args[3];
++object k_737092 = args[0]; object name_732238_733568 = args[1]; object obj_732239_733569 = args[2]; object field_732240_733570 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:slot-ref");
+
+-closureN_type c_7327408;
+-object e_7327419 [2];
+-c_7327408.hdr.mark = gc_color_red;
+- c_7327408.hdr.grayed = 0;
+-c_7327408.tag = closureN_tag;
+- c_7327408.fn = (function_type)__lambda_1221;
+-c_7327408.num_args = 0;
+-c_7327408.num_elements = 2;
+-c_7327408.elements = (object *)e_7327419;
+-c_7327408.elements[0] = field_732587_734022;
+-c_7327408.elements[1] = name_732585_734020;
++closureN_type c_7324949;
++object e_7324960 [2];
++c_7324949.hdr.mark = gc_color_red;
++ c_7324949.hdr.grayed = 0;
++c_7324949.tag = closureN_tag;
++ c_7324949.fn = (function_type)__lambda_1174;
++c_7324949.num_args = 0;
++c_7324949.num_elements = 2;
++c_7324949.elements = (object *)e_7324960;
++c_7324949.elements[0] = field_732240_733570;
++c_7324949.elements[1] = name_732238_733568;
+
+
+-closureN_type c_7327420;
+-object e_7327428 [2];
+-c_7327420.hdr.mark = gc_color_red;
+- c_7327420.hdr.grayed = 0;
+-c_7327420.tag = closureN_tag;
+- c_7327420.fn = (function_type)__lambda_1222;
+-c_7327420.num_args = 1;
+-c_7327420.num_elements = 2;
+-c_7327420.elements = (object *)e_7327428;
+-c_7327420.elements[0] = k_737867;
+-c_7327420.elements[1] = obj_732586_734021;
++closureN_type c_7324961;
++object e_7324969 [2];
++c_7324961.hdr.mark = gc_color_red;
++ c_7324961.hdr.grayed = 0;
++c_7324961.tag = closureN_tag;
++ c_7324961.fn = (function_type)__lambda_1175;
++c_7324961.num_args = 1;
++c_7324961.num_elements = 2;
++c_7324961.elements = (object *)e_7324969;
++c_7324961.elements[0] = k_737092;
++c_7324961.elements[1] = obj_732239_733569;
+
+-return_direct_with_clo1(data,(closure)&c_7327408,__lambda_1221, &c_7327420);;
++return_direct_with_clo1(data,(closure)&c_7324949,__lambda_1174, &c_7324961);;
+ }
+
+-static void __lambda_1222(void *data, object self_7314203, int argc, object *args) /* object self_7314203, object idx_732590_734023 */
++static void __lambda_1175(void *data, object self_7312903, int argc, object *args) /* object self_7312903, object idx_732243_733571 */
+ {
+- object idx_732590_734023 = args[0];
++ object idx_732243_733571 = args[0];
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314203)->elements[0], (((closure) ((closureN)self_7314203)->elements[0])->fn), Cyc_vector_ref(data, Cyc_vector_ref(data, ((closureN)self_7314203)->elements[1], obj_int2obj(2)), idx_732590_734023));;
++return_direct_with_clo1(data, ((closureN)self_7312903)->elements[0], (((closure) ((closureN)self_7312903)->elements[0])->fn), Cyc_vector_ref(data, Cyc_vector_ref(data, ((closureN)self_7312903)->elements[1], obj_int2obj(2)), idx_732243_733571));;
+ }
+
+-static void __lambda_1221(void *data, object self_7314204, int argc, object *args) /* object self_7314204, object k_737870 */
++static void __lambda_1174(void *data, object self_7312904, int argc, object *args) /* object self_7312904, object k_737095 */
+ {
+- object k_737870 = args[0];
++ object k_737095 = args[0];
+
+-if( (boolean_f != Cyc_is_symbol(((closureN)self_7314204)->elements[0])) ){
++if( (boolean_f != Cyc_is_symbol(((closureN)self_7312904)->elements[0])) ){
+
+
+-return_direct_with_clo3(data, __glo__191list_91index_scheme_base, (((closure) __glo__191list_91index_scheme_base)->fn), k_737870, ((closureN)self_7314204)->elements[0], Cyc_vector_ref(data, ((closureN)self_7314204)->elements[1], obj_int2obj(2)));
++return_direct_with_clo3(data, __glo__191list_91index_scheme_base, (((closure) __glo__191list_91index_scheme_base)->fn), k_737095, ((closureN)self_7312904)->elements[0], Cyc_vector_ref(data, ((closureN)self_7312904)->elements[1], obj_int2obj(2)));
+ } else {
+- return_direct_with_clo1(data, k_737870, (((closure) k_737870)->fn), ((closureN)self_7314204)->elements[0]);}
++ return_direct_with_clo1(data, k_737095, (((closure) k_737095)->fn), ((closureN)self_7312904)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1217(void *data, object _, int argc, object *args) /* closure _,object k_737863, object name_732580_734015, object obj_732581_734016, object idx_732582_734017, object val_732583_734018 */
++static void __lambda_1170(void *data, object _, int argc, object *args) /* closure _,object k_737088, object name_732233_733563, object obj_732234_733564, object idx_732235_733565, object val_732236_733566 */
+ {
+-object k_737863 = args[0]; object obj_732581_734016 = args[2]; object idx_732582_734017 = args[3]; object val_732583_734018 = args[4];
++object k_737088 = args[0]; object obj_732234_733564 = args[2]; object idx_732235_733565 = args[3]; object val_732236_733566 = args[4];
+ Cyc_st_add(data, "scheme/base.sld:slot-set!");
+
+-closureN_type c_7327392;
+-object e_7327405 [3];
+-c_7327392.hdr.mark = gc_color_red;
+- c_7327392.hdr.grayed = 0;
+-c_7327392.tag = closureN_tag;
+- c_7327392.fn = (function_type)__lambda_1218;
+-c_7327392.num_args = 1;
+-c_7327392.num_elements = 3;
+-c_7327392.elements = (object *)e_7327405;
+-c_7327392.elements[0] = idx_732582_734017;
+-c_7327392.elements[1] = k_737863;
+-c_7327392.elements[2] = val_732583_734018;
++closureN_type c_7324933;
++object e_7324946 [3];
++c_7324933.hdr.mark = gc_color_red;
++ c_7324933.hdr.grayed = 0;
++c_7324933.tag = closureN_tag;
++ c_7324933.fn = (function_type)__lambda_1171;
++c_7324933.num_args = 1;
++c_7324933.num_elements = 3;
++c_7324933.elements = (object *)e_7324946;
++c_7324933.elements[0] = idx_732235_733565;
++c_7324933.elements[1] = k_737088;
++c_7324933.elements[2] = val_732236_733566;
+
+-return_direct_with_clo1(data,(closure)&c_7327392,__lambda_1218, obj_732581_734016);;
++return_direct_with_clo1(data,(closure)&c_7324933,__lambda_1171, obj_732234_733564);;
+ }
+
+-static void __lambda_1218(void *data, object self_7314201, int argc, object *args) /* object self_7314201, object vec_732584_734019 */
++static void __lambda_1171(void *data, object self_7312901, int argc, object *args) /* object self_7312901, object vec_732237_733567 */
+ {
+- object vec_732584_734019 = args[0];
++ object vec_732237_733567 = args[0];
+
+-closureN_type c_7327394;
+-object e_7327402 [3];
+-c_7327394.hdr.mark = gc_color_red;
+- c_7327394.hdr.grayed = 0;
+-c_7327394.tag = closureN_tag;
+- c_7327394.fn = (function_type)__lambda_1219;
+-c_7327394.num_args = 1;
+-c_7327394.num_elements = 3;
+-c_7327394.elements = (object *)e_7327402;
+-c_7327394.elements[0] = ((closureN)self_7314201)->elements[0];
+-c_7327394.elements[1] = ((closureN)self_7314201)->elements[1];
+-c_7327394.elements[2] = ((closureN)self_7314201)->elements[2];
++closureN_type c_7324935;
++object e_7324943 [3];
++c_7324935.hdr.mark = gc_color_red;
++ c_7324935.hdr.grayed = 0;
++c_7324935.tag = closureN_tag;
++ c_7324935.fn = (function_type)__lambda_1172;
++c_7324935.num_args = 1;
++c_7324935.num_elements = 3;
++c_7324935.elements = (object *)e_7324943;
++c_7324935.elements[0] = ((closureN)self_7312901)->elements[0];
++c_7324935.elements[1] = ((closureN)self_7312901)->elements[1];
++c_7324935.elements[2] = ((closureN)self_7312901)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7327394,__lambda_1219, Cyc_vector_ref(data, vec_732584_734019, obj_int2obj(2)));;
++return_direct_with_clo1(data,(closure)&c_7324935,__lambda_1172, Cyc_vector_ref(data, vec_732237_733567, obj_int2obj(2)));;
+ }
+
+-static void __lambda_1219(void *data, object self_7314202, int argc, object *args) /* object self_7314202, object r_737864 */
++static void __lambda_1172(void *data, object self_7312902, int argc, object *args) /* object self_7312902, object r_737089 */
+ {
+- object r_737864 = args[0];
++ object r_737089 = args[0];
+
+-object c_7327399 = Cyc_vector_set_cps(data, ((closureN)self_7314202)->elements[1],r_737864, ((closureN)self_7314202)->elements[0], ((closureN)self_7314202)->elements[2]);
+-return_direct_with_clo1(data, ((closureN)self_7314202)->elements[1], (((closure) ((closureN)self_7314202)->elements[1])->fn), c_7327399);;
++object c_7324940 = Cyc_vector_set_cps(data, ((closureN)self_7312902)->elements[1],r_737089, ((closureN)self_7312902)->elements[0], ((closureN)self_7312902)->elements[2]);
++return_direct_with_clo1(data, ((closureN)self_7312902)->elements[1], (((closure) ((closureN)self_7312902)->elements[1])->fn), c_7324940);;
+ }
+
+-static void __lambda_1216(void *data, object _, int argc, object *args) /* closure _,object k_737859, object name_732577_734012, object sym_732578_734013 */
++static void __lambda_1169(void *data, object _, int argc, object *args) /* closure _,object k_737084, object name_732230_733560, object sym_732231_733561 */
+ {
+-object k_737859 = args[0]; object name_732577_734012 = args[1]; object sym_732578_734013 = args[2];
++object k_737084 = args[0]; object name_732230_733560 = args[1]; object sym_732231_733561 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:type-slot-offset");
+
+
+-return_direct_with_clo3(data, __glo__191list_91index_scheme_base, (((closure) __glo__191list_91index_scheme_base)->fn), k_737859, sym_732578_734013, Cyc_vector_ref(data, name_732577_734012, obj_int2obj(2)));;
++return_direct_with_clo3(data, __glo__191list_91index_scheme_base, (((closure) __glo__191list_91index_scheme_base)->fn), k_737084, sym_732231_733561, Cyc_vector_ref(data, name_732230_733560, obj_int2obj(2)));;
+ }
+
+-static void __lambda_1211(void *data, object _, int argc, object *args) /* closure _,object k_737848, object make_732567_734007, object name_732568_734008 */
++static void __lambda_1164(void *data, object _, int argc, object *args) /* closure _,object k_737073, object make_732220_733555, object name_732221_733556 */
+ {
+-object k_737848 = args[0]; object name_732568_734008 = args[2];
++object k_737073 = args[0]; object name_732221_733556 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:make-constructor/args");
+
+-closureN_type c_7327352;
+-object e_7327385 [1];
+-c_7327352.hdr.mark = gc_color_red;
+- c_7327352.hdr.grayed = 0;
+-c_7327352.tag = closureN_tag;
+- c_7327352.fn = (function_type)__lambda_1212;
+-c_7327352.num_args = 0;
+-c_7327352.num_elements = 1;
+-c_7327352.elements = (object *)e_7327385;
+-c_7327352.elements[0] = name_732568_734008;
++closureN_type c_7324893;
++object e_7324926 [1];
++c_7324893.hdr.mark = gc_color_red;
++ c_7324893.hdr.grayed = 0;
++c_7324893.tag = closureN_tag;
++ c_7324893.fn = (function_type)__lambda_1165;
++c_7324893.num_args = 0;
++c_7324893.num_elements = 1;
++c_7324893.elements = (object *)e_7324926;
++c_7324893.elements[0] = name_732221_733556;
+
+-return_direct_with_clo1(data, k_737848, (((closure) k_737848)->fn), &c_7327352);;
++return_direct_with_clo1(data, k_737073, (((closure) k_737073)->fn), &c_7324893);;
+ }
+
+-static void __lambda_1212(void *data, object self_7314197, int argc, object *args) /* object self_7314197, object k_737849, object args_732569_734009_raw, ... */
++static void __lambda_1165(void *data, object self_7312897, int argc, object *args) /* object self_7312897, object k_737074, object args_732222_733557_raw, ... */
+ {
+- object k_737849 = args[0];
+-load_varargs(args_732569_734009, args, 1, argc - 1);
++ object k_737074 = args[0];
++load_varargs(args_732222_733557, args, 1, argc - 1);
+
+-closureN_type c_7327354;
+-object e_7327381 [3];
+-c_7327354.hdr.mark = gc_color_red;
+- c_7327354.hdr.grayed = 0;
+-c_7327354.tag = closureN_tag;
+- c_7327354.fn = (function_type)__lambda_1213;
+-c_7327354.num_args = 1;
+-c_7327354.num_elements = 3;
+-c_7327354.elements = (object *)e_7327381;
+-c_7327354.elements[0] = args_732569_734009;
+-c_7327354.elements[1] = k_737849;
+-c_7327354.elements[2] = ((closureN)self_7314197)->elements[0];
++closureN_type c_7324895;
++object e_7324922 [3];
++c_7324895.hdr.mark = gc_color_red;
++ c_7324895.hdr.grayed = 0;
++c_7324895.tag = closureN_tag;
++ c_7324895.fn = (function_type)__lambda_1166;
++c_7324895.num_args = 1;
++c_7324895.num_elements = 3;
++c_7324895.elements = (object *)e_7324922;
++c_7324895.elements[0] = args_732222_733557;
++c_7324895.elements[1] = k_737074;
++c_7324895.elements[2] = ((closureN)self_7312897)->elements[0];
+
+
+-object c_7327384 = Cyc_list2vector(data,(closure)&c_7327354,args_732569_734009);
+-return_closcall1(data,(closure)&c_7327354, c_7327384);;
++object c_7324925 = Cyc_list2vector(data,(closure)&c_7324895,args_732222_733557);
++return_closcall1(data,(closure)&c_7324895, c_7324925);;
+ }
+
+-static void __lambda_1213(void *data, object self_7314198, int argc, object *args) /* object self_7314198, object field_91values_732575_734011 */
++static void __lambda_1166(void *data, object self_7312898, int argc, object *args) /* object self_7312898, object field_91values_732228_733559 */
+ {
+- object field_91values_732575_734011 = args[0];
++ object field_91values_732228_733559 = args[0];
+
+-closureN_type c_7327356;
+-object e_7327371 [3];
+-c_7327356.hdr.mark = gc_color_red;
+- c_7327356.hdr.grayed = 0;
+-c_7327356.tag = closureN_tag;
+- c_7327356.fn = (function_type)__lambda_1214;
+-c_7327356.num_args = 0;
+-c_7327356.num_elements = 3;
+-c_7327356.elements = (object *)e_7327371;
+-c_7327356.elements[0] = ((closureN)self_7314198)->elements[0];
+-c_7327356.elements[1] = field_91values_732575_734011;
+-c_7327356.elements[2] = ((closureN)self_7314198)->elements[2];
++closureN_type c_7324897;
++object e_7324912 [3];
++c_7324897.hdr.mark = gc_color_red;
++ c_7324897.hdr.grayed = 0;
++c_7324897.tag = closureN_tag;
++ c_7324897.fn = (function_type)__lambda_1167;
++c_7324897.num_args = 0;
++c_7324897.num_elements = 3;
++c_7324897.elements = (object *)e_7324912;
++c_7324897.elements[0] = ((closureN)self_7312898)->elements[0];
++c_7324897.elements[1] = field_91values_732228_733559;
++c_7324897.elements[2] = ((closureN)self_7312898)->elements[2];
+
+
+-closureN_type c_7327372;
+-object e_7327380 [3];
+-c_7327372.hdr.mark = gc_color_red;
+- c_7327372.hdr.grayed = 0;
+-c_7327372.tag = closureN_tag;
+- c_7327372.fn = (function_type)__lambda_1215;
+-c_7327372.num_args = 1;
+-c_7327372.num_elements = 3;
+-c_7327372.elements = (object *)e_7327380;
+-c_7327372.elements[0] = field_91values_732575_734011;
+-c_7327372.elements[1] = ((closureN)self_7314198)->elements[1];
+-c_7327372.elements[2] = ((closureN)self_7314198)->elements[2];
++closureN_type c_7324913;
++object e_7324921 [3];
++c_7324913.hdr.mark = gc_color_red;
++ c_7324913.hdr.grayed = 0;
++c_7324913.tag = closureN_tag;
++ c_7324913.fn = (function_type)__lambda_1168;
++c_7324913.num_args = 1;
++c_7324913.num_elements = 3;
++c_7324913.elements = (object *)e_7324921;
++c_7324913.elements[0] = field_91values_732228_733559;
++c_7324913.elements[1] = ((closureN)self_7312898)->elements[1];
++c_7324913.elements[2] = ((closureN)self_7312898)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7327356,__lambda_1214, &c_7327372);;
++return_direct_with_clo1(data,(closure)&c_7324897,__lambda_1167, &c_7324913);;
+ }
+
+-static void __lambda_1215(void *data, object self_7314199, int argc, object *args) /* object self_7314199, object r_737852 */
++static void __lambda_1168(void *data, object self_7312899, int argc, object *args) /* object self_7312899, object r_737077 */
+ {
+
+
+-vector_3_type local_7327377;
+-return_direct_with_clo1(data, ((closureN)self_7314199)->elements[1], (((closure) ((closureN)self_7314199)->elements[1])->fn), Cyc_fast_vector_3(&local_7327377, __glo_record_91marker_scheme_base, ((closureN)self_7314199)->elements[2], ((closureN)self_7314199)->elements[0]));;
++vector_3_type local_7324918;
++return_direct_with_clo1(data, ((closureN)self_7312899)->elements[1], (((closure) ((closureN)self_7312899)->elements[1])->fn), Cyc_fast_vector_3(&local_7324918, __glo_record_91marker_scheme_base, ((closureN)self_7312899)->elements[2], ((closureN)self_7312899)->elements[0]));;
+ }
+
+-static void __lambda_1214(void *data, object self_7314200, int argc, object *args) /* object self_7314200, object k_737853 */
++static void __lambda_1167(void *data, object self_7312900, int argc, object *args) /* object self_7312900, object k_737078 */
+ {
+- object k_737853 = args[0];
++ object k_737078 = args[0];
+
+
+
+
+-if( (boolean_f != equalp(Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7314200)->elements[2], obj_int2obj(2))), Cyc_vector_length(data, ((closureN)self_7314200)->elements[1]))) ){
+- return_direct_with_clo1(data, k_737853, (((closure) k_737853)->fn), Cyc_VOID);
++if( (boolean_f != equalp(Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7312900)->elements[2], obj_int2obj(2))), Cyc_vector_length(data, ((closureN)self_7312900)->elements[1]))) ){
++ return_direct_with_clo1(data, k_737078, (((closure) k_737078)->fn), Cyc_VOID);
+ } else {
+
+-make_utf8_string_with_len(c_7327369, "invalid number of arguments passed to record type constructor", 61, 61);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_737853, &c_7327369, ((closureN)self_7314200)->elements[0]);}
++make_utf8_string_with_len(c_7324910, "invalid number of arguments passed to record type constructor", 61, 61);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_737078, &c_7324910, ((closureN)self_7312900)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1208(void *data, object _, int argc, object *args) /* closure _,object k_737841, object make_732557_734002, object name_732558_734003 */
++static void __lambda_1161(void *data, object _, int argc, object *args) /* closure _,object k_737066, object make_732210_733550, object name_732211_733551 */
+ {
+-object k_737841 = args[0]; object name_732558_734003 = args[2];
++object k_737066 = args[0]; object name_732211_733551 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:make-constructor");
+
+-closureN_type c_7327331;
+-object e_7327349 [1];
+-c_7327331.hdr.mark = gc_color_red;
+- c_7327331.hdr.grayed = 0;
+-c_7327331.tag = closureN_tag;
+- c_7327331.fn = (function_type)__lambda_1209;
+-c_7327331.num_args = 0;
+-c_7327331.num_elements = 1;
+-c_7327331.elements = (object *)e_7327349;
+-c_7327331.elements[0] = name_732558_734003;
++closureN_type c_7324872;
++object e_7324890 [1];
++c_7324872.hdr.mark = gc_color_red;
++ c_7324872.hdr.grayed = 0;
++c_7324872.tag = closureN_tag;
++ c_7324872.fn = (function_type)__lambda_1162;
++c_7324872.num_args = 0;
++c_7324872.num_elements = 1;
++c_7324872.elements = (object *)e_7324890;
++c_7324872.elements[0] = name_732211_733551;
+
+-return_direct_with_clo1(data, k_737841, (((closure) k_737841)->fn), &c_7327331);;
++return_direct_with_clo1(data, k_737066, (((closure) k_737066)->fn), &c_7324872);;
+ }
+
+-static void __lambda_1209(void *data, object self_7314195, int argc, object *args) /* object self_7314195, object k_737842, object args_732559_734004_raw, ... */
++static void __lambda_1162(void *data, object self_7312895, int argc, object *args) /* object self_7312895, object k_737067, object args_732212_733552_raw, ... */
+ {
+- object k_737842 = args[0];
+-load_varargs(args_732559_734004, args, 1, argc - 1);
++ object k_737067 = args[0];
++load_varargs(args_732212_733552, args, 1, argc - 1);
+
+-closureN_type c_7327333;
+-object e_7327340 [2];
+-c_7327333.hdr.mark = gc_color_red;
+- c_7327333.hdr.grayed = 0;
+-c_7327333.tag = closureN_tag;
+- c_7327333.fn = (function_type)__lambda_1210;
+-c_7327333.num_args = 1;
+-c_7327333.num_elements = 2;
+-c_7327333.elements = (object *)e_7327340;
+-c_7327333.elements[0] = k_737842;
+-c_7327333.elements[1] = ((closureN)self_7314195)->elements[0];
++closureN_type c_7324874;
++object e_7324881 [2];
++c_7324874.hdr.mark = gc_color_red;
++ c_7324874.hdr.grayed = 0;
++c_7324874.tag = closureN_tag;
++ c_7324874.fn = (function_type)__lambda_1163;
++c_7324874.num_args = 1;
++c_7324874.num_elements = 2;
++c_7324874.elements = (object *)e_7324881;
++c_7324874.elements[0] = k_737067;
++c_7324874.elements[1] = ((closureN)self_7312895)->elements[0];
+
+
+
+
+
+
+-object c_7327343 = Cyc_make_vector(data,(closure)&c_7327333,2,Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7314195)->elements[0], obj_int2obj(2))), boolean_f);
+-return_closcall1(data,(closure)&c_7327333, c_7327343);;
++object c_7324884 = Cyc_make_vector(data,(closure)&c_7324874,2,Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7312895)->elements[0], obj_int2obj(2))), boolean_f);
++return_closcall1(data,(closure)&c_7324874, c_7324884);;
+ }
+
+-static void __lambda_1210(void *data, object self_7314196, int argc, object *args) /* object self_7314196, object field_91values_732565_734006 */
++static void __lambda_1163(void *data, object self_7312896, int argc, object *args) /* object self_7312896, object field_91values_732218_733554 */
+ {
+- object field_91values_732565_734006 = args[0];
++ object field_91values_732218_733554 = args[0];
+
+-vector_3_type local_7327338;
+-return_direct_with_clo1(data, ((closureN)self_7314196)->elements[0], (((closure) ((closureN)self_7314196)->elements[0])->fn), Cyc_fast_vector_3(&local_7327338, __glo_record_91marker_scheme_base, ((closureN)self_7314196)->elements[1], field_91values_732565_734006));;
++vector_3_type local_7324879;
++return_direct_with_clo1(data, ((closureN)self_7312896)->elements[0], (((closure) ((closureN)self_7312896)->elements[0])->fn), Cyc_fast_vector_3(&local_7324879, __glo_record_91marker_scheme_base, ((closureN)self_7312896)->elements[1], field_91values_732218_733554));;
+ }
+
+-static void __lambda_1205(void *data, object _, int argc, object *args) /* closure _,object k_737835, object pred_732553_733999, object name_732554_734000 */
++static void __lambda_1158(void *data, object _, int argc, object *args) /* closure _,object k_737060, object pred_732206_733547, object name_732207_733548 */
+ {
+-object k_737835 = args[0]; object name_732554_734000 = args[2];
++object k_737060 = args[0]; object name_732207_733548 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:make-type-predicate");
+
+-closureN_type c_7327314;
+-object e_7327328 [1];
+-c_7327314.hdr.mark = gc_color_red;
+- c_7327314.hdr.grayed = 0;
+-c_7327314.tag = closureN_tag;
+- c_7327314.fn = (function_type)__lambda_1206;
+-c_7327314.num_args = 1;
+-c_7327314.num_elements = 1;
+-c_7327314.elements = (object *)e_7327328;
+-c_7327314.elements[0] = name_732554_734000;
++closureN_type c_7324855;
++object e_7324869 [1];
++c_7324855.hdr.mark = gc_color_red;
++ c_7324855.hdr.grayed = 0;
++c_7324855.tag = closureN_tag;
++ c_7324855.fn = (function_type)__lambda_1159;
++c_7324855.num_args = 1;
++c_7324855.num_elements = 1;
++c_7324855.elements = (object *)e_7324869;
++c_7324855.elements[0] = name_732207_733548;
+
+-return_direct_with_clo1(data, k_737835, (((closure) k_737835)->fn), &c_7327314);;
++return_direct_with_clo1(data, k_737060, (((closure) k_737060)->fn), &c_7324855);;
+ }
+
+-static void __lambda_1206(void *data, object self_7314193, int argc, object *args) /* object self_7314193, object k_737836, object obj_732555_734001 */
++static void __lambda_1159(void *data, object self_7312893, int argc, object *args) /* object self_7312893, object k_737061, object obj_732208_733549 */
+ {
+- object k_737836 = args[0]; object obj_732555_734001 = args[1];
++ object k_737061 = args[0]; object obj_732208_733549 = args[1];
+
+-closureN_type c_7327316;
+-object e_7327327 [3];
+-c_7327316.hdr.mark = gc_color_red;
+- c_7327316.hdr.grayed = 0;
+-c_7327316.tag = closureN_tag;
+- c_7327316.fn = (function_type)__lambda_1207;
+-c_7327316.num_args = 1;
+-c_7327316.num_elements = 3;
+-c_7327316.elements = (object *)e_7327327;
+-c_7327316.elements[0] = k_737836;
+-c_7327316.elements[1] = ((closureN)self_7314193)->elements[0];
+-c_7327316.elements[2] = obj_732555_734001;
++closureN_type c_7324857;
++object e_7324868 [3];
++c_7324857.hdr.mark = gc_color_red;
++ c_7324857.hdr.grayed = 0;
++c_7324857.tag = closureN_tag;
++ c_7324857.fn = (function_type)__lambda_1160;
++c_7324857.num_args = 1;
++c_7324857.num_elements = 3;
++c_7324857.elements = (object *)e_7324868;
++c_7324857.elements[0] = k_737061;
++c_7324857.elements[1] = ((closureN)self_7312893)->elements[0];
++c_7324857.elements[2] = obj_732208_733549;
+
+-return_direct_with_clo2(data, __glo_record_127_scheme_base, (((closure) __glo_record_127_scheme_base)->fn), &c_7327316, obj_732555_734001);;
++return_direct_with_clo2(data, __glo_record_127_scheme_base, (((closure) __glo_record_127_scheme_base)->fn), &c_7324857, obj_732208_733549);;
+ }
+
+-static void __lambda_1207(void *data, object self_7314194, int argc, object *args) /* object self_7314194, object r_737837 */
++static void __lambda_1160(void *data, object self_7312894, int argc, object *args) /* object self_7312894, object r_737062 */
+ {
+- object r_737837 = args[0];
+- if( (boolean_f != r_737837) ){
++ object r_737062 = args[0];
++ if( (boolean_f != r_737062) ){
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314194)->elements[0], (((closure) ((closureN)self_7314194)->elements[0])->fn), equalp(Cyc_vector_ref(data, ((closureN)self_7314194)->elements[2], obj_int2obj(1)), ((closureN)self_7314194)->elements[1]));
++return_direct_with_clo1(data, ((closureN)self_7312894)->elements[0], (((closure) ((closureN)self_7312894)->elements[0])->fn), equalp(Cyc_vector_ref(data, ((closureN)self_7312894)->elements[2], obj_int2obj(1)), ((closureN)self_7312894)->elements[1]));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314194)->elements[0], (((closure) ((closureN)self_7314194)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312894)->elements[0], (((closure) ((closureN)self_7312894)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1204(void *data, object _, int argc, object *args) /* closure _,object k_737832, object name_732550_733996, object parent_732551_733997, object field_91tags_732552_733998 */
++static void __lambda_1157(void *data, object _, int argc, object *args) /* closure _,object k_737057, object name_732203_733544, object parent_732204_733545, object field_91tags_732205_733546 */
+ {
+-object k_737832 = args[0]; object name_732550_733996 = args[1]; object field_91tags_732552_733998 = args[3];
++object k_737057 = args[0]; object name_732203_733544 = args[1]; object field_91tags_732205_733546 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:register-simple-type");
+
+-vector_3_type local_7327311;
+-return_direct_with_clo1(data, k_737832, (((closure) k_737832)->fn), Cyc_fast_vector_3(&local_7327311, __glo_record_91marker_scheme_base, name_732550_733996, field_91tags_732552_733998));;
++vector_3_type local_7324852;
++return_direct_with_clo1(data, k_737057, (((closure) k_737057)->fn), Cyc_fast_vector_3(&local_7324852, __glo_record_91marker_scheme_base, name_732203_733544, field_91tags_732205_733546));;
+ }
+
+-static void __lambda_1153(void *data, object _, int argc, object *args) /* closure _,object k_737527, object expr_732192_732269_732444_733890, object rename_732193_732270_732445_733891, object compare_732194_732271_732446_733892 */
++static void __lambda_1106(void *data, object _, int argc, object *args) /* closure _,object k_736752, object expr_731845_731922_732097_733438, object rename_731846_731923_732098_733439, object compare_731847_731924_732099_733440 */
+ {
+-object k_737527 = args[0]; object expr_732192_732269_732444_733890 = args[1]; object rename_732193_732270_732445_733891 = args[2]; object compare_732194_732271_732446_733892 = args[3];
++object k_736752 = args[0]; object expr_731845_731922_732097_733438 = args[1]; object rename_731846_731923_732098_733439 = args[2]; object compare_731847_731924_732099_733440 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:guard-aux");
+
+-closureN_type c_7326288;
+-object e_7327304 [4];
+-c_7326288.hdr.mark = gc_color_red;
+- c_7326288.hdr.grayed = 0;
+-c_7326288.tag = closureN_tag;
+- c_7326288.fn = (function_type)__lambda_1154;
+-c_7326288.num_args = 1;
+-c_7326288.num_elements = 4;
+-c_7326288.elements = (object *)e_7327304;
+-c_7326288.elements[0] = compare_732194_732271_732446_733892;
+-c_7326288.elements[1] = expr_732192_732269_732444_733890;
+-c_7326288.elements[2] = k_737527;
+-c_7326288.elements[3] = rename_732193_732270_732445_733891;
++closureN_type c_7323829;
++object e_7324845 [4];
++c_7323829.hdr.mark = gc_color_red;
++ c_7323829.hdr.grayed = 0;
++c_7323829.tag = closureN_tag;
++ c_7323829.fn = (function_type)__lambda_1107;
++c_7323829.num_args = 1;
++c_7323829.num_elements = 4;
++c_7323829.elements = (object *)e_7324845;
++c_7323829.elements[0] = compare_731847_731924_732099_733440;
++c_7323829.elements[1] = expr_731845_731922_732097_733438;
++c_7323829.elements[2] = k_736752;
++c_7323829.elements[3] = rename_731846_731923_732098_733439;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7326288,__lambda_1154, Cyc_cdr(data, expr_732192_732269_732444_733890));;
++return_direct_with_clo1(data,(closure)&c_7323829,__lambda_1107, Cyc_cdr(data, expr_731845_731922_732097_733438));;
+ }
+
+-static void __lambda_1154(void *data, object self_7314143, int argc, object *args) /* object self_7314143, object v_931_732200_732425_732538_733984 */
++static void __lambda_1107(void *data, object self_7312843, int argc, object *args) /* object self_7312843, object v_931_731853_732078_732191_733532 */
+ {
+- object v_931_732200_732425_732538_733984 = args[0];
++ object v_931_731853_732078_732191_733532 = args[0];
+
+-closureN_type c_7326290;
+-object e_7326397 [3];
+-c_7326290.hdr.mark = gc_color_red;
+- c_7326290.hdr.grayed = 0;
+-c_7326290.tag = closureN_tag;
+- c_7326290.fn = (function_type)__lambda_1155;
+-c_7326290.num_args = 0;
+-c_7326290.num_elements = 3;
+-c_7326290.elements = (object *)e_7326397;
+-c_7326290.elements[0] = ((closureN)self_7314143)->elements[0];
+-c_7326290.elements[1] = ((closureN)self_7314143)->elements[3];
+-c_7326290.elements[2] = v_931_732200_732425_732538_733984;
++closureN_type c_7323831;
++object e_7323938 [3];
++c_7323831.hdr.mark = gc_color_red;
++ c_7323831.hdr.grayed = 0;
++c_7323831.tag = closureN_tag;
++ c_7323831.fn = (function_type)__lambda_1108;
++c_7323831.num_args = 0;
++c_7323831.num_elements = 3;
++c_7323831.elements = (object *)e_7323938;
++c_7323831.elements[0] = ((closureN)self_7312843)->elements[0];
++c_7323831.elements[1] = ((closureN)self_7312843)->elements[3];
++c_7323831.elements[2] = v_931_731853_732078_732191_733532;
+
+
+-closureN_type c_7326398;
+-object e_7327303 [4];
+-c_7326398.hdr.mark = gc_color_red;
+- c_7326398.hdr.grayed = 0;
+-c_7326398.tag = closureN_tag;
+- c_7326398.fn = (function_type)__lambda_1159;
+-c_7326398.num_args = 1;
+-c_7326398.num_elements = 4;
+-c_7326398.elements = (object *)e_7327303;
+-c_7326398.elements[0] = ((closureN)self_7314143)->elements[0];
+-c_7326398.elements[1] = ((closureN)self_7314143)->elements[1];
+-c_7326398.elements[2] = ((closureN)self_7314143)->elements[2];
+-c_7326398.elements[3] = ((closureN)self_7314143)->elements[3];
++closureN_type c_7323939;
++object e_7324844 [4];
++c_7323939.hdr.mark = gc_color_red;
++ c_7323939.hdr.grayed = 0;
++c_7323939.tag = closureN_tag;
++ c_7323939.fn = (function_type)__lambda_1112;
++c_7323939.num_args = 1;
++c_7323939.num_elements = 4;
++c_7323939.elements = (object *)e_7324844;
++c_7323939.elements[0] = ((closureN)self_7312843)->elements[0];
++c_7323939.elements[1] = ((closureN)self_7312843)->elements[1];
++c_7323939.elements[2] = ((closureN)self_7312843)->elements[2];
++c_7323939.elements[3] = ((closureN)self_7312843)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7326290,__lambda_1155, &c_7326398);;
++return_direct_with_clo1(data,(closure)&c_7323831,__lambda_1108, &c_7323939);;
+ }
+
+-static void __lambda_1159(void *data, object self_7314144, int argc, object *args) /* object self_7314144, object tmp_732273_732275_732447_733893 */
++static void __lambda_1112(void *data, object self_7312844, int argc, object *args) /* object self_7312844, object tmp_731926_731928_732100_733441 */
+ {
+- object tmp_732273_732275_732447_733893 = args[0];
++ object tmp_731926_731928_732100_733441 = args[0];
+
+-closureN_type c_7326400;
+-object e_7327296 [4];
+-c_7326400.hdr.mark = gc_color_red;
+- c_7326400.hdr.grayed = 0;
+-c_7326400.tag = closureN_tag;
+- c_7326400.fn = (function_type)__lambda_1160;
+-c_7326400.num_args = 0;
+-c_7326400.num_elements = 4;
+-c_7326400.elements = (object *)e_7327296;
+-c_7326400.elements[0] = ((closureN)self_7314144)->elements[0];
+-c_7326400.elements[1] = ((closureN)self_7314144)->elements[1];
+-c_7326400.elements[2] = ((closureN)self_7314144)->elements[3];
+-c_7326400.elements[3] = tmp_732273_732275_732447_733893;
++closureN_type c_7323941;
++object e_7324837 [4];
++c_7323941.hdr.mark = gc_color_red;
++ c_7323941.hdr.grayed = 0;
++c_7323941.tag = closureN_tag;
++ c_7323941.fn = (function_type)__lambda_1113;
++c_7323941.num_args = 0;
++c_7323941.num_elements = 4;
++c_7323941.elements = (object *)e_7324837;
++c_7323941.elements[0] = ((closureN)self_7312844)->elements[0];
++c_7323941.elements[1] = ((closureN)self_7312844)->elements[1];
++c_7323941.elements[2] = ((closureN)self_7312844)->elements[3];
++c_7323941.elements[3] = tmp_731926_731928_732100_733441;
+
+
+-closureN_type c_7327297;
+-object e_7327302 [1];
+-c_7327297.hdr.mark = gc_color_red;
+- c_7327297.hdr.grayed = 0;
+-c_7327297.tag = closureN_tag;
+- c_7327297.fn = (function_type)__lambda_1203;
+-c_7327297.num_args = 1;
+-c_7327297.num_elements = 1;
+-c_7327297.elements = (object *)e_7327302;
+-c_7327297.elements[0] = ((closureN)self_7314144)->elements[2];
++closureN_type c_7324838;
++object e_7324843 [1];
++c_7324838.hdr.mark = gc_color_red;
++ c_7324838.hdr.grayed = 0;
++c_7324838.tag = closureN_tag;
++ c_7324838.fn = (function_type)__lambda_1156;
++c_7324838.num_args = 1;
++c_7324838.num_elements = 1;
++c_7324838.elements = (object *)e_7324843;
++c_7324838.elements[0] = ((closureN)self_7312844)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7326400,__lambda_1160, &c_7327297);;
++return_direct_with_clo1(data,(closure)&c_7323941,__lambda_1113, &c_7324838);;
+ }
+
+-static void __lambda_1203(void *data, object self_7314145, int argc, object *args) /* object self_7314145, object r_737528 */
++static void __lambda_1156(void *data, object self_7312845, int argc, object *args) /* object self_7312845, object r_736753 */
+ {
+- object r_737528 = args[0];
++ object r_736753 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314145)->elements[0], (((closure) ((closureN)self_7314145)->elements[0])->fn), Cyc_car(data, r_737528));;
++return_direct_with_clo1(data, ((closureN)self_7312845)->elements[0], (((closure) ((closureN)self_7312845)->elements[0])->fn), Cyc_car(data, r_736753));;
+ }
+
+-static void __lambda_1160(void *data, object self_7314146, int argc, object *args) /* object self_7314146, object k_737530 */
++static void __lambda_1113(void *data, object self_7312846, int argc, object *args) /* object self_7312846, object k_736755 */
+ {
+- object k_737530 = args[0];
+- if( (boolean_f != ((closureN)self_7314146)->elements[3]) ){
+- return_direct_with_clo1(data, k_737530, (((closure) k_737530)->fn), ((closureN)self_7314146)->elements[3]);
++ object k_736755 = args[0];
++ if( (boolean_f != ((closureN)self_7312846)->elements[3]) ){
++ return_direct_with_clo1(data, k_736755, (((closure) k_736755)->fn), ((closureN)self_7312846)->elements[3]);
+ } else {
+
+-closureN_type c_7326405;
+-object e_7327292 [4];
+-c_7326405.hdr.mark = gc_color_red;
+- c_7326405.hdr.grayed = 0;
+-c_7326405.tag = closureN_tag;
+- c_7326405.fn = (function_type)__lambda_1161;
+-c_7326405.num_args = 1;
+-c_7326405.num_elements = 4;
+-c_7326405.elements = (object *)e_7327292;
+-c_7326405.elements[0] = ((closureN)self_7314146)->elements[0];
+-c_7326405.elements[1] = ((closureN)self_7314146)->elements[1];
+-c_7326405.elements[2] = k_737530;
+-c_7326405.elements[3] = ((closureN)self_7314146)->elements[2];
++closureN_type c_7323946;
++object e_7324833 [4];
++c_7323946.hdr.mark = gc_color_red;
++ c_7323946.hdr.grayed = 0;
++c_7323946.tag = closureN_tag;
++ c_7323946.fn = (function_type)__lambda_1114;
++c_7323946.num_args = 1;
++c_7323946.num_elements = 4;
++c_7323946.elements = (object *)e_7324833;
++c_7323946.elements[0] = ((closureN)self_7312846)->elements[0];
++c_7323946.elements[1] = ((closureN)self_7312846)->elements[1];
++c_7323946.elements[2] = k_736755;
++c_7323946.elements[3] = ((closureN)self_7312846)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7326405,__lambda_1161, Cyc_cdr(data, ((closureN)self_7314146)->elements[1]));}
++return_direct_with_clo1(data,(closure)&c_7323946,__lambda_1114, Cyc_cdr(data, ((closureN)self_7312846)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_1161(void *data, object self_7314147, int argc, object *args) /* object self_7314147, object v_9310_732209_732403_732524_733970 */
++static void __lambda_1114(void *data, object self_7312847, int argc, object *args) /* object self_7312847, object v_9310_731862_732056_732177_733518 */
+ {
+- object v_9310_732209_732403_732524_733970 = args[0];
++ object v_9310_731862_732056_732177_733518 = args[0];
+
+-closureN_type c_7326407;
+-object e_7326578 [3];
+-c_7326407.hdr.mark = gc_color_red;
+- c_7326407.hdr.grayed = 0;
+-c_7326407.tag = closureN_tag;
+- c_7326407.fn = (function_type)__lambda_1162;
+-c_7326407.num_args = 0;
+-c_7326407.num_elements = 3;
+-c_7326407.elements = (object *)e_7326578;
+-c_7326407.elements[0] = ((closureN)self_7314147)->elements[0];
+-c_7326407.elements[1] = ((closureN)self_7314147)->elements[3];
+-c_7326407.elements[2] = v_9310_732209_732403_732524_733970;
++closureN_type c_7323948;
++object e_7324119 [3];
++c_7323948.hdr.mark = gc_color_red;
++ c_7323948.hdr.grayed = 0;
++c_7323948.tag = closureN_tag;
++ c_7323948.fn = (function_type)__lambda_1115;
++c_7323948.num_args = 0;
++c_7323948.num_elements = 3;
++c_7323948.elements = (object *)e_7324119;
++c_7323948.elements[0] = ((closureN)self_7312847)->elements[0];
++c_7323948.elements[1] = ((closureN)self_7312847)->elements[3];
++c_7323948.elements[2] = v_9310_731862_732056_732177_733518;
+
+
+-closureN_type c_7326579;
+-object e_7327291 [4];
+-c_7326579.hdr.mark = gc_color_red;
+- c_7326579.hdr.grayed = 0;
+-c_7326579.tag = closureN_tag;
+- c_7326579.fn = (function_type)__lambda_1170;
+-c_7326579.num_args = 1;
+-c_7326579.num_elements = 4;
+-c_7326579.elements = (object *)e_7327291;
+-c_7326579.elements[0] = ((closureN)self_7314147)->elements[0];
+-c_7326579.elements[1] = ((closureN)self_7314147)->elements[1];
+-c_7326579.elements[2] = ((closureN)self_7314147)->elements[2];
+-c_7326579.elements[3] = ((closureN)self_7314147)->elements[3];
++closureN_type c_7324120;
++object e_7324832 [4];
++c_7324120.hdr.mark = gc_color_red;
++ c_7324120.hdr.grayed = 0;
++c_7324120.tag = closureN_tag;
++ c_7324120.fn = (function_type)__lambda_1123;
++c_7324120.num_args = 1;
++c_7324120.num_elements = 4;
++c_7324120.elements = (object *)e_7324832;
++c_7324120.elements[0] = ((closureN)self_7312847)->elements[0];
++c_7324120.elements[1] = ((closureN)self_7312847)->elements[1];
++c_7324120.elements[2] = ((closureN)self_7312847)->elements[2];
++c_7324120.elements[3] = ((closureN)self_7312847)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7326407,__lambda_1162, &c_7326579);;
++return_direct_with_clo1(data,(closure)&c_7323948,__lambda_1115, &c_7324120);;
+ }
+
+-static void __lambda_1170(void *data, object self_7314148, int argc, object *args) /* object self_7314148, object tmp_732277_732279_732448_733894 */
++static void __lambda_1123(void *data, object self_7312848, int argc, object *args) /* object self_7312848, object tmp_731930_731932_732101_733442 */
+ {
+- object tmp_732277_732279_732448_733894 = args[0];
+- if( (boolean_f != tmp_732277_732279_732448_733894) ){
+- return_direct_with_clo1(data, ((closureN)self_7314148)->elements[2], (((closure) ((closureN)self_7314148)->elements[2])->fn), tmp_732277_732279_732448_733894);
++ object tmp_731930_731932_732101_733442 = args[0];
++ if( (boolean_f != tmp_731930_731932_732101_733442) ){
++ return_direct_with_clo1(data, ((closureN)self_7312848)->elements[2], (((closure) ((closureN)self_7312848)->elements[2])->fn), tmp_731930_731932_732101_733442);
+ } else {
+
+-closureN_type c_7326583;
+-object e_7327287 [4];
+-c_7326583.hdr.mark = gc_color_red;
+- c_7326583.hdr.grayed = 0;
+-c_7326583.tag = closureN_tag;
+- c_7326583.fn = (function_type)__lambda_1171;
+-c_7326583.num_args = 1;
+-c_7326583.num_elements = 4;
+-c_7326583.elements = (object *)e_7327287;
+-c_7326583.elements[0] = ((closureN)self_7314148)->elements[0];
+-c_7326583.elements[1] = ((closureN)self_7314148)->elements[1];
+-c_7326583.elements[2] = ((closureN)self_7314148)->elements[2];
+-c_7326583.elements[3] = ((closureN)self_7314148)->elements[3];
++closureN_type c_7324124;
++object e_7324828 [4];
++c_7324124.hdr.mark = gc_color_red;
++ c_7324124.hdr.grayed = 0;
++c_7324124.tag = closureN_tag;
++ c_7324124.fn = (function_type)__lambda_1124;
++c_7324124.num_args = 1;
++c_7324124.num_elements = 4;
++c_7324124.elements = (object *)e_7324828;
++c_7324124.elements[0] = ((closureN)self_7312848)->elements[0];
++c_7324124.elements[1] = ((closureN)self_7312848)->elements[1];
++c_7324124.elements[2] = ((closureN)self_7312848)->elements[2];
++c_7324124.elements[3] = ((closureN)self_7312848)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7326583,__lambda_1171, Cyc_cdr(data, ((closureN)self_7314148)->elements[1]));}
++return_direct_with_clo1(data,(closure)&c_7324124,__lambda_1124, Cyc_cdr(data, ((closureN)self_7312848)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_1171(void *data, object self_7314149, int argc, object *args) /* object self_7314149, object v_9321_732220_732376_732506_733952 */
++static void __lambda_1124(void *data, object self_7312849, int argc, object *args) /* object self_7312849, object v_9321_731873_732029_732159_733500 */
+ {
+- object v_9321_732220_732376_732506_733952 = args[0];
++ object v_9321_731873_732029_732159_733500 = args[0];
+
+-closureN_type c_7326585;
+-object e_7326796 [3];
+-c_7326585.hdr.mark = gc_color_red;
+- c_7326585.hdr.grayed = 0;
+-c_7326585.tag = closureN_tag;
+- c_7326585.fn = (function_type)__lambda_1172;
+-c_7326585.num_args = 0;
+-c_7326585.num_elements = 3;
+-c_7326585.elements = (object *)e_7326796;
+-c_7326585.elements[0] = ((closureN)self_7314149)->elements[0];
+-c_7326585.elements[1] = ((closureN)self_7314149)->elements[3];
+-c_7326585.elements[2] = v_9321_732220_732376_732506_733952;
++closureN_type c_7324126;
++object e_7324337 [3];
++c_7324126.hdr.mark = gc_color_red;
++ c_7324126.hdr.grayed = 0;
++c_7324126.tag = closureN_tag;
++ c_7324126.fn = (function_type)__lambda_1125;
++c_7324126.num_args = 0;
++c_7324126.num_elements = 3;
++c_7324126.elements = (object *)e_7324337;
++c_7324126.elements[0] = ((closureN)self_7312849)->elements[0];
++c_7324126.elements[1] = ((closureN)self_7312849)->elements[3];
++c_7324126.elements[2] = v_9321_731873_732029_732159_733500;
+
+
+-closureN_type c_7326797;
+-object e_7327286 [3];
+-c_7326797.hdr.mark = gc_color_red;
+- c_7326797.hdr.grayed = 0;
+-c_7326797.tag = closureN_tag;
+- c_7326797.fn = (function_type)__lambda_1181;
+-c_7326797.num_args = 1;
+-c_7326797.num_elements = 3;
+-c_7326797.elements = (object *)e_7327286;
+-c_7326797.elements[0] = ((closureN)self_7314149)->elements[1];
+-c_7326797.elements[1] = ((closureN)self_7314149)->elements[2];
+-c_7326797.elements[2] = ((closureN)self_7314149)->elements[3];
++closureN_type c_7324338;
++object e_7324827 [3];
++c_7324338.hdr.mark = gc_color_red;
++ c_7324338.hdr.grayed = 0;
++c_7324338.tag = closureN_tag;
++ c_7324338.fn = (function_type)__lambda_1134;
++c_7324338.num_args = 1;
++c_7324338.num_elements = 3;
++c_7324338.elements = (object *)e_7324827;
++c_7324338.elements[0] = ((closureN)self_7312849)->elements[1];
++c_7324338.elements[1] = ((closureN)self_7312849)->elements[2];
++c_7324338.elements[2] = ((closureN)self_7312849)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7326585,__lambda_1172, &c_7326797);;
++return_direct_with_clo1(data,(closure)&c_7324126,__lambda_1125, &c_7324338);;
+ }
+
+-static void __lambda_1181(void *data, object self_7314150, int argc, object *args) /* object self_7314150, object tmp_732281_732283_732449_733895 */
++static void __lambda_1134(void *data, object self_7312850, int argc, object *args) /* object self_7312850, object tmp_731934_731936_732102_733443 */
+ {
+- object tmp_732281_732283_732449_733895 = args[0];
+- if( (boolean_f != tmp_732281_732283_732449_733895) ){
+- return_direct_with_clo1(data, ((closureN)self_7314150)->elements[1], (((closure) ((closureN)self_7314150)->elements[1])->fn), tmp_732281_732283_732449_733895);
++ object tmp_731934_731936_732102_733443 = args[0];
++ if( (boolean_f != tmp_731934_731936_732102_733443) ){
++ return_direct_with_clo1(data, ((closureN)self_7312850)->elements[1], (((closure) ((closureN)self_7312850)->elements[1])->fn), tmp_731934_731936_732102_733443);
+ } else {
+
+-closureN_type c_7326801;
+-object e_7327282 [3];
+-c_7326801.hdr.mark = gc_color_red;
+- c_7326801.hdr.grayed = 0;
+-c_7326801.tag = closureN_tag;
+- c_7326801.fn = (function_type)__lambda_1182;
+-c_7326801.num_args = 1;
+-c_7326801.num_elements = 3;
+-c_7326801.elements = (object *)e_7327282;
+-c_7326801.elements[0] = ((closureN)self_7314150)->elements[0];
+-c_7326801.elements[1] = ((closureN)self_7314150)->elements[1];
+-c_7326801.elements[2] = ((closureN)self_7314150)->elements[2];
++closureN_type c_7324342;
++object e_7324823 [3];
++c_7324342.hdr.mark = gc_color_red;
++ c_7324342.hdr.grayed = 0;
++c_7324342.tag = closureN_tag;
++ c_7324342.fn = (function_type)__lambda_1135;
++c_7324342.num_args = 1;
++c_7324342.num_elements = 3;
++c_7324342.elements = (object *)e_7324823;
++c_7324342.elements[0] = ((closureN)self_7312850)->elements[0];
++c_7324342.elements[1] = ((closureN)self_7312850)->elements[1];
++c_7324342.elements[2] = ((closureN)self_7312850)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7326801,__lambda_1182, Cyc_cdr(data, ((closureN)self_7314150)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324342,__lambda_1135, Cyc_cdr(data, ((closureN)self_7312850)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1182(void *data, object self_7314151, int argc, object *args) /* object self_7314151, object v_9334_732233_732362_732497_733943 */
++static void __lambda_1135(void *data, object self_7312851, int argc, object *args) /* object self_7312851, object v_9334_731886_732015_732150_733491 */
+ {
+- object v_9334_732233_732362_732497_733943 = args[0];
++ object v_9334_731886_732015_732150_733491 = args[0];
+
+-closureN_type c_7326803;
+-object e_7326868 [2];
+-c_7326803.hdr.mark = gc_color_red;
+- c_7326803.hdr.grayed = 0;
+-c_7326803.tag = closureN_tag;
+- c_7326803.fn = (function_type)__lambda_1183;
+-c_7326803.num_args = 0;
+-c_7326803.num_elements = 2;
+-c_7326803.elements = (object *)e_7326868;
+-c_7326803.elements[0] = ((closureN)self_7314151)->elements[2];
+-c_7326803.elements[1] = v_9334_732233_732362_732497_733943;
++closureN_type c_7324344;
++object e_7324409 [2];
++c_7324344.hdr.mark = gc_color_red;
++ c_7324344.hdr.grayed = 0;
++c_7324344.tag = closureN_tag;
++ c_7324344.fn = (function_type)__lambda_1136;
++c_7324344.num_args = 0;
++c_7324344.num_elements = 2;
++c_7324344.elements = (object *)e_7324409;
++c_7324344.elements[0] = ((closureN)self_7312851)->elements[2];
++c_7324344.elements[1] = v_9334_731886_732015_732150_733491;
+
+
+-closureN_type c_7326869;
+-object e_7327281 [3];
+-c_7326869.hdr.mark = gc_color_red;
+- c_7326869.hdr.grayed = 0;
+-c_7326869.tag = closureN_tag;
+- c_7326869.fn = (function_type)__lambda_1185;
+-c_7326869.num_args = 1;
+-c_7326869.num_elements = 3;
+-c_7326869.elements = (object *)e_7327281;
+-c_7326869.elements[0] = ((closureN)self_7314151)->elements[0];
+-c_7326869.elements[1] = ((closureN)self_7314151)->elements[1];
+-c_7326869.elements[2] = ((closureN)self_7314151)->elements[2];
++closureN_type c_7324410;
++object e_7324822 [3];
++c_7324410.hdr.mark = gc_color_red;
++ c_7324410.hdr.grayed = 0;
++c_7324410.tag = closureN_tag;
++ c_7324410.fn = (function_type)__lambda_1138;
++c_7324410.num_args = 1;
++c_7324410.num_elements = 3;
++c_7324410.elements = (object *)e_7324822;
++c_7324410.elements[0] = ((closureN)self_7312851)->elements[0];
++c_7324410.elements[1] = ((closureN)self_7312851)->elements[1];
++c_7324410.elements[2] = ((closureN)self_7312851)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7326803,__lambda_1183, &c_7326869);;
++return_direct_with_clo1(data,(closure)&c_7324344,__lambda_1136, &c_7324410);;
+ }
+
+-static void __lambda_1185(void *data, object self_7314152, int argc, object *args) /* object self_7314152, object tmp_732285_732287_732450_733896 */
++static void __lambda_1138(void *data, object self_7312852, int argc, object *args) /* object self_7312852, object tmp_731938_731940_732103_733444 */
+ {
+- object tmp_732285_732287_732450_733896 = args[0];
+- if( (boolean_f != tmp_732285_732287_732450_733896) ){
+- return_direct_with_clo1(data, ((closureN)self_7314152)->elements[1], (((closure) ((closureN)self_7314152)->elements[1])->fn), tmp_732285_732287_732450_733896);
++ object tmp_731938_731940_732103_733444 = args[0];
++ if( (boolean_f != tmp_731938_731940_732103_733444) ){
++ return_direct_with_clo1(data, ((closureN)self_7312852)->elements[1], (((closure) ((closureN)self_7312852)->elements[1])->fn), tmp_731938_731940_732103_733444);
+ } else {
+
+-closureN_type c_7326873;
+-object e_7327277 [3];
+-c_7326873.hdr.mark = gc_color_red;
+- c_7326873.hdr.grayed = 0;
+-c_7326873.tag = closureN_tag;
+- c_7326873.fn = (function_type)__lambda_1186;
+-c_7326873.num_args = 1;
+-c_7326873.num_elements = 3;
+-c_7326873.elements = (object *)e_7327277;
+-c_7326873.elements[0] = ((closureN)self_7314152)->elements[0];
+-c_7326873.elements[1] = ((closureN)self_7314152)->elements[1];
+-c_7326873.elements[2] = ((closureN)self_7314152)->elements[2];
++closureN_type c_7324414;
++object e_7324818 [3];
++c_7324414.hdr.mark = gc_color_red;
++ c_7324414.hdr.grayed = 0;
++c_7324414.tag = closureN_tag;
++ c_7324414.fn = (function_type)__lambda_1139;
++c_7324414.num_args = 1;
++c_7324414.num_elements = 3;
++c_7324414.elements = (object *)e_7324818;
++c_7324414.elements[0] = ((closureN)self_7312852)->elements[0];
++c_7324414.elements[1] = ((closureN)self_7312852)->elements[1];
++c_7324414.elements[2] = ((closureN)self_7312852)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7326873,__lambda_1186, Cyc_cdr(data, ((closureN)self_7314152)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324414,__lambda_1139, Cyc_cdr(data, ((closureN)self_7312852)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1186(void *data, object self_7314153, int argc, object *args) /* object self_7314153, object v_9341_732240_732343_732484_733930 */
++static void __lambda_1139(void *data, object self_7312853, int argc, object *args) /* object self_7312853, object v_9341_731893_731996_732137_733478 */
+ {
+- object v_9341_732240_732343_732484_733930 = args[0];
++ object v_9341_731893_731996_732137_733478 = args[0];
+
+-closureN_type c_7326875;
+-object e_7326979 [2];
+-c_7326875.hdr.mark = gc_color_red;
+- c_7326875.hdr.grayed = 0;
+-c_7326875.tag = closureN_tag;
+- c_7326875.fn = (function_type)__lambda_1187;
+-c_7326875.num_args = 0;
+-c_7326875.num_elements = 2;
+-c_7326875.elements = (object *)e_7326979;
+-c_7326875.elements[0] = ((closureN)self_7314153)->elements[2];
+-c_7326875.elements[1] = v_9341_732240_732343_732484_733930;
++closureN_type c_7324416;
++object e_7324520 [2];
++c_7324416.hdr.mark = gc_color_red;
++ c_7324416.hdr.grayed = 0;
++c_7324416.tag = closureN_tag;
++ c_7324416.fn = (function_type)__lambda_1140;
++c_7324416.num_args = 0;
++c_7324416.num_elements = 2;
++c_7324416.elements = (object *)e_7324520;
++c_7324416.elements[0] = ((closureN)self_7312853)->elements[2];
++c_7324416.elements[1] = v_9341_731893_731996_732137_733478;
+
+
+-closureN_type c_7326980;
+-object e_7327276 [3];
+-c_7326980.hdr.mark = gc_color_red;
+- c_7326980.hdr.grayed = 0;
+-c_7326980.tag = closureN_tag;
+- c_7326980.fn = (function_type)__lambda_1190;
+-c_7326980.num_args = 1;
+-c_7326980.num_elements = 3;
+-c_7326980.elements = (object *)e_7327276;
+-c_7326980.elements[0] = ((closureN)self_7314153)->elements[0];
+-c_7326980.elements[1] = ((closureN)self_7314153)->elements[1];
+-c_7326980.elements[2] = ((closureN)self_7314153)->elements[2];
++closureN_type c_7324521;
++object e_7324817 [3];
++c_7324521.hdr.mark = gc_color_red;
++ c_7324521.hdr.grayed = 0;
++c_7324521.tag = closureN_tag;
++ c_7324521.fn = (function_type)__lambda_1143;
++c_7324521.num_args = 1;
++c_7324521.num_elements = 3;
++c_7324521.elements = (object *)e_7324817;
++c_7324521.elements[0] = ((closureN)self_7312853)->elements[0];
++c_7324521.elements[1] = ((closureN)self_7312853)->elements[1];
++c_7324521.elements[2] = ((closureN)self_7312853)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7326875,__lambda_1187, &c_7326980);;
++return_direct_with_clo1(data,(closure)&c_7324416,__lambda_1140, &c_7324521);;
+ }
+
+-static void __lambda_1190(void *data, object self_7314154, int argc, object *args) /* object self_7314154, object tmp_732289_732291_732451_733897 */
++static void __lambda_1143(void *data, object self_7312854, int argc, object *args) /* object self_7312854, object tmp_731942_731944_732104_733445 */
+ {
+- object tmp_732289_732291_732451_733897 = args[0];
+- if( (boolean_f != tmp_732289_732291_732451_733897) ){
+- return_direct_with_clo1(data, ((closureN)self_7314154)->elements[1], (((closure) ((closureN)self_7314154)->elements[1])->fn), tmp_732289_732291_732451_733897);
++ object tmp_731942_731944_732104_733445 = args[0];
++ if( (boolean_f != tmp_731942_731944_732104_733445) ){
++ return_direct_with_clo1(data, ((closureN)self_7312854)->elements[1], (((closure) ((closureN)self_7312854)->elements[1])->fn), tmp_731942_731944_732104_733445);
+ } else {
+
+-closureN_type c_7326984;
+-object e_7327272 [3];
+-c_7326984.hdr.mark = gc_color_red;
+- c_7326984.hdr.grayed = 0;
+-c_7326984.tag = closureN_tag;
+- c_7326984.fn = (function_type)__lambda_1191;
+-c_7326984.num_args = 1;
+-c_7326984.num_elements = 3;
+-c_7326984.elements = (object *)e_7327272;
+-c_7326984.elements[0] = ((closureN)self_7314154)->elements[0];
+-c_7326984.elements[1] = ((closureN)self_7314154)->elements[1];
+-c_7326984.elements[2] = ((closureN)self_7314154)->elements[2];
++closureN_type c_7324525;
++object e_7324813 [3];
++c_7324525.hdr.mark = gc_color_red;
++ c_7324525.hdr.grayed = 0;
++c_7324525.tag = closureN_tag;
++ c_7324525.fn = (function_type)__lambda_1144;
++c_7324525.num_args = 1;
++c_7324525.num_elements = 3;
++c_7324525.elements = (object *)e_7324813;
++c_7324525.elements[0] = ((closureN)self_7312854)->elements[0];
++c_7324525.elements[1] = ((closureN)self_7312854)->elements[1];
++c_7324525.elements[2] = ((closureN)self_7312854)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7326984,__lambda_1191, Cyc_cdr(data, ((closureN)self_7314154)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324525,__lambda_1144, Cyc_cdr(data, ((closureN)self_7312854)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1191(void *data, object self_7314155, int argc, object *args) /* object self_7314155, object v_9350_732249_732324_732471_733917 */
++static void __lambda_1144(void *data, object self_7312855, int argc, object *args) /* object self_7312855, object v_9350_731902_731977_732124_733465 */
+ {
+- object v_9350_732249_732324_732471_733917 = args[0];
++ object v_9350_731902_731977_732124_733465 = args[0];
+
+-closureN_type c_7326986;
+-object e_7327096 [2];
+-c_7326986.hdr.mark = gc_color_red;
+- c_7326986.hdr.grayed = 0;
+-c_7326986.tag = closureN_tag;
+- c_7326986.fn = (function_type)__lambda_1192;
+-c_7326986.num_args = 0;
+-c_7326986.num_elements = 2;
+-c_7326986.elements = (object *)e_7327096;
+-c_7326986.elements[0] = ((closureN)self_7314155)->elements[2];
+-c_7326986.elements[1] = v_9350_732249_732324_732471_733917;
++closureN_type c_7324527;
++object e_7324637 [2];
++c_7324527.hdr.mark = gc_color_red;
++ c_7324527.hdr.grayed = 0;
++c_7324527.tag = closureN_tag;
++ c_7324527.fn = (function_type)__lambda_1145;
++c_7324527.num_args = 0;
++c_7324527.num_elements = 2;
++c_7324527.elements = (object *)e_7324637;
++c_7324527.elements[0] = ((closureN)self_7312855)->elements[2];
++c_7324527.elements[1] = v_9350_731902_731977_732124_733465;
+
+
+-closureN_type c_7327097;
+-object e_7327271 [3];
+-c_7327097.hdr.mark = gc_color_red;
+- c_7327097.hdr.grayed = 0;
+-c_7327097.tag = closureN_tag;
+- c_7327097.fn = (function_type)__lambda_1195;
+-c_7327097.num_args = 1;
+-c_7327097.num_elements = 3;
+-c_7327097.elements = (object *)e_7327271;
+-c_7327097.elements[0] = ((closureN)self_7314155)->elements[0];
+-c_7327097.elements[1] = ((closureN)self_7314155)->elements[1];
+-c_7327097.elements[2] = ((closureN)self_7314155)->elements[2];
++closureN_type c_7324638;
++object e_7324812 [3];
++c_7324638.hdr.mark = gc_color_red;
++ c_7324638.hdr.grayed = 0;
++c_7324638.tag = closureN_tag;
++ c_7324638.fn = (function_type)__lambda_1148;
++c_7324638.num_args = 1;
++c_7324638.num_elements = 3;
++c_7324638.elements = (object *)e_7324812;
++c_7324638.elements[0] = ((closureN)self_7312855)->elements[0];
++c_7324638.elements[1] = ((closureN)self_7312855)->elements[1];
++c_7324638.elements[2] = ((closureN)self_7312855)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7326986,__lambda_1192, &c_7327097);;
++return_direct_with_clo1(data,(closure)&c_7324527,__lambda_1145, &c_7324638);;
+ }
+
+-static void __lambda_1195(void *data, object self_7314156, int argc, object *args) /* object self_7314156, object tmp_732293_732295_732452_733898 */
++static void __lambda_1148(void *data, object self_7312856, int argc, object *args) /* object self_7312856, object tmp_731946_731948_732105_733446 */
+ {
+- object tmp_732293_732295_732452_733898 = args[0];
+- if( (boolean_f != tmp_732293_732295_732452_733898) ){
+- return_direct_with_clo1(data, ((closureN)self_7314156)->elements[1], (((closure) ((closureN)self_7314156)->elements[1])->fn), tmp_732293_732295_732452_733898);
++ object tmp_731946_731948_732105_733446 = args[0];
++ if( (boolean_f != tmp_731946_731948_732105_733446) ){
++ return_direct_with_clo1(data, ((closureN)self_7312856)->elements[1], (((closure) ((closureN)self_7312856)->elements[1])->fn), tmp_731946_731948_732105_733446);
+ } else {
+
+-closureN_type c_7327101;
+-object e_7327267 [3];
+-c_7327101.hdr.mark = gc_color_red;
+- c_7327101.hdr.grayed = 0;
+-c_7327101.tag = closureN_tag;
+- c_7327101.fn = (function_type)__lambda_1196;
+-c_7327101.num_args = 1;
+-c_7327101.num_elements = 3;
+-c_7327101.elements = (object *)e_7327267;
+-c_7327101.elements[0] = ((closureN)self_7314156)->elements[0];
+-c_7327101.elements[1] = ((closureN)self_7314156)->elements[1];
+-c_7327101.elements[2] = ((closureN)self_7314156)->elements[2];
++closureN_type c_7324642;
++object e_7324808 [3];
++c_7324642.hdr.mark = gc_color_red;
++ c_7324642.hdr.grayed = 0;
++c_7324642.tag = closureN_tag;
++ c_7324642.fn = (function_type)__lambda_1149;
++c_7324642.num_args = 1;
++c_7324642.num_elements = 3;
++c_7324642.elements = (object *)e_7324808;
++c_7324642.elements[0] = ((closureN)self_7312856)->elements[0];
++c_7324642.elements[1] = ((closureN)self_7312856)->elements[1];
++c_7324642.elements[2] = ((closureN)self_7312856)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7327101,__lambda_1196, Cyc_cdr(data, ((closureN)self_7314156)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324642,__lambda_1149, Cyc_cdr(data, ((closureN)self_7312856)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1196(void *data, object self_7314157, int argc, object *args) /* object self_7314157, object v_9359_732258_732300_732454_733900 */
++static void __lambda_1149(void *data, object self_7312857, int argc, object *args) /* object self_7312857, object v_9359_731911_731953_732107_733448 */
+ {
+- object v_9359_732258_732300_732454_733900 = args[0];
++ object v_9359_731911_731953_732107_733448 = args[0];
+
+-closureN_type c_7327103;
+-object e_7327252 [2];
+-c_7327103.hdr.mark = gc_color_red;
+- c_7327103.hdr.grayed = 0;
+-c_7327103.tag = closureN_tag;
+- c_7327103.fn = (function_type)__lambda_1197;
+-c_7327103.num_args = 0;
+-c_7327103.num_elements = 2;
+-c_7327103.elements = (object *)e_7327252;
+-c_7327103.elements[0] = ((closureN)self_7314157)->elements[2];
+-c_7327103.elements[1] = v_9359_732258_732300_732454_733900;
++closureN_type c_7324644;
++object e_7324793 [2];
++c_7324644.hdr.mark = gc_color_red;
++ c_7324644.hdr.grayed = 0;
++c_7324644.tag = closureN_tag;
++ c_7324644.fn = (function_type)__lambda_1150;
++c_7324644.num_args = 0;
++c_7324644.num_elements = 2;
++c_7324644.elements = (object *)e_7324793;
++c_7324644.elements[0] = ((closureN)self_7312857)->elements[2];
++c_7324644.elements[1] = v_9359_731911_731953_732107_733448;
+
+
+-closureN_type c_7327253;
+-object e_7327266 [2];
+-c_7327253.hdr.mark = gc_color_red;
+- c_7327253.hdr.grayed = 0;
+-c_7327253.tag = closureN_tag;
+- c_7327253.fn = (function_type)__lambda_1201;
+-c_7327253.num_args = 1;
+-c_7327253.num_elements = 2;
+-c_7327253.elements = (object *)e_7327266;
+-c_7327253.elements[0] = ((closureN)self_7314157)->elements[0];
+-c_7327253.elements[1] = ((closureN)self_7314157)->elements[1];
++closureN_type c_7324794;
++object e_7324807 [2];
++c_7324794.hdr.mark = gc_color_red;
++ c_7324794.hdr.grayed = 0;
++c_7324794.tag = closureN_tag;
++ c_7324794.fn = (function_type)__lambda_1154;
++c_7324794.num_args = 1;
++c_7324794.num_elements = 2;
++c_7324794.elements = (object *)e_7324807;
++c_7324794.elements[0] = ((closureN)self_7312857)->elements[0];
++c_7324794.elements[1] = ((closureN)self_7312857)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7327103,__lambda_1197, &c_7327253);;
++return_direct_with_clo1(data,(closure)&c_7324644,__lambda_1150, &c_7324794);;
+ }
+
+-static void __lambda_1201(void *data, object self_7314158, int argc, object *args) /* object self_7314158, object tmp_732297_732299_732453_733899 */
++static void __lambda_1154(void *data, object self_7312858, int argc, object *args) /* object self_7312858, object tmp_731950_731952_732106_733447 */
+ {
+- object tmp_732297_732299_732453_733899 = args[0];
+- if( (boolean_f != tmp_732297_732299_732453_733899) ){
+- return_direct_with_clo1(data, ((closureN)self_7314158)->elements[1], (((closure) ((closureN)self_7314158)->elements[1])->fn), tmp_732297_732299_732453_733899);
++ object tmp_731950_731952_732106_733447 = args[0];
++ if( (boolean_f != tmp_731950_731952_732106_733447) ){
++ return_direct_with_clo1(data, ((closureN)self_7312858)->elements[1], (((closure) ((closureN)self_7312858)->elements[1])->fn), tmp_731950_731952_732106_733447);
+ } else {
+
+-closureN_type c_7327257;
+-object e_7327263 [1];
+-c_7327257.hdr.mark = gc_color_red;
+- c_7327257.hdr.grayed = 0;
+-c_7327257.tag = closureN_tag;
+- c_7327257.fn = (function_type)__lambda_1202;
+-c_7327257.num_args = 1;
+-c_7327257.num_elements = 1;
+-c_7327257.elements = (object *)e_7327263;
+-c_7327257.elements[0] = ((closureN)self_7314158)->elements[1];
++closureN_type c_7324798;
++object e_7324804 [1];
++c_7324798.hdr.mark = gc_color_red;
++ c_7324798.hdr.grayed = 0;
++c_7324798.tag = closureN_tag;
++ c_7324798.fn = (function_type)__lambda_1155;
++c_7324798.num_args = 1;
++c_7324798.num_elements = 1;
++c_7324798.elements = (object *)e_7324804;
++c_7324798.elements[0] = ((closureN)self_7312858)->elements[1];
+
+
+-make_utf8_string_with_len(c_7327264, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7327257, &c_7327264, ((closureN)self_7314158)->elements[0]);}
++make_utf8_string_with_len(c_7324805, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7324798, &c_7324805, ((closureN)self_7312858)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1202(void *data, object self_7314159, int argc, object *args) /* object self_7314159, object r_737537 */
++static void __lambda_1155(void *data, object self_7312859, int argc, object *args) /* object self_7312859, object r_736762 */
+ {
+- object r_737537 = args[0];
++ object r_736762 = args[0];
+
+-pair_type local_7327262;
+-return_direct_with_clo1(data, ((closureN)self_7314159)->elements[0], (((closure) ((closureN)self_7314159)->elements[0])->fn), set_pair_as_expr(&local_7327262, r_737537, boolean_f));;
++pair_type local_7324803;
++return_direct_with_clo1(data, ((closureN)self_7312859)->elements[0], (((closure) ((closureN)self_7312859)->elements[0])->fn), set_pair_as_expr(&local_7324803, r_736762, boolean_f));;
+ }
+
+-static void __lambda_1197(void *data, object self_7314160, int argc, object *args) /* object self_7314160, object k_737539 */
++static void __lambda_1150(void *data, object self_7312860, int argc, object *args) /* object self_7312860, object k_736764 */
+ {
+- object k_737539 = args[0];
++ object k_736764 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314160)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312860)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314160)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312860)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312860)->elements[1])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1]))))) ){
+- complex_num_type local_7327130;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312860)->elements[1]))))) ){
++ complex_num_type local_7324671;
+
+
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7327130, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1])))))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324671, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312860)->elements[1])))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1])))) ){
+- complex_num_type local_7327149;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312860)->elements[1])))) ){
++ complex_num_type local_7324690;
+
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7327149, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1]))))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324690, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312860)->elements[1]))))) ){
+
+-closureN_type c_7327159;
+-object e_7327244 [3];
+-c_7327159.hdr.mark = gc_color_red;
+- c_7327159.hdr.grayed = 0;
+-c_7327159.tag = closureN_tag;
+- c_7327159.fn = (function_type)__lambda_1198;
+-c_7327159.num_args = 1;
+-c_7327159.num_elements = 3;
+-c_7327159.elements = (object *)e_7327244;
+-c_7327159.elements[0] = k_737539;
+-c_7327159.elements[1] = ((closureN)self_7314160)->elements[0];
+-c_7327159.elements[2] = ((closureN)self_7314160)->elements[1];
++closureN_type c_7324700;
++object e_7324785 [3];
++c_7324700.hdr.mark = gc_color_red;
++ c_7324700.hdr.grayed = 0;
++c_7324700.tag = closureN_tag;
++ c_7324700.fn = (function_type)__lambda_1151;
++c_7324700.num_args = 1;
++c_7324700.num_elements = 3;
++c_7324700.elements = (object *)e_7324785;
++c_7324700.elements[0] = k_736764;
++c_7324700.elements[1] = ((closureN)self_7312860)->elements[0];
++c_7324700.elements[2] = ((closureN)self_7312860)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314160)->elements[0], &c_7327159, quote__if);
++return_closcall2(data, ((closureN)self_7312860)->elements[0], &c_7324700, quote__if);
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737539, (((closure) k_737539)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736764, (((closure) k_736764)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1198(void *data, object self_7314161, int argc, object *args) /* object self_7314161, object r_737558 */
++static void __lambda_1151(void *data, object self_7312861, int argc, object *args) /* object self_7312861, object r_736783 */
+ {
+- object r_737558 = args[0];
++ object r_736783 = args[0];
+
+-closureN_type c_7327162;
+-object e_7327243 [4];
+-c_7327162.hdr.mark = gc_color_red;
+- c_7327162.hdr.grayed = 0;
+-c_7327162.tag = closureN_tag;
+- c_7327162.fn = (function_type)__lambda_1199;
+-c_7327162.num_args = 1;
+-c_7327162.num_elements = 4;
+-c_7327162.elements = (object *)e_7327243;
+-c_7327162.elements[0] = ((closureN)self_7314161)->elements[0];
+-c_7327162.elements[1] = r_737558;
+-c_7327162.elements[2] = ((closureN)self_7314161)->elements[1];
+-c_7327162.elements[3] = ((closureN)self_7314161)->elements[2];
++closureN_type c_7324703;
++object e_7324784 [4];
++c_7324703.hdr.mark = gc_color_red;
++ c_7324703.hdr.grayed = 0;
++c_7324703.tag = closureN_tag;
++ c_7324703.fn = (function_type)__lambda_1152;
++c_7324703.num_args = 1;
++c_7324703.num_elements = 4;
++c_7324703.elements = (object *)e_7324784;
++c_7324703.elements[0] = ((closureN)self_7312861)->elements[0];
++c_7324703.elements[1] = r_736783;
++c_7324703.elements[2] = ((closureN)self_7312861)->elements[1];
++c_7324703.elements[3] = ((closureN)self_7312861)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314161)->elements[1], &c_7327162, quote_begin);;
++return_closcall2(data, ((closureN)self_7312861)->elements[1], &c_7324703, quote_begin);;
+ }
+
+-static void __lambda_1199(void *data, object self_7314162, int argc, object *args) /* object self_7314162, object r_737576 */
++static void __lambda_1152(void *data, object self_7312862, int argc, object *args) /* object self_7312862, object r_736801 */
+ {
+- object r_737576 = args[0];
++ object r_736801 = args[0];
+
+-closureN_type c_7327165;
+-object e_7327242 [4];
+-c_7327165.hdr.mark = gc_color_red;
+- c_7327165.hdr.grayed = 0;
+-c_7327165.tag = closureN_tag;
+- c_7327165.fn = (function_type)__lambda_1200;
+-c_7327165.num_args = 1;
+-c_7327165.num_elements = 4;
+-c_7327165.elements = (object *)e_7327242;
+-c_7327165.elements[0] = ((closureN)self_7314162)->elements[0];
+-c_7327165.elements[1] = ((closureN)self_7314162)->elements[1];
+-c_7327165.elements[2] = r_737576;
+-c_7327165.elements[3] = ((closureN)self_7314162)->elements[3];
++closureN_type c_7324706;
++object e_7324783 [4];
++c_7324706.hdr.mark = gc_color_red;
++ c_7324706.hdr.grayed = 0;
++c_7324706.tag = closureN_tag;
++ c_7324706.fn = (function_type)__lambda_1153;
++c_7324706.num_args = 1;
++c_7324706.num_elements = 4;
++c_7324706.elements = (object *)e_7324783;
++c_7324706.elements[0] = ((closureN)self_7312862)->elements[0];
++c_7324706.elements[1] = ((closureN)self_7312862)->elements[1];
++c_7324706.elements[2] = r_736801;
++c_7324706.elements[3] = ((closureN)self_7312862)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314162)->elements[2], &c_7327165, quote_guard_91aux);;
++return_closcall2(data, ((closureN)self_7312862)->elements[2], &c_7324706, quote_guard_91aux);;
+ }
+
+-static void __lambda_1200(void *data, object self_7314163, int argc, object *args) /* object self_7314163, object r_737569_7311590_7311599 */
++static void __lambda_1153(void *data, object self_7312863, int argc, object *args) /* object self_7312863, object r_736794_7310337_7310346 */
+ {
+- object r_737569_7311590_7311599 = args[0];
++ object r_736794_7310337_7310346 = args[0];
+
+-pair_type local_7327170;
++pair_type local_7324711;
+
+-pair_type local_7327173;
++pair_type local_7324714;
+
+-pair_type local_7327177;
++pair_type local_7324718;
+
+
+
+@@ -6737,11 +6688,11 @@ pair_type local_7327177;
+
+
+
+-pair_type local_7327187;
++pair_type local_7324728;
+
+-pair_type local_7327190;
++pair_type local_7324731;
+
+-pair_type local_7327194;
++pair_type local_7324735;
+
+
+
+@@ -6759,15 +6710,15 @@ pair_type local_7327194;
+
+
+
+-pair_type local_7327215;
++pair_type local_7324756;
+
+-pair_type local_7327218;
++pair_type local_7324759;
+
+-pair_type local_7327221;
++pair_type local_7324762;
+
+
+
+-pair_type local_7327227;
++pair_type local_7324768;
+
+
+
+@@ -6780,101 +6731,101 @@ pair_type local_7327227;
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314163)->elements[0], (((closure) ((closureN)self_7314163)->elements[0])->fn), set_pair_as_expr(&local_7327170, set_pair_as_expr(&local_7327173, ((closureN)self_7314163)->elements[1], set_pair_as_expr(&local_7327177, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3]))), set_pair_as_expr(&local_7327187, set_pair_as_expr(&local_7327190, ((closureN)self_7314163)->elements[2], set_pair_as_expr(&local_7327194, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3])))))), set_pair_as_expr(&local_7327215, set_pair_as_expr(&local_7327218, r_737569_7311590_7311599, set_pair_as_expr(&local_7327221, Cyc_car(data, ((closureN)self_7314163)->elements[3]), set_pair_as_expr(&local_7327227, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3]))), Cyc
_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3])))))), NULL)))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312863)->elements[0], (((closure) ((closureN)self_7312863)->elements[0])->fn), set_pair_as_expr(&local_7324711, set_pair_as_expr(&local_7324714, ((closureN)self_7312863)->elements[1], set_pair_as_expr(&local_7324718, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312863)->elements[3]))), set_pair_as_expr(&local_7324728, set_pair_as_expr(&local_7324731, ((closureN)self_7312863)->elements[2], set_pair_as_expr(&local_7324735, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312863)->elements[3])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312863)->elements[3])))))), set_pair_as_expr(&local_7324756, set_pair_as_expr(&local_7324759, r_736794_7310337_7310346, set_pair_as_expr(&local_7324762, Cyc_car(data, ((closureN)self_7312863)->elements[3]), set_pair_as_expr(&local_7324768, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312863)->elements[3]))), Cyc
_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312863)->elements[3])))))), NULL)))), boolean_f));;
+ }
+
+-static void __lambda_1192(void *data, object self_7314164, int argc, object *args) /* object self_7314164, object k_737583 */
++static void __lambda_1145(void *data, object self_7312864, int argc, object *args) /* object self_7312864, object k_736808 */
+ {
+- object k_737583 = args[0];
++ object k_736808 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314164)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312864)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314164)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312864)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312864)->elements[1])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1]))))) ){
+- complex_num_type local_7327013;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312864)->elements[1]))))) ){
++ complex_num_type local_7324554;
+
+
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7327013, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1])))))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324554, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312864)->elements[1])))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312864)->elements[1])))) ){
+
+-closureN_type c_7327032;
+-object e_7327089 [3];
+-c_7327032.hdr.mark = gc_color_red;
+- c_7327032.hdr.grayed = 0;
+-c_7327032.tag = closureN_tag;
+- c_7327032.fn = (function_type)__lambda_1193;
+-c_7327032.num_args = 1;
+-c_7327032.num_elements = 3;
+-c_7327032.elements = (object *)e_7327089;
+-c_7327032.elements[0] = k_737583;
+-c_7327032.elements[1] = ((closureN)self_7314164)->elements[0];
+-c_7327032.elements[2] = ((closureN)self_7314164)->elements[1];
++closureN_type c_7324573;
++object e_7324630 [3];
++c_7324573.hdr.mark = gc_color_red;
++ c_7324573.hdr.grayed = 0;
++c_7324573.tag = closureN_tag;
++ c_7324573.fn = (function_type)__lambda_1146;
++c_7324573.num_args = 1;
++c_7324573.num_elements = 3;
++c_7324573.elements = (object *)e_7324630;
++c_7324573.elements[0] = k_736808;
++c_7324573.elements[1] = ((closureN)self_7312864)->elements[0];
++c_7324573.elements[2] = ((closureN)self_7312864)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314164)->elements[0], &c_7327032, quote__if);
++return_closcall2(data, ((closureN)self_7312864)->elements[0], &c_7324573, quote__if);
+ } else {
+- return_direct_with_clo1(data, k_737583, (((closure) k_737583)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737583, (((closure) k_737583)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737583, (((closure) k_737583)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737583, (((closure) k_737583)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737583, (((closure) k_737583)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737583, (((closure) k_737583)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1193(void *data, object self_7314165, int argc, object *args) /* object self_7314165, object r_737599 */
++static void __lambda_1146(void *data, object self_7312865, int argc, object *args) /* object self_7312865, object r_736824 */
+ {
+- object r_737599 = args[0];
++ object r_736824 = args[0];
+
+-closureN_type c_7327035;
+-object e_7327088 [3];
+-c_7327035.hdr.mark = gc_color_red;
+- c_7327035.hdr.grayed = 0;
+-c_7327035.tag = closureN_tag;
+- c_7327035.fn = (function_type)__lambda_1194;
+-c_7327035.num_args = 1;
+-c_7327035.num_elements = 3;
+-c_7327035.elements = (object *)e_7327088;
+-c_7327035.elements[0] = ((closureN)self_7314165)->elements[0];
+-c_7327035.elements[1] = r_737599;
+-c_7327035.elements[2] = ((closureN)self_7314165)->elements[2];
++closureN_type c_7324576;
++object e_7324629 [3];
++c_7324576.hdr.mark = gc_color_red;
++ c_7324576.hdr.grayed = 0;
++c_7324576.tag = closureN_tag;
++ c_7324576.fn = (function_type)__lambda_1147;
++c_7324576.num_args = 1;
++c_7324576.num_elements = 3;
++c_7324576.elements = (object *)e_7324629;
++c_7324576.elements[0] = ((closureN)self_7312865)->elements[0];
++c_7324576.elements[1] = r_736824;
++c_7324576.elements[2] = ((closureN)self_7312865)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314165)->elements[1], &c_7327035, quote_begin);;
++return_closcall2(data, ((closureN)self_7312865)->elements[1], &c_7324576, quote_begin);;
+ }
+
+-static void __lambda_1194(void *data, object self_7314166, int argc, object *args) /* object self_7314166, object r_737609 */
++static void __lambda_1147(void *data, object self_7312866, int argc, object *args) /* object self_7312866, object r_736834 */
+ {
+- object r_737609 = args[0];
++ object r_736834 = args[0];
+
+-pair_type local_7327040;
++pair_type local_7324581;
+
+-pair_type local_7327043;
++pair_type local_7324584;
+
+-pair_type local_7327047;
++pair_type local_7324588;
+
+
+
+@@ -6882,11 +6833,11 @@ pair_type local_7327047;
+
+
+
+-pair_type local_7327057;
++pair_type local_7324598;
+
+-pair_type local_7327060;
++pair_type local_7324601;
+
+-pair_type local_7327063;
++pair_type local_7324604;
+
+
+
+@@ -6904,103 +6855,103 @@ pair_type local_7327063;
+
+
+
+-pair_type local_7327084;
++pair_type local_7324625;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314166)->elements[0], (((closure) ((closureN)self_7314166)->elements[0])->fn), set_pair_as_expr(&local_7327040, set_pair_as_expr(&local_7327043, ((closureN)self_7314166)->elements[1], set_pair_as_expr(&local_7327047, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314166)->elements[2]))), set_pair_as_expr(&local_7327057, set_pair_as_expr(&local_7327060, r_737609, set_pair_as_expr(&local_7327063, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314166)->elements[2])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314166)->elements[2])))))), set_pair_as_expr(&local_7327084, Cyc_car(data, ((closureN)self_7314166)->elements[2]), NULL)))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312866)->elements[0], (((closure) ((closureN)self_7312866)->elements[0])->fn), set_pair_as_expr(&local_7324581, set_pair_as_expr(&local_7324584, ((closureN)self_7312866)->elements[1], set_pair_as_expr(&local_7324588, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312866)->elements[2]))), set_pair_as_expr(&local_7324598, set_pair_as_expr(&local_7324601, r_736834, set_pair_as_expr(&local_7324604, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312866)->elements[2])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312866)->elements[2])))))), set_pair_as_expr(&local_7324625, Cyc_car(data, ((closureN)self_7312866)->elements[2]), NULL)))), boolean_f));;
+ }
+
+-static void __lambda_1187(void *data, object self_7314167, int argc, object *args) /* object self_7314167, object k_737616 */
++static void __lambda_1140(void *data, object self_7312867, int argc, object *args) /* object self_7312867, object k_736841 */
+ {
+- object k_737616 = args[0];
++ object k_736841 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314167)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312867)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314167)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312867)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312867)->elements[1])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312867)->elements[1]))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1])))) ){
+- complex_num_type local_7326909;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312867)->elements[1])))) ){
++ complex_num_type local_7324450;
+
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326909, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1]))))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324450, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312867)->elements[1]))))) ){
+
+-closureN_type c_7326919;
+-object e_7326972 [3];
+-c_7326919.hdr.mark = gc_color_red;
+- c_7326919.hdr.grayed = 0;
+-c_7326919.tag = closureN_tag;
+- c_7326919.fn = (function_type)__lambda_1188;
+-c_7326919.num_args = 1;
+-c_7326919.num_elements = 3;
+-c_7326919.elements = (object *)e_7326972;
+-c_7326919.elements[0] = k_737616;
+-c_7326919.elements[1] = ((closureN)self_7314167)->elements[0];
+-c_7326919.elements[2] = ((closureN)self_7314167)->elements[1];
++closureN_type c_7324460;
++object e_7324513 [3];
++c_7324460.hdr.mark = gc_color_red;
++ c_7324460.hdr.grayed = 0;
++c_7324460.tag = closureN_tag;
++ c_7324460.fn = (function_type)__lambda_1141;
++c_7324460.num_args = 1;
++c_7324460.num_elements = 3;
++c_7324460.elements = (object *)e_7324513;
++c_7324460.elements[0] = k_736841;
++c_7324460.elements[1] = ((closureN)self_7312867)->elements[0];
++c_7324460.elements[2] = ((closureN)self_7312867)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314167)->elements[0], &c_7326919, quote_or);
++return_closcall2(data, ((closureN)self_7312867)->elements[0], &c_7324460, quote_or);
+ } else {
+- return_direct_with_clo1(data, k_737616, (((closure) k_737616)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736841, (((closure) k_736841)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737616, (((closure) k_737616)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736841, (((closure) k_736841)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737616, (((closure) k_737616)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736841, (((closure) k_736841)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737616, (((closure) k_737616)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736841, (((closure) k_736841)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737616, (((closure) k_737616)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736841, (((closure) k_736841)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737616, (((closure) k_737616)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736841, (((closure) k_736841)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1188(void *data, object self_7314168, int argc, object *args) /* object self_7314168, object r_737632 */
++static void __lambda_1141(void *data, object self_7312868, int argc, object *args) /* object self_7312868, object r_736857 */
+ {
+- object r_737632 = args[0];
++ object r_736857 = args[0];
+
+-closureN_type c_7326922;
+-object e_7326971 [3];
+-c_7326922.hdr.mark = gc_color_red;
+- c_7326922.hdr.grayed = 0;
+-c_7326922.tag = closureN_tag;
+- c_7326922.fn = (function_type)__lambda_1189;
+-c_7326922.num_args = 1;
+-c_7326922.num_elements = 3;
+-c_7326922.elements = (object *)e_7326971;
+-c_7326922.elements[0] = ((closureN)self_7314168)->elements[0];
+-c_7326922.elements[1] = r_737632;
+-c_7326922.elements[2] = ((closureN)self_7314168)->elements[2];
++closureN_type c_7324463;
++object e_7324512 [3];
++c_7324463.hdr.mark = gc_color_red;
++ c_7324463.hdr.grayed = 0;
++c_7324463.tag = closureN_tag;
++ c_7324463.fn = (function_type)__lambda_1142;
++c_7324463.num_args = 1;
++c_7324463.num_elements = 3;
++c_7324463.elements = (object *)e_7324512;
++c_7324463.elements[0] = ((closureN)self_7312868)->elements[0];
++c_7324463.elements[1] = r_736857;
++c_7324463.elements[2] = ((closureN)self_7312868)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314168)->elements[1], &c_7326922, quote_guard_91aux);;
++return_closcall2(data, ((closureN)self_7312868)->elements[1], &c_7324463, quote_guard_91aux);;
+ }
+
+-static void __lambda_1189(void *data, object self_7314169, int argc, object *args) /* object self_7314169, object r_737640 */
++static void __lambda_1142(void *data, object self_7312869, int argc, object *args) /* object self_7312869, object r_736865 */
+ {
+- object r_737640 = args[0];
++ object r_736865 = args[0];
+
+-pair_type local_7326927;
++pair_type local_7324468;
+
+-pair_type local_7326930;
++pair_type local_7324471;
+
+-pair_type local_7326934;
++pair_type local_7324475;
+
+
+
+@@ -7008,15 +6959,15 @@ pair_type local_7326934;
+
+
+
+-pair_type local_7326944;
++pair_type local_7324485;
+
+-pair_type local_7326947;
++pair_type local_7324488;
+
+-pair_type local_7326950;
++pair_type local_7324491;
+
+
+
+-pair_type local_7326956;
++pair_type local_7324497;
+
+
+
+@@ -7029,70 +6980,70 @@ pair_type local_7326956;
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314169)->elements[0], (((closure) ((closureN)self_7314169)->elements[0])->fn), set_pair_as_expr(&local_7326927, set_pair_as_expr(&local_7326930, ((closureN)self_7314169)->elements[1], set_pair_as_expr(&local_7326934, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314169)->elements[2]))), set_pair_as_expr(&local_7326944, set_pair_as_expr(&local_7326947, r_737640, set_pair_as_expr(&local_7326950, Cyc_car(data, ((closureN)self_7314169)->elements[2]), set_pair_as_expr(&local_7326956, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314169)->elements[2]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314169)->elements[2])))))), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312869)->elements[0], (((closure) ((closureN)self_7312869)->elements[0])->fn), set_pair_as_expr(&local_7324468, set_pair_as_expr(&local_7324471, ((closureN)self_7312869)->elements[1], set_pair_as_expr(&local_7324475, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312869)->elements[2]))), set_pair_as_expr(&local_7324485, set_pair_as_expr(&local_7324488, r_736865, set_pair_as_expr(&local_7324491, Cyc_car(data, ((closureN)self_7312869)->elements[2]), set_pair_as_expr(&local_7324497, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312869)->elements[2]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312869)->elements[2])))))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1183(void *data, object self_7314170, int argc, object *args) /* object self_7314170, object k_737649 */
++static void __lambda_1136(void *data, object self_7312870, int argc, object *args) /* object self_7312870, object k_736874 */
+ {
+- object k_737649 = args[0];
++ object k_736874 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314170)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312870)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314170)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312870)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314170)->elements[1])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312870)->elements[1])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314170)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312870)->elements[1]))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314170)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312870)->elements[1])))) ){
+
+-closureN_type c_7326837;
+-object e_7326862 [2];
+-c_7326837.hdr.mark = gc_color_red;
+- c_7326837.hdr.grayed = 0;
+-c_7326837.tag = closureN_tag;
+- c_7326837.fn = (function_type)__lambda_1184;
+-c_7326837.num_args = 1;
+-c_7326837.num_elements = 2;
+-c_7326837.elements = (object *)e_7326862;
+-c_7326837.elements[0] = k_737649;
+-c_7326837.elements[1] = ((closureN)self_7314170)->elements[1];
++closureN_type c_7324378;
++object e_7324403 [2];
++c_7324378.hdr.mark = gc_color_red;
++ c_7324378.hdr.grayed = 0;
++c_7324378.tag = closureN_tag;
++ c_7324378.fn = (function_type)__lambda_1137;
++c_7324378.num_args = 1;
++c_7324378.num_elements = 2;
++c_7324378.elements = (object *)e_7324403;
++c_7324378.elements[0] = k_736874;
++c_7324378.elements[1] = ((closureN)self_7312870)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314170)->elements[0], &c_7326837, quote_or);
++return_closcall2(data, ((closureN)self_7312870)->elements[0], &c_7324378, quote_or);
+ } else {
+- return_direct_with_clo1(data, k_737649, (((closure) k_737649)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736874, (((closure) k_736874)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737649, (((closure) k_737649)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736874, (((closure) k_736874)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737649, (((closure) k_737649)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736874, (((closure) k_736874)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737649, (((closure) k_737649)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736874, (((closure) k_736874)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737649, (((closure) k_737649)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736874, (((closure) k_736874)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1184(void *data, object self_7314171, int argc, object *args) /* object self_7314171, object r_737662 */
++static void __lambda_1137(void *data, object self_7312871, int argc, object *args) /* object self_7312871, object r_736887 */
+ {
+- object r_737662 = args[0];
++ object r_736887 = args[0];
+
+-pair_type local_7326842;
++pair_type local_7324383;
+
+-pair_type local_7326845;
++pair_type local_7324386;
+
+-pair_type local_7326848;
++pair_type local_7324389;
+
+
+
+@@ -7100,75 +7051,75 @@ pair_type local_7326848;
+
+
+
+-pair_type local_7326858;
++pair_type local_7324399;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314171)->elements[0], (((closure) ((closureN)self_7314171)->elements[0])->fn), set_pair_as_expr(&local_7326842, set_pair_as_expr(&local_7326845, r_737662, set_pair_as_expr(&local_7326848, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314171)->elements[1]))), set_pair_as_expr(&local_7326858, Cyc_car(data, ((closureN)self_7314171)->elements[1]), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312871)->elements[0], (((closure) ((closureN)self_7312871)->elements[0])->fn), set_pair_as_expr(&local_7324383, set_pair_as_expr(&local_7324386, r_736887, set_pair_as_expr(&local_7324389, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312871)->elements[1]))), set_pair_as_expr(&local_7324399, Cyc_car(data, ((closureN)self_7312871)->elements[1]), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1172(void *data, object self_7314172, int argc, object *args) /* object self_7314172, object k_737671 */
++static void __lambda_1125(void *data, object self_7312872, int argc, object *args) /* object self_7312872, object k_736896 */
+ {
+- object k_737671 = args[0];
++ object k_736896 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314172)->elements[2])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312872)->elements[2])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314172)->elements[2]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312872)->elements[2]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314172)->elements[2])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312872)->elements[2])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314172)->elements[2]))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312872)->elements[2]))))) ){
+
+-closureN_type c_7326612;
+-object e_7326791 [4];
+-c_7326612.hdr.mark = gc_color_red;
+- c_7326612.hdr.grayed = 0;
+-c_7326612.tag = closureN_tag;
+- c_7326612.fn = (function_type)__lambda_1173;
+-c_7326612.num_args = 1;
+-c_7326612.num_elements = 4;
+-c_7326612.elements = (object *)e_7326791;
+-c_7326612.elements[0] = ((closureN)self_7314172)->elements[0];
+-c_7326612.elements[1] = k_737671;
+-c_7326612.elements[2] = ((closureN)self_7314172)->elements[1];
+-c_7326612.elements[3] = ((closureN)self_7314172)->elements[2];
++closureN_type c_7324153;
++object e_7324332 [4];
++c_7324153.hdr.mark = gc_color_red;
++ c_7324153.hdr.grayed = 0;
++c_7324153.tag = closureN_tag;
++ c_7324153.fn = (function_type)__lambda_1126;
++c_7324153.num_args = 1;
++c_7324153.num_elements = 4;
++c_7324153.elements = (object *)e_7324332;
++c_7324153.elements[0] = ((closureN)self_7312872)->elements[0];
++c_7324153.elements[1] = k_736896;
++c_7324153.elements[2] = ((closureN)self_7312872)->elements[1];
++c_7324153.elements[3] = ((closureN)self_7312872)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314172)->elements[1], &c_7326612, quote__123_125);
++return_closcall2(data, ((closureN)self_7312872)->elements[1], &c_7324153, quote__123_125);
+ } else {
+- return_direct_with_clo1(data, k_737671, (((closure) k_737671)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736896, (((closure) k_736896)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737671, (((closure) k_737671)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736896, (((closure) k_736896)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737671, (((closure) k_737671)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736896, (((closure) k_736896)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737671, (((closure) k_737671)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736896, (((closure) k_736896)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1173(void *data, object self_7314173, int argc, object *args) /* object self_7314173, object r_737740 */
++static void __lambda_1126(void *data, object self_7312873, int argc, object *args) /* object self_7312873, object r_736965 */
+ {
+- object r_737740 = args[0];
++ object r_736965 = args[0];
+
+-closureN_type c_7326615;
+-object e_7326781 [3];
+-c_7326615.hdr.mark = gc_color_red;
+- c_7326615.hdr.grayed = 0;
+-c_7326615.tag = closureN_tag;
+- c_7326615.fn = (function_type)__lambda_1174;
+-c_7326615.num_args = 1;
+-c_7326615.num_elements = 3;
+-c_7326615.elements = (object *)e_7326781;
+-c_7326615.elements[0] = ((closureN)self_7314173)->elements[1];
+-c_7326615.elements[1] = ((closureN)self_7314173)->elements[2];
+-c_7326615.elements[2] = ((closureN)self_7314173)->elements[3];
++closureN_type c_7324156;
++object e_7324322 [3];
++c_7324156.hdr.mark = gc_color_red;
++ c_7324156.hdr.grayed = 0;
++c_7324156.tag = closureN_tag;
++ c_7324156.fn = (function_type)__lambda_1127;
++c_7324156.num_args = 1;
++c_7324156.num_elements = 3;
++c_7324156.elements = (object *)e_7324322;
++c_7324156.elements[0] = ((closureN)self_7312873)->elements[1];
++c_7324156.elements[1] = ((closureN)self_7312873)->elements[2];
++c_7324156.elements[2] = ((closureN)self_7312873)->elements[3];
+
+
+
+@@ -7178,197 +7129,197 @@ c_7326615.elements[2] = ((closureN)self_
+
+
+
+-return_closcall3(data, ((closureN)self_7314173)->elements[0], &c_7326615, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314173)->elements[3])))), r_737740);;
++return_closcall3(data, ((closureN)self_7312873)->elements[0], &c_7324156, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312873)->elements[3])))), r_736965);;
+ }
+
+-static void __lambda_1174(void *data, object self_7314174, int argc, object *args) /* object self_7314174, object r_737682 */
++static void __lambda_1127(void *data, object self_7312874, int argc, object *args) /* object self_7312874, object r_736907 */
+ {
+- object r_737682 = args[0];
+- if( (boolean_f != r_737682) ){
++ object r_736907 = args[0];
++ if( (boolean_f != r_736907) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2])))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312874)->elements[2])))))) ){
+
+
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2]))))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312874)->elements[2]))))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2])))) ){
+- complex_num_type local_7326649;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312874)->elements[2])))) ){
++ complex_num_type local_7324190;
+
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326649, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2]))))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324190, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312874)->elements[2]))))) ){
+
+-closureN_type c_7326659;
+-object e_7326770 [3];
+-c_7326659.hdr.mark = gc_color_red;
+- c_7326659.hdr.grayed = 0;
+-c_7326659.tag = closureN_tag;
+- c_7326659.fn = (function_type)__lambda_1175;
+-c_7326659.num_args = 1;
+-c_7326659.num_elements = 3;
+-c_7326659.elements = (object *)e_7326770;
+-c_7326659.elements[0] = ((closureN)self_7314174)->elements[0];
+-c_7326659.elements[1] = ((closureN)self_7314174)->elements[1];
+-c_7326659.elements[2] = ((closureN)self_7314174)->elements[2];
++closureN_type c_7324200;
++object e_7324311 [3];
++c_7324200.hdr.mark = gc_color_red;
++ c_7324200.hdr.grayed = 0;
++c_7324200.tag = closureN_tag;
++ c_7324200.fn = (function_type)__lambda_1128;
++c_7324200.num_args = 1;
++c_7324200.num_elements = 3;
++c_7324200.elements = (object *)e_7324311;
++c_7324200.elements[0] = ((closureN)self_7312874)->elements[0];
++c_7324200.elements[1] = ((closureN)self_7312874)->elements[1];
++c_7324200.elements[2] = ((closureN)self_7312874)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314174)->elements[1], &c_7326659, quote_let);
++return_closcall2(data, ((closureN)self_7312874)->elements[1], &c_7324200, quote_let);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314174)->elements[0], (((closure) ((closureN)self_7314174)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312874)->elements[0], (((closure) ((closureN)self_7312874)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314174)->elements[0], (((closure) ((closureN)self_7314174)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312874)->elements[0], (((closure) ((closureN)self_7312874)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314174)->elements[0], (((closure) ((closureN)self_7314174)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312874)->elements[0], (((closure) ((closureN)self_7312874)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314174)->elements[0], (((closure) ((closureN)self_7314174)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312874)->elements[0], (((closure) ((closureN)self_7312874)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314174)->elements[0], (((closure) ((closureN)self_7314174)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312874)->elements[0], (((closure) ((closureN)self_7312874)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1175(void *data, object self_7314175, int argc, object *args) /* object self_7314175, object r_737694 */
+- {
+- object r_737694 = args[0];
+-
+-closureN_type c_7326662;
+-object e_7326769 [4];
+-c_7326662.hdr.mark = gc_color_red;
+- c_7326662.hdr.grayed = 0;
+-c_7326662.tag = closureN_tag;
+- c_7326662.fn = (function_type)__lambda_1176;
+-c_7326662.num_args = 1;
+-c_7326662.num_elements = 4;
+-c_7326662.elements = (object *)e_7326769;
+-c_7326662.elements[0] = ((closureN)self_7314175)->elements[0];
+-c_7326662.elements[1] = r_737694;
+-c_7326662.elements[2] = ((closureN)self_7314175)->elements[1];
+-c_7326662.elements[3] = ((closureN)self_7314175)->elements[2];
+-
+-return_closcall2(data, ((closureN)self_7314175)->elements[1], &c_7326662, quote_temp);;
+-}
+-
+-static void __lambda_1176(void *data, object self_7314176, int argc, object *args) /* object self_7314176, object r_737733 */
++static void __lambda_1128(void *data, object self_7312875, int argc, object *args) /* object self_7312875, object r_736919 */
+ {
+- object r_737733 = args[0];
++ object r_736919 = args[0];
+
+-closureN_type c_7326665;
+-object e_7326768 [5];
+-c_7326665.hdr.mark = gc_color_red;
+- c_7326665.hdr.grayed = 0;
+-c_7326665.tag = closureN_tag;
+- c_7326665.fn = (function_type)__lambda_1177;
+-c_7326665.num_args = 1;
+-c_7326665.num_elements = 5;
+-c_7326665.elements = (object *)e_7326768;
+-c_7326665.elements[0] = ((closureN)self_7314176)->elements[0];
+-c_7326665.elements[1] = ((closureN)self_7314176)->elements[1];
+-c_7326665.elements[2] = r_737733;
+-c_7326665.elements[3] = ((closureN)self_7314176)->elements[2];
+-c_7326665.elements[4] = ((closureN)self_7314176)->elements[3];
++closureN_type c_7324203;
++object e_7324310 [4];
++c_7324203.hdr.mark = gc_color_red;
++ c_7324203.hdr.grayed = 0;
++c_7324203.tag = closureN_tag;
++ c_7324203.fn = (function_type)__lambda_1129;
++c_7324203.num_args = 1;
++c_7324203.num_elements = 4;
++c_7324203.elements = (object *)e_7324310;
++c_7324203.elements[0] = ((closureN)self_7312875)->elements[0];
++c_7324203.elements[1] = r_736919;
++c_7324203.elements[2] = ((closureN)self_7312875)->elements[1];
++c_7324203.elements[3] = ((closureN)self_7312875)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314176)->elements[2], &c_7326665, quote__if);;
++return_closcall2(data, ((closureN)self_7312875)->elements[1], &c_7324203, quote_temp);;
+ }
+
+-static void __lambda_1177(void *data, object self_7314177, int argc, object *args) /* object self_7314177, object r_737703_7311409_7311427_7311444 */
++static void __lambda_1129(void *data, object self_7312876, int argc, object *args) /* object self_7312876, object r_736958 */
+ {
+- object r_737703_7311409_7311427_7311444 = args[0];
++ object r_736958 = args[0];
+
+-closureN_type c_7326668;
+-object e_7326767 [6];
+-c_7326668.hdr.mark = gc_color_red;
+- c_7326668.hdr.grayed = 0;
+-c_7326668.tag = closureN_tag;
+- c_7326668.fn = (function_type)__lambda_1178;
+-c_7326668.num_args = 1;
+-c_7326668.num_elements = 6;
+-c_7326668.elements = (object *)e_7326767;
+-c_7326668.elements[0] = ((closureN)self_7314177)->elements[0];
+-c_7326668.elements[1] = ((closureN)self_7314177)->elements[1];
+-c_7326668.elements[2] = r_737703_7311409_7311427_7311444;
+-c_7326668.elements[3] = ((closureN)self_7314177)->elements[2];
+-c_7326668.elements[4] = ((closureN)self_7314177)->elements[3];
+-c_7326668.elements[5] = ((closureN)self_7314177)->elements[4];
++closureN_type c_7324206;
++object e_7324309 [5];
++c_7324206.hdr.mark = gc_color_red;
++ c_7324206.hdr.grayed = 0;
++c_7324206.tag = closureN_tag;
++ c_7324206.fn = (function_type)__lambda_1130;
++c_7324206.num_args = 1;
++c_7324206.num_elements = 5;
++c_7324206.elements = (object *)e_7324309;
++c_7324206.elements[0] = ((closureN)self_7312876)->elements[0];
++c_7324206.elements[1] = ((closureN)self_7312876)->elements[1];
++c_7324206.elements[2] = r_736958;
++c_7324206.elements[3] = ((closureN)self_7312876)->elements[2];
++c_7324206.elements[4] = ((closureN)self_7312876)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314177)->elements[3], &c_7326668, quote_temp);;
++return_closcall2(data, ((closureN)self_7312876)->elements[2], &c_7324206, quote__if);;
+ }
+
+-static void __lambda_1178(void *data, object self_7314178, int argc, object *args) /* object self_7314178, object r_737706_7311410_7311428_7311445 */
++static void __lambda_1130(void *data, object self_7312877, int argc, object *args) /* object self_7312877, object r_736928_7310156_7310174_7310191 */
+ {
+- object r_737706_7311410_7311428_7311445 = args[0];
++ object r_736928_7310156_7310174_7310191 = args[0];
+
+-closureN_type c_7326671;
+-object e_7326766 [7];
+-c_7326671.hdr.mark = gc_color_red;
+- c_7326671.hdr.grayed = 0;
+-c_7326671.tag = closureN_tag;
+- c_7326671.fn = (function_type)__lambda_1179;
+-c_7326671.num_args = 1;
+-c_7326671.num_elements = 7;
+-c_7326671.elements = (object *)e_7326766;
+-c_7326671.elements[0] = ((closureN)self_7314178)->elements[0];
+-c_7326671.elements[1] = ((closureN)self_7314178)->elements[1];
+-c_7326671.elements[2] = ((closureN)self_7314178)->elements[2];
+-c_7326671.elements[3] = r_737706_7311410_7311428_7311445;
+-c_7326671.elements[4] = ((closureN)self_7314178)->elements[3];
+-c_7326671.elements[5] = ((closureN)self_7314178)->elements[4];
+-c_7326671.elements[6] = ((closureN)self_7314178)->elements[5];
++closureN_type c_7324209;
++object e_7324308 [6];
++c_7324209.hdr.mark = gc_color_red;
++ c_7324209.hdr.grayed = 0;
++c_7324209.tag = closureN_tag;
++ c_7324209.fn = (function_type)__lambda_1131;
++c_7324209.num_args = 1;
++c_7324209.num_elements = 6;
++c_7324209.elements = (object *)e_7324308;
++c_7324209.elements[0] = ((closureN)self_7312877)->elements[0];
++c_7324209.elements[1] = ((closureN)self_7312877)->elements[1];
++c_7324209.elements[2] = r_736928_7310156_7310174_7310191;
++c_7324209.elements[3] = ((closureN)self_7312877)->elements[2];
++c_7324209.elements[4] = ((closureN)self_7312877)->elements[3];
++c_7324209.elements[5] = ((closureN)self_7312877)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314178)->elements[4], &c_7326671, quote_temp);;
++return_closcall2(data, ((closureN)self_7312877)->elements[3], &c_7324209, quote_temp);;
+ }
+
+-static void __lambda_1179(void *data, object self_7314179, int argc, object *args) /* object self_7314179, object r_737724_7311411_7311429_7311446 */
++static void __lambda_1131(void *data, object self_7312878, int argc, object *args) /* object self_7312878, object r_736931_7310157_7310175_7310192 */
+ {
+- object r_737724_7311411_7311429_7311446 = args[0];
++ object r_736931_7310157_7310175_7310192 = args[0];
+
+-closureN_type c_7326674;
+-object e_7326765 [7];
+-c_7326674.hdr.mark = gc_color_red;
+- c_7326674.hdr.grayed = 0;
+-c_7326674.tag = closureN_tag;
+- c_7326674.fn = (function_type)__lambda_1180;
+-c_7326674.num_args = 1;
+-c_7326674.num_elements = 7;
+-c_7326674.elements = (object *)e_7326765;
+-c_7326674.elements[0] = ((closureN)self_7314179)->elements[0];
+-c_7326674.elements[1] = ((closureN)self_7314179)->elements[1];
+-c_7326674.elements[2] = ((closureN)self_7314179)->elements[2];
+-c_7326674.elements[3] = ((closureN)self_7314179)->elements[3];
+-c_7326674.elements[4] = r_737724_7311411_7311429_7311446;
+-c_7326674.elements[5] = ((closureN)self_7314179)->elements[4];
+-c_7326674.elements[6] = ((closureN)self_7314179)->elements[6];
++closureN_type c_7324212;
++object e_7324307 [7];
++c_7324212.hdr.mark = gc_color_red;
++ c_7324212.hdr.grayed = 0;
++c_7324212.tag = closureN_tag;
++ c_7324212.fn = (function_type)__lambda_1132;
++c_7324212.num_args = 1;
++c_7324212.num_elements = 7;
++c_7324212.elements = (object *)e_7324307;
++c_7324212.elements[0] = ((closureN)self_7312878)->elements[0];
++c_7324212.elements[1] = ((closureN)self_7312878)->elements[1];
++c_7324212.elements[2] = ((closureN)self_7312878)->elements[2];
++c_7324212.elements[3] = r_736931_7310157_7310175_7310192;
++c_7324212.elements[4] = ((closureN)self_7312878)->elements[3];
++c_7324212.elements[5] = ((closureN)self_7312878)->elements[4];
++c_7324212.elements[6] = ((closureN)self_7312878)->elements[5];
++
++return_closcall2(data, ((closureN)self_7312878)->elements[4], &c_7324212, quote_temp);;
++}
++
++static void __lambda_1132(void *data, object self_7312879, int argc, object *args) /* object self_7312879, object r_736949_7310158_7310176_7310193 */
++ {
++ object r_736949_7310158_7310176_7310193 = args[0];
++
++closureN_type c_7324215;
++object e_7324306 [7];
++c_7324215.hdr.mark = gc_color_red;
++ c_7324215.hdr.grayed = 0;
++c_7324215.tag = closureN_tag;
++ c_7324215.fn = (function_type)__lambda_1133;
++c_7324215.num_args = 1;
++c_7324215.num_elements = 7;
++c_7324215.elements = (object *)e_7324306;
++c_7324215.elements[0] = ((closureN)self_7312879)->elements[0];
++c_7324215.elements[1] = ((closureN)self_7312879)->elements[1];
++c_7324215.elements[2] = ((closureN)self_7312879)->elements[2];
++c_7324215.elements[3] = ((closureN)self_7312879)->elements[3];
++c_7324215.elements[4] = r_736949_7310158_7310176_7310193;
++c_7324215.elements[5] = ((closureN)self_7312879)->elements[4];
++c_7324215.elements[6] = ((closureN)self_7312879)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7314179)->elements[5], &c_7326674, quote_guard_91aux);;
++return_closcall2(data, ((closureN)self_7312879)->elements[5], &c_7324215, quote_guard_91aux);;
+ }
+
+-static void __lambda_1180(void *data, object self_7314180, int argc, object *args) /* object self_7314180, object r_737715_7311414_7311432_7311449_7311462_7311474 */
++static void __lambda_1133(void *data, object self_7312880, int argc, object *args) /* object self_7312880, object r_736940_7310161_7310179_7310196_7310209_7310221 */
+ {
+- object r_737715_7311414_7311432_7311449_7311462_7311474 = args[0];
++ object r_736940_7310161_7310179_7310196_7310209_7310221 = args[0];
+
+-pair_type local_7326679;
++pair_type local_7324220;
+
+-pair_type local_7326682;
++pair_type local_7324223;
+
+-pair_type local_7326686;
++pair_type local_7324227;
+
+-pair_type local_7326689;
++pair_type local_7324230;
+
+-pair_type local_7326692;
++pair_type local_7324233;
+
+-pair_type local_7326696;
++pair_type local_7324237;
+
+
+
+@@ -7376,15 +7327,15 @@ pair_type local_7326696;
+
+
+
+-pair_type local_7326706;
++pair_type local_7324247;
+
+-pair_type local_7326709;
++pair_type local_7324250;
+
+-pair_type local_7326713;
++pair_type local_7324254;
+
+-pair_type local_7326717;
++pair_type local_7324258;
+
+-pair_type local_7326720;
++pair_type local_7324261;
+
+
+
+@@ -7396,17 +7347,17 @@ pair_type local_7326720;
+
+
+
+-pair_type local_7326734;
++pair_type local_7324275;
+
+-pair_type local_7326738;
++pair_type local_7324279;
+
+-pair_type local_7326741;
++pair_type local_7324282;
+
+-pair_type local_7326744;
++pair_type local_7324285;
+
+
+
+-pair_type local_7326750;
++pair_type local_7324291;
+
+
+
+@@ -7419,72 +7370,72 @@ pair_type local_7326750;
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314180)->elements[0], (((closure) ((closureN)self_7314180)->elements[0])->fn), set_pair_as_expr(&local_7326679, set_pair_as_expr(&local_7326682, ((closureN)self_7314180)->elements[1], set_pair_as_expr(&local_7326686, set_pair_as_expr(&local_7326689, set_pair_as_expr(&local_7326692, ((closureN)self_7314180)->elements[5], set_pair_as_expr(&local_7326696, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6]))), NULL)), NULL), set_pair_as_expr(&local_7326706, set_pair_as_expr(&local_7326709, ((closureN)self_7314180)->elements[2], set_pair_as_expr(&local_7326713, ((closureN)self_7314180)->elements[3], set_pair_as_expr(&local_7326717, set_pair_as_expr(&local_7326720, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6]))))), set_pair_as_expr(&local_7326734, ((closureN)self_7314180)->elements[4], NULL)), set_pair_as_expr(&local_7326738, set_pair_as_ex
pr(&local_7326741, r_737715_7311414_7311432_7311449_7311462_7311474, set_pair_as_expr(&local_7326744, Cyc_car(data, ((closureN)self_7314180)->elements[6]), set_pair_as_expr(&local_7326750, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6])))))), NULL)))), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312880)->elements[0], (((closure) ((closureN)self_7312880)->elements[0])->fn), set_pair_as_expr(&local_7324220, set_pair_as_expr(&local_7324223, ((closureN)self_7312880)->elements[1], set_pair_as_expr(&local_7324227, set_pair_as_expr(&local_7324230, set_pair_as_expr(&local_7324233, ((closureN)self_7312880)->elements[5], set_pair_as_expr(&local_7324237, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312880)->elements[6]))), NULL)), NULL), set_pair_as_expr(&local_7324247, set_pair_as_expr(&local_7324250, ((closureN)self_7312880)->elements[2], set_pair_as_expr(&local_7324254, ((closureN)self_7312880)->elements[3], set_pair_as_expr(&local_7324258, set_pair_as_expr(&local_7324261, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312880)->elements[6]))))), set_pair_as_expr(&local_7324275, ((closureN)self_7312880)->elements[4], NULL)), set_pair_as_expr(&local_7324279, set_pair_as_ex
pr(&local_7324282, r_736940_7310161_7310179_7310196_7310209_7310221, set_pair_as_expr(&local_7324285, Cyc_car(data, ((closureN)self_7312880)->elements[6]), set_pair_as_expr(&local_7324291, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312880)->elements[6]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312880)->elements[6])))))), NULL)))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1162(void *data, object self_7314181, int argc, object *args) /* object self_7314181, object k_737743 */
++static void __lambda_1115(void *data, object self_7312881, int argc, object *args) /* object self_7312881, object k_736968 */
+ {
+- object k_737743 = args[0];
++ object k_736968 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314181)->elements[2])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312881)->elements[2])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314181)->elements[2]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312881)->elements[2]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314181)->elements[2])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312881)->elements[2])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314181)->elements[2]))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312881)->elements[2]))))) ){
+
+-closureN_type c_7326434;
+-object e_7326573 [4];
+-c_7326434.hdr.mark = gc_color_red;
+- c_7326434.hdr.grayed = 0;
+-c_7326434.tag = closureN_tag;
+- c_7326434.fn = (function_type)__lambda_1163;
+-c_7326434.num_args = 1;
+-c_7326434.num_elements = 4;
+-c_7326434.elements = (object *)e_7326573;
+-c_7326434.elements[0] = ((closureN)self_7314181)->elements[0];
+-c_7326434.elements[1] = k_737743;
+-c_7326434.elements[2] = ((closureN)self_7314181)->elements[1];
+-c_7326434.elements[3] = ((closureN)self_7314181)->elements[2];
++closureN_type c_7323975;
++object e_7324114 [4];
++c_7323975.hdr.mark = gc_color_red;
++ c_7323975.hdr.grayed = 0;
++c_7323975.tag = closureN_tag;
++ c_7323975.fn = (function_type)__lambda_1116;
++c_7323975.num_args = 1;
++c_7323975.num_elements = 4;
++c_7323975.elements = (object *)e_7324114;
++c_7323975.elements[0] = ((closureN)self_7312881)->elements[0];
++c_7323975.elements[1] = k_736968;
++c_7323975.elements[2] = ((closureN)self_7312881)->elements[1];
++c_7323975.elements[3] = ((closureN)self_7312881)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314181)->elements[1], &c_7326434, quote__123_125);
++return_closcall2(data, ((closureN)self_7312881)->elements[1], &c_7323975, quote__123_125);
+ } else {
+- return_direct_with_clo1(data, k_737743, (((closure) k_737743)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736968, (((closure) k_736968)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737743, (((closure) k_737743)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736968, (((closure) k_736968)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737743, (((closure) k_737743)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736968, (((closure) k_736968)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737743, (((closure) k_737743)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736968, (((closure) k_736968)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1163(void *data, object self_7314182, int argc, object *args) /* object self_7314182, object r_737801 */
++static void __lambda_1116(void *data, object self_7312882, int argc, object *args) /* object self_7312882, object r_737026 */
+ {
+- object r_737801 = args[0];
++ object r_737026 = args[0];
+
+-closureN_type c_7326437;
+-object e_7326563 [3];
+-c_7326437.hdr.mark = gc_color_red;
+- c_7326437.hdr.grayed = 0;
+-c_7326437.tag = closureN_tag;
+- c_7326437.fn = (function_type)__lambda_1164;
+-c_7326437.num_args = 1;
+-c_7326437.num_elements = 3;
+-c_7326437.elements = (object *)e_7326563;
+-c_7326437.elements[0] = ((closureN)self_7314182)->elements[1];
+-c_7326437.elements[1] = ((closureN)self_7314182)->elements[2];
+-c_7326437.elements[2] = ((closureN)self_7314182)->elements[3];
++closureN_type c_7323978;
++object e_7324104 [3];
++c_7323978.hdr.mark = gc_color_red;
++ c_7323978.hdr.grayed = 0;
++c_7323978.tag = closureN_tag;
++ c_7323978.fn = (function_type)__lambda_1117;
++c_7323978.num_args = 1;
++c_7323978.num_elements = 3;
++c_7323978.elements = (object *)e_7324104;
++c_7323978.elements[0] = ((closureN)self_7312882)->elements[1];
++c_7323978.elements[1] = ((closureN)self_7312882)->elements[2];
++c_7323978.elements[2] = ((closureN)self_7312882)->elements[3];
+
+
+
+@@ -7494,163 +7445,163 @@ c_7326437.elements[2] = ((closureN)self_
+
+
+
+-return_closcall3(data, ((closureN)self_7314182)->elements[0], &c_7326437, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314182)->elements[3])))), r_737801);;
++return_closcall3(data, ((closureN)self_7312882)->elements[0], &c_7323978, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312882)->elements[3])))), r_737026);;
+ }
+
+-static void __lambda_1164(void *data, object self_7314183, int argc, object *args) /* object self_7314183, object r_737754 */
++static void __lambda_1117(void *data, object self_7312883, int argc, object *args) /* object self_7312883, object r_736979 */
+ {
+- object r_737754 = args[0];
+- if( (boolean_f != r_737754) ){
++ object r_736979 = args[0];
++ if( (boolean_f != r_736979) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314183)->elements[2])))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312883)->elements[2])))))) ){
+
+
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314183)->elements[2]))))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312883)->elements[2]))))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314183)->elements[2])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312883)->elements[2])))) ){
+
+-closureN_type c_7326471;
+-object e_7326554 [3];
+-c_7326471.hdr.mark = gc_color_red;
+- c_7326471.hdr.grayed = 0;
+-c_7326471.tag = closureN_tag;
+- c_7326471.fn = (function_type)__lambda_1165;
+-c_7326471.num_args = 1;
+-c_7326471.num_elements = 3;
+-c_7326471.elements = (object *)e_7326554;
+-c_7326471.elements[0] = ((closureN)self_7314183)->elements[0];
+-c_7326471.elements[1] = ((closureN)self_7314183)->elements[1];
+-c_7326471.elements[2] = ((closureN)self_7314183)->elements[2];
++closureN_type c_7324012;
++object e_7324095 [3];
++c_7324012.hdr.mark = gc_color_red;
++ c_7324012.hdr.grayed = 0;
++c_7324012.tag = closureN_tag;
++ c_7324012.fn = (function_type)__lambda_1118;
++c_7324012.num_args = 1;
++c_7324012.num_elements = 3;
++c_7324012.elements = (object *)e_7324095;
++c_7324012.elements[0] = ((closureN)self_7312883)->elements[0];
++c_7324012.elements[1] = ((closureN)self_7312883)->elements[1];
++c_7324012.elements[2] = ((closureN)self_7312883)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314183)->elements[1], &c_7326471, quote_let);
++return_closcall2(data, ((closureN)self_7312883)->elements[1], &c_7324012, quote_let);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314183)->elements[0], (((closure) ((closureN)self_7314183)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312883)->elements[0], (((closure) ((closureN)self_7312883)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314183)->elements[0], (((closure) ((closureN)self_7314183)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312883)->elements[0], (((closure) ((closureN)self_7312883)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314183)->elements[0], (((closure) ((closureN)self_7314183)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312883)->elements[0], (((closure) ((closureN)self_7312883)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314183)->elements[0], (((closure) ((closureN)self_7314183)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312883)->elements[0], (((closure) ((closureN)self_7312883)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1165(void *data, object self_7314184, int argc, object *args) /* object self_7314184, object r_737763 */
++static void __lambda_1118(void *data, object self_7312884, int argc, object *args) /* object self_7312884, object r_736988 */
+ {
+- object r_737763 = args[0];
++ object r_736988 = args[0];
+
+-closureN_type c_7326474;
+-object e_7326553 [4];
+-c_7326474.hdr.mark = gc_color_red;
+- c_7326474.hdr.grayed = 0;
+-c_7326474.tag = closureN_tag;
+- c_7326474.fn = (function_type)__lambda_1166;
+-c_7326474.num_args = 1;
+-c_7326474.num_elements = 4;
+-c_7326474.elements = (object *)e_7326553;
+-c_7326474.elements[0] = ((closureN)self_7314184)->elements[0];
+-c_7326474.elements[1] = r_737763;
+-c_7326474.elements[2] = ((closureN)self_7314184)->elements[1];
+-c_7326474.elements[3] = ((closureN)self_7314184)->elements[2];
++closureN_type c_7324015;
++object e_7324094 [4];
++c_7324015.hdr.mark = gc_color_red;
++ c_7324015.hdr.grayed = 0;
++c_7324015.tag = closureN_tag;
++ c_7324015.fn = (function_type)__lambda_1119;
++c_7324015.num_args = 1;
++c_7324015.num_elements = 4;
++c_7324015.elements = (object *)e_7324094;
++c_7324015.elements[0] = ((closureN)self_7312884)->elements[0];
++c_7324015.elements[1] = r_736988;
++c_7324015.elements[2] = ((closureN)self_7312884)->elements[1];
++c_7324015.elements[3] = ((closureN)self_7312884)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314184)->elements[1], &c_7326474, quote_temp);;
++return_closcall2(data, ((closureN)self_7312884)->elements[1], &c_7324015, quote_temp);;
+ }
+
+-static void __lambda_1166(void *data, object self_7314185, int argc, object *args) /* object self_7314185, object r_737794 */
++static void __lambda_1119(void *data, object self_7312885, int argc, object *args) /* object self_7312885, object r_737019 */
+ {
+- object r_737794 = args[0];
++ object r_737019 = args[0];
+
+-closureN_type c_7326477;
+-object e_7326552 [5];
+-c_7326477.hdr.mark = gc_color_red;
+- c_7326477.hdr.grayed = 0;
+-c_7326477.tag = closureN_tag;
+- c_7326477.fn = (function_type)__lambda_1167;
+-c_7326477.num_args = 1;
+-c_7326477.num_elements = 5;
+-c_7326477.elements = (object *)e_7326552;
+-c_7326477.elements[0] = ((closureN)self_7314185)->elements[0];
+-c_7326477.elements[1] = ((closureN)self_7314185)->elements[1];
+-c_7326477.elements[2] = r_737794;
+-c_7326477.elements[3] = ((closureN)self_7314185)->elements[2];
+-c_7326477.elements[4] = ((closureN)self_7314185)->elements[3];
++closureN_type c_7324018;
++object e_7324093 [5];
++c_7324018.hdr.mark = gc_color_red;
++ c_7324018.hdr.grayed = 0;
++c_7324018.tag = closureN_tag;
++ c_7324018.fn = (function_type)__lambda_1120;
++c_7324018.num_args = 1;
++c_7324018.num_elements = 5;
++c_7324018.elements = (object *)e_7324093;
++c_7324018.elements[0] = ((closureN)self_7312885)->elements[0];
++c_7324018.elements[1] = ((closureN)self_7312885)->elements[1];
++c_7324018.elements[2] = r_737019;
++c_7324018.elements[3] = ((closureN)self_7312885)->elements[2];
++c_7324018.elements[4] = ((closureN)self_7312885)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314185)->elements[2], &c_7326477, quote__if);;
++return_closcall2(data, ((closureN)self_7312885)->elements[2], &c_7324018, quote__if);;
+ }
+
+-static void __lambda_1167(void *data, object self_7314186, int argc, object *args) /* object self_7314186, object r_737772_7311322_7311336_7311349 */
++static void __lambda_1120(void *data, object self_7312886, int argc, object *args) /* object self_7312886, object r_736997_7310069_7310083_7310096 */
+ {
+- object r_737772_7311322_7311336_7311349 = args[0];
++ object r_736997_7310069_7310083_7310096 = args[0];
+
+-closureN_type c_7326480;
+-object e_7326551 [6];
+-c_7326480.hdr.mark = gc_color_red;
+- c_7326480.hdr.grayed = 0;
+-c_7326480.tag = closureN_tag;
+- c_7326480.fn = (function_type)__lambda_1168;
+-c_7326480.num_args = 1;
+-c_7326480.num_elements = 6;
+-c_7326480.elements = (object *)e_7326551;
+-c_7326480.elements[0] = ((closureN)self_7314186)->elements[0];
+-c_7326480.elements[1] = ((closureN)self_7314186)->elements[1];
+-c_7326480.elements[2] = r_737772_7311322_7311336_7311349;
+-c_7326480.elements[3] = ((closureN)self_7314186)->elements[2];
+-c_7326480.elements[4] = ((closureN)self_7314186)->elements[3];
+-c_7326480.elements[5] = ((closureN)self_7314186)->elements[4];
++closureN_type c_7324021;
++object e_7324092 [6];
++c_7324021.hdr.mark = gc_color_red;
++ c_7324021.hdr.grayed = 0;
++c_7324021.tag = closureN_tag;
++ c_7324021.fn = (function_type)__lambda_1121;
++c_7324021.num_args = 1;
++c_7324021.num_elements = 6;
++c_7324021.elements = (object *)e_7324092;
++c_7324021.elements[0] = ((closureN)self_7312886)->elements[0];
++c_7324021.elements[1] = ((closureN)self_7312886)->elements[1];
++c_7324021.elements[2] = r_736997_7310069_7310083_7310096;
++c_7324021.elements[3] = ((closureN)self_7312886)->elements[2];
++c_7324021.elements[4] = ((closureN)self_7312886)->elements[3];
++c_7324021.elements[5] = ((closureN)self_7312886)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314186)->elements[3], &c_7326480, quote_temp);;
++return_closcall2(data, ((closureN)self_7312886)->elements[3], &c_7324021, quote_temp);;
+ }
+
+-static void __lambda_1168(void *data, object self_7314187, int argc, object *args) /* object self_7314187, object r_737775_7311323_7311337_7311350 */
++static void __lambda_1121(void *data, object self_7312887, int argc, object *args) /* object self_7312887, object r_737000_7310070_7310084_7310097 */
+ {
+- object r_737775_7311323_7311337_7311350 = args[0];
++ object r_737000_7310070_7310084_7310097 = args[0];
+
+-closureN_type c_7326483;
+-object e_7326550 [6];
+-c_7326483.hdr.mark = gc_color_red;
+- c_7326483.hdr.grayed = 0;
+-c_7326483.tag = closureN_tag;
+- c_7326483.fn = (function_type)__lambda_1169;
+-c_7326483.num_args = 1;
+-c_7326483.num_elements = 6;
+-c_7326483.elements = (object *)e_7326550;
+-c_7326483.elements[0] = ((closureN)self_7314187)->elements[0];
+-c_7326483.elements[1] = ((closureN)self_7314187)->elements[1];
+-c_7326483.elements[2] = ((closureN)self_7314187)->elements[2];
+-c_7326483.elements[3] = r_737775_7311323_7311337_7311350;
+-c_7326483.elements[4] = ((closureN)self_7314187)->elements[3];
+-c_7326483.elements[5] = ((closureN)self_7314187)->elements[5];
++closureN_type c_7324024;
++object e_7324091 [6];
++c_7324024.hdr.mark = gc_color_red;
++ c_7324024.hdr.grayed = 0;
++c_7324024.tag = closureN_tag;
++ c_7324024.fn = (function_type)__lambda_1122;
++c_7324024.num_args = 1;
++c_7324024.num_elements = 6;
++c_7324024.elements = (object *)e_7324091;
++c_7324024.elements[0] = ((closureN)self_7312887)->elements[0];
++c_7324024.elements[1] = ((closureN)self_7312887)->elements[1];
++c_7324024.elements[2] = ((closureN)self_7312887)->elements[2];
++c_7324024.elements[3] = r_737000_7310070_7310084_7310097;
++c_7324024.elements[4] = ((closureN)self_7312887)->elements[3];
++c_7324024.elements[5] = ((closureN)self_7312887)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7314187)->elements[4], &c_7326483, quote_temp);;
++return_closcall2(data, ((closureN)self_7312887)->elements[4], &c_7324024, quote_temp);;
+ }
+
+-static void __lambda_1169(void *data, object self_7314188, int argc, object *args) /* object self_7314188, object r_737785_7311324_7311338_7311351 */
++static void __lambda_1122(void *data, object self_7312888, int argc, object *args) /* object self_7312888, object r_737010_7310071_7310085_7310098 */
+ {
+- object r_737785_7311324_7311338_7311351 = args[0];
++ object r_737010_7310071_7310085_7310098 = args[0];
+
+-pair_type local_7326488;
++pair_type local_7324029;
+
+-pair_type local_7326491;
++pair_type local_7324032;
+
+-pair_type local_7326495;
++pair_type local_7324036;
+
+-pair_type local_7326498;
++pair_type local_7324039;
+
+-pair_type local_7326501;
++pair_type local_7324042;
+
+-pair_type local_7326505;
++pair_type local_7324046;
+
+
+
+@@ -7658,15 +7609,15 @@ pair_type local_7326505;
+
+
+
+-pair_type local_7326515;
++pair_type local_7324056;
+
+-pair_type local_7326518;
++pair_type local_7324059;
+
+-pair_type local_7326522;
++pair_type local_7324063;
+
+-pair_type local_7326526;
++pair_type local_7324067;
+
+-pair_type local_7326529;
++pair_type local_7324070;
+
+
+
+@@ -7678,70 +7629,70 @@ pair_type local_7326529;
+
+
+
+-pair_type local_7326543;
++pair_type local_7324084;
+
+-pair_type local_7326546;
++pair_type local_7324087;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314188)->elements[0], (((closure) ((closureN)self_7314188)->elements[0])->fn), set_pair_as_expr(&local_7326488, set_pair_as_expr(&local_7326491, ((closureN)self_7314188)->elements[1], set_pair_as_expr(&local_7326495, set_pair_as_expr(&local_7326498, set_pair_as_expr(&local_7326501, ((closureN)self_7314188)->elements[4], set_pair_as_expr(&local_7326505, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314188)->elements[5]))), NULL)), NULL), set_pair_as_expr(&local_7326515, set_pair_as_expr(&local_7326518, ((closureN)self_7314188)->elements[2], set_pair_as_expr(&local_7326522, ((closureN)self_7314188)->elements[3], set_pair_as_expr(&local_7326526, set_pair_as_expr(&local_7326529, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314188)->elements[5]))))), set_pair_as_expr(&local_7326543, r_737785_7311324_7311338_7311351, NULL)), set_pair_as_expr(&local_7326546, Cyc_car(data, ((clo
sureN)self_7314188)->elements[5]), NULL)))), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312888)->elements[0], (((closure) ((closureN)self_7312888)->elements[0])->fn), set_pair_as_expr(&local_7324029, set_pair_as_expr(&local_7324032, ((closureN)self_7312888)->elements[1], set_pair_as_expr(&local_7324036, set_pair_as_expr(&local_7324039, set_pair_as_expr(&local_7324042, ((closureN)self_7312888)->elements[4], set_pair_as_expr(&local_7324046, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312888)->elements[5]))), NULL)), NULL), set_pair_as_expr(&local_7324056, set_pair_as_expr(&local_7324059, ((closureN)self_7312888)->elements[2], set_pair_as_expr(&local_7324063, ((closureN)self_7312888)->elements[3], set_pair_as_expr(&local_7324067, set_pair_as_expr(&local_7324070, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312888)->elements[5]))))), set_pair_as_expr(&local_7324084, r_737010_7310071_7310085_7310098, NULL)), set_pair_as_expr(&local_7324087, Cyc_car(data, ((clo
sureN)self_7312888)->elements[5]), NULL)))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1155(void *data, object self_7314189, int argc, object *args) /* object self_7314189, object k_737804 */
++static void __lambda_1108(void *data, object self_7312889, int argc, object *args) /* object self_7312889, object k_737029 */
+ {
+- object k_737804 = args[0];
++ object k_737029 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314189)->elements[2])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312889)->elements[2])) ){
+
+- Cyc_car(data, ((closureN)self_7314189)->elements[2]);
++ Cyc_car(data, ((closureN)self_7312889)->elements[2]);
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314189)->elements[2]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312889)->elements[2]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314189)->elements[2])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312889)->elements[2])))) ){
+
+-closureN_type c_7326309;
+-object e_7326390 [4];
+-c_7326309.hdr.mark = gc_color_red;
+- c_7326309.hdr.grayed = 0;
+-c_7326309.tag = closureN_tag;
+- c_7326309.fn = (function_type)__lambda_1156;
+-c_7326309.num_args = 1;
+-c_7326309.num_elements = 4;
+-c_7326309.elements = (object *)e_7326390;
+-c_7326309.elements[0] = ((closureN)self_7314189)->elements[0];
+-c_7326309.elements[1] = k_737804;
+-c_7326309.elements[2] = ((closureN)self_7314189)->elements[1];
+-c_7326309.elements[3] = ((closureN)self_7314189)->elements[2];
++closureN_type c_7323850;
++object e_7323931 [4];
++c_7323850.hdr.mark = gc_color_red;
++ c_7323850.hdr.grayed = 0;
++c_7323850.tag = closureN_tag;
++ c_7323850.fn = (function_type)__lambda_1109;
++c_7323850.num_args = 1;
++c_7323850.num_elements = 4;
++c_7323850.elements = (object *)e_7323931;
++c_7323850.elements[0] = ((closureN)self_7312889)->elements[0];
++c_7323850.elements[1] = k_737029;
++c_7323850.elements[2] = ((closureN)self_7312889)->elements[1];
++c_7323850.elements[3] = ((closureN)self_7312889)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314189)->elements[1], &c_7326309, quote__else);
++return_closcall2(data, ((closureN)self_7312889)->elements[1], &c_7323850, quote__else);
+ } else {
+- return_direct_with_clo1(data, k_737804, (((closure) k_737804)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737029, (((closure) k_737029)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737804, (((closure) k_737804)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737029, (((closure) k_737029)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_737804, (((closure) k_737804)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_737029, (((closure) k_737029)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1156(void *data, object self_7314190, int argc, object *args) /* object self_7314190, object r_737826 */
++static void __lambda_1109(void *data, object self_7312890, int argc, object *args) /* object self_7312890, object r_737051 */
+ {
+- object r_737826 = args[0];
++ object r_737051 = args[0];
+
+-closureN_type c_7326312;
+-object e_7326382 [3];
+-c_7326312.hdr.mark = gc_color_red;
+- c_7326312.hdr.grayed = 0;
+-c_7326312.tag = closureN_tag;
+- c_7326312.fn = (function_type)__lambda_1157;
+-c_7326312.num_args = 1;
+-c_7326312.num_elements = 3;
+-c_7326312.elements = (object *)e_7326382;
+-c_7326312.elements[0] = ((closureN)self_7314190)->elements[1];
+-c_7326312.elements[1] = ((closureN)self_7314190)->elements[2];
+-c_7326312.elements[2] = ((closureN)self_7314190)->elements[3];
++closureN_type c_7323853;
++object e_7323923 [3];
++c_7323853.hdr.mark = gc_color_red;
++ c_7323853.hdr.grayed = 0;
++c_7323853.tag = closureN_tag;
++ c_7323853.fn = (function_type)__lambda_1110;
++c_7323853.num_args = 1;
++c_7323853.num_elements = 3;
++c_7323853.elements = (object *)e_7323923;
++c_7323853.elements[0] = ((closureN)self_7312890)->elements[1];
++c_7323853.elements[1] = ((closureN)self_7312890)->elements[2];
++c_7323853.elements[2] = ((closureN)self_7312890)->elements[3];
+
+
+
+@@ -7749,66 +7700,66 @@ c_7326312.elements[2] = ((closureN)self_
+
+
+
+-return_closcall3(data, ((closureN)self_7314190)->elements[0], &c_7326312, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314190)->elements[3]))), r_737826);;
++return_closcall3(data, ((closureN)self_7312890)->elements[0], &c_7323853, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312890)->elements[3]))), r_737051);;
+ }
+
+-static void __lambda_1157(void *data, object self_7314191, int argc, object *args) /* object self_7314191, object r_737812 */
++static void __lambda_1110(void *data, object self_7312891, int argc, object *args) /* object self_7312891, object r_737037 */
+ {
+- object r_737812 = args[0];
+- if( (boolean_f != r_737812) ){
++ object r_737037 = args[0];
++ if( (boolean_f != r_737037) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314191)->elements[2]))))) ){
+- complex_num_type local_7326324;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312891)->elements[2]))))) ){
++ complex_num_type local_7323865;
+
+
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326324, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314191)->elements[2])))))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323865, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312891)->elements[2])))))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314191)->elements[2])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312891)->elements[2])))) ){
+
+-closureN_type c_7326343;
+-object e_7326373 [2];
+-c_7326343.hdr.mark = gc_color_red;
+- c_7326343.hdr.grayed = 0;
+-c_7326343.tag = closureN_tag;
+- c_7326343.fn = (function_type)__lambda_1158;
+-c_7326343.num_args = 1;
+-c_7326343.num_elements = 2;
+-c_7326343.elements = (object *)e_7326373;
+-c_7326343.elements[0] = ((closureN)self_7314191)->elements[0];
+-c_7326343.elements[1] = ((closureN)self_7314191)->elements[2];
++closureN_type c_7323884;
++object e_7323914 [2];
++c_7323884.hdr.mark = gc_color_red;
++ c_7323884.hdr.grayed = 0;
++c_7323884.tag = closureN_tag;
++ c_7323884.fn = (function_type)__lambda_1111;
++c_7323884.num_args = 1;
++c_7323884.num_elements = 2;
++c_7323884.elements = (object *)e_7323914;
++c_7323884.elements[0] = ((closureN)self_7312891)->elements[0];
++c_7323884.elements[1] = ((closureN)self_7312891)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314191)->elements[1], &c_7326343, quote_begin);
++return_closcall2(data, ((closureN)self_7312891)->elements[1], &c_7323884, quote_begin);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314191)->elements[0], (((closure) ((closureN)self_7314191)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312891)->elements[0], (((closure) ((closureN)self_7312891)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314191)->elements[0], (((closure) ((closureN)self_7314191)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312891)->elements[0], (((closure) ((closureN)self_7312891)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314191)->elements[0], (((closure) ((closureN)self_7314191)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312891)->elements[0], (((closure) ((closureN)self_7312891)->elements[0])->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7314191)->elements[0], (((closure) ((closureN)self_7314191)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312891)->elements[0], (((closure) ((closureN)self_7312891)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1158(void *data, object self_7314192, int argc, object *args) /* object self_7314192, object r_737821 */
++static void __lambda_1111(void *data, object self_7312892, int argc, object *args) /* object self_7312892, object r_737046 */
+ {
+- object r_737821 = args[0];
++ object r_737046 = args[0];
+
+-pair_type local_7326348;
++pair_type local_7323889;
+
+-pair_type local_7326351;
++pair_type local_7323892;
+
+-pair_type local_7326354;
++pair_type local_7323895;
+
+
+
+@@ -7825,1082 +7776,1082 @@ pair_type local_7326354;
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314192)->elements[0], (((closure) ((closureN)self_7314192)->elements[0])->fn), set_pair_as_expr(&local_7326348, set_pair_as_expr(&local_7326351, r_737821, set_pair_as_expr(&local_7326354, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314192)->elements[1])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314192)->elements[1])))))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312892)->elements[0], (((closure) ((closureN)self_7312892)->elements[0])->fn), set_pair_as_expr(&local_7323889, set_pair_as_expr(&local_7323892, r_737046, set_pair_as_expr(&local_7323895, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312892)->elements[1])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312892)->elements[1])))))), boolean_f));;
+ }
+
+-static void __lambda_1121(void *data, object _, int argc, object *args) /* closure _,object k_737314, object expr_732135_732150_732173_733875, object rename_732136_732151_732174_733876, object compare_732137_732152_732175_733877 */
++static void __lambda_1074(void *data, object _, int argc, object *args) /* closure _,object k_736539, object expr_731788_731803_731826_733423, object rename_731789_731804_731827_733424, object compare_731790_731805_731828_733425 */
+ {
+-object k_737314 = args[0]; object expr_732135_732150_732173_733875 = args[1]; object rename_732136_732151_732174_733876 = args[2];
++object k_736539 = args[0]; object expr_731788_731803_731826_733423 = args[1]; object rename_731789_731804_731827_733424 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:guard");
+
+-closureN_type c_7325901;
+-object e_7326283 [3];
+-c_7325901.hdr.mark = gc_color_red;
+- c_7325901.hdr.grayed = 0;
+-c_7325901.tag = closureN_tag;
+- c_7325901.fn = (function_type)__lambda_1122;
+-c_7325901.num_args = 1;
+-c_7325901.num_elements = 3;
+-c_7325901.elements = (object *)e_7326283;
+-c_7325901.elements[0] = expr_732135_732150_732173_733875;
+-c_7325901.elements[1] = k_737314;
+-c_7325901.elements[2] = rename_732136_732151_732174_733876;
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7325901,__lambda_1122, Cyc_cdr(data, expr_732135_732150_732173_733875));;
+-}
+-
+-static void __lambda_1122(void *data, object self_7314112, int argc, object *args) /* object self_7314112, object v_931_732143_732157_732177_733879 */
+- {
+- object v_931_732143_732157_732177_733879 = args[0];
+-
+-closureN_type c_7325903;
+-object e_7326258 [2];
+-c_7325903.hdr.mark = gc_color_red;
+- c_7325903.hdr.grayed = 0;
+-c_7325903.tag = closureN_tag;
+- c_7325903.fn = (function_type)__lambda_1123;
+-c_7325903.num_args = 0;
+-c_7325903.num_elements = 2;
+-c_7325903.elements = (object *)e_7326258;
+-c_7325903.elements[0] = ((closureN)self_7314112)->elements[2];
+-c_7325903.elements[1] = v_931_732143_732157_732177_733879;
+-
+-
+-closureN_type c_7326259;
+-object e_7326282 [2];
+-c_7326259.hdr.mark = gc_color_red;
+- c_7326259.hdr.grayed = 0;
+-c_7326259.tag = closureN_tag;
+- c_7326259.fn = (function_type)__lambda_1149;
+-c_7326259.num_args = 1;
+-c_7326259.num_elements = 2;
+-c_7326259.elements = (object *)e_7326282;
+-c_7326259.elements[0] = ((closureN)self_7314112)->elements[0];
+-c_7326259.elements[1] = ((closureN)self_7314112)->elements[1];
+-
+-return_direct_with_clo1(data,(closure)&c_7325903,__lambda_1123, &c_7326259);;
+-}
+-
+-static void __lambda_1149(void *data, object self_7314113, int argc, object *args) /* object self_7314113, object tmp_732154_732156_732176_733878 */
+- {
+- object tmp_732154_732156_732176_733878 = args[0];
+-
+-closureN_type c_7326261;
+-object e_7326275 [2];
+-c_7326261.hdr.mark = gc_color_red;
+- c_7326261.hdr.grayed = 0;
+-c_7326261.tag = closureN_tag;
+- c_7326261.fn = (function_type)__lambda_1150;
+-c_7326261.num_args = 0;
+-c_7326261.num_elements = 2;
+-c_7326261.elements = (object *)e_7326275;
+-c_7326261.elements[0] = ((closureN)self_7314113)->elements[0];
+-c_7326261.elements[1] = tmp_732154_732156_732176_733878;
+-
+-
+-closureN_type c_7326276;
+-object e_7326281 [1];
+-c_7326276.hdr.mark = gc_color_red;
+- c_7326276.hdr.grayed = 0;
+-c_7326276.tag = closureN_tag;
+- c_7326276.fn = (function_type)__lambda_1152;
+-c_7326276.num_args = 1;
+-c_7326276.num_elements = 1;
+-c_7326276.elements = (object *)e_7326281;
+-c_7326276.elements[0] = ((closureN)self_7314113)->elements[1];
++closureN_type c_7323442;
++object e_7323824 [3];
++c_7323442.hdr.mark = gc_color_red;
++ c_7323442.hdr.grayed = 0;
++c_7323442.tag = closureN_tag;
++ c_7323442.fn = (function_type)__lambda_1075;
++c_7323442.num_args = 1;
++c_7323442.num_elements = 3;
++c_7323442.elements = (object *)e_7323824;
++c_7323442.elements[0] = expr_731788_731803_731826_733423;
++c_7323442.elements[1] = k_736539;
++c_7323442.elements[2] = rename_731789_731804_731827_733424;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7323442,__lambda_1075, Cyc_cdr(data, expr_731788_731803_731826_733423));;
++}
++
++static void __lambda_1075(void *data, object self_7312812, int argc, object *args) /* object self_7312812, object v_931_731796_731810_731830_733427 */
++ {
++ object v_931_731796_731810_731830_733427 = args[0];
++
++closureN_type c_7323444;
++object e_7323799 [2];
++c_7323444.hdr.mark = gc_color_red;
++ c_7323444.hdr.grayed = 0;
++c_7323444.tag = closureN_tag;
++ c_7323444.fn = (function_type)__lambda_1076;
++c_7323444.num_args = 0;
++c_7323444.num_elements = 2;
++c_7323444.elements = (object *)e_7323799;
++c_7323444.elements[0] = ((closureN)self_7312812)->elements[2];
++c_7323444.elements[1] = v_931_731796_731810_731830_733427;
++
++
++closureN_type c_7323800;
++object e_7323823 [2];
++c_7323800.hdr.mark = gc_color_red;
++ c_7323800.hdr.grayed = 0;
++c_7323800.tag = closureN_tag;
++ c_7323800.fn = (function_type)__lambda_1102;
++c_7323800.num_args = 1;
++c_7323800.num_elements = 2;
++c_7323800.elements = (object *)e_7323823;
++c_7323800.elements[0] = ((closureN)self_7312812)->elements[0];
++c_7323800.elements[1] = ((closureN)self_7312812)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7323444,__lambda_1076, &c_7323800);;
++}
++
++static void __lambda_1102(void *data, object self_7312813, int argc, object *args) /* object self_7312813, object tmp_731807_731809_731829_733426 */
++ {
++ object tmp_731807_731809_731829_733426 = args[0];
++
++closureN_type c_7323802;
++object e_7323816 [2];
++c_7323802.hdr.mark = gc_color_red;
++ c_7323802.hdr.grayed = 0;
++c_7323802.tag = closureN_tag;
++ c_7323802.fn = (function_type)__lambda_1103;
++c_7323802.num_args = 0;
++c_7323802.num_elements = 2;
++c_7323802.elements = (object *)e_7323816;
++c_7323802.elements[0] = ((closureN)self_7312813)->elements[0];
++c_7323802.elements[1] = tmp_731807_731809_731829_733426;
++
++
++closureN_type c_7323817;
++object e_7323822 [1];
++c_7323817.hdr.mark = gc_color_red;
++ c_7323817.hdr.grayed = 0;
++c_7323817.tag = closureN_tag;
++ c_7323817.fn = (function_type)__lambda_1105;
++c_7323817.num_args = 1;
++c_7323817.num_elements = 1;
++c_7323817.elements = (object *)e_7323822;
++c_7323817.elements[0] = ((closureN)self_7312813)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7326261,__lambda_1150, &c_7326276);;
++return_direct_with_clo1(data,(closure)&c_7323802,__lambda_1103, &c_7323817);;
+ }
+
+-static void __lambda_1152(void *data, object self_7314114, int argc, object *args) /* object self_7314114, object r_737315 */
++static void __lambda_1105(void *data, object self_7312814, int argc, object *args) /* object self_7312814, object r_736540 */
+ {
+- object r_737315 = args[0];
++ object r_736540 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314114)->elements[0], (((closure) ((closureN)self_7314114)->elements[0])->fn), Cyc_car(data, r_737315));;
++return_direct_with_clo1(data, ((closureN)self_7312814)->elements[0], (((closure) ((closureN)self_7312814)->elements[0])->fn), Cyc_car(data, r_736540));;
+ }
+
+-static void __lambda_1150(void *data, object self_7314115, int argc, object *args) /* object self_7314115, object k_737317 */
++static void __lambda_1103(void *data, object self_7312815, int argc, object *args) /* object self_7312815, object k_736542 */
+ {
+- object k_737317 = args[0];
+- if( (boolean_f != ((closureN)self_7314115)->elements[1]) ){
+- return_direct_with_clo1(data, k_737317, (((closure) k_737317)->fn), ((closureN)self_7314115)->elements[1]);
++ object k_736542 = args[0];
++ if( (boolean_f != ((closureN)self_7312815)->elements[1]) ){
++ return_direct_with_clo1(data, k_736542, (((closure) k_736542)->fn), ((closureN)self_7312815)->elements[1]);
+ } else {
+
+-closureN_type c_7326266;
+-object e_7326272 [1];
+-c_7326266.hdr.mark = gc_color_red;
+- c_7326266.hdr.grayed = 0;
+-c_7326266.tag = closureN_tag;
+- c_7326266.fn = (function_type)__lambda_1151;
+-c_7326266.num_args = 1;
+-c_7326266.num_elements = 1;
+-c_7326266.elements = (object *)e_7326272;
+-c_7326266.elements[0] = k_737317;
++closureN_type c_7323807;
++object e_7323813 [1];
++c_7323807.hdr.mark = gc_color_red;
++ c_7323807.hdr.grayed = 0;
++c_7323807.tag = closureN_tag;
++ c_7323807.fn = (function_type)__lambda_1104;
++c_7323807.num_args = 1;
++c_7323807.num_elements = 1;
++c_7323807.elements = (object *)e_7323813;
++c_7323807.elements[0] = k_736542;
+
+
+-make_utf8_string_with_len(c_7326273, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7326266, &c_7326273, ((closureN)self_7314115)->elements[0]);}
++make_utf8_string_with_len(c_7323814, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7323807, &c_7323814, ((closureN)self_7312815)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1151(void *data, object self_7314116, int argc, object *args) /* object self_7314116, object r_737318 */
++static void __lambda_1104(void *data, object self_7312816, int argc, object *args) /* object self_7312816, object r_736543 */
+ {
+- object r_737318 = args[0];
++ object r_736543 = args[0];
+
+-pair_type local_7326271;
+-return_direct_with_clo1(data, ((closureN)self_7314116)->elements[0], (((closure) ((closureN)self_7314116)->elements[0])->fn), set_pair_as_expr(&local_7326271, r_737318, boolean_f));;
++pair_type local_7323812;
++return_direct_with_clo1(data, ((closureN)self_7312816)->elements[0], (((closure) ((closureN)self_7312816)->elements[0])->fn), set_pair_as_expr(&local_7323812, r_736543, boolean_f));;
+ }
+
+-static void __lambda_1123(void *data, object self_7314117, int argc, object *args) /* object self_7314117, object k_737320 */
++static void __lambda_1076(void *data, object self_7312817, int argc, object *args) /* object self_7312817, object k_736545 */
+ {
+- object k_737320 = args[0];
++ object k_736545 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314117)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312817)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314117)->elements[1]))) ){
+- complex_num_type local_7325914;
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312817)->elements[1]))) ){
++ complex_num_type local_7323455;
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325914, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314117)->elements[1])))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323455, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312817)->elements[1])))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314117)->elements[1]))) ){
+- complex_num_type local_7325927;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312817)->elements[1]))) ){
++ complex_num_type local_7323468;
+
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325927, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314117)->elements[1])))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323468, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312817)->elements[1])))) ){
+
+-closureN_type c_7325935;
+-object e_7326252 [3];
+-c_7325935.hdr.mark = gc_color_red;
+- c_7325935.hdr.grayed = 0;
+-c_7325935.tag = closureN_tag;
+- c_7325935.fn = (function_type)__lambda_1124;
+-c_7325935.num_args = 1;
+-c_7325935.num_elements = 3;
+-c_7325935.elements = (object *)e_7326252;
+-c_7325935.elements[0] = k_737320;
+-c_7325935.elements[1] = ((closureN)self_7314117)->elements[0];
+-c_7325935.elements[2] = ((closureN)self_7314117)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314117)->elements[0], &c_7325935, quote_call_91with_91current_91continuation);
+-} else {
+- return_direct_with_clo1(data, k_737320, (((closure) k_737320)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737320, (((closure) k_737320)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737320, (((closure) k_737320)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737320, (((closure) k_737320)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737320, (((closure) k_737320)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1124(void *data, object self_7314118, int argc, object *args) /* object self_7314118, object r_737336 */
+- {
+- object r_737336 = args[0];
+-
+-closureN_type c_7325938;
+-object e_7326251 [4];
+-c_7325938.hdr.mark = gc_color_red;
+- c_7325938.hdr.grayed = 0;
+-c_7325938.tag = closureN_tag;
+- c_7325938.fn = (function_type)__lambda_1125;
+-c_7325938.num_args = 1;
+-c_7325938.num_elements = 4;
+-c_7325938.elements = (object *)e_7326251;
+-c_7325938.elements[0] = ((closureN)self_7314118)->elements[0];
+-c_7325938.elements[1] = r_737336;
+-c_7325938.elements[2] = ((closureN)self_7314118)->elements[1];
+-c_7325938.elements[3] = ((closureN)self_7314118)->elements[2];
+-
+-return_closcall2(data, ((closureN)self_7314118)->elements[1], &c_7325938, quote_lambda);;
+-}
+-
+-static void __lambda_1125(void *data, object self_7314119, int argc, object *args) /* object self_7314119, object r_737342 */
+- {
+- object r_737342 = args[0];
+-
+-closureN_type c_7325941;
+-object e_7326250 [5];
+-c_7325941.hdr.mark = gc_color_red;
+- c_7325941.hdr.grayed = 0;
+-c_7325941.tag = closureN_tag;
+- c_7325941.fn = (function_type)__lambda_1126;
+-c_7325941.num_args = 1;
+-c_7325941.num_elements = 5;
+-c_7325941.elements = (object *)e_7326250;
+-c_7325941.elements[0] = ((closureN)self_7314119)->elements[0];
+-c_7325941.elements[1] = ((closureN)self_7314119)->elements[1];
+-c_7325941.elements[2] = r_737342;
+-c_7325941.elements[3] = ((closureN)self_7314119)->elements[2];
+-c_7325941.elements[4] = ((closureN)self_7314119)->elements[3];
+-
+-return_closcall2(data, ((closureN)self_7314119)->elements[2], &c_7325941, quote_guard_91k);;
+-}
+-
+-static void __lambda_1126(void *data, object self_7314120, int argc, object *args) /* object self_7314120, object r_737519 */
+- {
+- object r_737519 = args[0];
+-
+-closureN_type c_7325944;
+-object e_7326249 [6];
+-c_7325944.hdr.mark = gc_color_red;
+- c_7325944.hdr.grayed = 0;
+-c_7325944.tag = closureN_tag;
+- c_7325944.fn = (function_type)__lambda_1127;
+-c_7325944.num_args = 1;
+-c_7325944.num_elements = 6;
+-c_7325944.elements = (object *)e_7326249;
+-c_7325944.elements[0] = ((closureN)self_7314120)->elements[0];
+-c_7325944.elements[1] = ((closureN)self_7314120)->elements[1];
+-c_7325944.elements[2] = ((closureN)self_7314120)->elements[2];
+-c_7325944.elements[3] = r_737519;
+-c_7325944.elements[4] = ((closureN)self_7314120)->elements[3];
+-c_7325944.elements[5] = ((closureN)self_7314120)->elements[4];
+-
+-return_closcall2(data, ((closureN)self_7314120)->elements[3], &c_7325944, quote_with_91exception_91handler);;
+-}
+-
+-static void __lambda_1127(void *data, object self_7314121, int argc, object *args) /* object self_7314121, object r_737351_739374 */
+- {
+- object r_737351_739374 = args[0];
+-
+-closureN_type c_7325947;
+-object e_7326248 [7];
+-c_7325947.hdr.mark = gc_color_red;
+- c_7325947.hdr.grayed = 0;
+-c_7325947.tag = closureN_tag;
+- c_7325947.fn = (function_type)__lambda_1128;
+-c_7325947.num_args = 1;
+-c_7325947.num_elements = 7;
+-c_7325947.elements = (object *)e_7326248;
+-c_7325947.elements[0] = ((closureN)self_7314121)->elements[0];
+-c_7325947.elements[1] = ((closureN)self_7314121)->elements[1];
+-c_7325947.elements[2] = ((closureN)self_7314121)->elements[2];
+-c_7325947.elements[3] = r_737351_739374;
+-c_7325947.elements[4] = ((closureN)self_7314121)->elements[3];
+-c_7325947.elements[5] = ((closureN)self_7314121)->elements[4];
+-c_7325947.elements[6] = ((closureN)self_7314121)->elements[5];
+-
+-return_closcall2(data, ((closureN)self_7314121)->elements[4], &c_7325947, quote_lambda);;
+-}
+-
+-static void __lambda_1128(void *data, object self_7314122, int argc, object *args) /* object self_7314122, object r_737413_739375 */
+- {
+- object r_737413_739375 = args[0];
+-
+-closureN_type c_7325950;
+-object e_7326247 [8];
+-c_7325950.hdr.mark = gc_color_red;
+- c_7325950.hdr.grayed = 0;
+-c_7325950.tag = closureN_tag;
+- c_7325950.fn = (function_type)__lambda_1129;
+-c_7325950.num_args = 1;
+-c_7325950.num_elements = 8;
+-c_7325950.elements = (object *)e_7326247;
+-c_7325950.elements[0] = ((closureN)self_7314122)->elements[0];
+-c_7325950.elements[1] = ((closureN)self_7314122)->elements[1];
+-c_7325950.elements[2] = ((closureN)self_7314122)->elements[2];
+-c_7325950.elements[3] = ((closureN)self_7314122)->elements[3];
+-c_7325950.elements[4] = r_737413_739375;
+-c_7325950.elements[5] = ((closureN)self_7314122)->elements[4];
+-c_7325950.elements[6] = ((closureN)self_7314122)->elements[5];
+-c_7325950.elements[7] = ((closureN)self_7314122)->elements[6];
+-
+-return_closcall2(data, ((closureN)self_7314122)->elements[5], &c_7325950, quote_condition);;
+-}
+-
+-static void __lambda_1129(void *data, object self_7314123, int argc, object *args) /* object self_7314123, object r_737513_739376 */
+- {
+- object r_737513_739376 = args[0];
+-
+-closureN_type c_7325953;
+-object e_7326246 [9];
+-c_7325953.hdr.mark = gc_color_red;
+- c_7325953.hdr.grayed = 0;
+-c_7325953.tag = closureN_tag;
+- c_7325953.fn = (function_type)__lambda_1130;
+-c_7325953.num_args = 1;
+-c_7325953.num_elements = 9;
+-c_7325953.elements = (object *)e_7326246;
+-c_7325953.elements[0] = ((closureN)self_7314123)->elements[0];
+-c_7325953.elements[1] = ((closureN)self_7314123)->elements[1];
+-c_7325953.elements[2] = ((closureN)self_7314123)->elements[2];
+-c_7325953.elements[3] = ((closureN)self_7314123)->elements[3];
+-c_7325953.elements[4] = ((closureN)self_7314123)->elements[4];
+-c_7325953.elements[5] = r_737513_739376;
+-c_7325953.elements[6] = ((closureN)self_7314123)->elements[5];
+-c_7325953.elements[7] = ((closureN)self_7314123)->elements[6];
+-c_7325953.elements[8] = ((closureN)self_7314123)->elements[7];
+-
+-return_closcall2(data, ((closureN)self_7314123)->elements[6], &c_7325953, quote_call_91with_91current_91continuation);;
+-}
+-
+-static void __lambda_1130(void *data, object self_7314124, int argc, object *args) /* object self_7314124, object r_737425_739378_739453 */
+- {
+- object r_737425_739378_739453 = args[0];
+-
+-closureN_type c_7325956;
+-object e_7326245 [10];
+-c_7325956.hdr.mark = gc_color_red;
+- c_7325956.hdr.grayed = 0;
+-c_7325956.tag = closureN_tag;
+- c_7325956.fn = (function_type)__lambda_1131;
+-c_7325956.num_args = 1;
+-c_7325956.num_elements = 10;
+-c_7325956.elements = (object *)e_7326245;
+-c_7325956.elements[0] = ((closureN)self_7314124)->elements[0];
+-c_7325956.elements[1] = ((closureN)self_7314124)->elements[1];
+-c_7325956.elements[2] = ((closureN)self_7314124)->elements[2];
+-c_7325956.elements[3] = ((closureN)self_7314124)->elements[3];
+-c_7325956.elements[4] = ((closureN)self_7314124)->elements[4];
+-c_7325956.elements[5] = r_737425_739378_739453;
+-c_7325956.elements[6] = ((closureN)self_7314124)->elements[5];
+-c_7325956.elements[7] = ((closureN)self_7314124)->elements[6];
+-c_7325956.elements[8] = ((closureN)self_7314124)->elements[7];
+-c_7325956.elements[9] = ((closureN)self_7314124)->elements[8];
+-
+-return_closcall2(data, ((closureN)self_7314124)->elements[7], &c_7325956, quote_lambda);;
+-}
+-
+-static void __lambda_1131(void *data, object self_7314125, int argc, object *args) /* object self_7314125, object r_737431_739379_739454 */
+- {
+- object r_737431_739379_739454 = args[0];
+-
+-closureN_type c_7325959;
+-object e_7326244 [11];
+-c_7325959.hdr.mark = gc_color_red;
+- c_7325959.hdr.grayed = 0;
+-c_7325959.tag = closureN_tag;
+- c_7325959.fn = (function_type)__lambda_1132;
+-c_7325959.num_args = 1;
+-c_7325959.num_elements = 11;
+-c_7325959.elements = (object *)e_7326244;
+-c_7325959.elements[0] = ((closureN)self_7314125)->elements[0];
+-c_7325959.elements[1] = ((closureN)self_7314125)->elements[1];
+-c_7325959.elements[2] = ((closureN)self_7314125)->elements[2];
+-c_7325959.elements[3] = ((closureN)self_7314125)->elements[3];
+-c_7325959.elements[4] = ((closureN)self_7314125)->elements[4];
+-c_7325959.elements[5] = ((closureN)self_7314125)->elements[5];
+-c_7325959.elements[6] = r_737431_739379_739454;
+-c_7325959.elements[7] = ((closureN)self_7314125)->elements[6];
+-c_7325959.elements[8] = ((closureN)self_7314125)->elements[7];
+-c_7325959.elements[9] = ((closureN)self_7314125)->elements[8];
+-c_7325959.elements[10] = ((closureN)self_7314125)->elements[9];
+-
+-return_closcall2(data, ((closureN)self_7314125)->elements[8], &c_7325959, quote_handler_91k);;
+-}
+-
+-static void __lambda_1132(void *data, object self_7314126, int argc, object *args) /* object self_7314126, object r_737507_739380_739455 */
+- {
+- object r_737507_739380_739455 = args[0];
+-
+-closureN_type c_7325962;
+-object e_7326243 [12];
+-c_7325962.hdr.mark = gc_color_red;
+- c_7325962.hdr.grayed = 0;
+-c_7325962.tag = closureN_tag;
+- c_7325962.fn = (function_type)__lambda_1133;
+-c_7325962.num_args = 1;
+-c_7325962.num_elements = 12;
+-c_7325962.elements = (object *)e_7326243;
+-c_7325962.elements[0] = ((closureN)self_7314126)->elements[0];
+-c_7325962.elements[1] = ((closureN)self_7314126)->elements[1];
+-c_7325962.elements[2] = ((closureN)self_7314126)->elements[2];
+-c_7325962.elements[3] = ((closureN)self_7314126)->elements[3];
+-c_7325962.elements[4] = ((closureN)self_7314126)->elements[4];
+-c_7325962.elements[5] = ((closureN)self_7314126)->elements[5];
+-c_7325962.elements[6] = ((closureN)self_7314126)->elements[6];
+-c_7325962.elements[7] = r_737507_739380_739455;
+-c_7325962.elements[8] = ((closureN)self_7314126)->elements[7];
+-c_7325962.elements[9] = ((closureN)self_7314126)->elements[8];
+-c_7325962.elements[10] = ((closureN)self_7314126)->elements[9];
+-c_7325962.elements[11] = ((closureN)self_7314126)->elements[10];
+-
+-return_closcall2(data, ((closureN)self_7314126)->elements[9], &c_7325962, quote_guard_91k);;
+-}
+-
+-static void __lambda_1133(void *data, object self_7314127, int argc, object *args) /* object self_7314127, object r_737440_739382_739457_739528 */
+- {
+- object r_737440_739382_739457_739528 = args[0];
+-
+-closureN_type c_7325965;
+-object e_7326242 [13];
+-c_7325965.hdr.mark = gc_color_red;
+- c_7325965.hdr.grayed = 0;
+-c_7325965.tag = closureN_tag;
+- c_7325965.fn = (function_type)__lambda_1134;
+-c_7325965.num_args = 1;
+-c_7325965.num_elements = 13;
+-c_7325965.elements = (object *)e_7326242;
+-c_7325965.elements[0] = ((closureN)self_7314127)->elements[0];
+-c_7325965.elements[1] = ((closureN)self_7314127)->elements[1];
+-c_7325965.elements[2] = ((closureN)self_7314127)->elements[2];
+-c_7325965.elements[3] = ((closureN)self_7314127)->elements[3];
+-c_7325965.elements[4] = ((closureN)self_7314127)->elements[4];
+-c_7325965.elements[5] = ((closureN)self_7314127)->elements[5];
+-c_7325965.elements[6] = ((closureN)self_7314127)->elements[6];
+-c_7325965.elements[7] = r_737440_739382_739457_739528;
+-c_7325965.elements[8] = ((closureN)self_7314127)->elements[7];
+-c_7325965.elements[9] = ((closureN)self_7314127)->elements[8];
+-c_7325965.elements[10] = ((closureN)self_7314127)->elements[9];
+-c_7325965.elements[11] = ((closureN)self_7314127)->elements[10];
+-c_7325965.elements[12] = ((closureN)self_7314127)->elements[11];
+-
+-return_closcall2(data, ((closureN)self_7314127)->elements[10], &c_7325965, quote_lambda);;
+-}
+-
+-static void __lambda_1134(void *data, object self_7314128, int argc, object *args) /* object self_7314128, object r_737446_739383_739458_739529 */
+- {
+- object r_737446_739383_739458_739529 = args[0];
+-
+-closureN_type c_7325968;
+-object e_7326241 [14];
+-c_7325968.hdr.mark = gc_color_red;
+- c_7325968.hdr.grayed = 0;
+-c_7325968.tag = closureN_tag;
+- c_7325968.fn = (function_type)__lambda_1135;
+-c_7325968.num_args = 1;
+-c_7325968.num_elements = 14;
+-c_7325968.elements = (object *)e_7326241;
+-c_7325968.elements[0] = ((closureN)self_7314128)->elements[0];
+-c_7325968.elements[1] = ((closureN)self_7314128)->elements[1];
+-c_7325968.elements[2] = ((closureN)self_7314128)->elements[2];
+-c_7325968.elements[3] = ((closureN)self_7314128)->elements[3];
+-c_7325968.elements[4] = ((closureN)self_7314128)->elements[4];
+-c_7325968.elements[5] = ((closureN)self_7314128)->elements[5];
+-c_7325968.elements[6] = ((closureN)self_7314128)->elements[6];
+-c_7325968.elements[7] = ((closureN)self_7314128)->elements[7];
+-c_7325968.elements[8] = r_737446_739383_739458_739529;
+-c_7325968.elements[9] = ((closureN)self_7314128)->elements[8];
+-c_7325968.elements[10] = ((closureN)self_7314128)->elements[9];
+-c_7325968.elements[11] = ((closureN)self_7314128)->elements[10];
+-c_7325968.elements[12] = ((closureN)self_7314128)->elements[11];
+-c_7325968.elements[13] = ((closureN)self_7314128)->elements[12];
+-
+-return_closcall2(data, ((closureN)self_7314128)->elements[11], &c_7325968, quote_let);;
+-}
+-
+-static void __lambda_1135(void *data, object self_7314129, int argc, object *args) /* object self_7314129, object r_737455_739384_739459_739530 */
+- {
+- object r_737455_739384_739459_739530 = args[0];
+-
+-closureN_type c_7325971;
+-object e_7326240 [15];
+-c_7325971.hdr.mark = gc_color_red;
+- c_7325971.hdr.grayed = 0;
+-c_7325971.tag = closureN_tag;
+- c_7325971.fn = (function_type)__lambda_1136;
+-c_7325971.num_args = 1;
+-c_7325971.num_elements = 15;
+-c_7325971.elements = (object *)e_7326240;
+-c_7325971.elements[0] = ((closureN)self_7314129)->elements[0];
+-c_7325971.elements[1] = ((closureN)self_7314129)->elements[1];
+-c_7325971.elements[2] = ((closureN)self_7314129)->elements[2];
+-c_7325971.elements[3] = ((closureN)self_7314129)->elements[3];
+-c_7325971.elements[4] = ((closureN)self_7314129)->elements[4];
+-c_7325971.elements[5] = ((closureN)self_7314129)->elements[5];
+-c_7325971.elements[6] = ((closureN)self_7314129)->elements[6];
+-c_7325971.elements[7] = ((closureN)self_7314129)->elements[7];
+-c_7325971.elements[8] = ((closureN)self_7314129)->elements[8];
+-c_7325971.elements[9] = r_737455_739384_739459_739530;
+-c_7325971.elements[10] = ((closureN)self_7314129)->elements[9];
+-c_7325971.elements[11] = ((closureN)self_7314129)->elements[10];
+-c_7325971.elements[12] = ((closureN)self_7314129)->elements[11];
+-c_7325971.elements[13] = ((closureN)self_7314129)->elements[12];
+-c_7325971.elements[14] = ((closureN)self_7314129)->elements[13];
+-
+-return_closcall2(data, ((closureN)self_7314129)->elements[12], &c_7325971, quote_condition);;
+-}
+-
+-static void __lambda_1136(void *data, object self_7314130, int argc, object *args) /* object self_7314130, object r_737500_739385_739460_739531 */
+- {
+- object r_737500_739385_739460_739531 = args[0];
+-
+-closureN_type c_7325974;
+-object e_7326239 [16];
+-c_7325974.hdr.mark = gc_color_red;
+- c_7325974.hdr.grayed = 0;
+-c_7325974.tag = closureN_tag;
+- c_7325974.fn = (function_type)__lambda_1137;
+-c_7325974.num_args = 1;
+-c_7325974.num_elements = 16;
+-c_7325974.elements = (object *)e_7326239;
+-c_7325974.elements[0] = ((closureN)self_7314130)->elements[0];
+-c_7325974.elements[1] = ((closureN)self_7314130)->elements[1];
+-c_7325974.elements[2] = ((closureN)self_7314130)->elements[2];
+-c_7325974.elements[3] = ((closureN)self_7314130)->elements[3];
+-c_7325974.elements[4] = ((closureN)self_7314130)->elements[4];
+-c_7325974.elements[5] = ((closureN)self_7314130)->elements[5];
+-c_7325974.elements[6] = ((closureN)self_7314130)->elements[6];
+-c_7325974.elements[7] = ((closureN)self_7314130)->elements[7];
+-c_7325974.elements[8] = ((closureN)self_7314130)->elements[8];
+-c_7325974.elements[9] = ((closureN)self_7314130)->elements[9];
+-c_7325974.elements[10] = r_737500_739385_739460_739531;
+-c_7325974.elements[11] = ((closureN)self_7314130)->elements[10];
+-c_7325974.elements[12] = ((closureN)self_7314130)->elements[11];
+-c_7325974.elements[13] = ((closureN)self_7314130)->elements[12];
+-c_7325974.elements[14] = ((closureN)self_7314130)->elements[13];
+-c_7325974.elements[15] = ((closureN)self_7314130)->elements[14];
+-
+-return_closcall2(data, ((closureN)self_7314130)->elements[13], &c_7325974, quote_guard_91aux);;
+-}
+-
+-static void __lambda_1137(void *data, object self_7314131, int argc, object *args) /* object self_7314131, object r_737464_739389_739464_739535_739601_739666_739730 */
+- {
+- object r_737464_739389_739464_739535_739601_739666_739730 = args[0];
+-
+-closureN_type c_7325977;
+-object e_7326238 [17];
+-c_7325977.hdr.mark = gc_color_red;
+- c_7325977.hdr.grayed = 0;
+-c_7325977.tag = closureN_tag;
+- c_7325977.fn = (function_type)__lambda_1138;
+-c_7325977.num_args = 1;
+-c_7325977.num_elements = 17;
+-c_7325977.elements = (object *)e_7326238;
+-c_7325977.elements[0] = ((closureN)self_7314131)->elements[0];
+-c_7325977.elements[1] = ((closureN)self_7314131)->elements[1];
+-c_7325977.elements[2] = ((closureN)self_7314131)->elements[2];
+-c_7325977.elements[3] = ((closureN)self_7314131)->elements[3];
+-c_7325977.elements[4] = ((closureN)self_7314131)->elements[4];
+-c_7325977.elements[5] = ((closureN)self_7314131)->elements[5];
+-c_7325977.elements[6] = ((closureN)self_7314131)->elements[6];
+-c_7325977.elements[7] = ((closureN)self_7314131)->elements[7];
+-c_7325977.elements[8] = ((closureN)self_7314131)->elements[8];
+-c_7325977.elements[9] = ((closureN)self_7314131)->elements[9];
+-c_7325977.elements[10] = r_737464_739389_739464_739535_739601_739666_739730;
+-c_7325977.elements[11] = ((closureN)self_7314131)->elements[10];
+-c_7325977.elements[12] = ((closureN)self_7314131)->elements[11];
+-c_7325977.elements[13] = ((closureN)self_7314131)->elements[12];
+-c_7325977.elements[14] = ((closureN)self_7314131)->elements[13];
+-c_7325977.elements[15] = ((closureN)self_7314131)->elements[14];
+-c_7325977.elements[16] = ((closureN)self_7314131)->elements[15];
+-
+-return_closcall2(data, ((closureN)self_7314131)->elements[14], &c_7325977, quote_handler_91k);;
+-}
+-
+-static void __lambda_1138(void *data, object self_7314132, int argc, object *args) /* object self_7314132, object r_737469_739390_739465_739536_739602_739667_739731 */
+- {
+- object r_737469_739390_739465_739536_739602_739667_739731 = args[0];
+-
+-closureN_type c_7325980;
+-object e_7326237 [18];
+-c_7325980.hdr.mark = gc_color_red;
+- c_7325980.hdr.grayed = 0;
+-c_7325980.tag = closureN_tag;
+- c_7325980.fn = (function_type)__lambda_1139;
+-c_7325980.num_args = 1;
+-c_7325980.num_elements = 18;
+-c_7325980.elements = (object *)e_7326237;
+-c_7325980.elements[0] = ((closureN)self_7314132)->elements[0];
+-c_7325980.elements[1] = ((closureN)self_7314132)->elements[1];
+-c_7325980.elements[2] = ((closureN)self_7314132)->elements[2];
+-c_7325980.elements[3] = ((closureN)self_7314132)->elements[3];
+-c_7325980.elements[4] = ((closureN)self_7314132)->elements[4];
+-c_7325980.elements[5] = ((closureN)self_7314132)->elements[5];
+-c_7325980.elements[6] = ((closureN)self_7314132)->elements[6];
+-c_7325980.elements[7] = ((closureN)self_7314132)->elements[7];
+-c_7325980.elements[8] = ((closureN)self_7314132)->elements[8];
+-c_7325980.elements[9] = ((closureN)self_7314132)->elements[9];
+-c_7325980.elements[10] = ((closureN)self_7314132)->elements[10];
+-c_7325980.elements[11] = r_737469_739390_739465_739536_739602_739667_739731;
+-c_7325980.elements[12] = ((closureN)self_7314132)->elements[11];
+-c_7325980.elements[13] = ((closureN)self_7314132)->elements[12];
+-c_7325980.elements[14] = ((closureN)self_7314132)->elements[13];
+-c_7325980.elements[15] = ((closureN)self_7314132)->elements[14];
+-c_7325980.elements[16] = ((closureN)self_7314132)->elements[15];
+-c_7325980.elements[17] = ((closureN)self_7314132)->elements[16];
+-
+-return_closcall2(data, ((closureN)self_7314132)->elements[15], &c_7325980, quote_lambda);;
+-}
+-
+-static void __lambda_1139(void *data, object self_7314133, int argc, object *args) /* object self_7314133, object r_737475_739391_739466_739537_739603_739668_739732 */
+- {
+- object r_737475_739391_739466_739537_739603_739668_739732 = args[0];
+-
+-closureN_type c_7325983;
+-object e_7326236 [19];
+-c_7325983.hdr.mark = gc_color_red;
+- c_7325983.hdr.grayed = 0;
+-c_7325983.tag = closureN_tag;
+- c_7325983.fn = (function_type)__lambda_1140;
+-c_7325983.num_args = 1;
+-c_7325983.num_elements = 19;
+-c_7325983.elements = (object *)e_7326236;
+-c_7325983.elements[0] = ((closureN)self_7314133)->elements[0];
+-c_7325983.elements[1] = ((closureN)self_7314133)->elements[1];
+-c_7325983.elements[2] = ((closureN)self_7314133)->elements[2];
+-c_7325983.elements[3] = ((closureN)self_7314133)->elements[3];
+-c_7325983.elements[4] = ((closureN)self_7314133)->elements[4];
+-c_7325983.elements[5] = ((closureN)self_7314133)->elements[5];
+-c_7325983.elements[6] = ((closureN)self_7314133)->elements[6];
+-c_7325983.elements[7] = ((closureN)self_7314133)->elements[7];
+-c_7325983.elements[8] = ((closureN)self_7314133)->elements[8];
+-c_7325983.elements[9] = ((closureN)self_7314133)->elements[9];
+-c_7325983.elements[10] = ((closureN)self_7314133)->elements[10];
+-c_7325983.elements[11] = ((closureN)self_7314133)->elements[11];
+-c_7325983.elements[12] = r_737475_739391_739466_739537_739603_739668_739732;
+-c_7325983.elements[13] = ((closureN)self_7314133)->elements[12];
+-c_7325983.elements[14] = ((closureN)self_7314133)->elements[13];
+-c_7325983.elements[15] = ((closureN)self_7314133)->elements[14];
+-c_7325983.elements[16] = ((closureN)self_7314133)->elements[15];
+-c_7325983.elements[17] = ((closureN)self_7314133)->elements[16];
+-c_7325983.elements[18] = ((closureN)self_7314133)->elements[17];
+-
+-return_closcall2(data, ((closureN)self_7314133)->elements[16], &c_7325983, quote_raise_91continuable);;
+-}
+-
+-static void __lambda_1140(void *data, object self_7314134, int argc, object *args) /* object self_7314134, object r_737484_739392_739467_739538_739604_739669_739733 */
+- {
+- object r_737484_739392_739467_739538_739604_739669_739733 = args[0];
+-
+-closureN_type c_7325986;
+-object e_7326235 [20];
+-c_7325986.hdr.mark = gc_color_red;
+- c_7325986.hdr.grayed = 0;
+-c_7325986.tag = closureN_tag;
+- c_7325986.fn = (function_type)__lambda_1141;
+-c_7325986.num_args = 1;
+-c_7325986.num_elements = 20;
+-c_7325986.elements = (object *)e_7326235;
+-c_7325986.elements[0] = ((closureN)self_7314134)->elements[0];
+-c_7325986.elements[1] = ((closureN)self_7314134)->elements[1];
+-c_7325986.elements[2] = ((closureN)self_7314134)->elements[2];
+-c_7325986.elements[3] = ((closureN)self_7314134)->elements[3];
+-c_7325986.elements[4] = ((closureN)self_7314134)->elements[4];
+-c_7325986.elements[5] = ((closureN)self_7314134)->elements[5];
+-c_7325986.elements[6] = ((closureN)self_7314134)->elements[6];
+-c_7325986.elements[7] = ((closureN)self_7314134)->elements[7];
+-c_7325986.elements[8] = ((closureN)self_7314134)->elements[8];
+-c_7325986.elements[9] = ((closureN)self_7314134)->elements[9];
+-c_7325986.elements[10] = ((closureN)self_7314134)->elements[10];
+-c_7325986.elements[11] = ((closureN)self_7314134)->elements[11];
+-c_7325986.elements[12] = ((closureN)self_7314134)->elements[12];
+-c_7325986.elements[13] = r_737484_739392_739467_739538_739604_739669_739733;
+-c_7325986.elements[14] = ((closureN)self_7314134)->elements[13];
+-c_7325986.elements[15] = ((closureN)self_7314134)->elements[14];
+-c_7325986.elements[16] = ((closureN)self_7314134)->elements[15];
+-c_7325986.elements[17] = ((closureN)self_7314134)->elements[16];
+-c_7325986.elements[18] = ((closureN)self_7314134)->elements[17];
+-c_7325986.elements[19] = ((closureN)self_7314134)->elements[18];
+-
+-return_closcall2(data, ((closureN)self_7314134)->elements[17], &c_7325986, quote_condition);;
+-}
+-
+-static void __lambda_1141(void *data, object self_7314135, int argc, object *args) /* object self_7314135, object r_737487_739393_739468_739539_739605_739670_739734 */
+- {
+- object r_737487_739393_739468_739539_739605_739670_739734 = args[0];
+-
+-closureN_type c_7325989;
+-object e_7326234 [21];
+-c_7325989.hdr.mark = gc_color_red;
+- c_7325989.hdr.grayed = 0;
+-c_7325989.tag = closureN_tag;
+- c_7325989.fn = (function_type)__lambda_1142;
+-c_7325989.num_args = 1;
+-c_7325989.num_elements = 21;
+-c_7325989.elements = (object *)e_7326234;
+-c_7325989.elements[0] = ((closureN)self_7314135)->elements[0];
+-c_7325989.elements[1] = ((closureN)self_7314135)->elements[1];
+-c_7325989.elements[2] = ((closureN)self_7314135)->elements[2];
+-c_7325989.elements[3] = ((closureN)self_7314135)->elements[3];
+-c_7325989.elements[4] = ((closureN)self_7314135)->elements[4];
+-c_7325989.elements[5] = ((closureN)self_7314135)->elements[5];
+-c_7325989.elements[6] = ((closureN)self_7314135)->elements[6];
+-c_7325989.elements[7] = ((closureN)self_7314135)->elements[7];
+-c_7325989.elements[8] = ((closureN)self_7314135)->elements[8];
+-c_7325989.elements[9] = ((closureN)self_7314135)->elements[9];
+-c_7325989.elements[10] = ((closureN)self_7314135)->elements[10];
+-c_7325989.elements[11] = ((closureN)self_7314135)->elements[11];
+-c_7325989.elements[12] = ((closureN)self_7314135)->elements[12];
+-c_7325989.elements[13] = ((closureN)self_7314135)->elements[13];
+-c_7325989.elements[14] = r_737487_739393_739468_739539_739605_739670_739734;
+-c_7325989.elements[15] = ((closureN)self_7314135)->elements[14];
+-c_7325989.elements[16] = ((closureN)self_7314135)->elements[15];
+-c_7325989.elements[17] = ((closureN)self_7314135)->elements[16];
+-c_7325989.elements[18] = ((closureN)self_7314135)->elements[17];
+-c_7325989.elements[19] = ((closureN)self_7314135)->elements[18];
+-c_7325989.elements[20] = ((closureN)self_7314135)->elements[19];
+-
+-return_closcall2(data, ((closureN)self_7314135)->elements[18], &c_7325989, quote_lambda);;
+-}
+-
+-static void __lambda_1142(void *data, object self_7314136, int argc, object *args) /* object self_7314136, object r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944 */
+- {
+- object r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944 = args[0];
+-
+-closureN_type c_7325992;
+-object e_7326233 [22];
+-c_7325992.hdr.mark = gc_color_red;
+- c_7325992.hdr.grayed = 0;
+-c_7325992.tag = closureN_tag;
+- c_7325992.fn = (function_type)__lambda_1143;
+-c_7325992.num_args = 1;
+-c_7325992.num_elements = 22;
+-c_7325992.elements = (object *)e_7326233;
+-c_7325992.elements[0] = ((closureN)self_7314136)->elements[0];
+-c_7325992.elements[1] = ((closureN)self_7314136)->elements[1];
+-c_7325992.elements[2] = ((closureN)self_7314136)->elements[2];
+-c_7325992.elements[3] = ((closureN)self_7314136)->elements[3];
+-c_7325992.elements[4] = r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944;
+-c_7325992.elements[5] = ((closureN)self_7314136)->elements[4];
+-c_7325992.elements[6] = ((closureN)self_7314136)->elements[5];
+-c_7325992.elements[7] = ((closureN)self_7314136)->elements[6];
+-c_7325992.elements[8] = ((closureN)self_7314136)->elements[7];
+-c_7325992.elements[9] = ((closureN)self_7314136)->elements[8];
+-c_7325992.elements[10] = ((closureN)self_7314136)->elements[9];
+-c_7325992.elements[11] = ((closureN)self_7314136)->elements[10];
+-c_7325992.elements[12] = ((closureN)self_7314136)->elements[11];
+-c_7325992.elements[13] = ((closureN)self_7314136)->elements[12];
+-c_7325992.elements[14] = ((closureN)self_7314136)->elements[13];
+-c_7325992.elements[15] = ((closureN)self_7314136)->elements[14];
+-c_7325992.elements[16] = ((closureN)self_7314136)->elements[15];
+-c_7325992.elements[17] = ((closureN)self_7314136)->elements[16];
+-c_7325992.elements[18] = ((closureN)self_7314136)->elements[17];
+-c_7325992.elements[19] = ((closureN)self_7314136)->elements[18];
+-c_7325992.elements[20] = ((closureN)self_7314136)->elements[19];
+-c_7325992.elements[21] = ((closureN)self_7314136)->elements[20];
+-
+-return_closcall2(data, ((closureN)self_7314136)->elements[19], &c_7325992, quote_let);;
+-}
+-
+-static void __lambda_1143(void *data, object self_7314137, int argc, object *args) /* object self_7314137, object r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945 */
+- {
+- object r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945 = args[0];
+-
+-closureN_type c_7325995;
+-object e_7326232 [23];
+-c_7325995.hdr.mark = gc_color_red;
+- c_7325995.hdr.grayed = 0;
+-c_7325995.tag = closureN_tag;
+- c_7325995.fn = (function_type)__lambda_1144;
+-c_7325995.num_args = 1;
+-c_7325995.num_elements = 23;
+-c_7325995.elements = (object *)e_7326232;
+-c_7325995.elements[0] = ((closureN)self_7314137)->elements[0];
+-c_7325995.elements[1] = ((closureN)self_7314137)->elements[1];
+-c_7325995.elements[2] = ((closureN)self_7314137)->elements[2];
+-c_7325995.elements[3] = ((closureN)self_7314137)->elements[3];
+-c_7325995.elements[4] = ((closureN)self_7314137)->elements[4];
+-c_7325995.elements[5] = r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945;
+-c_7325995.elements[6] = ((closureN)self_7314137)->elements[5];
+-c_7325995.elements[7] = ((closureN)self_7314137)->elements[6];
+-c_7325995.elements[8] = ((closureN)self_7314137)->elements[7];
+-c_7325995.elements[9] = ((closureN)self_7314137)->elements[8];
+-c_7325995.elements[10] = ((closureN)self_7314137)->elements[9];
+-c_7325995.elements[11] = ((closureN)self_7314137)->elements[10];
+-c_7325995.elements[12] = ((closureN)self_7314137)->elements[11];
+-c_7325995.elements[13] = ((closureN)self_7314137)->elements[12];
+-c_7325995.elements[14] = ((closureN)self_7314137)->elements[13];
+-c_7325995.elements[15] = ((closureN)self_7314137)->elements[14];
+-c_7325995.elements[16] = ((closureN)self_7314137)->elements[15];
+-c_7325995.elements[17] = ((closureN)self_7314137)->elements[16];
+-c_7325995.elements[18] = ((closureN)self_7314137)->elements[17];
+-c_7325995.elements[19] = ((closureN)self_7314137)->elements[18];
+-c_7325995.elements[20] = ((closureN)self_7314137)->elements[19];
+-c_7325995.elements[21] = ((closureN)self_7314137)->elements[20];
+-c_7325995.elements[22] = ((closureN)self_7314137)->elements[21];
+-
+-return_closcall2(data, ((closureN)self_7314137)->elements[20], &c_7325995, quote_res);;
+-}
+-
+-static void __lambda_1144(void *data, object self_7314138, int argc, object *args) /* object self_7314138, object r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946 */
+- {
+- object r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946 = args[0];
+-
+-closureN_type c_7325998;
+-object e_7326231 [24];
+-c_7325998.hdr.mark = gc_color_red;
+- c_7325998.hdr.grayed = 0;
+-c_7325998.tag = closureN_tag;
+- c_7325998.fn = (function_type)__lambda_1145;
+-c_7325998.num_args = 1;
+-c_7325998.num_elements = 24;
+-c_7325998.elements = (object *)e_7326231;
+-c_7325998.elements[0] = ((closureN)self_7314138)->elements[0];
+-c_7325998.elements[1] = ((closureN)self_7314138)->elements[1];
+-c_7325998.elements[2] = ((closureN)self_7314138)->elements[2];
+-c_7325998.elements[3] = ((closureN)self_7314138)->elements[3];
+-c_7325998.elements[4] = ((closureN)self_7314138)->elements[4];
+-c_7325998.elements[5] = ((closureN)self_7314138)->elements[5];
+-c_7325998.elements[6] = r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946;
+-c_7325998.elements[7] = ((closureN)self_7314138)->elements[6];
+-c_7325998.elements[8] = ((closureN)self_7314138)->elements[7];
+-c_7325998.elements[9] = ((closureN)self_7314138)->elements[8];
+-c_7325998.elements[10] = ((closureN)self_7314138)->elements[9];
+-c_7325998.elements[11] = ((closureN)self_7314138)->elements[10];
+-c_7325998.elements[12] = ((closureN)self_7314138)->elements[11];
+-c_7325998.elements[13] = ((closureN)self_7314138)->elements[12];
+-c_7325998.elements[14] = ((closureN)self_7314138)->elements[13];
+-c_7325998.elements[15] = ((closureN)self_7314138)->elements[14];
+-c_7325998.elements[16] = ((closureN)self_7314138)->elements[15];
+-c_7325998.elements[17] = ((closureN)self_7314138)->elements[16];
+-c_7325998.elements[18] = ((closureN)self_7314138)->elements[17];
+-c_7325998.elements[19] = ((closureN)self_7314138)->elements[18];
+-c_7325998.elements[20] = ((closureN)self_7314138)->elements[19];
+-c_7325998.elements[21] = ((closureN)self_7314138)->elements[20];
+-c_7325998.elements[22] = ((closureN)self_7314138)->elements[21];
+-c_7325998.elements[23] = ((closureN)self_7314138)->elements[22];
+-
+-return_closcall2(data, ((closureN)self_7314138)->elements[21], &c_7325998, quote_begin);;
+-}
+-
+-static void __lambda_1145(void *data, object self_7314139, int argc, object *args) /* object self_7314139, object r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947 */
+- {
+- object r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947 = args[0];
+-
+-closureN_type c_7326001;
+-object e_7326230 [25];
+-c_7326001.hdr.mark = gc_color_red;
+- c_7326001.hdr.grayed = 0;
+-c_7326001.tag = closureN_tag;
+- c_7326001.fn = (function_type)__lambda_1146;
+-c_7326001.num_args = 1;
+-c_7326001.num_elements = 25;
+-c_7326001.elements = (object *)e_7326230;
+-c_7326001.elements[0] = ((closureN)self_7314139)->elements[0];
+-c_7326001.elements[1] = ((closureN)self_7314139)->elements[1];
+-c_7326001.elements[2] = ((closureN)self_7314139)->elements[2];
+-c_7326001.elements[3] = ((closureN)self_7314139)->elements[3];
+-c_7326001.elements[4] = ((closureN)self_7314139)->elements[4];
+-c_7326001.elements[5] = ((closureN)self_7314139)->elements[5];
+-c_7326001.elements[6] = ((closureN)self_7314139)->elements[6];
+-c_7326001.elements[7] = r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947;
+-c_7326001.elements[8] = ((closureN)self_7314139)->elements[7];
+-c_7326001.elements[9] = ((closureN)self_7314139)->elements[8];
+-c_7326001.elements[10] = ((closureN)self_7314139)->elements[9];
+-c_7326001.elements[11] = ((closureN)self_7314139)->elements[10];
+-c_7326001.elements[12] = ((closureN)self_7314139)->elements[11];
+-c_7326001.elements[13] = ((closureN)self_7314139)->elements[12];
+-c_7326001.elements[14] = ((closureN)self_7314139)->elements[13];
+-c_7326001.elements[15] = ((closureN)self_7314139)->elements[14];
+-c_7326001.elements[16] = ((closureN)self_7314139)->elements[15];
+-c_7326001.elements[17] = ((closureN)self_7314139)->elements[16];
+-c_7326001.elements[18] = ((closureN)self_7314139)->elements[17];
+-c_7326001.elements[19] = ((closureN)self_7314139)->elements[18];
+-c_7326001.elements[20] = ((closureN)self_7314139)->elements[19];
+-c_7326001.elements[21] = ((closureN)self_7314139)->elements[20];
+-c_7326001.elements[22] = ((closureN)self_7314139)->elements[21];
+-c_7326001.elements[23] = ((closureN)self_7314139)->elements[22];
+-c_7326001.elements[24] = ((closureN)self_7314139)->elements[23];
+-
+-return_closcall2(data, ((closureN)self_7314139)->elements[22], &c_7326001, quote_guard_91k);;
+-}
+-
+-static void __lambda_1146(void *data, object self_7314140, int argc, object *args) /* object self_7314140, object r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083 */
+- {
+- object r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083 = args[0];
+-
+-closureN_type c_7326004;
+-object e_7326229 [26];
+-c_7326004.hdr.mark = gc_color_red;
+- c_7326004.hdr.grayed = 0;
+-c_7326004.tag = closureN_tag;
+- c_7326004.fn = (function_type)__lambda_1147;
+-c_7326004.num_args = 1;
+-c_7326004.num_elements = 26;
+-c_7326004.elements = (object *)e_7326229;
+-c_7326004.elements[0] = ((closureN)self_7314140)->elements[0];
+-c_7326004.elements[1] = ((closureN)self_7314140)->elements[1];
+-c_7326004.elements[2] = ((closureN)self_7314140)->elements[2];
+-c_7326004.elements[3] = ((closureN)self_7314140)->elements[3];
+-c_7326004.elements[4] = ((closureN)self_7314140)->elements[4];
+-c_7326004.elements[5] = ((closureN)self_7314140)->elements[5];
+-c_7326004.elements[6] = r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083;
+-c_7326004.elements[7] = ((closureN)self_7314140)->elements[6];
+-c_7326004.elements[8] = ((closureN)self_7314140)->elements[7];
+-c_7326004.elements[9] = ((closureN)self_7314140)->elements[8];
+-c_7326004.elements[10] = ((closureN)self_7314140)->elements[9];
+-c_7326004.elements[11] = ((closureN)self_7314140)->elements[10];
+-c_7326004.elements[12] = ((closureN)self_7314140)->elements[11];
+-c_7326004.elements[13] = ((closureN)self_7314140)->elements[12];
+-c_7326004.elements[14] = ((closureN)self_7314140)->elements[13];
+-c_7326004.elements[15] = ((closureN)self_7314140)->elements[14];
+-c_7326004.elements[16] = ((closureN)self_7314140)->elements[15];
+-c_7326004.elements[17] = ((closureN)self_7314140)->elements[16];
+-c_7326004.elements[18] = ((closureN)self_7314140)->elements[17];
+-c_7326004.elements[19] = ((closureN)self_7314140)->elements[18];
+-c_7326004.elements[20] = ((closureN)self_7314140)->elements[19];
+-c_7326004.elements[21] = ((closureN)self_7314140)->elements[20];
+-c_7326004.elements[22] = ((closureN)self_7314140)->elements[21];
+-c_7326004.elements[23] = ((closureN)self_7314140)->elements[22];
+-c_7326004.elements[24] = ((closureN)self_7314140)->elements[23];
+-c_7326004.elements[25] = ((closureN)self_7314140)->elements[24];
+-
+-return_closcall2(data, ((closureN)self_7314140)->elements[23], &c_7326004, quote_lambda);;
+-}
+-
+-static void __lambda_1147(void *data, object self_7314141, int argc, object *args) /* object self_7314141, object r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084 */
+- {
+- object r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084 = args[0];
+-
+-closureN_type c_7326007;
+-object e_7326228 [26];
+-c_7326007.hdr.mark = gc_color_red;
+- c_7326007.hdr.grayed = 0;
+-c_7326007.tag = closureN_tag;
+- c_7326007.fn = (function_type)__lambda_1148;
+-c_7326007.num_args = 1;
+-c_7326007.num_elements = 26;
+-c_7326007.elements = (object *)e_7326228;
+-c_7326007.elements[0] = ((closureN)self_7314141)->elements[0];
+-c_7326007.elements[1] = ((closureN)self_7314141)->elements[1];
+-c_7326007.elements[2] = ((closureN)self_7314141)->elements[2];
+-c_7326007.elements[3] = ((closureN)self_7314141)->elements[3];
+-c_7326007.elements[4] = ((closureN)self_7314141)->elements[4];
+-c_7326007.elements[5] = ((closureN)self_7314141)->elements[5];
+-c_7326007.elements[6] = ((closureN)self_7314141)->elements[6];
+-c_7326007.elements[7] = r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084;
+-c_7326007.elements[8] = ((closureN)self_7314141)->elements[7];
+-c_7326007.elements[9] = ((closureN)self_7314141)->elements[8];
+-c_7326007.elements[10] = ((closureN)self_7314141)->elements[9];
+-c_7326007.elements[11] = ((closureN)self_7314141)->elements[10];
+-c_7326007.elements[12] = ((closureN)self_7314141)->elements[11];
+-c_7326007.elements[13] = ((closureN)self_7314141)->elements[12];
+-c_7326007.elements[14] = ((closureN)self_7314141)->elements[13];
+-c_7326007.elements[15] = ((closureN)self_7314141)->elements[14];
+-c_7326007.elements[16] = ((closureN)self_7314141)->elements[15];
+-c_7326007.elements[17] = ((closureN)self_7314141)->elements[16];
+-c_7326007.elements[18] = ((closureN)self_7314141)->elements[17];
+-c_7326007.elements[19] = ((closureN)self_7314141)->elements[18];
+-c_7326007.elements[20] = ((closureN)self_7314141)->elements[19];
+-c_7326007.elements[21] = ((closureN)self_7314141)->elements[20];
+-c_7326007.elements[22] = ((closureN)self_7314141)->elements[21];
+-c_7326007.elements[23] = ((closureN)self_7314141)->elements[22];
+-c_7326007.elements[24] = ((closureN)self_7314141)->elements[23];
+-c_7326007.elements[25] = ((closureN)self_7314141)->elements[25];
+-
+-return_closcall2(data, ((closureN)self_7314141)->elements[24], &c_7326007, quote_res);;
+-}
+-
+-static void __lambda_1148(void *data, object self_7314142, int argc, object *args) /* object self_7314142, object r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085 */
+- {
+- object r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085 = args[0];
+-
+-pair_type local_7326012;
+-
+-pair_type local_7326015;
+-
+-pair_type local_7326018;
+-
+-pair_type local_7326022;
+-
+-pair_type local_7326025;
+-
+-pair_type local_7326029;
+-
+-pair_type local_7326032;
+-
+-pair_type local_7326036;
+-
+-pair_type local_7326039;
+-
+-pair_type local_7326043;
+-
+-pair_type local_7326046;
+-
+-pair_type local_7326050;
+-
+-pair_type local_7326053;
+-
+-pair_type local_7326057;
+-
+-pair_type local_7326060;
+-
+-pair_type local_7326063;
+-
+-pair_type local_7326067;
+-
+-pair_type local_7326070;
++closureN_type c_7323476;
++object e_7323793 [3];
++c_7323476.hdr.mark = gc_color_red;
++ c_7323476.hdr.grayed = 0;
++c_7323476.tag = closureN_tag;
++ c_7323476.fn = (function_type)__lambda_1077;
++c_7323476.num_args = 1;
++c_7323476.num_elements = 3;
++c_7323476.elements = (object *)e_7323793;
++c_7323476.elements[0] = k_736545;
++c_7323476.elements[1] = ((closureN)self_7312817)->elements[0];
++c_7323476.elements[2] = ((closureN)self_7312817)->elements[1];
+
+-pair_type local_7326074;
++return_closcall2(data, ((closureN)self_7312817)->elements[0], &c_7323476, quote_call_91with_91current_91continuation);
++} else {
++ return_direct_with_clo1(data, k_736545, (((closure) k_736545)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736545, (((closure) k_736545)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736545, (((closure) k_736545)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736545, (((closure) k_736545)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736545, (((closure) k_736545)->fn), boolean_f);}
++;;
++}
+
+-pair_type local_7326077;
++static void __lambda_1077(void *data, object self_7312818, int argc, object *args) /* object self_7312818, object r_736561 */
++ {
++ object r_736561 = args[0];
++
++closureN_type c_7323479;
++object e_7323792 [4];
++c_7323479.hdr.mark = gc_color_red;
++ c_7323479.hdr.grayed = 0;
++c_7323479.tag = closureN_tag;
++ c_7323479.fn = (function_type)__lambda_1078;
++c_7323479.num_args = 1;
++c_7323479.num_elements = 4;
++c_7323479.elements = (object *)e_7323792;
++c_7323479.elements[0] = ((closureN)self_7312818)->elements[0];
++c_7323479.elements[1] = r_736561;
++c_7323479.elements[2] = ((closureN)self_7312818)->elements[1];
++c_7323479.elements[3] = ((closureN)self_7312818)->elements[2];
+
+-pair_type local_7326081;
++return_closcall2(data, ((closureN)self_7312818)->elements[1], &c_7323479, quote_lambda);;
++}
+
+-pair_type local_7326084;
++static void __lambda_1078(void *data, object self_7312819, int argc, object *args) /* object self_7312819, object r_736567 */
++ {
++ object r_736567 = args[0];
++
++closureN_type c_7323482;
++object e_7323791 [5];
++c_7323482.hdr.mark = gc_color_red;
++ c_7323482.hdr.grayed = 0;
++c_7323482.tag = closureN_tag;
++ c_7323482.fn = (function_type)__lambda_1079;
++c_7323482.num_args = 1;
++c_7323482.num_elements = 5;
++c_7323482.elements = (object *)e_7323791;
++c_7323482.elements[0] = ((closureN)self_7312819)->elements[0];
++c_7323482.elements[1] = ((closureN)self_7312819)->elements[1];
++c_7323482.elements[2] = r_736567;
++c_7323482.elements[3] = ((closureN)self_7312819)->elements[2];
++c_7323482.elements[4] = ((closureN)self_7312819)->elements[3];
++
++return_closcall2(data, ((closureN)self_7312819)->elements[2], &c_7323482, quote_guard_91k);;
++}
++
++static void __lambda_1079(void *data, object self_7312820, int argc, object *args) /* object self_7312820, object r_736744 */
++ {
++ object r_736744 = args[0];
++
++closureN_type c_7323485;
++object e_7323790 [6];
++c_7323485.hdr.mark = gc_color_red;
++ c_7323485.hdr.grayed = 0;
++c_7323485.tag = closureN_tag;
++ c_7323485.fn = (function_type)__lambda_1080;
++c_7323485.num_args = 1;
++c_7323485.num_elements = 6;
++c_7323485.elements = (object *)e_7323790;
++c_7323485.elements[0] = ((closureN)self_7312820)->elements[0];
++c_7323485.elements[1] = ((closureN)self_7312820)->elements[1];
++c_7323485.elements[2] = ((closureN)self_7312820)->elements[2];
++c_7323485.elements[3] = r_736744;
++c_7323485.elements[4] = ((closureN)self_7312820)->elements[3];
++c_7323485.elements[5] = ((closureN)self_7312820)->elements[4];
++
++return_closcall2(data, ((closureN)self_7312820)->elements[3], &c_7323485, quote_with_91exception_91handler);;
++}
++
++static void __lambda_1080(void *data, object self_7312821, int argc, object *args) /* object self_7312821, object r_736576_738121 */
++ {
++ object r_736576_738121 = args[0];
++
++closureN_type c_7323488;
++object e_7323789 [7];
++c_7323488.hdr.mark = gc_color_red;
++ c_7323488.hdr.grayed = 0;
++c_7323488.tag = closureN_tag;
++ c_7323488.fn = (function_type)__lambda_1081;
++c_7323488.num_args = 1;
++c_7323488.num_elements = 7;
++c_7323488.elements = (object *)e_7323789;
++c_7323488.elements[0] = ((closureN)self_7312821)->elements[0];
++c_7323488.elements[1] = ((closureN)self_7312821)->elements[1];
++c_7323488.elements[2] = ((closureN)self_7312821)->elements[2];
++c_7323488.elements[3] = r_736576_738121;
++c_7323488.elements[4] = ((closureN)self_7312821)->elements[3];
++c_7323488.elements[5] = ((closureN)self_7312821)->elements[4];
++c_7323488.elements[6] = ((closureN)self_7312821)->elements[5];
++
++return_closcall2(data, ((closureN)self_7312821)->elements[4], &c_7323488, quote_lambda);;
++}
++
++static void __lambda_1081(void *data, object self_7312822, int argc, object *args) /* object self_7312822, object r_736638_738122 */
++ {
++ object r_736638_738122 = args[0];
++
++closureN_type c_7323491;
++object e_7323788 [8];
++c_7323491.hdr.mark = gc_color_red;
++ c_7323491.hdr.grayed = 0;
++c_7323491.tag = closureN_tag;
++ c_7323491.fn = (function_type)__lambda_1082;
++c_7323491.num_args = 1;
++c_7323491.num_elements = 8;
++c_7323491.elements = (object *)e_7323788;
++c_7323491.elements[0] = ((closureN)self_7312822)->elements[0];
++c_7323491.elements[1] = ((closureN)self_7312822)->elements[1];
++c_7323491.elements[2] = ((closureN)self_7312822)->elements[2];
++c_7323491.elements[3] = ((closureN)self_7312822)->elements[3];
++c_7323491.elements[4] = r_736638_738122;
++c_7323491.elements[5] = ((closureN)self_7312822)->elements[4];
++c_7323491.elements[6] = ((closureN)self_7312822)->elements[5];
++c_7323491.elements[7] = ((closureN)self_7312822)->elements[6];
++
++return_closcall2(data, ((closureN)self_7312822)->elements[5], &c_7323491, quote_condition);;
++}
++
++static void __lambda_1082(void *data, object self_7312823, int argc, object *args) /* object self_7312823, object r_736738_738123 */
++ {
++ object r_736738_738123 = args[0];
++
++closureN_type c_7323494;
++object e_7323787 [9];
++c_7323494.hdr.mark = gc_color_red;
++ c_7323494.hdr.grayed = 0;
++c_7323494.tag = closureN_tag;
++ c_7323494.fn = (function_type)__lambda_1083;
++c_7323494.num_args = 1;
++c_7323494.num_elements = 9;
++c_7323494.elements = (object *)e_7323787;
++c_7323494.elements[0] = ((closureN)self_7312823)->elements[0];
++c_7323494.elements[1] = ((closureN)self_7312823)->elements[1];
++c_7323494.elements[2] = ((closureN)self_7312823)->elements[2];
++c_7323494.elements[3] = ((closureN)self_7312823)->elements[3];
++c_7323494.elements[4] = ((closureN)self_7312823)->elements[4];
++c_7323494.elements[5] = r_736738_738123;
++c_7323494.elements[6] = ((closureN)self_7312823)->elements[5];
++c_7323494.elements[7] = ((closureN)self_7312823)->elements[6];
++c_7323494.elements[8] = ((closureN)self_7312823)->elements[7];
++
++return_closcall2(data, ((closureN)self_7312823)->elements[6], &c_7323494, quote_call_91with_91current_91continuation);;
++}
++
++static void __lambda_1083(void *data, object self_7312824, int argc, object *args) /* object self_7312824, object r_736650_738125_738200 */
++ {
++ object r_736650_738125_738200 = args[0];
++
++closureN_type c_7323497;
++object e_7323786 [10];
++c_7323497.hdr.mark = gc_color_red;
++ c_7323497.hdr.grayed = 0;
++c_7323497.tag = closureN_tag;
++ c_7323497.fn = (function_type)__lambda_1084;
++c_7323497.num_args = 1;
++c_7323497.num_elements = 10;
++c_7323497.elements = (object *)e_7323786;
++c_7323497.elements[0] = ((closureN)self_7312824)->elements[0];
++c_7323497.elements[1] = ((closureN)self_7312824)->elements[1];
++c_7323497.elements[2] = ((closureN)self_7312824)->elements[2];
++c_7323497.elements[3] = ((closureN)self_7312824)->elements[3];
++c_7323497.elements[4] = ((closureN)self_7312824)->elements[4];
++c_7323497.elements[5] = r_736650_738125_738200;
++c_7323497.elements[6] = ((closureN)self_7312824)->elements[5];
++c_7323497.elements[7] = ((closureN)self_7312824)->elements[6];
++c_7323497.elements[8] = ((closureN)self_7312824)->elements[7];
++c_7323497.elements[9] = ((closureN)self_7312824)->elements[8];
++
++return_closcall2(data, ((closureN)self_7312824)->elements[7], &c_7323497, quote_lambda);;
++}
++
++static void __lambda_1084(void *data, object self_7312825, int argc, object *args) /* object self_7312825, object r_736656_738126_738201 */
++ {
++ object r_736656_738126_738201 = args[0];
++
++closureN_type c_7323500;
++object e_7323785 [11];
++c_7323500.hdr.mark = gc_color_red;
++ c_7323500.hdr.grayed = 0;
++c_7323500.tag = closureN_tag;
++ c_7323500.fn = (function_type)__lambda_1085;
++c_7323500.num_args = 1;
++c_7323500.num_elements = 11;
++c_7323500.elements = (object *)e_7323785;
++c_7323500.elements[0] = ((closureN)self_7312825)->elements[0];
++c_7323500.elements[1] = ((closureN)self_7312825)->elements[1];
++c_7323500.elements[2] = ((closureN)self_7312825)->elements[2];
++c_7323500.elements[3] = ((closureN)self_7312825)->elements[3];
++c_7323500.elements[4] = ((closureN)self_7312825)->elements[4];
++c_7323500.elements[5] = ((closureN)self_7312825)->elements[5];
++c_7323500.elements[6] = r_736656_738126_738201;
++c_7323500.elements[7] = ((closureN)self_7312825)->elements[6];
++c_7323500.elements[8] = ((closureN)self_7312825)->elements[7];
++c_7323500.elements[9] = ((closureN)self_7312825)->elements[8];
++c_7323500.elements[10] = ((closureN)self_7312825)->elements[9];
++
++return_closcall2(data, ((closureN)self_7312825)->elements[8], &c_7323500, quote_handler_91k);;
++}
++
++static void __lambda_1085(void *data, object self_7312826, int argc, object *args) /* object self_7312826, object r_736732_738127_738202 */
++ {
++ object r_736732_738127_738202 = args[0];
++
++closureN_type c_7323503;
++object e_7323784 [12];
++c_7323503.hdr.mark = gc_color_red;
++ c_7323503.hdr.grayed = 0;
++c_7323503.tag = closureN_tag;
++ c_7323503.fn = (function_type)__lambda_1086;
++c_7323503.num_args = 1;
++c_7323503.num_elements = 12;
++c_7323503.elements = (object *)e_7323784;
++c_7323503.elements[0] = ((closureN)self_7312826)->elements[0];
++c_7323503.elements[1] = ((closureN)self_7312826)->elements[1];
++c_7323503.elements[2] = ((closureN)self_7312826)->elements[2];
++c_7323503.elements[3] = ((closureN)self_7312826)->elements[3];
++c_7323503.elements[4] = ((closureN)self_7312826)->elements[4];
++c_7323503.elements[5] = ((closureN)self_7312826)->elements[5];
++c_7323503.elements[6] = ((closureN)self_7312826)->elements[6];
++c_7323503.elements[7] = r_736732_738127_738202;
++c_7323503.elements[8] = ((closureN)self_7312826)->elements[7];
++c_7323503.elements[9] = ((closureN)self_7312826)->elements[8];
++c_7323503.elements[10] = ((closureN)self_7312826)->elements[9];
++c_7323503.elements[11] = ((closureN)self_7312826)->elements[10];
++
++return_closcall2(data, ((closureN)self_7312826)->elements[9], &c_7323503, quote_guard_91k);;
++}
++
++static void __lambda_1086(void *data, object self_7312827, int argc, object *args) /* object self_7312827, object r_736665_738129_738204_738275 */
++ {
++ object r_736665_738129_738204_738275 = args[0];
++
++closureN_type c_7323506;
++object e_7323783 [13];
++c_7323506.hdr.mark = gc_color_red;
++ c_7323506.hdr.grayed = 0;
++c_7323506.tag = closureN_tag;
++ c_7323506.fn = (function_type)__lambda_1087;
++c_7323506.num_args = 1;
++c_7323506.num_elements = 13;
++c_7323506.elements = (object *)e_7323783;
++c_7323506.elements[0] = ((closureN)self_7312827)->elements[0];
++c_7323506.elements[1] = ((closureN)self_7312827)->elements[1];
++c_7323506.elements[2] = ((closureN)self_7312827)->elements[2];
++c_7323506.elements[3] = ((closureN)self_7312827)->elements[3];
++c_7323506.elements[4] = ((closureN)self_7312827)->elements[4];
++c_7323506.elements[5] = ((closureN)self_7312827)->elements[5];
++c_7323506.elements[6] = ((closureN)self_7312827)->elements[6];
++c_7323506.elements[7] = r_736665_738129_738204_738275;
++c_7323506.elements[8] = ((closureN)self_7312827)->elements[7];
++c_7323506.elements[9] = ((closureN)self_7312827)->elements[8];
++c_7323506.elements[10] = ((closureN)self_7312827)->elements[9];
++c_7323506.elements[11] = ((closureN)self_7312827)->elements[10];
++c_7323506.elements[12] = ((closureN)self_7312827)->elements[11];
++
++return_closcall2(data, ((closureN)self_7312827)->elements[10], &c_7323506, quote_lambda);;
++}
++
++static void __lambda_1087(void *data, object self_7312828, int argc, object *args) /* object self_7312828, object r_736671_738130_738205_738276 */
++ {
++ object r_736671_738130_738205_738276 = args[0];
++
++closureN_type c_7323509;
++object e_7323782 [14];
++c_7323509.hdr.mark = gc_color_red;
++ c_7323509.hdr.grayed = 0;
++c_7323509.tag = closureN_tag;
++ c_7323509.fn = (function_type)__lambda_1088;
++c_7323509.num_args = 1;
++c_7323509.num_elements = 14;
++c_7323509.elements = (object *)e_7323782;
++c_7323509.elements[0] = ((closureN)self_7312828)->elements[0];
++c_7323509.elements[1] = ((closureN)self_7312828)->elements[1];
++c_7323509.elements[2] = ((closureN)self_7312828)->elements[2];
++c_7323509.elements[3] = ((closureN)self_7312828)->elements[3];
++c_7323509.elements[4] = ((closureN)self_7312828)->elements[4];
++c_7323509.elements[5] = ((closureN)self_7312828)->elements[5];
++c_7323509.elements[6] = ((closureN)self_7312828)->elements[6];
++c_7323509.elements[7] = ((closureN)self_7312828)->elements[7];
++c_7323509.elements[8] = r_736671_738130_738205_738276;
++c_7323509.elements[9] = ((closureN)self_7312828)->elements[8];
++c_7323509.elements[10] = ((closureN)self_7312828)->elements[9];
++c_7323509.elements[11] = ((closureN)self_7312828)->elements[10];
++c_7323509.elements[12] = ((closureN)self_7312828)->elements[11];
++c_7323509.elements[13] = ((closureN)self_7312828)->elements[12];
++
++return_closcall2(data, ((closureN)self_7312828)->elements[11], &c_7323509, quote_let);;
++}
++
++static void __lambda_1088(void *data, object self_7312829, int argc, object *args) /* object self_7312829, object r_736680_738131_738206_738277 */
++ {
++ object r_736680_738131_738206_738277 = args[0];
++
++closureN_type c_7323512;
++object e_7323781 [15];
++c_7323512.hdr.mark = gc_color_red;
++ c_7323512.hdr.grayed = 0;
++c_7323512.tag = closureN_tag;
++ c_7323512.fn = (function_type)__lambda_1089;
++c_7323512.num_args = 1;
++c_7323512.num_elements = 15;
++c_7323512.elements = (object *)e_7323781;
++c_7323512.elements[0] = ((closureN)self_7312829)->elements[0];
++c_7323512.elements[1] = ((closureN)self_7312829)->elements[1];
++c_7323512.elements[2] = ((closureN)self_7312829)->elements[2];
++c_7323512.elements[3] = ((closureN)self_7312829)->elements[3];
++c_7323512.elements[4] = ((closureN)self_7312829)->elements[4];
++c_7323512.elements[5] = ((closureN)self_7312829)->elements[5];
++c_7323512.elements[6] = ((closureN)self_7312829)->elements[6];
++c_7323512.elements[7] = ((closureN)self_7312829)->elements[7];
++c_7323512.elements[8] = ((closureN)self_7312829)->elements[8];
++c_7323512.elements[9] = r_736680_738131_738206_738277;
++c_7323512.elements[10] = ((closureN)self_7312829)->elements[9];
++c_7323512.elements[11] = ((closureN)self_7312829)->elements[10];
++c_7323512.elements[12] = ((closureN)self_7312829)->elements[11];
++c_7323512.elements[13] = ((closureN)self_7312829)->elements[12];
++c_7323512.elements[14] = ((closureN)self_7312829)->elements[13];
++
++return_closcall2(data, ((closureN)self_7312829)->elements[12], &c_7323512, quote_condition);;
++}
++
++static void __lambda_1089(void *data, object self_7312830, int argc, object *args) /* object self_7312830, object r_736725_738132_738207_738278 */
++ {
++ object r_736725_738132_738207_738278 = args[0];
++
++closureN_type c_7323515;
++object e_7323780 [16];
++c_7323515.hdr.mark = gc_color_red;
++ c_7323515.hdr.grayed = 0;
++c_7323515.tag = closureN_tag;
++ c_7323515.fn = (function_type)__lambda_1090;
++c_7323515.num_args = 1;
++c_7323515.num_elements = 16;
++c_7323515.elements = (object *)e_7323780;
++c_7323515.elements[0] = ((closureN)self_7312830)->elements[0];
++c_7323515.elements[1] = ((closureN)self_7312830)->elements[1];
++c_7323515.elements[2] = ((closureN)self_7312830)->elements[2];
++c_7323515.elements[3] = ((closureN)self_7312830)->elements[3];
++c_7323515.elements[4] = ((closureN)self_7312830)->elements[4];
++c_7323515.elements[5] = ((closureN)self_7312830)->elements[5];
++c_7323515.elements[6] = ((closureN)self_7312830)->elements[6];
++c_7323515.elements[7] = ((closureN)self_7312830)->elements[7];
++c_7323515.elements[8] = ((closureN)self_7312830)->elements[8];
++c_7323515.elements[9] = ((closureN)self_7312830)->elements[9];
++c_7323515.elements[10] = r_736725_738132_738207_738278;
++c_7323515.elements[11] = ((closureN)self_7312830)->elements[10];
++c_7323515.elements[12] = ((closureN)self_7312830)->elements[11];
++c_7323515.elements[13] = ((closureN)self_7312830)->elements[12];
++c_7323515.elements[14] = ((closureN)self_7312830)->elements[13];
++c_7323515.elements[15] = ((closureN)self_7312830)->elements[14];
++
++return_closcall2(data, ((closureN)self_7312830)->elements[13], &c_7323515, quote_guard_91aux);;
++}
++
++static void __lambda_1090(void *data, object self_7312831, int argc, object *args) /* object self_7312831, object r_736689_738136_738211_738282_738348_738413_738477 */
++ {
++ object r_736689_738136_738211_738282_738348_738413_738477 = args[0];
++
++closureN_type c_7323518;
++object e_7323779 [17];
++c_7323518.hdr.mark = gc_color_red;
++ c_7323518.hdr.grayed = 0;
++c_7323518.tag = closureN_tag;
++ c_7323518.fn = (function_type)__lambda_1091;
++c_7323518.num_args = 1;
++c_7323518.num_elements = 17;
++c_7323518.elements = (object *)e_7323779;
++c_7323518.elements[0] = ((closureN)self_7312831)->elements[0];
++c_7323518.elements[1] = ((closureN)self_7312831)->elements[1];
++c_7323518.elements[2] = ((closureN)self_7312831)->elements[2];
++c_7323518.elements[3] = ((closureN)self_7312831)->elements[3];
++c_7323518.elements[4] = ((closureN)self_7312831)->elements[4];
++c_7323518.elements[5] = ((closureN)self_7312831)->elements[5];
++c_7323518.elements[6] = ((closureN)self_7312831)->elements[6];
++c_7323518.elements[7] = ((closureN)self_7312831)->elements[7];
++c_7323518.elements[8] = ((closureN)self_7312831)->elements[8];
++c_7323518.elements[9] = ((closureN)self_7312831)->elements[9];
++c_7323518.elements[10] = r_736689_738136_738211_738282_738348_738413_738477;
++c_7323518.elements[11] = ((closureN)self_7312831)->elements[10];
++c_7323518.elements[12] = ((closureN)self_7312831)->elements[11];
++c_7323518.elements[13] = ((closureN)self_7312831)->elements[12];
++c_7323518.elements[14] = ((closureN)self_7312831)->elements[13];
++c_7323518.elements[15] = ((closureN)self_7312831)->elements[14];
++c_7323518.elements[16] = ((closureN)self_7312831)->elements[15];
++
++return_closcall2(data, ((closureN)self_7312831)->elements[14], &c_7323518, quote_handler_91k);;
++}
++
++static void __lambda_1091(void *data, object self_7312832, int argc, object *args) /* object self_7312832, object r_736694_738137_738212_738283_738349_738414_738478 */
++ {
++ object r_736694_738137_738212_738283_738349_738414_738478 = args[0];
++
++closureN_type c_7323521;
++object e_7323778 [18];
++c_7323521.hdr.mark = gc_color_red;
++ c_7323521.hdr.grayed = 0;
++c_7323521.tag = closureN_tag;
++ c_7323521.fn = (function_type)__lambda_1092;
++c_7323521.num_args = 1;
++c_7323521.num_elements = 18;
++c_7323521.elements = (object *)e_7323778;
++c_7323521.elements[0] = ((closureN)self_7312832)->elements[0];
++c_7323521.elements[1] = ((closureN)self_7312832)->elements[1];
++c_7323521.elements[2] = ((closureN)self_7312832)->elements[2];
++c_7323521.elements[3] = ((closureN)self_7312832)->elements[3];
++c_7323521.elements[4] = ((closureN)self_7312832)->elements[4];
++c_7323521.elements[5] = ((closureN)self_7312832)->elements[5];
++c_7323521.elements[6] = ((closureN)self_7312832)->elements[6];
++c_7323521.elements[7] = ((closureN)self_7312832)->elements[7];
++c_7323521.elements[8] = ((closureN)self_7312832)->elements[8];
++c_7323521.elements[9] = ((closureN)self_7312832)->elements[9];
++c_7323521.elements[10] = ((closureN)self_7312832)->elements[10];
++c_7323521.elements[11] = r_736694_738137_738212_738283_738349_738414_738478;
++c_7323521.elements[12] = ((closureN)self_7312832)->elements[11];
++c_7323521.elements[13] = ((closureN)self_7312832)->elements[12];
++c_7323521.elements[14] = ((closureN)self_7312832)->elements[13];
++c_7323521.elements[15] = ((closureN)self_7312832)->elements[14];
++c_7323521.elements[16] = ((closureN)self_7312832)->elements[15];
++c_7323521.elements[17] = ((closureN)self_7312832)->elements[16];
++
++return_closcall2(data, ((closureN)self_7312832)->elements[15], &c_7323521, quote_lambda);;
++}
++
++static void __lambda_1092(void *data, object self_7312833, int argc, object *args) /* object self_7312833, object r_736700_738138_738213_738284_738350_738415_738479 */
++ {
++ object r_736700_738138_738213_738284_738350_738415_738479 = args[0];
++
++closureN_type c_7323524;
++object e_7323777 [19];
++c_7323524.hdr.mark = gc_color_red;
++ c_7323524.hdr.grayed = 0;
++c_7323524.tag = closureN_tag;
++ c_7323524.fn = (function_type)__lambda_1093;
++c_7323524.num_args = 1;
++c_7323524.num_elements = 19;
++c_7323524.elements = (object *)e_7323777;
++c_7323524.elements[0] = ((closureN)self_7312833)->elements[0];
++c_7323524.elements[1] = ((closureN)self_7312833)->elements[1];
++c_7323524.elements[2] = ((closureN)self_7312833)->elements[2];
++c_7323524.elements[3] = ((closureN)self_7312833)->elements[3];
++c_7323524.elements[4] = ((closureN)self_7312833)->elements[4];
++c_7323524.elements[5] = ((closureN)self_7312833)->elements[5];
++c_7323524.elements[6] = ((closureN)self_7312833)->elements[6];
++c_7323524.elements[7] = ((closureN)self_7312833)->elements[7];
++c_7323524.elements[8] = ((closureN)self_7312833)->elements[8];
++c_7323524.elements[9] = ((closureN)self_7312833)->elements[9];
++c_7323524.elements[10] = ((closureN)self_7312833)->elements[10];
++c_7323524.elements[11] = ((closureN)self_7312833)->elements[11];
++c_7323524.elements[12] = r_736700_738138_738213_738284_738350_738415_738479;
++c_7323524.elements[13] = ((closureN)self_7312833)->elements[12];
++c_7323524.elements[14] = ((closureN)self_7312833)->elements[13];
++c_7323524.elements[15] = ((closureN)self_7312833)->elements[14];
++c_7323524.elements[16] = ((closureN)self_7312833)->elements[15];
++c_7323524.elements[17] = ((closureN)self_7312833)->elements[16];
++c_7323524.elements[18] = ((closureN)self_7312833)->elements[17];
++
++return_closcall2(data, ((closureN)self_7312833)->elements[16], &c_7323524, quote_raise_91continuable);;
++}
++
++static void __lambda_1093(void *data, object self_7312834, int argc, object *args) /* object self_7312834, object r_736709_738139_738214_738285_738351_738416_738480 */
++ {
++ object r_736709_738139_738214_738285_738351_738416_738480 = args[0];
++
++closureN_type c_7323527;
++object e_7323776 [20];
++c_7323527.hdr.mark = gc_color_red;
++ c_7323527.hdr.grayed = 0;
++c_7323527.tag = closureN_tag;
++ c_7323527.fn = (function_type)__lambda_1094;
++c_7323527.num_args = 1;
++c_7323527.num_elements = 20;
++c_7323527.elements = (object *)e_7323776;
++c_7323527.elements[0] = ((closureN)self_7312834)->elements[0];
++c_7323527.elements[1] = ((closureN)self_7312834)->elements[1];
++c_7323527.elements[2] = ((closureN)self_7312834)->elements[2];
++c_7323527.elements[3] = ((closureN)self_7312834)->elements[3];
++c_7323527.elements[4] = ((closureN)self_7312834)->elements[4];
++c_7323527.elements[5] = ((closureN)self_7312834)->elements[5];
++c_7323527.elements[6] = ((closureN)self_7312834)->elements[6];
++c_7323527.elements[7] = ((closureN)self_7312834)->elements[7];
++c_7323527.elements[8] = ((closureN)self_7312834)->elements[8];
++c_7323527.elements[9] = ((closureN)self_7312834)->elements[9];
++c_7323527.elements[10] = ((closureN)self_7312834)->elements[10];
++c_7323527.elements[11] = ((closureN)self_7312834)->elements[11];
++c_7323527.elements[12] = ((closureN)self_7312834)->elements[12];
++c_7323527.elements[13] = r_736709_738139_738214_738285_738351_738416_738480;
++c_7323527.elements[14] = ((closureN)self_7312834)->elements[13];
++c_7323527.elements[15] = ((closureN)self_7312834)->elements[14];
++c_7323527.elements[16] = ((closureN)self_7312834)->elements[15];
++c_7323527.elements[17] = ((closureN)self_7312834)->elements[16];
++c_7323527.elements[18] = ((closureN)self_7312834)->elements[17];
++c_7323527.elements[19] = ((closureN)self_7312834)->elements[18];
++
++return_closcall2(data, ((closureN)self_7312834)->elements[17], &c_7323527, quote_condition);;
++}
++
++static void __lambda_1094(void *data, object self_7312835, int argc, object *args) /* object self_7312835, object r_736712_738140_738215_738286_738352_738417_738481 */
++ {
++ object r_736712_738140_738215_738286_738352_738417_738481 = args[0];
++
++closureN_type c_7323530;
++object e_7323775 [21];
++c_7323530.hdr.mark = gc_color_red;
++ c_7323530.hdr.grayed = 0;
++c_7323530.tag = closureN_tag;
++ c_7323530.fn = (function_type)__lambda_1095;
++c_7323530.num_args = 1;
++c_7323530.num_elements = 21;
++c_7323530.elements = (object *)e_7323775;
++c_7323530.elements[0] = ((closureN)self_7312835)->elements[0];
++c_7323530.elements[1] = ((closureN)self_7312835)->elements[1];
++c_7323530.elements[2] = ((closureN)self_7312835)->elements[2];
++c_7323530.elements[3] = ((closureN)self_7312835)->elements[3];
++c_7323530.elements[4] = ((closureN)self_7312835)->elements[4];
++c_7323530.elements[5] = ((closureN)self_7312835)->elements[5];
++c_7323530.elements[6] = ((closureN)self_7312835)->elements[6];
++c_7323530.elements[7] = ((closureN)self_7312835)->elements[7];
++c_7323530.elements[8] = ((closureN)self_7312835)->elements[8];
++c_7323530.elements[9] = ((closureN)self_7312835)->elements[9];
++c_7323530.elements[10] = ((closureN)self_7312835)->elements[10];
++c_7323530.elements[11] = ((closureN)self_7312835)->elements[11];
++c_7323530.elements[12] = ((closureN)self_7312835)->elements[12];
++c_7323530.elements[13] = ((closureN)self_7312835)->elements[13];
++c_7323530.elements[14] = r_736712_738140_738215_738286_738352_738417_738481;
++c_7323530.elements[15] = ((closureN)self_7312835)->elements[14];
++c_7323530.elements[16] = ((closureN)self_7312835)->elements[15];
++c_7323530.elements[17] = ((closureN)self_7312835)->elements[16];
++c_7323530.elements[18] = ((closureN)self_7312835)->elements[17];
++c_7323530.elements[19] = ((closureN)self_7312835)->elements[18];
++c_7323530.elements[20] = ((closureN)self_7312835)->elements[19];
++
++return_closcall2(data, ((closureN)self_7312835)->elements[18], &c_7323530, quote_lambda);;
++}
++
++static void __lambda_1095(void *data, object self_7312836, int argc, object *args) /* object self_7312836, object r_736585_738167_738242_738313_738379_738444_738508_738566_738623_738679_738734_738788_738841_738893_738944_738994_739043_739091_739138_739184_739229_739273_739316_739358_739399_739439_739478_739516_739553_739589_739624_739658_739691 */
++ {
++ object r_736585_738167_738242_738313_738379_738444_738508_738566_738623_738679_738734_738788_738841_738893_738944_738994_739043_739091_739138_739184_739229_739273_739316_739358_739399_739439_739478_739516_739553_739589_739624_739658_739691 = args[0];
++
++closureN_type c_7323533;
++object e_7323774 [22];
++c_7323533.hdr.mark = gc_color_red;
++ c_7323533.hdr.grayed = 0;
++c_7323533.tag = closureN_tag;
++ c_7323533.fn = (function_type)__lambda_1096;
++c_7323533.num_args = 1;
++c_7323533.num_elements = 22;
++c_7323533.elements = (object *)e_7323774;
++c_7323533.elements[0] = ((closureN)self_7312836)->elements[0];
++c_7323533.elements[1] = ((closureN)self_7312836)->elements[1];
++c_7323533.elements[2] = ((closureN)self_7312836)->elements[2];
++c_7323533.elements[3] = ((closureN)self_7312836)->elements[3];
++c_7323533.elements[4] = r_736585_738167_738242_738313_738379_738444_738508_738566_738623_738679_738734_738788_738841_738893_738944_738994_739043_739091_739138_739184_739229_739273_739316_739358_739399_739439_739478_739516_739553_739589_739624_739658_739691;
++c_7323533.elements[5] = ((closureN)self_7312836)->elements[4];
++c_7323533.elements[6] = ((closureN)self_7312836)->elements[5];
++c_7323533.elements[7] = ((closureN)self_7312836)->elements[6];
++c_7323533.elements[8] = ((closureN)self_7312836)->elements[7];
++c_7323533.elements[9] = ((closureN)self_7312836)->elements[8];
++c_7323533.elements[10] = ((closureN)self_7312836)->elements[9];
++c_7323533.elements[11] = ((closureN)self_7312836)->elements[10];
++c_7323533.elements[12] = ((closureN)self_7312836)->elements[11];
++c_7323533.elements[13] = ((closureN)self_7312836)->elements[12];
++c_7323533.elements[14] = ((closureN)self_7312836)->elements[13];
++c_7323533.elements[15] = ((closureN)self_7312836)->elements[14];
++c_7323533.elements[16] = ((closureN)self_7312836)->elements[15];
++c_7323533.elements[17] = ((closureN)self_7312836)->elements[16];
++c_7323533.elements[18] = ((closureN)self_7312836)->elements[17];
++c_7323533.elements[19] = ((closureN)self_7312836)->elements[18];
++c_7323533.elements[20] = ((closureN)self_7312836)->elements[19];
++c_7323533.elements[21] = ((closureN)self_7312836)->elements[20];
++
++return_closcall2(data, ((closureN)self_7312836)->elements[19], &c_7323533, quote_let);;
++}
++
++static void __lambda_1096(void *data, object self_7312837, int argc, object *args) /* object self_7312837, object r_736594_738168_738243_738314_738380_738445_738509_738567_738624_738680_738735_738789_738842_738894_738945_738995_739044_739092_739139_739185_739230_739274_739317_739359_739400_739440_739479_739517_739554_739590_739625_739659_739692 */
++ {
++ object r_736594_738168_738243_738314_738380_738445_738509_738567_738624_738680_738735_738789_738842_738894_738945_738995_739044_739092_739139_739185_739230_739274_739317_739359_739400_739440_739479_739517_739554_739590_739625_739659_739692 = args[0];
++
++closureN_type c_7323536;
++object e_7323773 [23];
++c_7323536.hdr.mark = gc_color_red;
++ c_7323536.hdr.grayed = 0;
++c_7323536.tag = closureN_tag;
++ c_7323536.fn = (function_type)__lambda_1097;
++c_7323536.num_args = 1;
++c_7323536.num_elements = 23;
++c_7323536.elements = (object *)e_7323773;
++c_7323536.elements[0] = ((closureN)self_7312837)->elements[0];
++c_7323536.elements[1] = ((closureN)self_7312837)->elements[1];
++c_7323536.elements[2] = ((closureN)self_7312837)->elements[2];
++c_7323536.elements[3] = ((closureN)self_7312837)->elements[3];
++c_7323536.elements[4] = ((closureN)self_7312837)->elements[4];
++c_7323536.elements[5] = r_736594_738168_738243_738314_738380_738445_738509_738567_738624_738680_738735_738789_738842_738894_738945_738995_739044_739092_739139_739185_739230_739274_739317_739359_739400_739440_739479_739517_739554_739590_739625_739659_739692;
++c_7323536.elements[6] = ((closureN)self_7312837)->elements[5];
++c_7323536.elements[7] = ((closureN)self_7312837)->elements[6];
++c_7323536.elements[8] = ((closureN)self_7312837)->elements[7];
++c_7323536.elements[9] = ((closureN)self_7312837)->elements[8];
++c_7323536.elements[10] = ((closureN)self_7312837)->elements[9];
++c_7323536.elements[11] = ((closureN)self_7312837)->elements[10];
++c_7323536.elements[12] = ((closureN)self_7312837)->elements[11];
++c_7323536.elements[13] = ((closureN)self_7312837)->elements[12];
++c_7323536.elements[14] = ((closureN)self_7312837)->elements[13];
++c_7323536.elements[15] = ((closureN)self_7312837)->elements[14];
++c_7323536.elements[16] = ((closureN)self_7312837)->elements[15];
++c_7323536.elements[17] = ((closureN)self_7312837)->elements[16];
++c_7323536.elements[18] = ((closureN)self_7312837)->elements[17];
++c_7323536.elements[19] = ((closureN)self_7312837)->elements[18];
++c_7323536.elements[20] = ((closureN)self_7312837)->elements[19];
++c_7323536.elements[21] = ((closureN)self_7312837)->elements[20];
++c_7323536.elements[22] = ((closureN)self_7312837)->elements[21];
++
++return_closcall2(data, ((closureN)self_7312837)->elements[20], &c_7323536, quote_res);;
++}
++
++static void __lambda_1097(void *data, object self_7312838, int argc, object *args) /* object self_7312838, object r_736624_738169_738244_738315_738381_738446_738510_738568_738625_738681_738736_738790_738843_738895_738946_738996_739045_739093_739140_739186_739231_739275_739318_739360_739401_739441_739480_739518_739555_739591_739626_739660_739693 */
++ {
++ object r_736624_738169_738244_738315_738381_738446_738510_738568_738625_738681_738736_738790_738843_738895_738946_738996_739045_739093_739140_739186_739231_739275_739318_739360_739401_739441_739480_739518_739555_739591_739626_739660_739693 = args[0];
++
++closureN_type c_7323539;
++object e_7323772 [24];
++c_7323539.hdr.mark = gc_color_red;
++ c_7323539.hdr.grayed = 0;
++c_7323539.tag = closureN_tag;
++ c_7323539.fn = (function_type)__lambda_1098;
++c_7323539.num_args = 1;
++c_7323539.num_elements = 24;
++c_7323539.elements = (object *)e_7323772;
++c_7323539.elements[0] = ((closureN)self_7312838)->elements[0];
++c_7323539.elements[1] = ((closureN)self_7312838)->elements[1];
++c_7323539.elements[2] = ((closureN)self_7312838)->elements[2];
++c_7323539.elements[3] = ((closureN)self_7312838)->elements[3];
++c_7323539.elements[4] = ((closureN)self_7312838)->elements[4];
++c_7323539.elements[5] = ((closureN)self_7312838)->elements[5];
++c_7323539.elements[6] = r_736624_738169_738244_738315_738381_738446_738510_738568_738625_738681_738736_738790_738843_738895_738946_738996_739045_739093_739140_739186_739231_739275_739318_739360_739401_739441_739480_739518_739555_739591_739626_739660_739693;
++c_7323539.elements[7] = ((closureN)self_7312838)->elements[6];
++c_7323539.elements[8] = ((closureN)self_7312838)->elements[7];
++c_7323539.elements[9] = ((closureN)self_7312838)->elements[8];
++c_7323539.elements[10] = ((closureN)self_7312838)->elements[9];
++c_7323539.elements[11] = ((closureN)self_7312838)->elements[10];
++c_7323539.elements[12] = ((closureN)self_7312838)->elements[11];
++c_7323539.elements[13] = ((closureN)self_7312838)->elements[12];
++c_7323539.elements[14] = ((closureN)self_7312838)->elements[13];
++c_7323539.elements[15] = ((closureN)self_7312838)->elements[14];
++c_7323539.elements[16] = ((closureN)self_7312838)->elements[15];
++c_7323539.elements[17] = ((closureN)self_7312838)->elements[16];
++c_7323539.elements[18] = ((closureN)self_7312838)->elements[17];
++c_7323539.elements[19] = ((closureN)self_7312838)->elements[18];
++c_7323539.elements[20] = ((closureN)self_7312838)->elements[19];
++c_7323539.elements[21] = ((closureN)self_7312838)->elements[20];
++c_7323539.elements[22] = ((closureN)self_7312838)->elements[21];
++c_7323539.elements[23] = ((closureN)self_7312838)->elements[22];
++
++return_closcall2(data, ((closureN)self_7312838)->elements[21], &c_7323539, quote_begin);;
++}
++
++static void __lambda_1098(void *data, object self_7312839, int argc, object *args) /* object self_7312839, object r_736630_738170_738245_738316_738382_738447_738511_738569_738626_738682_738737_738791_738844_738896_738947_738997_739046_739094_739141_739187_739232_739276_739319_739361_739402_739442_739481_739519_739556_739592_739627_739661_739694 */
++ {
++ object r_736630_738170_738245_738316_738382_738447_738511_738569_738626_738682_738737_738791_738844_738896_738947_738997_739046_739094_739141_739187_739232_739276_739319_739361_739402_739442_739481_739519_739556_739592_739627_739661_739694 = args[0];
++
++closureN_type c_7323542;
++object e_7323771 [25];
++c_7323542.hdr.mark = gc_color_red;
++ c_7323542.hdr.grayed = 0;
++c_7323542.tag = closureN_tag;
++ c_7323542.fn = (function_type)__lambda_1099;
++c_7323542.num_args = 1;
++c_7323542.num_elements = 25;
++c_7323542.elements = (object *)e_7323771;
++c_7323542.elements[0] = ((closureN)self_7312839)->elements[0];
++c_7323542.elements[1] = ((closureN)self_7312839)->elements[1];
++c_7323542.elements[2] = ((closureN)self_7312839)->elements[2];
++c_7323542.elements[3] = ((closureN)self_7312839)->elements[3];
++c_7323542.elements[4] = ((closureN)self_7312839)->elements[4];
++c_7323542.elements[5] = ((closureN)self_7312839)->elements[5];
++c_7323542.elements[6] = ((closureN)self_7312839)->elements[6];
++c_7323542.elements[7] = r_736630_738170_738245_738316_738382_738447_738511_738569_738626_738682_738737_738791_738844_738896_738947_738997_739046_739094_739141_739187_739232_739276_739319_739361_739402_739442_739481_739519_739556_739592_739627_739661_739694;
++c_7323542.elements[8] = ((closureN)self_7312839)->elements[7];
++c_7323542.elements[9] = ((closureN)self_7312839)->elements[8];
++c_7323542.elements[10] = ((closureN)self_7312839)->elements[9];
++c_7323542.elements[11] = ((closureN)self_7312839)->elements[10];
++c_7323542.elements[12] = ((closureN)self_7312839)->elements[11];
++c_7323542.elements[13] = ((closureN)self_7312839)->elements[12];
++c_7323542.elements[14] = ((closureN)self_7312839)->elements[13];
++c_7323542.elements[15] = ((closureN)self_7312839)->elements[14];
++c_7323542.elements[16] = ((closureN)self_7312839)->elements[15];
++c_7323542.elements[17] = ((closureN)self_7312839)->elements[16];
++c_7323542.elements[18] = ((closureN)self_7312839)->elements[17];
++c_7323542.elements[19] = ((closureN)self_7312839)->elements[18];
++c_7323542.elements[20] = ((closureN)self_7312839)->elements[19];
++c_7323542.elements[21] = ((closureN)self_7312839)->elements[20];
++c_7323542.elements[22] = ((closureN)self_7312839)->elements[21];
++c_7323542.elements[23] = ((closureN)self_7312839)->elements[22];
++c_7323542.elements[24] = ((closureN)self_7312839)->elements[23];
++
++return_closcall2(data, ((closureN)self_7312839)->elements[22], &c_7323542, quote_guard_91k);;
++}
++
++static void __lambda_1099(void *data, object self_7312840, int argc, object *args) /* object self_7312840, object r_736603_738176_738251_738322_738388_738453_738517_738575_738632_738688_738743_738797_738850_738902_738953_739003_739052_739100_739147_739193_739238_739282_739325_739367_739408_739448_739487_739525_739562_739598_739633_739667_739700_739728_739755_739781_739806_739830 */
++ {
++ object r_736603_738176_738251_738322_738388_738453_738517_738575_738632_738688_738743_738797_738850_738902_738953_739003_739052_739100_739147_739193_739238_739282_739325_739367_739408_739448_739487_739525_739562_739598_739633_739667_739700_739728_739755_739781_739806_739830 = args[0];
++
++closureN_type c_7323545;
++object e_7323770 [26];
++c_7323545.hdr.mark = gc_color_red;
++ c_7323545.hdr.grayed = 0;
++c_7323545.tag = closureN_tag;
++ c_7323545.fn = (function_type)__lambda_1100;
++c_7323545.num_args = 1;
++c_7323545.num_elements = 26;
++c_7323545.elements = (object *)e_7323770;
++c_7323545.elements[0] = ((closureN)self_7312840)->elements[0];
++c_7323545.elements[1] = ((closureN)self_7312840)->elements[1];
++c_7323545.elements[2] = ((closureN)self_7312840)->elements[2];
++c_7323545.elements[3] = ((closureN)self_7312840)->elements[3];
++c_7323545.elements[4] = ((closureN)self_7312840)->elements[4];
++c_7323545.elements[5] = ((closureN)self_7312840)->elements[5];
++c_7323545.elements[6] = r_736603_738176_738251_738322_738388_738453_738517_738575_738632_738688_738743_738797_738850_738902_738953_739003_739052_739100_739147_739193_739238_739282_739325_739367_739408_739448_739487_739525_739562_739598_739633_739667_739700_739728_739755_739781_739806_739830;
++c_7323545.elements[7] = ((closureN)self_7312840)->elements[6];
++c_7323545.elements[8] = ((closureN)self_7312840)->elements[7];
++c_7323545.elements[9] = ((closureN)self_7312840)->elements[8];
++c_7323545.elements[10] = ((closureN)self_7312840)->elements[9];
++c_7323545.elements[11] = ((closureN)self_7312840)->elements[10];
++c_7323545.elements[12] = ((closureN)self_7312840)->elements[11];
++c_7323545.elements[13] = ((closureN)self_7312840)->elements[12];
++c_7323545.elements[14] = ((closureN)self_7312840)->elements[13];
++c_7323545.elements[15] = ((closureN)self_7312840)->elements[14];
++c_7323545.elements[16] = ((closureN)self_7312840)->elements[15];
++c_7323545.elements[17] = ((closureN)self_7312840)->elements[16];
++c_7323545.elements[18] = ((closureN)self_7312840)->elements[17];
++c_7323545.elements[19] = ((closureN)self_7312840)->elements[18];
++c_7323545.elements[20] = ((closureN)self_7312840)->elements[19];
++c_7323545.elements[21] = ((closureN)self_7312840)->elements[20];
++c_7323545.elements[22] = ((closureN)self_7312840)->elements[21];
++c_7323545.elements[23] = ((closureN)self_7312840)->elements[22];
++c_7323545.elements[24] = ((closureN)self_7312840)->elements[23];
++c_7323545.elements[25] = ((closureN)self_7312840)->elements[24];
++
++return_closcall2(data, ((closureN)self_7312840)->elements[23], &c_7323545, quote_lambda);;
++}
++
++static void __lambda_1100(void *data, object self_7312841, int argc, object *args) /* object self_7312841, object r_736609_738177_738252_738323_738389_738454_738518_738576_738633_738689_738744_738798_738851_738903_738954_739004_739053_739101_739148_739194_739239_739283_739326_739368_739409_739449_739488_739526_739563_739599_739634_739668_739701_739729_739756_739782_739807_739831 */
++ {
++ object r_736609_738177_738252_738323_738389_738454_738518_738576_738633_738689_738744_738798_738851_738903_738954_739004_739053_739101_739148_739194_739239_739283_739326_739368_739409_739449_739488_739526_739563_739599_739634_739668_739701_739729_739756_739782_739807_739831 = args[0];
++
++closureN_type c_7323548;
++object e_7323769 [26];
++c_7323548.hdr.mark = gc_color_red;
++ c_7323548.hdr.grayed = 0;
++c_7323548.tag = closureN_tag;
++ c_7323548.fn = (function_type)__lambda_1101;
++c_7323548.num_args = 1;
++c_7323548.num_elements = 26;
++c_7323548.elements = (object *)e_7323769;
++c_7323548.elements[0] = ((closureN)self_7312841)->elements[0];
++c_7323548.elements[1] = ((closureN)self_7312841)->elements[1];
++c_7323548.elements[2] = ((closureN)self_7312841)->elements[2];
++c_7323548.elements[3] = ((closureN)self_7312841)->elements[3];
++c_7323548.elements[4] = ((closureN)self_7312841)->elements[4];
++c_7323548.elements[5] = ((closureN)self_7312841)->elements[5];
++c_7323548.elements[6] = ((closureN)self_7312841)->elements[6];
++c_7323548.elements[7] = r_736609_738177_738252_738323_738389_738454_738518_738576_738633_738689_738744_738798_738851_738903_738954_739004_739053_739101_739148_739194_739239_739283_739326_739368_739409_739449_739488_739526_739563_739599_739634_739668_739701_739729_739756_739782_739807_739831;
++c_7323548.elements[8] = ((closureN)self_7312841)->elements[7];
++c_7323548.elements[9] = ((closureN)self_7312841)->elements[8];
++c_7323548.elements[10] = ((closureN)self_7312841)->elements[9];
++c_7323548.elements[11] = ((closureN)self_7312841)->elements[10];
++c_7323548.elements[12] = ((closureN)self_7312841)->elements[11];
++c_7323548.elements[13] = ((closureN)self_7312841)->elements[12];
++c_7323548.elements[14] = ((closureN)self_7312841)->elements[13];
++c_7323548.elements[15] = ((closureN)self_7312841)->elements[14];
++c_7323548.elements[16] = ((closureN)self_7312841)->elements[15];
++c_7323548.elements[17] = ((closureN)self_7312841)->elements[16];
++c_7323548.elements[18] = ((closureN)self_7312841)->elements[17];
++c_7323548.elements[19] = ((closureN)self_7312841)->elements[18];
++c_7323548.elements[20] = ((closureN)self_7312841)->elements[19];
++c_7323548.elements[21] = ((closureN)self_7312841)->elements[20];
++c_7323548.elements[22] = ((closureN)self_7312841)->elements[21];
++c_7323548.elements[23] = ((closureN)self_7312841)->elements[22];
++c_7323548.elements[24] = ((closureN)self_7312841)->elements[23];
++c_7323548.elements[25] = ((closureN)self_7312841)->elements[25];
++
++return_closcall2(data, ((closureN)self_7312841)->elements[24], &c_7323548, quote_res);;
++}
++
++static void __lambda_1101(void *data, object self_7312842, int argc, object *args) /* object self_7312842, object r_736615_738178_738253_738324_738390_738455_738519_738577_738634_738690_738745_738799_738852_738904_738955_739005_739054_739102_739149_739195_739240_739284_739327_739369_739410_739450_739489_739527_739564_739600_739635_739669_739702_739730_739757_739783_739808_739832 */
++ {
++ object r_736615_738178_738253_738324_738390_738455_738519_738577_738634_738690_738745_738799_738852_738904_738955_739005_739054_739102_739149_739195_739240_739284_739327_739369_739410_739450_739489_739527_739564_739600_739635_739669_739702_739730_739757_739783_739808_739832 = args[0];
++
++pair_type local_7323553;
++
++pair_type local_7323556;
++
++pair_type local_7323559;
++
++pair_type local_7323563;
++
++pair_type local_7323566;
++
++pair_type local_7323570;
++
++pair_type local_7323573;
++
++pair_type local_7323577;
++
++pair_type local_7323580;
++
++pair_type local_7323584;
++
++pair_type local_7323587;
++
++pair_type local_7323591;
++
++pair_type local_7323594;
++
++pair_type local_7323598;
++
++pair_type local_7323601;
++
++pair_type local_7323604;
++
++pair_type local_7323608;
++
++pair_type local_7323611;
++
++pair_type local_7323615;
++
++pair_type local_7323618;
++
++pair_type local_7323622;
++
++pair_type local_7323625;
+
+-pair_type local_7326088;
++pair_type local_7323629;
+
+-pair_type local_7326091;
++pair_type local_7323632;
+
+-pair_type local_7326095;
++pair_type local_7323636;
+
+-pair_type local_7326098;
++pair_type local_7323639;
+
+-pair_type local_7326101;
++pair_type local_7323642;
+
+-pair_type local_7326105;
++pair_type local_7323646;
+
+-pair_type local_7326108;
++pair_type local_7323649;
+
+-pair_type local_7326111;
++pair_type local_7323652;
+
+
+
+
+
+-pair_type local_7326119;
++pair_type local_7323660;
+
+-pair_type local_7326123;
++pair_type local_7323664;
+
+-pair_type local_7326126;
++pair_type local_7323667;
+
+-pair_type local_7326130;
++pair_type local_7323671;
+
+-pair_type local_7326133;
++pair_type local_7323674;
+
+-pair_type local_7326137;
++pair_type local_7323678;
+
+-pair_type local_7326140;
++pair_type local_7323681;
+
+-pair_type local_7326144;
++pair_type local_7323685;
+
+-pair_type local_7326147;
++pair_type local_7323688;
+
+-pair_type local_7326150;
++pair_type local_7323691;
+
+-pair_type local_7326154;
++pair_type local_7323695;
+
+
+
+
+
+-pair_type local_7326163;
++pair_type local_7323704;
+
+-pair_type local_7326166;
++pair_type local_7323707;
+
+-pair_type local_7326170;
++pair_type local_7323711;
+
+-pair_type local_7326173;
++pair_type local_7323714;
+
+-pair_type local_7326176;
++pair_type local_7323717;
+
+-pair_type local_7326180;
++pair_type local_7323721;
+
+-pair_type local_7326183;
++pair_type local_7323724;
+
+-pair_type local_7326186;
++pair_type local_7323727;
+
+-pair_type local_7326190;
++pair_type local_7323731;
+
+-pair_type local_7326193;
++pair_type local_7323734;
+
+-pair_type local_7326197;
++pair_type local_7323738;
+
+
+
+@@ -8910,2343 +8861,595 @@ pair_type local_7326197;
+
+
+
+-pair_type local_7326210;
++pair_type local_7323751;
+
+-pair_type local_7326213;
++pair_type local_7323754;
+
+-pair_type local_7326217;
++pair_type local_7323758;
+
+-pair_type local_7326220;
++pair_type local_7323761;
+
+-pair_type local_7326224;
++pair_type local_7323765;
+
+-pair_type local_7326227;
+-return_direct_with_clo1(data, ((closureN)self_7314142)->elements[0], (((closure) ((closureN)self_7314142)->elements[0])->fn), set_pair_as_expr(&local_7326012, set_pair_as_expr(&local_7326015, set_pair_as_expr(&local_7326018, ((closureN)self_7314142)->elements[1], set_pair_as_expr(&local_7326022, set_pair_as_expr(&local_7326025, ((closureN)self_7314142)->elements[2], set_pair_as_expr(&local_7326029, set_pair_as_expr(&local_7326032, ((closureN)self_7314142)->elements[24], NULL), set_pair_as_expr(&local_7326036, set_pair_as_expr(&local_7326039, ((closureN)self_7314142)->elements[3], set_pair_as_expr(&local_7326043, set_pair_as_expr(&local_7326046, ((closureN)self_7314142)->elements[10], set_pair_as_expr(&local_7326050, set_pair_as_expr(&local_7326053, ((closureN)self_7314142)->elements[23], NULL), set_pair_as_expr(&local_7326057, set_pair_as_expr(&local_7326060, set_pair_as_expr(&local_7326063, ((closureN)self_7314142)->elements[11], set_pair_as_expr(&local_7326067, set_pai
r_as_expr(&local_7326070, ((closureN)self_7314142)->elements[12], set_pair_as_expr(&local_7326074, set_pair_as_expr(&local_7326077, ((closureN)self_7314142)->elements[22], NULL), set_pair_as_expr(&local_7326081, set_pair_as_expr(&local_7326084, ((closureN)self_7314142)->elements[13], set_pair_as_expr(&local_7326088, set_pair_as_expr(&local_7326091, ((closureN)self_7314142)->elements[14], set_pair_as_expr(&local_7326095, NULL, set_pair_as_expr(&local_7326098, set_pair_as_expr(&local_7326101, ((closureN)self_7314142)->elements[15], set_pair_as_expr(&local_7326105, set_pair_as_expr(&local_7326108, set_pair_as_expr(&local_7326111, Cyc_car(data, Cyc_car(data, ((closureN)self_7314142)->elements[25])), set_pair_as_expr(&local_7326119, ((closureN)self_7314142)->elements[21], NULL)), NULL), set_pair_as_expr(&local_7326123, set_pair_as_expr(&local_7326126, ((closureN)self_7314142)->elements[16], set_pair_as_expr(&local_7326130, set_pair_as_expr(&local_7326133, ((closureN)self_7314142)->element
s[17], set_pair_as_expr(&local_7326137, set_pair_as_expr(&local_7326140, ((closureN)self_7314142)->elements[18], set_pair_as_expr(&local_7326144, NULL, set_pair_as_expr(&local_7326147, set_pair_as_expr(&local_7326150, ((closureN)self_7314142)->elements[19], set_pair_as_expr(&local_7326154, ((closureN)self_7314142)->elements[20], NULL)), NULL))), NULL)), Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314142)->elements[25])))), NULL))), NULL))), NULL)), NULL))), NULL)), NULL), NULL))), set_pair_as_expr(&local_7326163, set_pair_as_expr(&local_7326166, ((closureN)self_7314142)->elements[4], set_pair_as_expr(&local_7326170, NULL, set_pair_as_expr(&local_7326173, set_pair_as_expr(&local_7326176, ((closureN)self_7314142)->elements[5], set_pair_as_expr(&local_7326180, set_pair_as_expr(&local_7326183, set_pair_as_expr(&local_7326186, ((closureN)self_7314142)->elements[8], set_pair_as_expr(&local_7326190, set_pair_as_expr(&local_7326193, ((closureN)self_7314142)->elements[9], set_pair_as_expr(&
local_7326197, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314142)->elements[25])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314142)->elements[25])))), NULL)), NULL), set_pair_as_expr(&local_7326210, set_pair_as_expr(&local_7326213, ((closureN)self_7314142)->elements[6], set_pair_as_expr(&local_7326217, set_pair_as_expr(&local_7326220, ((closureN)self_7314142)->elements[7], set_pair_as_expr(&local_7326224, NULL, set_pair_as_expr(&local_7326227, r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085, NULL))), NULL)), NULL))), NULL))), NULL))), NULL))), NULL)), NULL), boolean_f));;
++pair_type local_7323768;
++return_direct_with_clo1(data, ((closureN)self_7312842)->elements[0], (((closure) ((closureN)self_7312842)->elements[0])->fn), set_pair_as_expr(&local_7323553, set_pair_as_expr(&local_7323556, set_pair_as_expr(&local_7323559, ((closureN)self_7312842)->elements[1], set_pair_as_expr(&local_7323563, set_pair_as_expr(&local_7323566, ((closureN)self_7312842)->elements[2], set_pair_as_expr(&local_7323570, set_pair_as_expr(&local_7323573, ((closureN)self_7312842)->elements[24], NULL), set_pair_as_expr(&local_7323577, set_pair_as_expr(&local_7323580, ((closureN)self_7312842)->elements[3], set_pair_as_expr(&local_7323584, set_pair_as_expr(&local_7323587, ((closureN)self_7312842)->elements[10], set_pair_as_expr(&local_7323591, set_pair_as_expr(&local_7323594, ((closureN)self_7312842)->elements[23], NULL), set_pair_as_expr(&local_7323598, set_pair_as_expr(&local_7323601, set_pair_as_expr(&local_7323604, ((closureN)self_7312842)->elements[11], set_pair_as_expr(&local_7323608, set_pai
r_as_expr(&local_7323611, ((closureN)self_7312842)->elements[12], set_pair_as_expr(&local_7323615, set_pair_as_expr(&local_7323618, ((closureN)self_7312842)->elements[22], NULL), set_pair_as_expr(&local_7323622, set_pair_as_expr(&local_7323625, ((closureN)self_7312842)->elements[13], set_pair_as_expr(&local_7323629, set_pair_as_expr(&local_7323632, ((closureN)self_7312842)->elements[14], set_pair_as_expr(&local_7323636, NULL, set_pair_as_expr(&local_7323639, set_pair_as_expr(&local_7323642, ((closureN)self_7312842)->elements[15], set_pair_as_expr(&local_7323646, set_pair_as_expr(&local_7323649, set_pair_as_expr(&local_7323652, Cyc_car(data, Cyc_car(data, ((closureN)self_7312842)->elements[25])), set_pair_as_expr(&local_7323660, ((closureN)self_7312842)->elements[21], NULL)), NULL), set_pair_as_expr(&local_7323664, set_pair_as_expr(&local_7323667, ((closureN)self_7312842)->elements[16], set_pair_as_expr(&local_7323671, set_pair_as_expr(&local_7323674, ((closureN)self_7312842)->element
s[17], set_pair_as_expr(&local_7323678, set_pair_as_expr(&local_7323681, ((closureN)self_7312842)->elements[18], set_pair_as_expr(&local_7323685, NULL, set_pair_as_expr(&local_7323688, set_pair_as_expr(&local_7323691, ((closureN)self_7312842)->elements[19], set_pair_as_expr(&local_7323695, ((closureN)self_7312842)->elements[20], NULL)), NULL))), NULL)), Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312842)->elements[25])))), NULL))), NULL))), NULL)), NULL))), NULL)), NULL), NULL))), set_pair_as_expr(&local_7323704, set_pair_as_expr(&local_7323707, ((closureN)self_7312842)->elements[4], set_pair_as_expr(&local_7323711, NULL, set_pair_as_expr(&local_7323714, set_pair_as_expr(&local_7323717, ((closureN)self_7312842)->elements[5], set_pair_as_expr(&local_7323721, set_pair_as_expr(&local_7323724, set_pair_as_expr(&local_7323727, ((closureN)self_7312842)->elements[8], set_pair_as_expr(&local_7323731, set_pair_as_expr(&local_7323734, ((closureN)self_7312842)->elements[9], set_pair_as_expr(&
local_7323738, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312842)->elements[25])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312842)->elements[25])))), NULL)), NULL), set_pair_as_expr(&local_7323751, set_pair_as_expr(&local_7323754, ((closureN)self_7312842)->elements[6], set_pair_as_expr(&local_7323758, set_pair_as_expr(&local_7323761, ((closureN)self_7312842)->elements[7], set_pair_as_expr(&local_7323765, NULL, set_pair_as_expr(&local_7323768, r_736615_738178_738253_738324_738390_738455_738519_738577_738634_738690_738745_738799_738852_738904_738955_739005_739054_739102_739149_739195_739240_739284_739327_739369_739410_739450_739489_739527_739564_739600_739635_739669_739702_739730_739757_739783_739808_739832, NULL))), NULL)), NULL))), NULL))), NULL))), NULL))), NULL)), NULL), boolean_f));;
+ }
+
+-static void __lambda_1066(void *data, object _, int argc, object *args) /* closure _,object k_736966, object expr_731740_731824_732014_733758, object rename_731741_731825_732015_733759, object compare_731742_731826_732016_733760 */
++static void __lambda_1066(void *data, object _, int argc, object *args) /* closure _,object k_736514, object expr_731740_731753_731772_733411, object rename_731741_731754_731773_733412, object compare_731742_731755_731774_733413 */
+ {
+-object k_736966 = args[0]; object expr_731740_731824_732014_733758 = args[1]; object rename_731741_731825_732015_733759 = args[2];
++object k_736514 = args[0]; object expr_731740_731753_731772_733411 = args[1]; object rename_731741_731754_731773_733412 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:let-values");
+
+-closureN_type c_7324652;
+-object e_7325896 [3];
+-c_7324652.hdr.mark = gc_color_red;
+- c_7324652.hdr.grayed = 0;
+-c_7324652.tag = closureN_tag;
+- c_7324652.fn = (function_type)__lambda_1067;
+-c_7324652.num_args = 1;
+-c_7324652.num_elements = 3;
+-c_7324652.elements = (object *)e_7325896;
+-c_7324652.elements[0] = expr_731740_731824_732014_733758;
+-c_7324652.elements[1] = k_736966;
+-c_7324652.elements[2] = rename_731741_731825_732015_733759;
+-
++closureN_type c_7323352;
++object e_7323437 [3];
++c_7323352.hdr.mark = gc_color_red;
++ c_7323352.hdr.grayed = 0;
++c_7323352.tag = closureN_tag;
++ c_7323352.fn = (function_type)__lambda_1067;
++c_7323352.num_args = 1;
++c_7323352.num_elements = 3;
++c_7323352.elements = (object *)e_7323437;
++c_7323352.elements[0] = expr_731740_731753_731772_733411;
++c_7323352.elements[1] = k_736514;
++c_7323352.elements[2] = rename_731741_731754_731773_733412;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7323352,__lambda_1067, Cyc_cdr(data, expr_731740_731753_731772_733411));;
++}
++
++static void __lambda_1067(void *data, object self_7312805, int argc, object *args) /* object self_7312805, object v_931_731748_731760_731776_733415 */
++ {
++ object v_931_731748_731760_731776_733415 = args[0];
++
++closureN_type c_7323354;
++object e_7323412 [2];
++c_7323354.hdr.mark = gc_color_red;
++ c_7323354.hdr.grayed = 0;
++c_7323354.tag = closureN_tag;
++ c_7323354.fn = (function_type)__lambda_1068;
++c_7323354.num_args = 0;
++c_7323354.num_elements = 2;
++c_7323354.elements = (object *)e_7323412;
++c_7323354.elements[0] = ((closureN)self_7312805)->elements[2];
++c_7323354.elements[1] = v_931_731748_731760_731776_733415;
++
++
++closureN_type c_7323413;
++object e_7323436 [2];
++c_7323413.hdr.mark = gc_color_red;
++ c_7323413.hdr.grayed = 0;
++c_7323413.tag = closureN_tag;
++ c_7323413.fn = (function_type)__lambda_1070;
++c_7323413.num_args = 1;
++c_7323413.num_elements = 2;
++c_7323413.elements = (object *)e_7323436;
++c_7323413.elements[0] = ((closureN)self_7312805)->elements[0];
++c_7323413.elements[1] = ((closureN)self_7312805)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7323354,__lambda_1068, &c_7323413);;
++}
++
++static void __lambda_1070(void *data, object self_7312806, int argc, object *args) /* object self_7312806, object tmp_731757_731759_731775_733414 */
++ {
++ object tmp_731757_731759_731775_733414 = args[0];
++
++closureN_type c_7323415;
++object e_7323429 [2];
++c_7323415.hdr.mark = gc_color_red;
++ c_7323415.hdr.grayed = 0;
++c_7323415.tag = closureN_tag;
++ c_7323415.fn = (function_type)__lambda_1071;
++c_7323415.num_args = 0;
++c_7323415.num_elements = 2;
++c_7323415.elements = (object *)e_7323429;
++c_7323415.elements[0] = ((closureN)self_7312806)->elements[0];
++c_7323415.elements[1] = tmp_731757_731759_731775_733414;
++
++
++closureN_type c_7323430;
++object e_7323435 [1];
++c_7323430.hdr.mark = gc_color_red;
++ c_7323430.hdr.grayed = 0;
++c_7323430.tag = closureN_tag;
++ c_7323430.fn = (function_type)__lambda_1073;
++c_7323430.num_args = 1;
++c_7323430.num_elements = 1;
++c_7323430.elements = (object *)e_7323435;
++c_7323430.elements[0] = ((closureN)self_7312806)->elements[1];
+
+-
+-return_direct_with_clo1(data,(closure)&c_7324652,__lambda_1067, Cyc_cdr(data, expr_731740_731824_732014_733758));;
++return_direct_with_clo1(data,(closure)&c_7323415,__lambda_1071, &c_7323430);;
+ }
+
+-static void __lambda_1067(void *data, object self_7314058, int argc, object *args) /* object self_7314058, object v_931_731748_732002_732123_733867 */
++static void __lambda_1073(void *data, object self_7312807, int argc, object *args) /* object self_7312807, object r_736515 */
+ {
+- object v_931_731748_732002_732123_733867 = args[0];
++ object r_736515 = args[0];
+
+-closureN_type c_7324654;
+-object e_7324736 [2];
+-c_7324654.hdr.mark = gc_color_red;
+- c_7324654.hdr.grayed = 0;
+-c_7324654.tag = closureN_tag;
+- c_7324654.fn = (function_type)__lambda_1068;
+-c_7324654.num_args = 0;
+-c_7324654.num_elements = 2;
+-c_7324654.elements = (object *)e_7324736;
+-c_7324654.elements[0] = ((closureN)self_7314058)->elements[2];
+-c_7324654.elements[1] = v_931_731748_732002_732123_733867;
+
+-
+-closureN_type c_7324737;
+-object e_7325895 [3];
+-c_7324737.hdr.mark = gc_color_red;
+- c_7324737.hdr.grayed = 0;
+-c_7324737.tag = closureN_tag;
+- c_7324737.fn = (function_type)__lambda_1071;
+-c_7324737.num_args = 1;
+-c_7324737.num_elements = 3;
+-c_7324737.elements = (object *)e_7325895;
+-c_7324737.elements[0] = ((closureN)self_7314058)->elements[0];
+-c_7324737.elements[1] = ((closureN)self_7314058)->elements[1];
+-c_7324737.elements[2] = ((closureN)self_7314058)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7324654,__lambda_1068, &c_7324737);;
++return_direct_with_clo1(data, ((closureN)self_7312807)->elements[0], (((closure) ((closureN)self_7312807)->elements[0])->fn), Cyc_car(data, r_736515));;
+ }
+
+-static void __lambda_1071(void *data, object self_7314059, int argc, object *args) /* object self_7314059, object tmp_731828_731830_732017_733761 */
++static void __lambda_1071(void *data, object self_7312808, int argc, object *args) /* object self_7312808, object k_736517 */
+ {
+- object tmp_731828_731830_732017_733761 = args[0];
++ object k_736517 = args[0];
++ if( (boolean_f != ((closureN)self_7312808)->elements[1]) ){
++ return_direct_with_clo1(data, k_736517, (((closure) k_736517)->fn), ((closureN)self_7312808)->elements[1]);
++} else {
+
+-closureN_type c_7324739;
+-object e_7325888 [3];
+-c_7324739.hdr.mark = gc_color_red;
+- c_7324739.hdr.grayed = 0;
+-c_7324739.tag = closureN_tag;
+- c_7324739.fn = (function_type)__lambda_1072;
+-c_7324739.num_args = 0;
+-c_7324739.num_elements = 3;
+-c_7324739.elements = (object *)e_7325888;
+-c_7324739.elements[0] = ((closureN)self_7314059)->elements[0];
+-c_7324739.elements[1] = ((closureN)self_7314059)->elements[2];
+-c_7324739.elements[2] = tmp_731828_731830_732017_733761;
+-
++closureN_type c_7323420;
++object e_7323426 [1];
++c_7323420.hdr.mark = gc_color_red;
++ c_7323420.hdr.grayed = 0;
++c_7323420.tag = closureN_tag;
++ c_7323420.fn = (function_type)__lambda_1072;
++c_7323420.num_args = 1;
++c_7323420.num_elements = 1;
++c_7323420.elements = (object *)e_7323426;
++c_7323420.elements[0] = k_736517;
+
+-closureN_type c_7325889;
+-object e_7325894 [1];
+-c_7325889.hdr.mark = gc_color_red;
+- c_7325889.hdr.grayed = 0;
+-c_7325889.tag = closureN_tag;
+- c_7325889.fn = (function_type)__lambda_1120;
+-c_7325889.num_args = 1;
+-c_7325889.num_elements = 1;
+-c_7325889.elements = (object *)e_7325894;
+-c_7325889.elements[0] = ((closureN)self_7314059)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7324739,__lambda_1072, &c_7325889);;
++make_utf8_string_with_len(c_7323427, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7323420, &c_7323427, ((closureN)self_7312808)->elements[0]);}
++;;
+ }
+
+-static void __lambda_1120(void *data, object self_7314060, int argc, object *args) /* object self_7314060, object r_736967 */
++static void __lambda_1072(void *data, object self_7312809, int argc, object *args) /* object self_7312809, object r_736518 */
+ {
+- object r_736967 = args[0];
++ object r_736518 = args[0];
+
+-
+-return_direct_with_clo1(data, ((closureN)self_7314060)->elements[0], (((closure) ((closureN)self_7314060)->elements[0])->fn), Cyc_car(data, r_736967));;
++pair_type local_7323425;
++return_direct_with_clo1(data, ((closureN)self_7312809)->elements[0], (((closure) ((closureN)self_7312809)->elements[0])->fn), set_pair_as_expr(&local_7323425, r_736518, boolean_f));;
+ }
+
+-static void __lambda_1072(void *data, object self_7314061, int argc, object *args) /* object self_7314061, object k_736969 */
++static void __lambda_1068(void *data, object self_7312810, int argc, object *args) /* object self_7312810, object k_736520 */
+ {
+- object k_736969 = args[0];
+- if( (boolean_f != ((closureN)self_7314061)->elements[2]) ){
+- return_direct_with_clo1(data, k_736969, (((closure) k_736969)->fn), ((closureN)self_7314061)->elements[2]);
+-} else {
++ object k_736520 = args[0];
++
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312810)->elements[1])) ){
++ complex_num_type local_7323360;
+
+-closureN_type c_7324744;
+-object e_7325884 [3];
+-c_7324744.hdr.mark = gc_color_red;
+- c_7324744.hdr.grayed = 0;
+-c_7324744.tag = closureN_tag;
+- c_7324744.fn = (function_type)__lambda_1073;
+-c_7324744.num_args = 1;
+-c_7324744.num_elements = 3;
+-c_7324744.elements = (object *)e_7325884;
+-c_7324744.elements[0] = ((closureN)self_7314061)->elements[0];
+-c_7324744.elements[1] = k_736969;
+-c_7324744.elements[2] = ((closureN)self_7314061)->elements[1];
+-
+-
++if( (boolean_f != ((inline_function_type)
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323360, Cyc_car(data, ((closureN)self_7312810)->elements[1]))) ){
++
++
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312810)->elements[1]))) ){
++ complex_num_type local_7323371;
++
++
++if( (boolean_f != ((inline_function_type)
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323371, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312810)->elements[1])))) ){
++
++closureN_type c_7323379;
++object e_7323407 [2];
++c_7323379.hdr.mark = gc_color_red;
++ c_7323379.hdr.grayed = 0;
++c_7323379.tag = closureN_tag;
++ c_7323379.fn = (function_type)__lambda_1069;
++c_7323379.num_args = 1;
++c_7323379.num_elements = 2;
++c_7323379.elements = (object *)e_7323407;
++c_7323379.elements[0] = k_736520;
++c_7323379.elements[1] = ((closureN)self_7312810)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7324744,__lambda_1073, Cyc_cdr(data, ((closureN)self_7314061)->elements[0]));}
++return_closcall2(data, ((closureN)self_7312810)->elements[0], &c_7323379, quote_let_85_91values);
++} else {
++ return_direct_with_clo1(data, k_736520, (((closure) k_736520)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736520, (((closure) k_736520)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736520, (((closure) k_736520)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736520, (((closure) k_736520)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1073(void *data, object self_7314062, int argc, object *args) /* object self_7314062, object v_936_731753_731984_732112_733856 */
++static void __lambda_1069(void *data, object self_7312811, int argc, object *args) /* object self_7312811, object r_736530 */
+ {
+- object v_936_731753_731984_732112_733856 = args[0];
++ object r_736530 = args[0];
+
+-closureN_type c_7324746;
+-object e_7324836 [2];
+-c_7324746.hdr.mark = gc_color_red;
+- c_7324746.hdr.grayed = 0;
+-c_7324746.tag = closureN_tag;
+- c_7324746.fn = (function_type)__lambda_1074;
+-c_7324746.num_args = 0;
+-c_7324746.num_elements = 2;
+-c_7324746.elements = (object *)e_7324836;
+-c_7324746.elements[0] = ((closureN)self_7314062)->elements[2];
+-c_7324746.elements[1] = v_936_731753_731984_732112_733856;
++pair_type local_7323384;
+
++pair_type local_7323387;
+
+-closureN_type c_7324837;
+-object e_7325883 [3];
+-c_7324837.hdr.mark = gc_color_red;
+- c_7324837.hdr.grayed = 0;
+-c_7324837.tag = closureN_tag;
+- c_7324837.fn = (function_type)__lambda_1076;
+-c_7324837.num_args = 1;
+-c_7324837.num_elements = 3;
+-c_7324837.elements = (object *)e_7325883;
+-c_7324837.elements[0] = ((closureN)self_7314062)->elements[0];
+-c_7324837.elements[1] = ((closureN)self_7314062)->elements[1];
+-c_7324837.elements[2] = ((closureN)self_7314062)->elements[2];
++pair_type local_7323390;
+
+-return_direct_with_clo1(data,(closure)&c_7324746,__lambda_1074, &c_7324837);;
+-}
+
+-static void __lambda_1076(void *data, object self_7314063, int argc, object *args) /* object self_7314063, object tmp_731832_731834_732018_733762 */
+- {
+- object tmp_731832_731834_732018_733762 = args[0];
+- if( (boolean_f != tmp_731832_731834_732018_733762) ){
+- return_direct_with_clo1(data, ((closureN)self_7314063)->elements[1], (((closure) ((closureN)self_7314063)->elements[1])->fn), tmp_731832_731834_732018_733762);
+-} else {
+-
+-closureN_type c_7324841;
+-object e_7325879 [3];
+-c_7324841.hdr.mark = gc_color_red;
+- c_7324841.hdr.grayed = 0;
+-c_7324841.tag = closureN_tag;
+- c_7324841.fn = (function_type)__lambda_1077;
+-c_7324841.num_args = 1;
+-c_7324841.num_elements = 3;
+-c_7324841.elements = (object *)e_7325879;
+-c_7324841.elements[0] = ((closureN)self_7314063)->elements[0];
+-c_7324841.elements[1] = ((closureN)self_7314063)->elements[1];
+-c_7324841.elements[2] = ((closureN)self_7314063)->elements[2];
++
++pair_type local_7323396;
++
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7324841,__lambda_1077, Cyc_cdr(data, ((closureN)self_7314063)->elements[0]));}
+-;;
+-}
+
+-static void __lambda_1077(void *data, object self_7314064, int argc, object *args) /* object self_7314064, object v_9315_731762_731953_732092_733836 */
+- {
+- object v_9315_731762_731953_732092_733836 = args[0];
+-
+-closureN_type c_7324843;
+-object e_7325023 [2];
+-c_7324843.hdr.mark = gc_color_red;
+- c_7324843.hdr.grayed = 0;
+-c_7324843.tag = closureN_tag;
+- c_7324843.fn = (function_type)__lambda_1078;
+-c_7324843.num_args = 0;
+-c_7324843.num_elements = 2;
+-c_7324843.elements = (object *)e_7325023;
+-c_7324843.elements[0] = ((closureN)self_7314064)->elements[2];
+-c_7324843.elements[1] = v_9315_731762_731953_732092_733836;
+
+
+-closureN_type c_7325024;
+-object e_7325878 [3];
+-c_7325024.hdr.mark = gc_color_red;
+- c_7325024.hdr.grayed = 0;
+-c_7325024.tag = closureN_tag;
+- c_7325024.fn = (function_type)__lambda_1080;
+-c_7325024.num_args = 1;
+-c_7325024.num_elements = 3;
+-c_7325024.elements = (object *)e_7325878;
+-c_7325024.elements[0] = ((closureN)self_7314064)->elements[0];
+-c_7325024.elements[1] = ((closureN)self_7314064)->elements[1];
+-c_7325024.elements[2] = ((closureN)self_7314064)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7324843,__lambda_1078, &c_7325024);;
++return_direct_with_clo1(data, ((closureN)self_7312811)->elements[0], (((closure) ((closureN)self_7312811)->elements[0])->fn), set_pair_as_expr(&local_7323384, set_pair_as_expr(&local_7323387, r_736530, set_pair_as_expr(&local_7323390, Cyc_car(data, ((closureN)self_7312811)->elements[1]), set_pair_as_expr(&local_7323396, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312811)->elements[1])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312811)->elements[1]))))), boolean_f));;
+ }
+
+-static void __lambda_1080(void *data, object self_7314065, int argc, object *args) /* object self_7314065, object tmp_731836_731838_732019_733763 */
++static void __lambda_1046(void *data, object _, int argc, object *args) /* closure _,object k_736404, object expr_731606_731637_731698_733373, object rename_731607_731638_731699_733374, object compare_731608_731639_731700_733375 */
+ {
+- object tmp_731836_731838_732019_733763 = args[0];
+- if( (boolean_f != tmp_731836_731838_732019_733763) ){
+- return_direct_with_clo1(data, ((closureN)self_7314065)->elements[1], (((closure) ((closureN)self_7314065)->elements[1])->fn), tmp_731836_731838_732019_733763);
+-} else {
+-
+-closureN_type c_7325028;
+-object e_7325874 [3];
+-c_7325028.hdr.mark = gc_color_red;
+- c_7325028.hdr.grayed = 0;
+-c_7325028.tag = closureN_tag;
+- c_7325028.fn = (function_type)__lambda_1081;
+-c_7325028.num_args = 1;
+-c_7325028.num_elements = 3;
+-c_7325028.elements = (object *)e_7325874;
+-c_7325028.elements[0] = ((closureN)self_7314065)->elements[0];
+-c_7325028.elements[1] = ((closureN)self_7314065)->elements[1];
+-c_7325028.elements[2] = ((closureN)self_7314065)->elements[2];
++object k_736404 = args[0]; object expr_731606_731637_731698_733373 = args[1]; object rename_731607_731638_731699_733374 = args[2];
++ Cyc_st_add(data, "scheme/base.sld:let*-values");
+
++closureN_type c_7323021;
++object e_7323347 [3];
++c_7323021.hdr.mark = gc_color_red;
++ c_7323021.hdr.grayed = 0;
++c_7323021.tag = closureN_tag;
++ c_7323021.fn = (function_type)__lambda_1047;
++c_7323021.num_args = 1;
++c_7323021.num_elements = 3;
++c_7323021.elements = (object *)e_7323347;
++c_7323021.elements[0] = expr_731606_731637_731698_733373;
++c_7323021.elements[1] = k_736404;
++c_7323021.elements[2] = rename_731607_731638_731699_733374;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7323021,__lambda_1047, Cyc_cdr(data, expr_731606_731637_731698_733373));;
++}
++
++static void __lambda_1047(void *data, object self_7312786, int argc, object *args) /* object self_7312786, object v_931_731614_731692_731732_733407 */
++ {
++ object v_931_731614_731692_731732_733407 = args[0];
++
++closureN_type c_7323023;
++object e_7323049 [2];
++c_7323023.hdr.mark = gc_color_red;
++ c_7323023.hdr.grayed = 0;
++c_7323023.tag = closureN_tag;
++ c_7323023.fn = (function_type)__lambda_1048;
++c_7323023.num_args = 0;
++c_7323023.num_elements = 2;
++c_7323023.elements = (object *)e_7323049;
++c_7323023.elements[0] = ((closureN)self_7312786)->elements[2];
++c_7323023.elements[1] = v_931_731614_731692_731732_733407;
++
++
++closureN_type c_7323050;
++object e_7323346 [3];
++c_7323050.hdr.mark = gc_color_red;
++ c_7323050.hdr.grayed = 0;
++c_7323050.tag = closureN_tag;
++ c_7323050.fn = (function_type)__lambda_1050;
++c_7323050.num_args = 1;
++c_7323050.num_elements = 3;
++c_7323050.elements = (object *)e_7323346;
++c_7323050.elements[0] = ((closureN)self_7312786)->elements[0];
++c_7323050.elements[1] = ((closureN)self_7312786)->elements[1];
++c_7323050.elements[2] = ((closureN)self_7312786)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7323023,__lambda_1048, &c_7323050);;
++}
++
++static void __lambda_1050(void *data, object self_7312787, int argc, object *args) /* object self_7312787, object tmp_731641_731643_731701_733376 */
++ {
++ object tmp_731641_731643_731701_733376 = args[0];
++
++closureN_type c_7323052;
++object e_7323339 [3];
++c_7323052.hdr.mark = gc_color_red;
++ c_7323052.hdr.grayed = 0;
++c_7323052.tag = closureN_tag;
++ c_7323052.fn = (function_type)__lambda_1051;
++c_7323052.num_args = 0;
++c_7323052.num_elements = 3;
++c_7323052.elements = (object *)e_7323339;
++c_7323052.elements[0] = ((closureN)self_7312787)->elements[0];
++c_7323052.elements[1] = ((closureN)self_7312787)->elements[2];
++c_7323052.elements[2] = tmp_731641_731643_731701_733376;
+
+
+-return_direct_with_clo1(data,(closure)&c_7325028,__lambda_1081, Cyc_cdr(data, ((closureN)self_7314065)->elements[0]));}
+-;;
++closureN_type c_7323340;
++object e_7323345 [1];
++c_7323340.hdr.mark = gc_color_red;
++ c_7323340.hdr.grayed = 0;
++c_7323340.tag = closureN_tag;
++ c_7323340.fn = (function_type)__lambda_1065;
++c_7323340.num_args = 1;
++c_7323340.num_elements = 1;
++c_7323340.elements = (object *)e_7323345;
++c_7323340.elements[0] = ((closureN)self_7312787)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7323052,__lambda_1051, &c_7323340);;
+ }
+
+-static void __lambda_1081(void *data, object self_7314066, int argc, object *args) /* object self_7314066, object v_9330_731777_731923_732072_733816 */
++static void __lambda_1065(void *data, object self_7312788, int argc, object *args) /* object self_7312788, object r_736405 */
+ {
+- object v_9330_731777_731923_732072_733816 = args[0];
++ object r_736405 = args[0];
+
+-closureN_type c_7325030;
+-object e_7325256 [2];
+-c_7325030.hdr.mark = gc_color_red;
+- c_7325030.hdr.grayed = 0;
+-c_7325030.tag = closureN_tag;
+- c_7325030.fn = (function_type)__lambda_1082;
+-c_7325030.num_args = 0;
+-c_7325030.num_elements = 2;
+-c_7325030.elements = (object *)e_7325256;
+-c_7325030.elements[0] = ((closureN)self_7314066)->elements[2];
+-c_7325030.elements[1] = v_9330_731777_731923_732072_733816;
+-
+
+-closureN_type c_7325257;
+-object e_7325873 [3];
+-c_7325257.hdr.mark = gc_color_red;
+- c_7325257.hdr.grayed = 0;
+-c_7325257.tag = closureN_tag;
+- c_7325257.fn = (function_type)__lambda_1087;
+-c_7325257.num_args = 1;
+-c_7325257.num_elements = 3;
+-c_7325257.elements = (object *)e_7325873;
+-c_7325257.elements[0] = ((closureN)self_7314066)->elements[0];
+-c_7325257.elements[1] = ((closureN)self_7314066)->elements[1];
+-c_7325257.elements[2] = ((closureN)self_7314066)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7325030,__lambda_1082, &c_7325257);;
++return_direct_with_clo1(data, ((closureN)self_7312788)->elements[0], (((closure) ((closureN)self_7312788)->elements[0])->fn), Cyc_car(data, r_736405));;
+ }
+
+-static void __lambda_1087(void *data, object self_7314067, int argc, object *args) /* object self_7314067, object tmp_731840_731842_732020_733764 */
++static void __lambda_1051(void *data, object self_7312789, int argc, object *args) /* object self_7312789, object k_736407 */
+ {
+- object tmp_731840_731842_732020_733764 = args[0];
+- if( (boolean_f != tmp_731840_731842_732020_733764) ){
+- return_direct_with_clo1(data, ((closureN)self_7314067)->elements[1], (((closure) ((closureN)self_7314067)->elements[1])->fn), tmp_731840_731842_732020_733764);
++ object k_736407 = args[0];
++ if( (boolean_f != ((closureN)self_7312789)->elements[2]) ){
++ return_direct_with_clo1(data, k_736407, (((closure) k_736407)->fn), ((closureN)self_7312789)->elements[2]);
+ } else {
+
+-closureN_type c_7325261;
+-object e_7325869 [3];
+-c_7325261.hdr.mark = gc_color_red;
+- c_7325261.hdr.grayed = 0;
+-c_7325261.tag = closureN_tag;
+- c_7325261.fn = (function_type)__lambda_1088;
+-c_7325261.num_args = 1;
+-c_7325261.num_elements = 3;
+-c_7325261.elements = (object *)e_7325869;
+-c_7325261.elements[0] = ((closureN)self_7314067)->elements[0];
+-c_7325261.elements[1] = ((closureN)self_7314067)->elements[1];
+-c_7325261.elements[2] = ((closureN)self_7314067)->elements[2];
++closureN_type c_7323057;
++object e_7323335 [3];
++c_7323057.hdr.mark = gc_color_red;
++ c_7323057.hdr.grayed = 0;
++c_7323057.tag = closureN_tag;
++ c_7323057.fn = (function_type)__lambda_1052;
++c_7323057.num_args = 1;
++c_7323057.num_elements = 3;
++c_7323057.elements = (object *)e_7323335;
++c_7323057.elements[0] = ((closureN)self_7312789)->elements[0];
++c_7323057.elements[1] = k_736407;
++c_7323057.elements[2] = ((closureN)self_7312789)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7325261,__lambda_1088, Cyc_cdr(data, ((closureN)self_7314067)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7323057,__lambda_1052, Cyc_cdr(data, ((closureN)self_7312789)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1088(void *data, object self_7314068, int argc, object *args) /* object self_7314068, object v_9345_731792_731885_732046_733790 */
++static void __lambda_1052(void *data, object self_7312790, int argc, object *args) /* object self_7312790, object v_934_731617_731670_731717_733392 */
+ {
+- object v_9345_731792_731885_732046_733790 = args[0];
++ object v_934_731617_731670_731717_733392 = args[0];
+
+-closureN_type c_7325263;
+-object e_7325546 [2];
+-c_7325263.hdr.mark = gc_color_red;
+- c_7325263.hdr.grayed = 0;
+-c_7325263.tag = closureN_tag;
+- c_7325263.fn = (function_type)__lambda_1089;
+-c_7325263.num_args = 0;
+-c_7325263.num_elements = 2;
+-c_7325263.elements = (object *)e_7325546;
+-c_7325263.elements[0] = ((closureN)self_7314068)->elements[2];
+-c_7325263.elements[1] = v_9345_731792_731885_732046_733790;
++closureN_type c_7323059;
++object e_7323186 [2];
++c_7323059.hdr.mark = gc_color_red;
++ c_7323059.hdr.grayed = 0;
++c_7323059.tag = closureN_tag;
++ c_7323059.fn = (function_type)__lambda_1053;
++c_7323059.num_args = 0;
++c_7323059.num_elements = 2;
++c_7323059.elements = (object *)e_7323186;
++c_7323059.elements[0] = ((closureN)self_7312790)->elements[2];
++c_7323059.elements[1] = v_934_731617_731670_731717_733392;
+
+
+-closureN_type c_7325547;
+-object e_7325868 [3];
+-c_7325547.hdr.mark = gc_color_red;
+- c_7325547.hdr.grayed = 0;
+-c_7325547.tag = closureN_tag;
+- c_7325547.fn = (function_type)__lambda_1101;
+-c_7325547.num_args = 1;
+-c_7325547.num_elements = 3;
+-c_7325547.elements = (object *)e_7325868;
+-c_7325547.elements[0] = ((closureN)self_7314068)->elements[0];
+-c_7325547.elements[1] = ((closureN)self_7314068)->elements[1];
+-c_7325547.elements[2] = ((closureN)self_7314068)->elements[2];
++closureN_type c_7323187;
++object e_7323334 [3];
++c_7323187.hdr.mark = gc_color_red;
++ c_7323187.hdr.grayed = 0;
++c_7323187.tag = closureN_tag;
++ c_7323187.fn = (function_type)__lambda_1056;
++c_7323187.num_args = 1;
++c_7323187.num_elements = 3;
++c_7323187.elements = (object *)e_7323334;
++c_7323187.elements[0] = ((closureN)self_7312790)->elements[0];
++c_7323187.elements[1] = ((closureN)self_7312790)->elements[1];
++c_7323187.elements[2] = ((closureN)self_7312790)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7325263,__lambda_1089, &c_7325547);;
++return_direct_with_clo1(data,(closure)&c_7323059,__lambda_1053, &c_7323187);;
+ }
+
+-static void __lambda_1101(void *data, object self_7314069, int argc, object *args) /* object self_7314069, object tmp_731844_731846_732021_733765 */
++static void __lambda_1056(void *data, object self_7312791, int argc, object *args) /* object self_7312791, object tmp_731645_731647_731702_733377 */
+ {
+- object tmp_731844_731846_732021_733765 = args[0];
+- if( (boolean_f != tmp_731844_731846_732021_733765) ){
+- return_direct_with_clo1(data, ((closureN)self_7314069)->elements[1], (((closure) ((closureN)self_7314069)->elements[1])->fn), tmp_731844_731846_732021_733765);
++ object tmp_731645_731647_731702_733377 = args[0];
++ if( (boolean_f != tmp_731645_731647_731702_733377) ){
++ return_direct_with_clo1(data, ((closureN)self_7312791)->elements[1], (((closure) ((closureN)self_7312791)->elements[1])->fn), tmp_731645_731647_731702_733377);
+ } else {
+
+-closureN_type c_7325551;
+-object e_7325864 [3];
+-c_7325551.hdr.mark = gc_color_red;
+- c_7325551.hdr.grayed = 0;
+-c_7325551.tag = closureN_tag;
+- c_7325551.fn = (function_type)__lambda_1102;
+-c_7325551.num_args = 1;
+-c_7325551.num_elements = 3;
+-c_7325551.elements = (object *)e_7325864;
+-c_7325551.elements[0] = ((closureN)self_7314069)->elements[0];
+-c_7325551.elements[1] = ((closureN)self_7314069)->elements[1];
+-c_7325551.elements[2] = ((closureN)self_7314069)->elements[2];
++closureN_type c_7323191;
++object e_7323330 [3];
++c_7323191.hdr.mark = gc_color_red;
++ c_7323191.hdr.grayed = 0;
++c_7323191.tag = closureN_tag;
++ c_7323191.fn = (function_type)__lambda_1057;
++c_7323191.num_args = 1;
++c_7323191.num_elements = 3;
++c_7323191.elements = (object *)e_7323330;
++c_7323191.elements[0] = ((closureN)self_7312791)->elements[0];
++c_7323191.elements[1] = ((closureN)self_7312791)->elements[1];
++c_7323191.elements[2] = ((closureN)self_7312791)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7325551,__lambda_1102, Cyc_cdr(data, ((closureN)self_7314069)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7323191,__lambda_1057, Cyc_cdr(data, ((closureN)self_7312791)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_1102(void *data, object self_7314070, int argc, object *args) /* object self_7314070, object v_9362_731809_731851_732023_733767 */
++static void __lambda_1057(void *data, object self_7312792, int argc, object *args) /* object self_7312792, object v_9315_731628_731652_731704_733379 */
+ {
+- object v_9362_731809_731851_732023_733767 = args[0];
++ object v_9315_731628_731652_731704_733379 = args[0];
+
+-closureN_type c_7325553;
+-object e_7325849 [2];
+-c_7325553.hdr.mark = gc_color_red;
+- c_7325553.hdr.grayed = 0;
+-c_7325553.tag = closureN_tag;
+- c_7325553.fn = (function_type)__lambda_1103;
+-c_7325553.num_args = 0;
+-c_7325553.num_elements = 2;
+-c_7325553.elements = (object *)e_7325849;
+-c_7325553.elements[0] = ((closureN)self_7314070)->elements[2];
+-c_7325553.elements[1] = v_9362_731809_731851_732023_733767;
++closureN_type c_7323193;
++object e_7323315 [2];
++c_7323193.hdr.mark = gc_color_red;
++ c_7323193.hdr.grayed = 0;
++c_7323193.tag = closureN_tag;
++ c_7323193.fn = (function_type)__lambda_1058;
++c_7323193.num_args = 0;
++c_7323193.num_elements = 2;
++c_7323193.elements = (object *)e_7323315;
++c_7323193.elements[0] = ((closureN)self_7312792)->elements[2];
++c_7323193.elements[1] = v_9315_731628_731652_731704_733379;
+
+
+-closureN_type c_7325850;
+-object e_7325863 [2];
+-c_7325850.hdr.mark = gc_color_red;
+- c_7325850.hdr.grayed = 0;
+-c_7325850.tag = closureN_tag;
+- c_7325850.fn = (function_type)__lambda_1118;
+-c_7325850.num_args = 1;
+-c_7325850.num_elements = 2;
+-c_7325850.elements = (object *)e_7325863;
+-c_7325850.elements[0] = ((closureN)self_7314070)->elements[0];
+-c_7325850.elements[1] = ((closureN)self_7314070)->elements[1];
++closureN_type c_7323316;
++object e_7323329 [2];
++c_7323316.hdr.mark = gc_color_red;
++ c_7323316.hdr.grayed = 0;
++c_7323316.tag = closureN_tag;
++ c_7323316.fn = (function_type)__lambda_1063;
++c_7323316.num_args = 1;
++c_7323316.num_elements = 2;
++c_7323316.elements = (object *)e_7323329;
++c_7323316.elements[0] = ((closureN)self_7312792)->elements[0];
++c_7323316.elements[1] = ((closureN)self_7312792)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7325553,__lambda_1103, &c_7325850);;
++return_direct_with_clo1(data,(closure)&c_7323193,__lambda_1058, &c_7323316);;
+ }
+
+-static void __lambda_1118(void *data, object self_7314071, int argc, object *args) /* object self_7314071, object tmp_731848_731850_732022_733766 */
++static void __lambda_1063(void *data, object self_7312793, int argc, object *args) /* object self_7312793, object tmp_731649_731651_731703_733378 */
+ {
+- object tmp_731848_731850_732022_733766 = args[0];
+- if( (boolean_f != tmp_731848_731850_732022_733766) ){
+- return_direct_with_clo1(data, ((closureN)self_7314071)->elements[1], (((closure) ((closureN)self_7314071)->elements[1])->fn), tmp_731848_731850_732022_733766);
++ object tmp_731649_731651_731703_733378 = args[0];
++ if( (boolean_f != tmp_731649_731651_731703_733378) ){
++ return_direct_with_clo1(data, ((closureN)self_7312793)->elements[1], (((closure) ((closureN)self_7312793)->elements[1])->fn), tmp_731649_731651_731703_733378);
+ } else {
+
+-closureN_type c_7325854;
+-object e_7325860 [1];
+-c_7325854.hdr.mark = gc_color_red;
+- c_7325854.hdr.grayed = 0;
+-c_7325854.tag = closureN_tag;
+- c_7325854.fn = (function_type)__lambda_1119;
+-c_7325854.num_args = 1;
+-c_7325854.num_elements = 1;
+-c_7325854.elements = (object *)e_7325860;
+-c_7325854.elements[0] = ((closureN)self_7314071)->elements[1];
++closureN_type c_7323320;
++object e_7323326 [1];
++c_7323320.hdr.mark = gc_color_red;
++ c_7323320.hdr.grayed = 0;
++c_7323320.tag = closureN_tag;
++ c_7323320.fn = (function_type)__lambda_1064;
++c_7323320.num_args = 1;
++c_7323320.num_elements = 1;
++c_7323320.elements = (object *)e_7323326;
++c_7323320.elements[0] = ((closureN)self_7312793)->elements[1];
+
+
+-make_utf8_string_with_len(c_7325861, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7325854, &c_7325861, ((closureN)self_7314071)->elements[0]);}
++make_utf8_string_with_len(c_7323327, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7323320, &c_7323327, ((closureN)self_7312793)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1119(void *data, object self_7314072, int argc, object *args) /* object self_7314072, object r_736975 */
++static void __lambda_1064(void *data, object self_7312794, int argc, object *args) /* object self_7312794, object r_736410 */
+ {
+- object r_736975 = args[0];
++ object r_736410 = args[0];
+
+-pair_type local_7325859;
+-return_direct_with_clo1(data, ((closureN)self_7314072)->elements[0], (((closure) ((closureN)self_7314072)->elements[0])->fn), set_pair_as_expr(&local_7325859, r_736975, boolean_f));;
++pair_type local_7323325;
++return_direct_with_clo1(data, ((closureN)self_7312794)->elements[0], (((closure) ((closureN)self_7312794)->elements[0])->fn), set_pair_as_expr(&local_7323325, r_736410, boolean_f));;
+ }
+
+-static void __lambda_1103(void *data, object self_7314073, int argc, object *args) /* object self_7314073, object k_736977 */
++static void __lambda_1058(void *data, object self_7312795, int argc, object *args) /* object self_7312795, object k_736412 */
+ {
+- object k_736977 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314073)->elements[1])) ){
++ object k_736412 = args[0];
+
+-
+- make_utf8_string_with_len(c_7325562, "mktmp", 5, 5);
+-if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314073)->elements[1]), &c_7325562)) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))))) ){
+- complex_num_type local_7325586;
+-
+-
+-
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325586, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312795)->elements[1])) ){
+
+
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312795)->elements[1]))) ){
+
+
+
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))))))) ){
+- complex_num_type local_7325622;
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325622, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7312795)->elements[1])))) ){
+
+
+
+
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312795)->elements[1]))))) ){
+
+
+
+
+
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312795)->elements[1])))))) ){
+
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))))))))) ){
+-
+-closureN_type c_7325670;
+-object e_7325837 [3];
+-c_7325670.hdr.mark = gc_color_red;
+- c_7325670.hdr.grayed = 0;
+-c_7325670.tag = closureN_tag;
+- c_7325670.fn = (function_type)__lambda_1104;
+-c_7325670.num_args = 1;
+-c_7325670.num_elements = 3;
+-c_7325670.elements = (object *)e_7325837;
+-c_7325670.elements[0] = k_736977;
+-c_7325670.elements[1] = ((closureN)self_7314073)->elements[0];
+-c_7325670.elements[2] = ((closureN)self_7314073)->elements[1];
++closureN_type c_7323231;
++object e_7323309 [3];
++c_7323231.hdr.mark = gc_color_red;
++ c_7323231.hdr.grayed = 0;
++c_7323231.tag = closureN_tag;
++ c_7323231.fn = (function_type)__lambda_1059;
++c_7323231.num_args = 1;
++c_7323231.num_elements = 3;
++c_7323231.elements = (object *)e_7323309;
++c_7323231.elements[0] = k_736412;
++c_7323231.elements[1] = ((closureN)self_7312795)->elements[0];
++c_7323231.elements[2] = ((closureN)self_7312795)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314073)->elements[0], &c_7325670, quote_call_91with_91values);
+-} else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;
++return_closcall2(data, ((closureN)self_7312795)->elements[0], &c_7323231, quote_call_91with_91values);
+ } else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736412, (((closure) k_736412)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736412, (((closure) k_736412)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736412, (((closure) k_736412)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736412, (((closure) k_736412)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736977, (((closure) k_736977)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1104(void *data, object self_7314074, int argc, object *args) /* object self_7314074, object r_737004 */
+- {
+- object r_737004 = args[0];
+-
+-closureN_type c_7325673;
+-object e_7325836 [4];
+-c_7325673.hdr.mark = gc_color_red;
+- c_7325673.hdr.grayed = 0;
+-c_7325673.tag = closureN_tag;
+- c_7325673.fn = (function_type)__lambda_1105;
+-c_7325673.num_args = 1;
+-c_7325673.num_elements = 4;
+-c_7325673.elements = (object *)e_7325836;
+-c_7325673.elements[0] = ((closureN)self_7314074)->elements[0];
+-c_7325673.elements[1] = r_737004;
+-c_7325673.elements[2] = ((closureN)self_7314074)->elements[1];
+-c_7325673.elements[3] = ((closureN)self_7314074)->elements[2];
+-
+-return_closcall2(data, ((closureN)self_7314074)->elements[1], &c_7325673, quote_lambda);;
+-}
+-
+-static void __lambda_1105(void *data, object self_7314075, int argc, object *args) /* object self_7314075, object r_737054 */
+- {
+- object r_737054 = args[0];
+-
+-closureN_type c_7325676;
+-object e_7325835 [5];
+-c_7325676.hdr.mark = gc_color_red;
+- c_7325676.hdr.grayed = 0;
+-c_7325676.tag = closureN_tag;
+- c_7325676.fn = (function_type)__lambda_1106;
+-c_7325676.num_args = 1;
+-c_7325676.num_elements = 5;
+-c_7325676.elements = (object *)e_7325835;
+-c_7325676.elements[0] = ((closureN)self_7314075)->elements[0];
+-c_7325676.elements[1] = ((closureN)self_7314075)->elements[1];
+-c_7325676.elements[2] = r_737054;
+-c_7325676.elements[3] = ((closureN)self_7314075)->elements[2];
+-c_7325676.elements[4] = ((closureN)self_7314075)->elements[3];
+-
+-return_closcall2(data, ((closureN)self_7314075)->elements[2], &c_7325676, quote_lambda);;
+-}
+-
+-static void __lambda_1106(void *data, object self_7314076, int argc, object *args) /* object self_7314076, object r_737013_739178_739208_739237 */
+- {
+- object r_737013_739178_739208_739237 = args[0];
+-
+-closureN_type c_7325678;
+-object e_7325832 [6];
+-c_7325678.hdr.mark = gc_color_red;
+- c_7325678.hdr.grayed = 0;
+-c_7325678.tag = closureN_tag;
+- c_7325678.fn = (function_type)__lambda_1107;
+-c_7325678.num_args = 1;
+-c_7325678.num_elements = 6;
+-c_7325678.elements = (object *)e_7325832;
+-c_7325678.elements[0] = ((closureN)self_7314076)->elements[0];
+-c_7325678.elements[1] = ((closureN)self_7314076)->elements[1];
+-c_7325678.elements[2] = r_737013_739178_739208_739237;
+-c_7325678.elements[3] = ((closureN)self_7314076)->elements[2];
+-c_7325678.elements[4] = ((closureN)self_7314076)->elements[3];
+-c_7325678.elements[5] = ((closureN)self_7314076)->elements[4];
+-
+-
+-mmacro(c_7325833, (function_type)__lambda_1117);c_7325833.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7325678,__lambda_1107, &c_7325833);;
+-}
+-
+-static void __lambda_1117(void *data, object self_7314077, int argc, object *args) /* object self_7314077, object k_737052_739204_739234_739263, object arg_731883_732044_733788_739205_739235_739264 */
+- {
+- object k_737052_739204_739234_739263 = args[0]; object arg_731883_732044_733788_739205_739235_739264 = args[1];
+- return_direct_with_clo1(data, k_737052_739204_739234_739263, (((closure) k_737052_739204_739234_739263)->fn), arg_731883_732044_733788_739205_739235_739264);;
+-}
+-
+-static void __lambda_1107(void *data, object self_7314078, int argc, object *args) /* object self_7314078, object r_737051_739179_739209_739238 */
+- {
+- object r_737051_739179_739209_739238 = args[0];
+-
+-closureN_type c_7325680;
+-object e_7325822 [6];
+-c_7325680.hdr.mark = gc_color_red;
+- c_7325680.hdr.grayed = 0;
+-c_7325680.tag = closureN_tag;
+- c_7325680.fn = (function_type)__lambda_1108;
+-c_7325680.num_args = 1;
+-c_7325680.num_elements = 6;
+-c_7325680.elements = (object *)e_7325822;
+-c_7325680.elements[0] = ((closureN)self_7314078)->elements[0];
+-c_7325680.elements[1] = ((closureN)self_7314078)->elements[1];
+-c_7325680.elements[2] = ((closureN)self_7314078)->elements[2];
+-c_7325680.elements[3] = ((closureN)self_7314078)->elements[3];
+-c_7325680.elements[4] = ((closureN)self_7314078)->elements[4];
+-c_7325680.elements[5] = ((closureN)self_7314078)->elements[5];
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325680, r_737051_739179_739209_739238, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[5])))));;
+-}
+-
+-static void __lambda_1108(void *data, object self_7314079, int argc, object *args) /* object self_7314079, object r_737048_739180_739210_739239 */
+- {
+- object r_737048_739180_739210_739239 = args[0];
+-
+-closureN_type c_7325683;
+-object e_7325821 [7];
+-c_7325683.hdr.mark = gc_color_red;
+- c_7325683.hdr.grayed = 0;
+-c_7325683.tag = closureN_tag;
+- c_7325683.fn = (function_type)__lambda_1109;
+-c_7325683.num_args = 1;
+-c_7325683.num_elements = 7;
+-c_7325683.elements = (object *)e_7325821;
+-c_7325683.elements[0] = ((closureN)self_7314079)->elements[0];
+-c_7325683.elements[1] = ((closureN)self_7314079)->elements[1];
+-c_7325683.elements[2] = ((closureN)self_7314079)->elements[2];
+-c_7325683.elements[3] = r_737048_739180_739210_739239;
+-c_7325683.elements[4] = ((closureN)self_7314079)->elements[3];
+-c_7325683.elements[5] = ((closureN)self_7314079)->elements[4];
+-c_7325683.elements[6] = ((closureN)self_7314079)->elements[5];
+-
+-return_closcall2(data, ((closureN)self_7314079)->elements[4], &c_7325683, quote_x);;
+-}
+-
+-static void __lambda_1109(void *data, object self_7314080, int argc, object *args) /* object self_7314080, object r_737049_739181_739211_739240 */
+- {
+- object r_737049_739181_739211_739240 = args[0];
+-
+-closureN_type c_7325685;
+-object e_7325819 [6];
+-c_7325685.hdr.mark = gc_color_red;
+- c_7325685.hdr.grayed = 0;
+-c_7325685.tag = closureN_tag;
+- c_7325685.fn = (function_type)__lambda_1110;
+-c_7325685.num_args = 1;
+-c_7325685.num_elements = 6;
+-c_7325685.elements = (object *)e_7325819;
+-c_7325685.elements[0] = ((closureN)self_7314080)->elements[0];
+-c_7325685.elements[1] = ((closureN)self_7314080)->elements[1];
+-c_7325685.elements[2] = ((closureN)self_7314080)->elements[2];
+-c_7325685.elements[3] = ((closureN)self_7314080)->elements[4];
+-c_7325685.elements[4] = ((closureN)self_7314080)->elements[5];
+-c_7325685.elements[5] = ((closureN)self_7314080)->elements[6];
+-
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325685, ((closureN)self_7314080)->elements[3], r_737049_739181_739211_739240);;
+-}
+-
+-static void __lambda_1110(void *data, object self_7314081, int argc, object *args) /* object self_7314081, object r_737016_739182_739212_739241 */
+- {
+- object r_737016_739182_739212_739241 = args[0];
+-
+-closureN_type c_7325688;
+-object e_7325818 [7];
+-c_7325688.hdr.mark = gc_color_red;
+- c_7325688.hdr.grayed = 0;
+-c_7325688.tag = closureN_tag;
+- c_7325688.fn = (function_type)__lambda_1111;
+-c_7325688.num_args = 1;
+-c_7325688.num_elements = 7;
+-c_7325688.elements = (object *)e_7325818;
+-c_7325688.elements[0] = ((closureN)self_7314081)->elements[0];
+-c_7325688.elements[1] = ((closureN)self_7314081)->elements[1];
+-c_7325688.elements[2] = ((closureN)self_7314081)->elements[2];
+-c_7325688.elements[3] = r_737016_739182_739212_739241;
+-c_7325688.elements[4] = ((closureN)self_7314081)->elements[3];
+-c_7325688.elements[5] = ((closureN)self_7314081)->elements[4];
+-c_7325688.elements[6] = ((closureN)self_7314081)->elements[5];
+-
+-return_closcall2(data, ((closureN)self_7314081)->elements[4], &c_7325688, quote_let_91values);;
+-}
+-
+-static void __lambda_1111(void *data, object self_7314082, int argc, object *args) /* object self_7314082, object r_737022_739183_739213_739242 */
+- {
+- object r_737022_739183_739213_739242 = args[0];
+-
+-closureN_type c_7325690;
+-object e_7325815 [8];
+-c_7325690.hdr.mark = gc_color_red;
+- c_7325690.hdr.grayed = 0;
+-c_7325690.tag = closureN_tag;
+- c_7325690.fn = (function_type)__lambda_1112;
+-c_7325690.num_args = 1;
+-c_7325690.num_elements = 8;
+-c_7325690.elements = (object *)e_7325815;
+-c_7325690.elements[0] = ((closureN)self_7314082)->elements[0];
+-c_7325690.elements[1] = ((closureN)self_7314082)->elements[1];
+-c_7325690.elements[2] = ((closureN)self_7314082)->elements[2];
+-c_7325690.elements[3] = ((closureN)self_7314082)->elements[3];
+-c_7325690.elements[4] = r_737022_739183_739213_739242;
+-c_7325690.elements[5] = ((closureN)self_7314082)->elements[4];
+-c_7325690.elements[6] = ((closureN)self_7314082)->elements[5];
+-c_7325690.elements[7] = ((closureN)self_7314082)->elements[6];
+-
+-
+-mmacro(c_7325816, (function_type)__lambda_1116);c_7325816.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7325690,__lambda_1112, &c_7325816);;
+-}
+-
+-static void __lambda_1116(void *data, object self_7314083, int argc, object *args) /* object self_7314083, object k_737046_739202_739232_739261, object tmp_731884_732045_733789_739203_739233_739262 */
+- {
+- object k_737046_739202_739232_739261 = args[0]; object tmp_731884_732045_733789_739203_739233_739262 = args[1];
+- return_direct_with_clo1(data, k_737046_739202_739232_739261, (((closure) k_737046_739202_739232_739261)->fn), tmp_731884_732045_733789_739203_739233_739262);;
+-}
+-
+-static void __lambda_1112(void *data, object self_7314084, int argc, object *args) /* object self_7314084, object r_737045_739184_739214_739243 */
+- {
+- object r_737045_739184_739214_739243 = args[0];
+-
+-closureN_type c_7325692;
+-object e_7325801 [8];
+-c_7325692.hdr.mark = gc_color_red;
+- c_7325692.hdr.grayed = 0;
+-c_7325692.tag = closureN_tag;
+- c_7325692.fn = (function_type)__lambda_1113;
+-c_7325692.num_args = 1;
+-c_7325692.num_elements = 8;
+-c_7325692.elements = (object *)e_7325801;
+-c_7325692.elements[0] = ((closureN)self_7314084)->elements[0];
+-c_7325692.elements[1] = ((closureN)self_7314084)->elements[1];
+-c_7325692.elements[2] = ((closureN)self_7314084)->elements[2];
+-c_7325692.elements[3] = ((closureN)self_7314084)->elements[3];
+-c_7325692.elements[4] = ((closureN)self_7314084)->elements[4];
+-c_7325692.elements[5] = ((closureN)self_7314084)->elements[5];
+-c_7325692.elements[6] = ((closureN)self_7314084)->elements[6];
+-c_7325692.elements[7] = ((closureN)self_7314084)->elements[7];
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325692, r_737045_739184_739214_739243, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314084)->elements[7])))))));;
+-}
+-
+-static void __lambda_1113(void *data, object self_7314085, int argc, object *args) /* object self_7314085, object r_737034_739185_739215_739244 */
+- {
+- object r_737034_739185_739215_739244 = args[0];
+-
+-closureN_type c_7325695;
+-object e_7325800 [8];
+-c_7325695.hdr.mark = gc_color_red;
+- c_7325695.hdr.grayed = 0;
+-c_7325695.tag = closureN_tag;
+- c_7325695.fn = (function_type)__lambda_1114;
+-c_7325695.num_args = 1;
+-c_7325695.num_elements = 8;
+-c_7325695.elements = (object *)e_7325800;
+-c_7325695.elements[0] = ((closureN)self_7314085)->elements[0];
+-c_7325695.elements[1] = ((closureN)self_7314085)->elements[1];
+-c_7325695.elements[2] = ((closureN)self_7314085)->elements[2];
+-c_7325695.elements[3] = ((closureN)self_7314085)->elements[3];
+-c_7325695.elements[4] = ((closureN)self_7314085)->elements[4];
+-c_7325695.elements[5] = r_737034_739185_739215_739244;
+-c_7325695.elements[6] = ((closureN)self_7314085)->elements[5];
+-c_7325695.elements[7] = ((closureN)self_7314085)->elements[7];
+-
+-return_closcall2(data, ((closureN)self_7314085)->elements[6], &c_7325695, quote_x);;
+-}
+-
+-static void __lambda_1114(void *data, object self_7314086, int argc, object *args) /* object self_7314086, object r_737041_739186_739216_739245 */
+- {
+- object r_737041_739186_739216_739245 = args[0];
+-
+-closureN_type c_7325697;
+-object e_7325784 [7];
+-c_7325697.hdr.mark = gc_color_red;
+- c_7325697.hdr.grayed = 0;
+-c_7325697.tag = closureN_tag;
+- c_7325697.fn = (function_type)__lambda_1115;
+-c_7325697.num_args = 1;
+-c_7325697.num_elements = 7;
+-c_7325697.elements = (object *)e_7325784;
+-c_7325697.elements[0] = ((closureN)self_7314086)->elements[0];
+-c_7325697.elements[1] = ((closureN)self_7314086)->elements[1];
+-c_7325697.elements[2] = ((closureN)self_7314086)->elements[2];
+-c_7325697.elements[3] = ((closureN)self_7314086)->elements[3];
+-c_7325697.elements[4] = ((closureN)self_7314086)->elements[4];
+-c_7325697.elements[5] = ((closureN)self_7314086)->elements[6];
+-c_7325697.elements[6] = ((closureN)self_7314086)->elements[7];
+-
+-
+-pair_type local_7325788;
+-
+-pair_type local_7325791;
+-
+-
+-
+-
+-
+-pair_type local_7325799;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325697, ((closureN)self_7314086)->elements[5], set_pair_as_expr(&local_7325788, set_pair_as_expr(&local_7325791, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314086)->elements[7])), set_pair_as_expr(&local_7325799, r_737041_739186_739216_739245, NULL)), NULL));;
+-}
+-
+-static void __lambda_1115(void *data, object self_7314087, int argc, object *args) /* object self_7314087, object r_737029_739190_739220_739249_739268_739282_739295 */
+- {
+- object r_737029_739190_739220_739249_739268_739282_739295 = args[0];
+-
+-pair_type local_7325702;
+-
+-pair_type local_7325705;
+-
+-pair_type local_7325709;
+-
+-pair_type local_7325712;
+-
+-pair_type local_7325716;
+-
+-pair_type local_7325719;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325729;
+-
+-pair_type local_7325732;
+-
+-pair_type local_7325736;
+-
+-pair_type local_7325740;
+-
+-pair_type local_7325743;
+-
+-pair_type local_7325747;
+-
+-make_utf8_string_with_len(c_7325748, "bind", 4, 4);
+-
+-pair_type local_7325751;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325765;
+-
+-pair_type local_7325768;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314087)->elements[0], (((closure) ((closureN)self_7314087)->elements[0])->fn), set_pair_as_expr(&local_7325702, set_pair_as_expr(&local_7325705, ((closureN)self_7314087)->elements[1], set_pair_as_expr(&local_7325709, set_pair_as_expr(&local_7325712, ((closureN)self_7314087)->elements[5], set_pair_as_expr(&local_7325716, NULL, set_pair_as_expr(&local_7325719, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[6]))), NULL))), set_pair_as_expr(&local_7325729, set_pair_as_expr(&local_7325732, ((closureN)self_7314087)->elements[2], set_pair_as_expr(&local_7325736, ((closureN)self_7314087)->elements[3], set_pair_as_expr(&local_7325740, set_pair_as_expr(&local_7325743, ((closureN)self_7314087)->elements[4], set_pair_as_expr(&local_7325747, &c_7325748, set_pair_as_expr(&local_7325751, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[6]))))), set_pair_a
s_expr(&local_7325765, r_737029_739190_739220_739249_739268_739282_739295, set_pair_as_expr(&local_7325768, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[6]))))))), NULL))))), NULL))), NULL))), boolean_f));;
+-}
+-
+-static void __lambda_1089(void *data, object self_7314088, int argc, object *args) /* object self_7314088, object k_737065 */
+- {
+- object k_737065 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314088)->elements[1])) ){
+-
+-
+- make_utf8_string_with_len(c_7325272, "mktmp", 5, 5);
+-if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314088)->elements[1]), &c_7325272)) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))))) ){
+- complex_num_type local_7325303;
+-
+-
+-
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325303, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))) ){
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))) ){
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))))))) ){
+- complex_num_type local_7325339;
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325339, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))))) ){
+-
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))))) ){
+-
+-
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))))))))) ){
+-
+-closureN_type c_7325387;
+-object e_7325533 [3];
+-c_7325387.hdr.mark = gc_color_red;
+- c_7325387.hdr.grayed = 0;
+-c_7325387.tag = closureN_tag;
+- c_7325387.fn = (function_type)__lambda_1090;
+-c_7325387.num_args = 1;
+-c_7325387.num_elements = 3;
+-c_7325387.elements = (object *)e_7325533;
+-c_7325387.elements[0] = k_737065;
+-c_7325387.elements[1] = ((closureN)self_7314088)->elements[0];
+-c_7325387.elements[2] = ((closureN)self_7314088)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314088)->elements[0], &c_7325387, quote_let_91values);
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737065, (((closure) k_737065)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1090(void *data, object self_7314089, int argc, object *args) /* object self_7314089, object r_737095 */
+- {
+- object r_737095 = args[0];
+-
+-closureN_type c_7325389;
+-object e_7325530 [4];
+-c_7325389.hdr.mark = gc_color_red;
+- c_7325389.hdr.grayed = 0;
+-c_7325389.tag = closureN_tag;
+- c_7325389.fn = (function_type)__lambda_1091;
+-c_7325389.num_args = 1;
+-c_7325389.num_elements = 4;
+-c_7325389.elements = (object *)e_7325530;
+-c_7325389.elements[0] = ((closureN)self_7314089)->elements[0];
+-c_7325389.elements[1] = r_737095;
+-c_7325389.elements[2] = ((closureN)self_7314089)->elements[1];
+-c_7325389.elements[3] = ((closureN)self_7314089)->elements[2];
+-
+-
+-mmacro(c_7325531, (function_type)__lambda_1100);c_7325531.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7325389,__lambda_1091, &c_7325531);;
+-}
+-
+-static void __lambda_1100(void *data, object self_7314090, int argc, object *args) /* object self_7314090, object k_737134, object arg_731921_732070_733814 */
+- {
+- object k_737134 = args[0]; object arg_731921_732070_733814 = args[1];
+- return_direct_with_clo1(data, k_737134, (((closure) k_737134)->fn), arg_731921_732070_733814);;
+-}
+-
+-static void __lambda_1091(void *data, object self_7314091, int argc, object *args) /* object self_7314091, object r_737133 */
+- {
+- object r_737133 = args[0];
+-
+-closureN_type c_7325391;
+-object e_7325520 [4];
+-c_7325391.hdr.mark = gc_color_red;
+- c_7325391.hdr.grayed = 0;
+-c_7325391.tag = closureN_tag;
+- c_7325391.fn = (function_type)__lambda_1092;
+-c_7325391.num_args = 1;
+-c_7325391.num_elements = 4;
+-c_7325391.elements = (object *)e_7325520;
+-c_7325391.elements[0] = ((closureN)self_7314091)->elements[0];
+-c_7325391.elements[1] = ((closureN)self_7314091)->elements[1];
+-c_7325391.elements[2] = ((closureN)self_7314091)->elements[2];
+-c_7325391.elements[3] = ((closureN)self_7314091)->elements[3];
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325391, r_737133, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314091)->elements[3])))));;
+-}
+-
+-static void __lambda_1092(void *data, object self_7314092, int argc, object *args) /* object self_7314092, object r_737127 */
+- {
+- object r_737127 = args[0];
+-
+-closureN_type c_7325394;
+-object e_7325519 [5];
+-c_7325394.hdr.mark = gc_color_red;
+- c_7325394.hdr.grayed = 0;
+-c_7325394.tag = closureN_tag;
+- c_7325394.fn = (function_type)__lambda_1093;
+-c_7325394.num_args = 1;
+-c_7325394.num_elements = 5;
+-c_7325394.elements = (object *)e_7325519;
+-c_7325394.elements[0] = ((closureN)self_7314092)->elements[0];
+-c_7325394.elements[1] = ((closureN)self_7314092)->elements[1];
+-c_7325394.elements[2] = r_737127;
+-c_7325394.elements[3] = ((closureN)self_7314092)->elements[2];
+-c_7325394.elements[4] = ((closureN)self_7314092)->elements[3];
+-
+-return_closcall2(data, ((closureN)self_7314092)->elements[2], &c_7325394, quote_x);;
+-}
+-
+-static void __lambda_1093(void *data, object self_7314093, int argc, object *args) /* object self_7314093, object r_737129 */
+- {
+- object r_737129 = args[0];
+-
+-closureN_type c_7325396;
+-object e_7325514 [4];
+-c_7325396.hdr.mark = gc_color_red;
+- c_7325396.hdr.grayed = 0;
+-c_7325396.tag = closureN_tag;
+- c_7325396.fn = (function_type)__lambda_1094;
+-c_7325396.num_args = 1;
+-c_7325396.num_elements = 4;
+-c_7325396.elements = (object *)e_7325514;
+-c_7325396.elements[0] = ((closureN)self_7314093)->elements[0];
+-c_7325396.elements[1] = ((closureN)self_7314093)->elements[1];
+-c_7325396.elements[2] = ((closureN)self_7314093)->elements[3];
+-c_7325396.elements[3] = ((closureN)self_7314093)->elements[4];
+-
+-
+-pair_type local_7325518;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325396, ((closureN)self_7314093)->elements[2], set_pair_as_expr(&local_7325518, r_737129, NULL));;
+-}
+-
+-static void __lambda_1094(void *data, object self_7314094, int argc, object *args) /* object self_7314094, object r_737104_739088 */
+- {
+- object r_737104_739088 = args[0];
+-
+-closureN_type c_7325398;
+-object e_7325511 [5];
+-c_7325398.hdr.mark = gc_color_red;
+- c_7325398.hdr.grayed = 0;
+-c_7325398.tag = closureN_tag;
+- c_7325398.fn = (function_type)__lambda_1095;
+-c_7325398.num_args = 1;
+-c_7325398.num_elements = 5;
+-c_7325398.elements = (object *)e_7325511;
+-c_7325398.elements[0] = ((closureN)self_7314094)->elements[0];
+-c_7325398.elements[1] = ((closureN)self_7314094)->elements[1];
+-c_7325398.elements[2] = r_737104_739088;
+-c_7325398.elements[3] = ((closureN)self_7314094)->elements[2];
+-c_7325398.elements[4] = ((closureN)self_7314094)->elements[3];
+-
+-
+-mmacro(c_7325512, (function_type)__lambda_1099);c_7325512.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7325398,__lambda_1095, &c_7325512);;
+-}
+-
+-static void __lambda_1099(void *data, object self_7314095, int argc, object *args) /* object self_7314095, object k_737126_739104, object tmp_731922_732071_733815_739105 */
+- {
+- object k_737126_739104 = args[0]; object tmp_731922_732071_733815_739105 = args[1];
+- return_direct_with_clo1(data, k_737126_739104, (((closure) k_737126_739104)->fn), tmp_731922_732071_733815_739105);;
+-}
+-
+-static void __lambda_1095(void *data, object self_7314096, int argc, object *args) /* object self_7314096, object r_737125_739089 */
+- {
+- object r_737125_739089 = args[0];
+-
+-closureN_type c_7325400;
+-object e_7325497 [5];
+-c_7325400.hdr.mark = gc_color_red;
+- c_7325400.hdr.grayed = 0;
+-c_7325400.tag = closureN_tag;
+- c_7325400.fn = (function_type)__lambda_1096;
+-c_7325400.num_args = 1;
+-c_7325400.num_elements = 5;
+-c_7325400.elements = (object *)e_7325497;
+-c_7325400.elements[0] = ((closureN)self_7314096)->elements[0];
+-c_7325400.elements[1] = ((closureN)self_7314096)->elements[1];
+-c_7325400.elements[2] = ((closureN)self_7314096)->elements[2];
+-c_7325400.elements[3] = ((closureN)self_7314096)->elements[3];
+-c_7325400.elements[4] = ((closureN)self_7314096)->elements[4];
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7325400, r_737125_739089, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314096)->elements[4])))))));;
+-}
+-
+-static void __lambda_1096(void *data, object self_7314097, int argc, object *args) /* object self_7314097, object r_737114_739090 */
+- {
+- object r_737114_739090 = args[0];
+-
+-closureN_type c_7325403;
+-object e_7325496 [5];
+-c_7325403.hdr.mark = gc_color_red;
+- c_7325403.hdr.grayed = 0;
+-c_7325403.tag = closureN_tag;
+- c_7325403.fn = (function_type)__lambda_1097;
+-c_7325403.num_args = 1;
+-c_7325403.num_elements = 5;
+-c_7325403.elements = (object *)e_7325496;
+-c_7325403.elements[0] = ((closureN)self_7314097)->elements[0];
+-c_7325403.elements[1] = ((closureN)self_7314097)->elements[1];
+-c_7325403.elements[2] = ((closureN)self_7314097)->elements[2];
+-c_7325403.elements[3] = r_737114_739090;
+-c_7325403.elements[4] = ((closureN)self_7314097)->elements[4];
+-
+-return_closcall2(data, ((closureN)self_7314097)->elements[3], &c_7325403, quote_x);;
+-}
+-
+-static void __lambda_1097(void *data, object self_7314098, int argc, object *args) /* object self_7314098, object r_737121_739091 */
+- {
+- object r_737121_739091 = args[0];
+-
+-closureN_type c_7325405;
+-object e_7325478 [4];
+-c_7325405.hdr.mark = gc_color_red;
+- c_7325405.hdr.grayed = 0;
+-c_7325405.tag = closureN_tag;
+- c_7325405.fn = (function_type)__lambda_1098;
+-c_7325405.num_args = 1;
+-c_7325405.num_elements = 4;
+-c_7325405.elements = (object *)e_7325478;
+-c_7325405.elements[0] = ((closureN)self_7314098)->elements[0];
+-c_7325405.elements[1] = ((closureN)self_7314098)->elements[1];
+-c_7325405.elements[2] = ((closureN)self_7314098)->elements[2];
+-c_7325405.elements[3] = ((closureN)self_7314098)->elements[4];
+-
+-
+-pair_type local_7325482;
+-
+-pair_type local_7325485;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325495;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7325405, ((closureN)self_7314098)->elements[3], set_pair_as_expr(&local_7325482, set_pair_as_expr(&local_7325485, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314098)->elements[4]))), set_pair_as_expr(&local_7325495, r_737121_739091, NULL)), NULL));;
+-}
+-
+-static void __lambda_1098(void *data, object self_7314099, int argc, object *args) /* object self_7314099, object r_737109_739095_739109_739120_739130 */
+- {
+- object r_737109_739095_739109_739120_739130 = args[0];
+-
+-pair_type local_7325410;
+-
+-pair_type local_7325413;
+-
+-pair_type local_7325417;
+-
+-make_utf8_string_with_len(c_7325418, "mktmp", 5, 5);
+-
+-pair_type local_7325421;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325431;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325441;
+-
+-pair_type local_7325445;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325459;
+-
+-pair_type local_7325462;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314099)->elements[0], (((closure) ((closureN)self_7314099)->elements[0])->fn), set_pair_as_expr(&local_7325410, set_pair_as_expr(&local_7325413, ((closureN)self_7314099)->elements[1], set_pair_as_expr(&local_7325417, &c_7325418, set_pair_as_expr(&local_7325421, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))), set_pair_as_expr(&local_7325431, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))), set_pair_as_expr(&local_7325441, ((closureN)self_7314099)->elements[2], set_pair_as_expr(&local_7325445, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))))), set_pair_as_expr(&local_7325459, r_737109_739095_739109_739120_739130, set_pair_as_expr(&local_7325462, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))))))), NULL))))
)))), boolean_f));;
+-}
+-
+-static void __lambda_1082(void *data, object self_7314100, int argc, object *args) /* object self_7314100, object k_737137 */
+- {
+- object k_737137 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314100)->elements[1])) ){
+-
+-
+- make_utf8_string_with_len(c_7325039, "mktmp", 5, 5);
+-if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314100)->elements[1]), &c_7325039)) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))))) ){
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))))) ){
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))))))) ){
+-
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))))))) ){
+-
+-
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))))))))) ){
+-
+-closureN_type c_7325126;
+-object e_7325245 [3];
+-c_7325126.hdr.mark = gc_color_red;
+- c_7325126.hdr.grayed = 0;
+-c_7325126.tag = closureN_tag;
+- c_7325126.fn = (function_type)__lambda_1083;
+-c_7325126.num_args = 1;
+-c_7325126.num_elements = 3;
+-c_7325126.elements = (object *)e_7325245;
+-c_7325126.elements[0] = k_737137;
+-c_7325126.elements[1] = ((closureN)self_7314100)->elements[0];
+-c_7325126.elements[2] = ((closureN)self_7314100)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314100)->elements[0], &c_7325126, quote_call_91with_91values);
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737137, (((closure) k_737137)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1083(void *data, object self_7314101, int argc, object *args) /* object self_7314101, object r_737163 */
+- {
+- object r_737163 = args[0];
+-
+-closureN_type c_7325129;
+-object e_7325244 [4];
+-c_7325129.hdr.mark = gc_color_red;
+- c_7325129.hdr.grayed = 0;
+-c_7325129.tag = closureN_tag;
+- c_7325129.fn = (function_type)__lambda_1084;
+-c_7325129.num_args = 1;
+-c_7325129.num_elements = 4;
+-c_7325129.elements = (object *)e_7325244;
+-c_7325129.elements[0] = ((closureN)self_7314101)->elements[0];
+-c_7325129.elements[1] = r_737163;
+-c_7325129.elements[2] = ((closureN)self_7314101)->elements[1];
+-c_7325129.elements[3] = ((closureN)self_7314101)->elements[2];
+-
+-return_closcall2(data, ((closureN)self_7314101)->elements[1], &c_7325129, quote_lambda);;
+-}
+-
+-static void __lambda_1084(void *data, object self_7314102, int argc, object *args) /* object self_7314102, object r_737193 */
+- {
+- object r_737193 = args[0];
+-
+-closureN_type c_7325132;
+-object e_7325243 [5];
+-c_7325132.hdr.mark = gc_color_red;
+- c_7325132.hdr.grayed = 0;
+-c_7325132.tag = closureN_tag;
+- c_7325132.fn = (function_type)__lambda_1085;
+-c_7325132.num_args = 1;
+-c_7325132.num_elements = 5;
+-c_7325132.elements = (object *)e_7325243;
+-c_7325132.elements[0] = ((closureN)self_7314102)->elements[0];
+-c_7325132.elements[1] = ((closureN)self_7314102)->elements[1];
+-c_7325132.elements[2] = r_737193;
+-c_7325132.elements[3] = ((closureN)self_7314102)->elements[2];
+-c_7325132.elements[4] = ((closureN)self_7314102)->elements[3];
+-
+-return_closcall2(data, ((closureN)self_7314102)->elements[2], &c_7325132, quote_lambda);;
+-}
+-
+-static void __lambda_1085(void *data, object self_7314103, int argc, object *args) /* object self_7314103, object r_737172_738979_738994_739008 */
+- {
+- object r_737172_738979_738994_739008 = args[0];
+-
+-closureN_type c_7325135;
+-object e_7325242 [5];
+-c_7325135.hdr.mark = gc_color_red;
+- c_7325135.hdr.grayed = 0;
+-c_7325135.tag = closureN_tag;
+- c_7325135.fn = (function_type)__lambda_1086;
+-c_7325135.num_args = 1;
+-c_7325135.num_elements = 5;
+-c_7325135.elements = (object *)e_7325242;
+-c_7325135.elements[0] = ((closureN)self_7314103)->elements[0];
+-c_7325135.elements[1] = ((closureN)self_7314103)->elements[1];
+-c_7325135.elements[2] = r_737172_738979_738994_739008;
+-c_7325135.elements[3] = ((closureN)self_7314103)->elements[2];
+-c_7325135.elements[4] = ((closureN)self_7314103)->elements[4];
+-
+-return_closcall2(data, ((closureN)self_7314103)->elements[3], &c_7325135, quote_let_91values);;
+-}
+-
+-static void __lambda_1086(void *data, object self_7314104, int argc, object *args) /* object self_7314104, object r_737180_738980_738995_739009 */
+- {
+- object r_737180_738980_738995_739009 = args[0];
+-
+-pair_type local_7325140;
+-
+-pair_type local_7325143;
+-
+-pair_type local_7325147;
+-
+-pair_type local_7325150;
+-
+-pair_type local_7325154;
+-
+-pair_type local_7325157;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325167;
+-
+-pair_type local_7325170;
+-
+-pair_type local_7325174;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325186;
+-
+-pair_type local_7325189;
+-
+-pair_type local_7325192;
+-
+-make_utf8_string_with_len(c_7325193, "bind", 4, 4);
+-
+-pair_type local_7325196;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325210;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325226;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314104)->elements[0], (((closure) ((closureN)self_7314104)->elements[0])->fn), set_pair_as_expr(&local_7325140, set_pair_as_expr(&local_7325143, ((closureN)self_7314104)->elements[1], set_pair_as_expr(&local_7325147, set_pair_as_expr(&local_7325150, ((closureN)self_7314104)->elements[3], set_pair_as_expr(&local_7325154, NULL, set_pair_as_expr(&local_7325157, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4]))), NULL))), set_pair_as_expr(&local_7325167, set_pair_as_expr(&local_7325170, ((closureN)self_7314104)->elements[2], set_pair_as_expr(&local_7325174, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4])))), set_pair_as_expr(&local_7325186, set_pair_as_expr(&local_7325189, r_737180_738980_738995_739009, set_pair_as_expr(&local_7325192, &c_7325193, set_pair_as_expr(&local_7325196, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((
closureN)self_7314104)->elements[4]))))), set_pair_as_expr(&local_7325210, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4])))))), set_pair_as_expr(&local_7325226, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4]))))))), NULL))))), NULL))), NULL))), boolean_f));;
+-}
+-
+-static void __lambda_1078(void *data, object self_7314105, int argc, object *args) /* object self_7314105, object k_737204 */
+- {
+- object k_737204 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314105)->elements[1])) ){
+-
+-
+- make_utf8_string_with_len(c_7324852, "bind", 4, 4);
+-if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314105)->elements[1]), &c_7324852)) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))) ){
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))))) ){
+-
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))))) ){
+- complex_num_type local_7324900;
+-
+-
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324900, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))) ){
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))))) ){
+-
+-closureN_type c_7324937;
+-object e_7325011 [2];
+-c_7324937.hdr.mark = gc_color_red;
+- c_7324937.hdr.grayed = 0;
+-c_7324937.tag = closureN_tag;
+- c_7324937.fn = (function_type)__lambda_1079;
+-c_7324937.num_args = 1;
+-c_7324937.num_elements = 2;
+-c_7324937.elements = (object *)e_7325011;
+-c_7324937.elements[0] = k_737204;
+-c_7324937.elements[1] = ((closureN)self_7314105)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314105)->elements[0], &c_7324937, quote_let_91values);
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737204, (((closure) k_737204)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1079(void *data, object self_7314106, int argc, object *args) /* object self_7314106, object r_737231 */
+- {
+- object r_737231 = args[0];
+-
+-pair_type local_7324942;
+-
+-pair_type local_7324945;
+-
+-pair_type local_7324948;
+-
+-make_utf8_string_with_len(c_7324949, "mktmp", 5, 5);
+-
+-pair_type local_7324952;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7324964;
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7324978;
+-
+-pair_type local_7324981;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7324991;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7325001;
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314106)->elements[0], (((closure) ((closureN)self_7314106)->elements[0])->fn), set_pair_as_expr(&local_7324942, set_pair_as_expr(&local_7324945, r_737231, set_pair_as_expr(&local_7324948, &c_7324949, set_pair_as_expr(&local_7324952, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1])))), set_pair_as_expr(&local_7324964, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1]))))), set_pair_as_expr(&local_7324978, NULL, set_pair_as_expr(&local_7324981, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1]))), set_pair_as_expr(&local_7324991, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1]))), set_pair_as_expr(&local_7325001, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1])))), NULL)))))))), boolean_f));;
+-}
+-
+-static void __lambda_1074(void *data, object self_7314107, int argc, object *args) /* object self_7314107, object k_737251 */
+- {
+- object k_737251 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314107)->elements[1])) ){
+-
+-
+- make_utf8_string_with_len(c_7324755, "bind", 4, 4);
+-if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314107)->elements[1]), &c_7324755)) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314107)->elements[1]))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1]))))) ){
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))))) ){
+-
+-closureN_type c_7324797;
+-object e_7324828 [2];
+-c_7324797.hdr.mark = gc_color_red;
+- c_7324797.hdr.grayed = 0;
+-c_7324797.tag = closureN_tag;
+- c_7324797.fn = (function_type)__lambda_1075;
+-c_7324797.num_args = 1;
+-c_7324797.num_elements = 2;
+-c_7324797.elements = (object *)e_7324828;
+-c_7324797.elements[0] = k_737251;
+-c_7324797.elements[1] = ((closureN)self_7314107)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314107)->elements[0], &c_7324797, quote_let);
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737251, (((closure) k_737251)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1075(void *data, object self_7314108, int argc, object *args) /* object self_7314108, object r_737268 */
+- {
+- object r_737268 = args[0];
+-
+-pair_type local_7324802;
+-
+-pair_type local_7324805;
+-
+-pair_type local_7324808;
+-
+-
+-
+-
+-
+-
+-
+-pair_type local_7324818;
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314108)->elements[0], (((closure) ((closureN)self_7314108)->elements[0])->fn), set_pair_as_expr(&local_7324802, set_pair_as_expr(&local_7324805, r_737268, set_pair_as_expr(&local_7324808, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314108)->elements[1]))), set_pair_as_expr(&local_7324818, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314108)->elements[1])))), NULL))), boolean_f));;
+-}
+-
+-static void __lambda_1068(void *data, object self_7314109, int argc, object *args) /* object self_7314109, object k_737277 */
+- {
+- object k_737277 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314109)->elements[1])) ){
+- complex_num_type local_7324660;
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324660, Cyc_car(data, ((closureN)self_7314109)->elements[1]))) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314109)->elements[1]))) ){
+- complex_num_type local_7324671;
+-
+-
+-if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324671, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314109)->elements[1])))) ){
+-
+-closureN_type c_7324679;
+-object e_7324731 [3];
+-c_7324679.hdr.mark = gc_color_red;
+- c_7324679.hdr.grayed = 0;
+-c_7324679.tag = closureN_tag;
+- c_7324679.fn = (function_type)__lambda_1069;
+-c_7324679.num_args = 1;
+-c_7324679.num_elements = 3;
+-c_7324679.elements = (object *)e_7324731;
+-c_7324679.elements[0] = k_737277;
+-c_7324679.elements[1] = ((closureN)self_7314109)->elements[0];
+-c_7324679.elements[2] = ((closureN)self_7314109)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314109)->elements[0], &c_7324679, quote_let_91values);
+-} else {
+- return_direct_with_clo1(data, k_737277, (((closure) k_737277)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737277, (((closure) k_737277)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737277, (((closure) k_737277)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_737277, (((closure) k_737277)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1069(void *data, object self_7314110, int argc, object *args) /* object self_7314110, object r_737287 */
+- {
+- object r_737287 = args[0];
+-
+-closureN_type c_7324682;
+-object e_7324730 [3];
+-c_7324682.hdr.mark = gc_color_red;
+- c_7324682.hdr.grayed = 0;
+-c_7324682.tag = closureN_tag;
+- c_7324682.fn = (function_type)__lambda_1070;
+-c_7324682.num_args = 1;
+-c_7324682.num_elements = 3;
+-c_7324682.elements = (object *)e_7324730;
+-c_7324682.elements[0] = ((closureN)self_7314110)->elements[0];
+-c_7324682.elements[1] = r_737287;
+-c_7324682.elements[2] = ((closureN)self_7314110)->elements[2];
+-
+-return_closcall2(data, ((closureN)self_7314110)->elements[1], &c_7324682, quote_lambda);;
+-}
+-
+-static void __lambda_1070(void *data, object self_7314111, int argc, object *args) /* object self_7314111, object r_737303 */
+- {
+- object r_737303 = args[0];
+-
+-pair_type local_7324687;
+-
+-pair_type local_7324690;
+-
+-pair_type local_7324694;
+-
+-make_utf8_string_with_len(c_7324695, "bind", 4, 4);
+-
+-pair_type local_7324698;
+-
+-
+-
+-pair_type local_7324704;
+-
+-pair_type local_7324707;
+-
+-pair_type local_7324710;
+-
+-pair_type local_7324713;
+-
+-pair_type local_7324716;
+-
+-pair_type local_7324719;
+-
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314111)->elements[0], (((closure) ((closureN)self_7314111)->elements[0])->fn), set_pair_as_expr(&local_7324687, set_pair_as_expr(&local_7324690, ((closureN)self_7314111)->elements[1], set_pair_as_expr(&local_7324694, &c_7324695, set_pair_as_expr(&local_7324698, Cyc_car(data, ((closureN)self_7314111)->elements[2]), set_pair_as_expr(&local_7324704, NULL, set_pair_as_expr(&local_7324707, set_pair_as_expr(&local_7324710, set_pair_as_expr(&local_7324713, r_737303, set_pair_as_expr(&local_7324716, NULL, set_pair_as_expr(&local_7324719, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314111)->elements[2])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314111)->elements[2]))))), NULL), NULL))))), boolean_f));;
+-}
+-
+-static void __lambda_1046(void *data, object _, int argc, object *args) /* closure _,object k_736856, object expr_731606_731637_731698_733720, object rename_731607_731638_731699_733721, object compare_731608_731639_731700_733722 */
+- {
+-object k_736856 = args[0]; object expr_731606_731637_731698_733720 = args[1]; object rename_731607_731638_731699_733721 = args[2];
+- Cyc_st_add(data, "scheme/base.sld:let*-values");
+-
+-closureN_type c_7324321;
+-object e_7324647 [3];
+-c_7324321.hdr.mark = gc_color_red;
+- c_7324321.hdr.grayed = 0;
+-c_7324321.tag = closureN_tag;
+- c_7324321.fn = (function_type)__lambda_1047;
+-c_7324321.num_args = 1;
+-c_7324321.num_elements = 3;
+-c_7324321.elements = (object *)e_7324647;
+-c_7324321.elements[0] = expr_731606_731637_731698_733720;
+-c_7324321.elements[1] = k_736856;
+-c_7324321.elements[2] = rename_731607_731638_731699_733721;
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7324321,__lambda_1047, Cyc_cdr(data, expr_731606_731637_731698_733720));;
+-}
+-
+-static void __lambda_1047(void *data, object self_7314039, int argc, object *args) /* object self_7314039, object v_931_731614_731692_731732_733754 */
+- {
+- object v_931_731614_731692_731732_733754 = args[0];
+-
+-closureN_type c_7324323;
+-object e_7324349 [2];
+-c_7324323.hdr.mark = gc_color_red;
+- c_7324323.hdr.grayed = 0;
+-c_7324323.tag = closureN_tag;
+- c_7324323.fn = (function_type)__lambda_1048;
+-c_7324323.num_args = 0;
+-c_7324323.num_elements = 2;
+-c_7324323.elements = (object *)e_7324349;
+-c_7324323.elements[0] = ((closureN)self_7314039)->elements[2];
+-c_7324323.elements[1] = v_931_731614_731692_731732_733754;
+-
+-
+-closureN_type c_7324350;
+-object e_7324646 [3];
+-c_7324350.hdr.mark = gc_color_red;
+- c_7324350.hdr.grayed = 0;
+-c_7324350.tag = closureN_tag;
+- c_7324350.fn = (function_type)__lambda_1050;
+-c_7324350.num_args = 1;
+-c_7324350.num_elements = 3;
+-c_7324350.elements = (object *)e_7324646;
+-c_7324350.elements[0] = ((closureN)self_7314039)->elements[0];
+-c_7324350.elements[1] = ((closureN)self_7314039)->elements[1];
+-c_7324350.elements[2] = ((closureN)self_7314039)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7324323,__lambda_1048, &c_7324350);;
+-}
+-
+-static void __lambda_1050(void *data, object self_7314040, int argc, object *args) /* object self_7314040, object tmp_731641_731643_731701_733723 */
+- {
+- object tmp_731641_731643_731701_733723 = args[0];
+-
+-closureN_type c_7324352;
+-object e_7324639 [3];
+-c_7324352.hdr.mark = gc_color_red;
+- c_7324352.hdr.grayed = 0;
+-c_7324352.tag = closureN_tag;
+- c_7324352.fn = (function_type)__lambda_1051;
+-c_7324352.num_args = 0;
+-c_7324352.num_elements = 3;
+-c_7324352.elements = (object *)e_7324639;
+-c_7324352.elements[0] = ((closureN)self_7314040)->elements[0];
+-c_7324352.elements[1] = ((closureN)self_7314040)->elements[2];
+-c_7324352.elements[2] = tmp_731641_731643_731701_733723;
+-
+-
+-closureN_type c_7324640;
+-object e_7324645 [1];
+-c_7324640.hdr.mark = gc_color_red;
+- c_7324640.hdr.grayed = 0;
+-c_7324640.tag = closureN_tag;
+- c_7324640.fn = (function_type)__lambda_1065;
+-c_7324640.num_args = 1;
+-c_7324640.num_elements = 1;
+-c_7324640.elements = (object *)e_7324645;
+-c_7324640.elements[0] = ((closureN)self_7314040)->elements[1];
+-
+-return_direct_with_clo1(data,(closure)&c_7324352,__lambda_1051, &c_7324640);;
+-}
+-
+-static void __lambda_1065(void *data, object self_7314041, int argc, object *args) /* object self_7314041, object r_736857 */
+- {
+- object r_736857 = args[0];
+-
+-
+-return_direct_with_clo1(data, ((closureN)self_7314041)->elements[0], (((closure) ((closureN)self_7314041)->elements[0])->fn), Cyc_car(data, r_736857));;
+-}
+-
+-static void __lambda_1051(void *data, object self_7314042, int argc, object *args) /* object self_7314042, object k_736859 */
+- {
+- object k_736859 = args[0];
+- if( (boolean_f != ((closureN)self_7314042)->elements[2]) ){
+- return_direct_with_clo1(data, k_736859, (((closure) k_736859)->fn), ((closureN)self_7314042)->elements[2]);
+-} else {
+-
+-closureN_type c_7324357;
+-object e_7324635 [3];
+-c_7324357.hdr.mark = gc_color_red;
+- c_7324357.hdr.grayed = 0;
+-c_7324357.tag = closureN_tag;
+- c_7324357.fn = (function_type)__lambda_1052;
+-c_7324357.num_args = 1;
+-c_7324357.num_elements = 3;
+-c_7324357.elements = (object *)e_7324635;
+-c_7324357.elements[0] = ((closureN)self_7314042)->elements[0];
+-c_7324357.elements[1] = k_736859;
+-c_7324357.elements[2] = ((closureN)self_7314042)->elements[1];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7324357,__lambda_1052, Cyc_cdr(data, ((closureN)self_7314042)->elements[0]));}
+-;;
+-}
+-
+-static void __lambda_1052(void *data, object self_7314043, int argc, object *args) /* object self_7314043, object v_934_731617_731670_731717_733739 */
+- {
+- object v_934_731617_731670_731717_733739 = args[0];
+-
+-closureN_type c_7324359;
+-object e_7324486 [2];
+-c_7324359.hdr.mark = gc_color_red;
+- c_7324359.hdr.grayed = 0;
+-c_7324359.tag = closureN_tag;
+- c_7324359.fn = (function_type)__lambda_1053;
+-c_7324359.num_args = 0;
+-c_7324359.num_elements = 2;
+-c_7324359.elements = (object *)e_7324486;
+-c_7324359.elements[0] = ((closureN)self_7314043)->elements[2];
+-c_7324359.elements[1] = v_934_731617_731670_731717_733739;
+-
+-
+-closureN_type c_7324487;
+-object e_7324634 [3];
+-c_7324487.hdr.mark = gc_color_red;
+- c_7324487.hdr.grayed = 0;
+-c_7324487.tag = closureN_tag;
+- c_7324487.fn = (function_type)__lambda_1056;
+-c_7324487.num_args = 1;
+-c_7324487.num_elements = 3;
+-c_7324487.elements = (object *)e_7324634;
+-c_7324487.elements[0] = ((closureN)self_7314043)->elements[0];
+-c_7324487.elements[1] = ((closureN)self_7314043)->elements[1];
+-c_7324487.elements[2] = ((closureN)self_7314043)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7324359,__lambda_1053, &c_7324487);;
+-}
+-
+-static void __lambda_1056(void *data, object self_7314044, int argc, object *args) /* object self_7314044, object tmp_731645_731647_731702_733724 */
+- {
+- object tmp_731645_731647_731702_733724 = args[0];
+- if( (boolean_f != tmp_731645_731647_731702_733724) ){
+- return_direct_with_clo1(data, ((closureN)self_7314044)->elements[1], (((closure) ((closureN)self_7314044)->elements[1])->fn), tmp_731645_731647_731702_733724);
+-} else {
+-
+-closureN_type c_7324491;
+-object e_7324630 [3];
+-c_7324491.hdr.mark = gc_color_red;
+- c_7324491.hdr.grayed = 0;
+-c_7324491.tag = closureN_tag;
+- c_7324491.fn = (function_type)__lambda_1057;
+-c_7324491.num_args = 1;
+-c_7324491.num_elements = 3;
+-c_7324491.elements = (object *)e_7324630;
+-c_7324491.elements[0] = ((closureN)self_7314044)->elements[0];
+-c_7324491.elements[1] = ((closureN)self_7314044)->elements[1];
+-c_7324491.elements[2] = ((closureN)self_7314044)->elements[2];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7324491,__lambda_1057, Cyc_cdr(data, ((closureN)self_7314044)->elements[0]));}
+-;;
+-}
+-
+-static void __lambda_1057(void *data, object self_7314045, int argc, object *args) /* object self_7314045, object v_9315_731628_731652_731704_733726 */
+- {
+- object v_9315_731628_731652_731704_733726 = args[0];
+-
+-closureN_type c_7324493;
+-object e_7324615 [2];
+-c_7324493.hdr.mark = gc_color_red;
+- c_7324493.hdr.grayed = 0;
+-c_7324493.tag = closureN_tag;
+- c_7324493.fn = (function_type)__lambda_1058;
+-c_7324493.num_args = 0;
+-c_7324493.num_elements = 2;
+-c_7324493.elements = (object *)e_7324615;
+-c_7324493.elements[0] = ((closureN)self_7314045)->elements[2];
+-c_7324493.elements[1] = v_9315_731628_731652_731704_733726;
+-
+-
+-closureN_type c_7324616;
+-object e_7324629 [2];
+-c_7324616.hdr.mark = gc_color_red;
+- c_7324616.hdr.grayed = 0;
+-c_7324616.tag = closureN_tag;
+- c_7324616.fn = (function_type)__lambda_1063;
+-c_7324616.num_args = 1;
+-c_7324616.num_elements = 2;
+-c_7324616.elements = (object *)e_7324629;
+-c_7324616.elements[0] = ((closureN)self_7314045)->elements[0];
+-c_7324616.elements[1] = ((closureN)self_7314045)->elements[1];
+-
+-return_direct_with_clo1(data,(closure)&c_7324493,__lambda_1058, &c_7324616);;
+-}
+-
+-static void __lambda_1063(void *data, object self_7314046, int argc, object *args) /* object self_7314046, object tmp_731649_731651_731703_733725 */
+- {
+- object tmp_731649_731651_731703_733725 = args[0];
+- if( (boolean_f != tmp_731649_731651_731703_733725) ){
+- return_direct_with_clo1(data, ((closureN)self_7314046)->elements[1], (((closure) ((closureN)self_7314046)->elements[1])->fn), tmp_731649_731651_731703_733725);
+-} else {
+-
+-closureN_type c_7324620;
+-object e_7324626 [1];
+-c_7324620.hdr.mark = gc_color_red;
+- c_7324620.hdr.grayed = 0;
+-c_7324620.tag = closureN_tag;
+- c_7324620.fn = (function_type)__lambda_1064;
+-c_7324620.num_args = 1;
+-c_7324620.num_elements = 1;
+-c_7324620.elements = (object *)e_7324626;
+-c_7324620.elements[0] = ((closureN)self_7314046)->elements[1];
+-
+-
+-make_utf8_string_with_len(c_7324627, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7324620, &c_7324627, ((closureN)self_7314046)->elements[0]);}
+-;;
+-}
+-
+-static void __lambda_1064(void *data, object self_7314047, int argc, object *args) /* object self_7314047, object r_736862 */
+- {
+- object r_736862 = args[0];
+-
+-pair_type local_7324625;
+-return_direct_with_clo1(data, ((closureN)self_7314047)->elements[0], (((closure) ((closureN)self_7314047)->elements[0])->fn), set_pair_as_expr(&local_7324625, r_736862, boolean_f));;
+-}
+-
+-static void __lambda_1058(void *data, object self_7314048, int argc, object *args) /* object self_7314048, object k_736864 */
+- {
+- object k_736864 = args[0];
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314048)->elements[1])) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314048)->elements[1]))) ){
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7314048)->elements[1])))) ){
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314048)->elements[1]))))) ){
+-
+-
+-
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314048)->elements[1])))))) ){
+-
+-closureN_type c_7324531;
+-object e_7324609 [3];
+-c_7324531.hdr.mark = gc_color_red;
+- c_7324531.hdr.grayed = 0;
+-c_7324531.tag = closureN_tag;
+- c_7324531.fn = (function_type)__lambda_1059;
+-c_7324531.num_args = 1;
+-c_7324531.num_elements = 3;
+-c_7324531.elements = (object *)e_7324609;
+-c_7324531.elements[0] = k_736864;
+-c_7324531.elements[1] = ((closureN)self_7314048)->elements[0];
+-c_7324531.elements[2] = ((closureN)self_7314048)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7314048)->elements[0], &c_7324531, quote_call_91with_91values);
+-} else {
+- return_direct_with_clo1(data, k_736864, (((closure) k_736864)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736864, (((closure) k_736864)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736864, (((closure) k_736864)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736864, (((closure) k_736864)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736864, (((closure) k_736864)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736412, (((closure) k_736412)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1059(void *data, object self_7314049, int argc, object *args) /* object self_7314049, object r_736879 */
++static void __lambda_1059(void *data, object self_7312796, int argc, object *args) /* object self_7312796, object r_736427 */
+ {
+- object r_736879 = args[0];
++ object r_736427 = args[0];
+
+-closureN_type c_7324534;
+-object e_7324608 [4];
+-c_7324534.hdr.mark = gc_color_red;
+- c_7324534.hdr.grayed = 0;
+-c_7324534.tag = closureN_tag;
+- c_7324534.fn = (function_type)__lambda_1060;
+-c_7324534.num_args = 1;
+-c_7324534.num_elements = 4;
+-c_7324534.elements = (object *)e_7324608;
+-c_7324534.elements[0] = ((closureN)self_7314049)->elements[0];
+-c_7324534.elements[1] = r_736879;
+-c_7324534.elements[2] = ((closureN)self_7314049)->elements[1];
+-c_7324534.elements[3] = ((closureN)self_7314049)->elements[2];
++closureN_type c_7323234;
++object e_7323308 [4];
++c_7323234.hdr.mark = gc_color_red;
++ c_7323234.hdr.grayed = 0;
++c_7323234.tag = closureN_tag;
++ c_7323234.fn = (function_type)__lambda_1060;
++c_7323234.num_args = 1;
++c_7323234.num_elements = 4;
++c_7323234.elements = (object *)e_7323308;
++c_7323234.elements[0] = ((closureN)self_7312796)->elements[0];
++c_7323234.elements[1] = r_736427;
++c_7323234.elements[2] = ((closureN)self_7312796)->elements[1];
++c_7323234.elements[3] = ((closureN)self_7312796)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314049)->elements[1], &c_7324534, quote_lambda);;
++return_closcall2(data, ((closureN)self_7312796)->elements[1], &c_7323234, quote_lambda);;
+ }
+
+-static void __lambda_1060(void *data, object self_7314050, int argc, object *args) /* object self_7314050, object r_736902 */
++static void __lambda_1060(void *data, object self_7312797, int argc, object *args) /* object self_7312797, object r_736450 */
+ {
+- object r_736902 = args[0];
++ object r_736450 = args[0];
+
+-closureN_type c_7324537;
+-object e_7324607 [5];
+-c_7324537.hdr.mark = gc_color_red;
+- c_7324537.hdr.grayed = 0;
+-c_7324537.tag = closureN_tag;
+- c_7324537.fn = (function_type)__lambda_1061;
+-c_7324537.num_args = 1;
+-c_7324537.num_elements = 5;
+-c_7324537.elements = (object *)e_7324607;
+-c_7324537.elements[0] = ((closureN)self_7314050)->elements[0];
+-c_7324537.elements[1] = ((closureN)self_7314050)->elements[1];
+-c_7324537.elements[2] = r_736902;
+-c_7324537.elements[3] = ((closureN)self_7314050)->elements[2];
+-c_7324537.elements[4] = ((closureN)self_7314050)->elements[3];
++closureN_type c_7323237;
++object e_7323307 [5];
++c_7323237.hdr.mark = gc_color_red;
++ c_7323237.hdr.grayed = 0;
++c_7323237.tag = closureN_tag;
++ c_7323237.fn = (function_type)__lambda_1061;
++c_7323237.num_args = 1;
++c_7323237.num_elements = 5;
++c_7323237.elements = (object *)e_7323307;
++c_7323237.elements[0] = ((closureN)self_7312797)->elements[0];
++c_7323237.elements[1] = ((closureN)self_7312797)->elements[1];
++c_7323237.elements[2] = r_736450;
++c_7323237.elements[3] = ((closureN)self_7312797)->elements[2];
++c_7323237.elements[4] = ((closureN)self_7312797)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7314050)->elements[2], &c_7324537, quote_lambda);;
++return_closcall2(data, ((closureN)self_7312797)->elements[2], &c_7323237, quote_lambda);;
+ }
+
+-static void __lambda_1061(void *data, object self_7314051, int argc, object *args) /* object self_7314051, object r_736888_738820_738832_738843 */
++static void __lambda_1061(void *data, object self_7312798, int argc, object *args) /* object self_7312798, object r_736436_738045_738057_738068 */
+ {
+- object r_736888_738820_738832_738843 = args[0];
++ object r_736436_738045_738057_738068 = args[0];
+
+-closureN_type c_7324540;
+-object e_7324606 [5];
+-c_7324540.hdr.mark = gc_color_red;
+- c_7324540.hdr.grayed = 0;
+-c_7324540.tag = closureN_tag;
+- c_7324540.fn = (function_type)__lambda_1062;
+-c_7324540.num_args = 1;
+-c_7324540.num_elements = 5;
+-c_7324540.elements = (object *)e_7324606;
+-c_7324540.elements[0] = ((closureN)self_7314051)->elements[0];
+-c_7324540.elements[1] = ((closureN)self_7314051)->elements[1];
+-c_7324540.elements[2] = r_736888_738820_738832_738843;
+-c_7324540.elements[3] = ((closureN)self_7314051)->elements[2];
+-c_7324540.elements[4] = ((closureN)self_7314051)->elements[4];
++closureN_type c_7323240;
++object e_7323306 [5];
++c_7323240.hdr.mark = gc_color_red;
++ c_7323240.hdr.grayed = 0;
++c_7323240.tag = closureN_tag;
++ c_7323240.fn = (function_type)__lambda_1062;
++c_7323240.num_args = 1;
++c_7323240.num_elements = 5;
++c_7323240.elements = (object *)e_7323306;
++c_7323240.elements[0] = ((closureN)self_7312798)->elements[0];
++c_7323240.elements[1] = ((closureN)self_7312798)->elements[1];
++c_7323240.elements[2] = r_736436_738045_738057_738068;
++c_7323240.elements[3] = ((closureN)self_7312798)->elements[2];
++c_7323240.elements[4] = ((closureN)self_7312798)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7314051)->elements[3], &c_7324540, quote_let_85_91values);;
++return_closcall2(data, ((closureN)self_7312798)->elements[3], &c_7323240, quote_let_85_91values);;
+ }
+
+-static void __lambda_1062(void *data, object self_7314052, int argc, object *args) /* object self_7314052, object r_736896_738821_738833_738844 */
++static void __lambda_1062(void *data, object self_7312799, int argc, object *args) /* object self_7312799, object r_736444_738046_738058_738069 */
+ {
+- object r_736896_738821_738833_738844 = args[0];
++ object r_736444_738046_738058_738069 = args[0];
+
+-pair_type local_7324545;
++pair_type local_7323245;
+
+-pair_type local_7324548;
++pair_type local_7323248;
+
+-pair_type local_7324552;
++pair_type local_7323252;
+
+-pair_type local_7324555;
++pair_type local_7323255;
+
+-pair_type local_7324559;
++pair_type local_7323259;
+
+-pair_type local_7324562;
++pair_type local_7323262;
+
+
+
+@@ -11256,11 +9459,11 @@ pair_type local_7324562;
+
+
+
+-pair_type local_7324574;
++pair_type local_7323274;
+
+-pair_type local_7324577;
++pair_type local_7323277;
+
+-pair_type local_7324581;
++pair_type local_7323281;
+
+
+
+@@ -11268,125 +9471,125 @@ pair_type local_7324581;
+
+
+
+-pair_type local_7324591;
++pair_type local_7323291;
+
+-pair_type local_7324594;
++pair_type local_7323294;
+
+-pair_type local_7324597;
++pair_type local_7323297;
+
+
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314052)->elements[0], (((closure) ((closureN)self_7314052)->elements[0])->fn), set_pair_as_expr(&local_7324545, set_pair_as_expr(&local_7324548, ((closureN)self_7314052)->elements[1], set_pair_as_expr(&local_7324552, set_pair_as_expr(&local_7324555, ((closureN)self_7314052)->elements[3], set_pair_as_expr(&local_7324559, NULL, set_pair_as_expr(&local_7324562, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314052)->elements[4])))), NULL))), set_pair_as_expr(&local_7324574, set_pair_as_expr(&local_7324577, ((closureN)self_7314052)->elements[2], set_pair_as_expr(&local_7324581, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314052)->elements[4]))), set_pair_as_expr(&local_7324591, set_pair_as_expr(&local_7324594, r_736896_738821_738833_738844, set_pair_as_expr(&local_7324597, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314052)->elements[4])), Cyc_cdr(data, ((closureN)self_7314052)->elements
[4]))), NULL))), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312799)->elements[0], (((closure) ((closureN)self_7312799)->elements[0])->fn), set_pair_as_expr(&local_7323245, set_pair_as_expr(&local_7323248, ((closureN)self_7312799)->elements[1], set_pair_as_expr(&local_7323252, set_pair_as_expr(&local_7323255, ((closureN)self_7312799)->elements[3], set_pair_as_expr(&local_7323259, NULL, set_pair_as_expr(&local_7323262, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312799)->elements[4])))), NULL))), set_pair_as_expr(&local_7323274, set_pair_as_expr(&local_7323277, ((closureN)self_7312799)->elements[2], set_pair_as_expr(&local_7323281, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312799)->elements[4]))), set_pair_as_expr(&local_7323291, set_pair_as_expr(&local_7323294, r_736444_738046_738058_738069, set_pair_as_expr(&local_7323297, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312799)->elements[4])), Cyc_cdr(data, ((closureN)self_7312799)->elements
[4]))), NULL))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1053(void *data, object self_7314053, int argc, object *args) /* object self_7314053, object k_736913 */
++static void __lambda_1053(void *data, object self_7312800, int argc, object *args) /* object self_7312800, object k_736461 */
+ {
+- object k_736913 = args[0];
++ object k_736461 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314053)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312800)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314053)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312800)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7312800)->elements[1])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312800)->elements[1]))))) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1])))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312800)->elements[1])))))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312800)->elements[1]))))) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1])))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312800)->elements[1])))))) ){
+
+-closureN_type c_7324417;
+-object e_7324478 [3];
+-c_7324417.hdr.mark = gc_color_red;
+- c_7324417.hdr.grayed = 0;
+-c_7324417.tag = closureN_tag;
+- c_7324417.fn = (function_type)__lambda_1054;
+-c_7324417.num_args = 1;
+-c_7324417.num_elements = 3;
+-c_7324417.elements = (object *)e_7324478;
+-c_7324417.elements[0] = k_736913;
+-c_7324417.elements[1] = ((closureN)self_7314053)->elements[0];
+-c_7324417.elements[2] = ((closureN)self_7314053)->elements[1];
++closureN_type c_7323117;
++object e_7323178 [3];
++c_7323117.hdr.mark = gc_color_red;
++ c_7323117.hdr.grayed = 0;
++c_7323117.tag = closureN_tag;
++ c_7323117.fn = (function_type)__lambda_1054;
++c_7323117.num_args = 1;
++c_7323117.num_elements = 3;
++c_7323117.elements = (object *)e_7323178;
++c_7323117.elements[0] = k_736461;
++c_7323117.elements[1] = ((closureN)self_7312800)->elements[0];
++c_7323117.elements[2] = ((closureN)self_7312800)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314053)->elements[0], &c_7324417, quote_let);
++return_closcall2(data, ((closureN)self_7312800)->elements[0], &c_7323117, quote_let);
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736913, (((closure) k_736913)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736461, (((closure) k_736461)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1054(void *data, object self_7314054, int argc, object *args) /* object self_7314054, object r_736932 */
++static void __lambda_1054(void *data, object self_7312801, int argc, object *args) /* object self_7312801, object r_736480 */
+ {
+- object r_736932 = args[0];
++ object r_736480 = args[0];
+
+-closureN_type c_7324420;
+-object e_7324477 [3];
+-c_7324420.hdr.mark = gc_color_red;
+- c_7324420.hdr.grayed = 0;
+-c_7324420.tag = closureN_tag;
+- c_7324420.fn = (function_type)__lambda_1055;
+-c_7324420.num_args = 1;
+-c_7324420.num_elements = 3;
+-c_7324420.elements = (object *)e_7324477;
+-c_7324420.elements[0] = ((closureN)self_7314054)->elements[0];
+-c_7324420.elements[1] = r_736932;
+-c_7324420.elements[2] = ((closureN)self_7314054)->elements[2];
++closureN_type c_7323120;
++object e_7323177 [3];
++c_7323120.hdr.mark = gc_color_red;
++ c_7323120.hdr.grayed = 0;
++c_7323120.tag = closureN_tag;
++ c_7323120.fn = (function_type)__lambda_1055;
++c_7323120.num_args = 1;
++c_7323120.num_elements = 3;
++c_7323120.elements = (object *)e_7323177;
++c_7323120.elements[0] = ((closureN)self_7312801)->elements[0];
++c_7323120.elements[1] = r_736480;
++c_7323120.elements[2] = ((closureN)self_7312801)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7314054)->elements[1], &c_7324420, quote_let_85_91values);;
++return_closcall2(data, ((closureN)self_7312801)->elements[1], &c_7323120, quote_let_85_91values);;
+ }
+
+-static void __lambda_1055(void *data, object self_7314055, int argc, object *args) /* object self_7314055, object r_736941_738781_738789_738796 */
++static void __lambda_1055(void *data, object self_7312802, int argc, object *args) /* object self_7312802, object r_736489_738006_738014_738021 */
+ {
+- object r_736941_738781_738789_738796 = args[0];
++ object r_736489_738006_738014_738021 = args[0];
+
+-pair_type local_7324425;
++pair_type local_7323125;
+
+-pair_type local_7324428;
++pair_type local_7323128;
+
+-pair_type local_7324432;
++pair_type local_7323132;
+
+-pair_type local_7324435;
++pair_type local_7323135;
+
+-pair_type local_7324438;
++pair_type local_7323138;
+
+
+
+@@ -11396,7 +9599,7 @@ pair_type local_7324438;
+
+
+
+-pair_type local_7324450;
++pair_type local_7323150;
+
+
+
+@@ -11406,9165 +9609,9165 @@ pair_type local_7324450;
+
+
+
+-pair_type local_7324462;
++pair_type local_7323162;
+
+-pair_type local_7324465;
++pair_type local_7323165;
+
+-pair_type local_7324468;
++pair_type local_7323168;
+
+
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314055)->elements[0], (((closure) ((closureN)self_7314055)->elements[0])->fn), set_pair_as_expr(&local_7324425, set_pair_as_expr(&local_7324428, ((closureN)self_7314055)->elements[1], set_pair_as_expr(&local_7324432, set_pair_as_expr(&local_7324435, set_pair_as_expr(&local_7324438, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314055)->elements[2])))), set_pair_as_expr(&local_7324450, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314055)->elements[2])))), NULL)), NULL), set_pair_as_expr(&local_7324462, set_pair_as_expr(&local_7324465, r_736941_738781_738789_738796, set_pair_as_expr(&local_7324468, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314055)->elements[2])), Cyc_cdr(data, ((closureN)self_7314055)->elements[2]))), NULL))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312802)->elements[0], (((closure) ((closureN)self_7312802)->elements[0])->fn), set_pair_as_expr(&local_7323125, set_pair_as_expr(&local_7323128, ((closureN)self_7312802)->elements[1], set_pair_as_expr(&local_7323132, set_pair_as_expr(&local_7323135, set_pair_as_expr(&local_7323138, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312802)->elements[2])))), set_pair_as_expr(&local_7323150, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312802)->elements[2])))), NULL)), NULL), set_pair_as_expr(&local_7323162, set_pair_as_expr(&local_7323165, r_736489_738006_738014_738021, set_pair_as_expr(&local_7323168, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312802)->elements[2])), Cyc_cdr(data, ((closureN)self_7312802)->elements[2]))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_1048(void *data, object self_7314056, int argc, object *args) /* object self_7314056, object k_736955 */
++static void __lambda_1048(void *data, object self_7312803, int argc, object *args) /* object self_7312803, object k_736503 */
+ {
+- object k_736955 = args[0];
++ object k_736503 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314056)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312803)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7314056)->elements[1]))) ){
++if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7312803)->elements[1]))) ){
+
+-closureN_type c_7324334;
+-object e_7324346 [2];
+-c_7324334.hdr.mark = gc_color_red;
+- c_7324334.hdr.grayed = 0;
+-c_7324334.tag = closureN_tag;
+- c_7324334.fn = (function_type)__lambda_1049;
+-c_7324334.num_args = 1;
+-c_7324334.num_elements = 2;
+-c_7324334.elements = (object *)e_7324346;
+-c_7324334.elements[0] = k_736955;
+-c_7324334.elements[1] = ((closureN)self_7314056)->elements[1];
++closureN_type c_7323034;
++object e_7323046 [2];
++c_7323034.hdr.mark = gc_color_red;
++ c_7323034.hdr.grayed = 0;
++c_7323034.tag = closureN_tag;
++ c_7323034.fn = (function_type)__lambda_1049;
++c_7323034.num_args = 1;
++c_7323034.num_elements = 2;
++c_7323034.elements = (object *)e_7323046;
++c_7323034.elements[0] = k_736503;
++c_7323034.elements[1] = ((closureN)self_7312803)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7314056)->elements[0], &c_7324334, quote_begin);
++return_closcall2(data, ((closureN)self_7312803)->elements[0], &c_7323034, quote_begin);
+ } else {
+- return_direct_with_clo1(data, k_736955, (((closure) k_736955)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736503, (((closure) k_736503)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736955, (((closure) k_736955)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736503, (((closure) k_736503)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1049(void *data, object self_7314057, int argc, object *args) /* object self_7314057, object r_736961 */
++static void __lambda_1049(void *data, object self_7312804, int argc, object *args) /* object self_7312804, object r_736509 */
+ {
+- object r_736961 = args[0];
++ object r_736509 = args[0];
+
+-pair_type local_7324339;
++pair_type local_7323039;
+
+-pair_type local_7324342;
++pair_type local_7323042;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314057)->elements[0], (((closure) ((closureN)self_7314057)->elements[0])->fn), set_pair_as_expr(&local_7324339, set_pair_as_expr(&local_7324342, r_736961, Cyc_cdr(data, ((closureN)self_7314057)->elements[1])), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312804)->elements[0], (((closure) ((closureN)self_7312804)->elements[0])->fn), set_pair_as_expr(&local_7323039, set_pair_as_expr(&local_7323042, r_736509, Cyc_cdr(data, ((closureN)self_7312804)->elements[1])), boolean_f));;
+ }
+
+-static void __lambda_1025(void *data, object _, int argc, object *args) /* closure _,object k_736805, object expr_731521_731541_731576_733694, object rename_731522_731542_731577_733695, object compare_731523_731543_731578_733696 */
++static void __lambda_1025(void *data, object _, int argc, object *args) /* closure _,object k_736353, object expr_731521_731541_731576_733347, object rename_731522_731542_731577_733348, object compare_731523_731543_731578_733349 */
+ {
+-object k_736805 = args[0]; object expr_731521_731541_731576_733694 = args[1]; object rename_731522_731542_731577_733695 = args[2];
++object k_736353 = args[0]; object expr_731521_731541_731576_733347 = args[1]; object rename_731522_731542_731577_733348 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:letrec*");
+
+-closureN_type c_7324142;
+-object e_7324316 [3];
+-c_7324142.hdr.mark = gc_color_red;
+- c_7324142.hdr.grayed = 0;
+-c_7324142.tag = closureN_tag;
+- c_7324142.fn = (function_type)__lambda_1026;
+-c_7324142.num_args = 1;
+-c_7324142.num_elements = 3;
+-c_7324142.elements = (object *)e_7324316;
+-c_7324142.elements[0] = expr_731521_731541_731576_733694;
+-c_7324142.elements[1] = k_736805;
+-c_7324142.elements[2] = rename_731522_731542_731577_733695;
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7324142,__lambda_1026, Cyc_cdr(data, expr_731521_731541_731576_733694));;
+-}
+-
+-static void __lambda_1026(void *data, object self_7314018, int argc, object *args) /* object self_7314018, object v_931_731529_731548_731580_733698 */
+- {
+- object v_931_731529_731548_731580_733698 = args[0];
+-
+-closureN_type c_7324144;
+-object e_7324291 [2];
+-c_7324144.hdr.mark = gc_color_red;
+- c_7324144.hdr.grayed = 0;
+-c_7324144.tag = closureN_tag;
+- c_7324144.fn = (function_type)__lambda_1027;
+-c_7324144.num_args = 0;
+-c_7324144.num_elements = 2;
+-c_7324144.elements = (object *)e_7324291;
+-c_7324144.elements[0] = ((closureN)self_7314018)->elements[2];
+-c_7324144.elements[1] = v_931_731529_731548_731580_733698;
+-
+-
+-closureN_type c_7324292;
+-object e_7324315 [2];
+-c_7324292.hdr.mark = gc_color_red;
+- c_7324292.hdr.grayed = 0;
+-c_7324292.tag = closureN_tag;
+- c_7324292.fn = (function_type)__lambda_1042;
+-c_7324292.num_args = 1;
+-c_7324292.num_elements = 2;
+-c_7324292.elements = (object *)e_7324315;
+-c_7324292.elements[0] = ((closureN)self_7314018)->elements[0];
+-c_7324292.elements[1] = ((closureN)self_7314018)->elements[1];
+-
+-return_direct_with_clo1(data,(closure)&c_7324144,__lambda_1027, &c_7324292);;
+-}
+-
+-static void __lambda_1042(void *data, object self_7314019, int argc, object *args) /* object self_7314019, object tmp_731545_731547_731579_733697 */
+- {
+- object tmp_731545_731547_731579_733697 = args[0];
+-
+-closureN_type c_7324294;
+-object e_7324308 [2];
+-c_7324294.hdr.mark = gc_color_red;
+- c_7324294.hdr.grayed = 0;
+-c_7324294.tag = closureN_tag;
+- c_7324294.fn = (function_type)__lambda_1043;
+-c_7324294.num_args = 0;
+-c_7324294.num_elements = 2;
+-c_7324294.elements = (object *)e_7324308;
+-c_7324294.elements[0] = ((closureN)self_7314019)->elements[0];
+-c_7324294.elements[1] = tmp_731545_731547_731579_733697;
+-
+-
+-closureN_type c_7324309;
+-object e_7324314 [1];
+-c_7324309.hdr.mark = gc_color_red;
+- c_7324309.hdr.grayed = 0;
+-c_7324309.tag = closureN_tag;
+- c_7324309.fn = (function_type)__lambda_1045;
+-c_7324309.num_args = 1;
+-c_7324309.num_elements = 1;
+-c_7324309.elements = (object *)e_7324314;
+-c_7324309.elements[0] = ((closureN)self_7314019)->elements[1];
++closureN_type c_7322842;
++object e_7323016 [3];
++c_7322842.hdr.mark = gc_color_red;
++ c_7322842.hdr.grayed = 0;
++c_7322842.tag = closureN_tag;
++ c_7322842.fn = (function_type)__lambda_1026;
++c_7322842.num_args = 1;
++c_7322842.num_elements = 3;
++c_7322842.elements = (object *)e_7323016;
++c_7322842.elements[0] = expr_731521_731541_731576_733347;
++c_7322842.elements[1] = k_736353;
++c_7322842.elements[2] = rename_731522_731542_731577_733348;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7322842,__lambda_1026, Cyc_cdr(data, expr_731521_731541_731576_733347));;
++}
++
++static void __lambda_1026(void *data, object self_7312765, int argc, object *args) /* object self_7312765, object v_931_731529_731548_731580_733351 */
++ {
++ object v_931_731529_731548_731580_733351 = args[0];
++
++closureN_type c_7322844;
++object e_7322991 [2];
++c_7322844.hdr.mark = gc_color_red;
++ c_7322844.hdr.grayed = 0;
++c_7322844.tag = closureN_tag;
++ c_7322844.fn = (function_type)__lambda_1027;
++c_7322844.num_args = 0;
++c_7322844.num_elements = 2;
++c_7322844.elements = (object *)e_7322991;
++c_7322844.elements[0] = ((closureN)self_7312765)->elements[2];
++c_7322844.elements[1] = v_931_731529_731548_731580_733351;
++
++
++closureN_type c_7322992;
++object e_7323015 [2];
++c_7322992.hdr.mark = gc_color_red;
++ c_7322992.hdr.grayed = 0;
++c_7322992.tag = closureN_tag;
++ c_7322992.fn = (function_type)__lambda_1042;
++c_7322992.num_args = 1;
++c_7322992.num_elements = 2;
++c_7322992.elements = (object *)e_7323015;
++c_7322992.elements[0] = ((closureN)self_7312765)->elements[0];
++c_7322992.elements[1] = ((closureN)self_7312765)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7322844,__lambda_1027, &c_7322992);;
++}
++
++static void __lambda_1042(void *data, object self_7312766, int argc, object *args) /* object self_7312766, object tmp_731545_731547_731579_733350 */
++ {
++ object tmp_731545_731547_731579_733350 = args[0];
++
++closureN_type c_7322994;
++object e_7323008 [2];
++c_7322994.hdr.mark = gc_color_red;
++ c_7322994.hdr.grayed = 0;
++c_7322994.tag = closureN_tag;
++ c_7322994.fn = (function_type)__lambda_1043;
++c_7322994.num_args = 0;
++c_7322994.num_elements = 2;
++c_7322994.elements = (object *)e_7323008;
++c_7322994.elements[0] = ((closureN)self_7312766)->elements[0];
++c_7322994.elements[1] = tmp_731545_731547_731579_733350;
++
++
++closureN_type c_7323009;
++object e_7323014 [1];
++c_7323009.hdr.mark = gc_color_red;
++ c_7323009.hdr.grayed = 0;
++c_7323009.tag = closureN_tag;
++ c_7323009.fn = (function_type)__lambda_1045;
++c_7323009.num_args = 1;
++c_7323009.num_elements = 1;
++c_7323009.elements = (object *)e_7323014;
++c_7323009.elements[0] = ((closureN)self_7312766)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7324294,__lambda_1043, &c_7324309);;
++return_direct_with_clo1(data,(closure)&c_7322994,__lambda_1043, &c_7323009);;
+ }
+
+-static void __lambda_1045(void *data, object self_7314020, int argc, object *args) /* object self_7314020, object r_736806 */
++static void __lambda_1045(void *data, object self_7312767, int argc, object *args) /* object self_7312767, object r_736354 */
+ {
+- object r_736806 = args[0];
++ object r_736354 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7314020)->elements[0], (((closure) ((closureN)self_7314020)->elements[0])->fn), Cyc_car(data, r_736806));;
++return_direct_with_clo1(data, ((closureN)self_7312767)->elements[0], (((closure) ((closureN)self_7312767)->elements[0])->fn), Cyc_car(data, r_736354));;
+ }
+
+-static void __lambda_1043(void *data, object self_7314021, int argc, object *args) /* object self_7314021, object k_736808 */
++static void __lambda_1043(void *data, object self_7312768, int argc, object *args) /* object self_7312768, object k_736356 */
+ {
+- object k_736808 = args[0];
+- if( (boolean_f != ((closureN)self_7314021)->elements[1]) ){
+- return_direct_with_clo1(data, k_736808, (((closure) k_736808)->fn), ((closureN)self_7314021)->elements[1]);
++ object k_736356 = args[0];
++ if( (boolean_f != ((closureN)self_7312768)->elements[1]) ){
++ return_direct_with_clo1(data, k_736356, (((closure) k_736356)->fn), ((closureN)self_7312768)->elements[1]);
+ } else {
+
+-closureN_type c_7324299;
+-object e_7324305 [1];
+-c_7324299.hdr.mark = gc_color_red;
+- c_7324299.hdr.grayed = 0;
+-c_7324299.tag = closureN_tag;
+- c_7324299.fn = (function_type)__lambda_1044;
+-c_7324299.num_args = 1;
+-c_7324299.num_elements = 1;
+-c_7324299.elements = (object *)e_7324305;
+-c_7324299.elements[0] = k_736808;
++closureN_type c_7322999;
++object e_7323005 [1];
++c_7322999.hdr.mark = gc_color_red;
++ c_7322999.hdr.grayed = 0;
++c_7322999.tag = closureN_tag;
++ c_7322999.fn = (function_type)__lambda_1044;
++c_7322999.num_args = 1;
++c_7322999.num_elements = 1;
++c_7322999.elements = (object *)e_7323005;
++c_7322999.elements[0] = k_736356;
+
+
+-make_utf8_string_with_len(c_7324306, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7324299, &c_7324306, ((closureN)self_7314021)->elements[0]);}
++make_utf8_string_with_len(c_7323006, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7322999, &c_7323006, ((closureN)self_7312768)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1044(void *data, object self_7314022, int argc, object *args) /* object self_7314022, object r_736809 */
++static void __lambda_1044(void *data, object self_7312769, int argc, object *args) /* object self_7312769, object r_736357 */
+ {
+- object r_736809 = args[0];
++ object r_736357 = args[0];
+
+-pair_type local_7324304;
+-return_direct_with_clo1(data, ((closureN)self_7314022)->elements[0], (((closure) ((closureN)self_7314022)->elements[0])->fn), set_pair_as_expr(&local_7324304, r_736809, boolean_f));;
++pair_type local_7323004;
++return_direct_with_clo1(data, ((closureN)self_7312769)->elements[0], (((closure) ((closureN)self_7312769)->elements[0])->fn), set_pair_as_expr(&local_7323004, r_736357, boolean_f));;
+ }
+
+-static void __lambda_1027(void *data, object self_7314023, int argc, object *args) /* object self_7314023, object k_736811 */
++static void __lambda_1027(void *data, object self_7312770, int argc, object *args) /* object self_7312770, object k_736359 */
+ {
+- object k_736811 = args[0];
++ object k_736359 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7314023)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312770)->elements[1])) ){
+
+-closureN_type c_7324149;
+-object e_7324286 [3];
+-c_7324149.hdr.mark = gc_color_red;
+- c_7324149.hdr.grayed = 0;
+-c_7324149.tag = closureN_tag;
+- c_7324149.fn = (function_type)__lambda_1028;
+-c_7324149.num_args = 3;
+-c_7324149.num_elements = 3;
+-c_7324149.elements = (object *)e_7324286;
+-c_7324149.elements[0] = k_736811;
+-c_7324149.elements[1] = ((closureN)self_7314023)->elements[0];
+-c_7324149.elements[2] = ((closureN)self_7314023)->elements[1];
++closureN_type c_7322849;
++object e_7322986 [3];
++c_7322849.hdr.mark = gc_color_red;
++ c_7322849.hdr.grayed = 0;
++c_7322849.tag = closureN_tag;
++ c_7322849.fn = (function_type)__lambda_1028;
++c_7322849.num_args = 3;
++c_7322849.num_elements = 3;
++c_7322849.elements = (object *)e_7322986;
++c_7322849.elements[0] = k_736359;
++c_7322849.elements[1] = ((closureN)self_7312770)->elements[0];
++c_7322849.elements[2] = ((closureN)self_7312770)->elements[1];
+
+
+
+-return_direct_with_clo3(data,(closure)&c_7324149,__lambda_1028, Cyc_car(data, ((closureN)self_7314023)->elements[1]), NULL, NULL);
++return_direct_with_clo3(data,(closure)&c_7322849,__lambda_1028, Cyc_car(data, ((closureN)self_7312770)->elements[1]), NULL, NULL);
+ } else {
+- return_direct_with_clo1(data, k_736811, (((closure) k_736811)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736359, (((closure) k_736359)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1028(void *data, object self_7314024, int argc, object *args) /* object self_7314024, object w_933_731531_731552_731582_733700, object var_91ls5_731533_731553_731583_733701, object val_91ls6_731534_731554_731584_733702 */
++static void __lambda_1028(void *data, object self_7312771, int argc, object *args) /* object self_7312771, object w_933_731531_731552_731582_733353, object var_91ls5_731533_731553_731583_733354, object val_91ls6_731534_731554_731584_733355 */
+ {
+- object w_933_731531_731552_731582_733700 = args[0]; object var_91ls5_731533_731553_731583_733701 = args[1]; object val_91ls6_731534_731554_731584_733702 = args[2];
++ object w_933_731531_731552_731582_733353 = args[0]; object var_91ls5_731533_731553_731583_733354 = args[1]; object val_91ls6_731534_731554_731584_733355 = args[2];
+
+-closureN_type c_7324151;
+-object e_7324285 [6];
+-c_7324151.hdr.mark = gc_color_red;
+- c_7324151.hdr.grayed = 0;
+-c_7324151.tag = closureN_tag;
+- c_7324151.fn = (function_type)__lambda_1029;
+-c_7324151.num_args = 1;
+-c_7324151.num_elements = 6;
+-c_7324151.elements = (object *)e_7324285;
+-c_7324151.elements[0] = ((closureN)self_7314024)->elements[0];
+-c_7324151.elements[1] = ((closureN)self_7314024)->elements[1];
+-c_7324151.elements[2] = ((closureN)self_7314024)->elements[2];
+-c_7324151.elements[3] = val_91ls6_731534_731554_731584_733702;
+-c_7324151.elements[4] = var_91ls5_731533_731553_731583_733701;
+-c_7324151.elements[5] = w_933_731531_731552_731582_733700;
++closureN_type c_7322851;
++object e_7322985 [6];
++c_7322851.hdr.mark = gc_color_red;
++ c_7322851.hdr.grayed = 0;
++c_7322851.tag = closureN_tag;
++ c_7322851.fn = (function_type)__lambda_1029;
++c_7322851.num_args = 1;
++c_7322851.num_elements = 6;
++c_7322851.elements = (object *)e_7322985;
++c_7322851.elements[0] = ((closureN)self_7312771)->elements[0];
++c_7322851.elements[1] = ((closureN)self_7312771)->elements[1];
++c_7322851.elements[2] = ((closureN)self_7312771)->elements[2];
++c_7322851.elements[3] = val_91ls6_731534_731554_731584_733355;
++c_7322851.elements[4] = var_91ls5_731533_731553_731583_733354;
++c_7322851.elements[5] = w_933_731531_731552_731582_733353;
+
+-return_direct_with_clo1(data,(closure)&c_7324151,__lambda_1029, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7322851,__lambda_1029, boolean_f);;
+ }
+
+-static void __lambda_1029(void *data, object self_7314025, int argc, object *args) /* object self_7314025, object lp_934_731532_731555_731585_733703 */
++static void __lambda_1029(void *data, object self_7312772, int argc, object *args) /* object self_7312772, object lp_934_731532_731555_731585_733356 */
+ {
+- object lp_934_731532_731555_731585_733703 = args[0];
++ object lp_934_731532_731555_731585_733356 = args[0];
+
+-closureN_type c_7324153;
+-object e_7324281 [6];
+-c_7324153.hdr.mark = gc_color_red;
+- c_7324153.hdr.grayed = 0;
+-c_7324153.tag = closureN_tag;
+- c_7324153.fn = (function_type)__lambda_1442;
+-c_7324153.num_args = 1;
+-c_7324153.num_elements = 6;
+-c_7324153.elements = (object *)e_7324281;
+-c_7324153.elements[0] = ((closureN)self_7314025)->elements[0];
+-c_7324153.elements[1] = ((closureN)self_7314025)->elements[1];
+-c_7324153.elements[2] = ((closureN)self_7314025)->elements[2];
+-c_7324153.elements[3] = ((closureN)self_7314025)->elements[3];
+-c_7324153.elements[4] = ((closureN)self_7314025)->elements[4];
+-c_7324153.elements[5] = ((closureN)self_7314025)->elements[5];
++closureN_type c_7322853;
++object e_7322981 [6];
++c_7322853.hdr.mark = gc_color_red;
++ c_7322853.hdr.grayed = 0;
++c_7322853.tag = closureN_tag;
++ c_7322853.fn = (function_type)__lambda_1395;
++c_7322853.num_args = 1;
++c_7322853.num_elements = 6;
++c_7322853.elements = (object *)e_7322981;
++c_7322853.elements[0] = ((closureN)self_7312772)->elements[0];
++c_7322853.elements[1] = ((closureN)self_7312772)->elements[1];
++c_7322853.elements[2] = ((closureN)self_7312772)->elements[2];
++c_7322853.elements[3] = ((closureN)self_7312772)->elements[3];
++c_7322853.elements[4] = ((closureN)self_7312772)->elements[4];
++c_7322853.elements[5] = ((closureN)self_7312772)->elements[5];
+
+
+-pair_type local_7324284;
+-return_direct_with_clo1(data,(closure)&c_7324153,__lambda_1442, set_cell_as_expr(&local_7324284, lp_934_731532_731555_731585_733703));;
++pair_type local_7322984;
++return_direct_with_clo1(data,(closure)&c_7322853,__lambda_1395, set_cell_as_expr(&local_7322984, lp_934_731532_731555_731585_733356));;
+ }
+
+-static void __lambda_1442(void *data, object self_7314026, int argc, object *args) /* object self_7314026, object lp_934_731532_731555_731585_733703 */
++static void __lambda_1395(void *data, object self_7312773, int argc, object *args) /* object self_7312773, object lp_934_731532_731555_731585_733356 */
+ {
+- object lp_934_731532_731555_731585_733703 = args[0];
++ object lp_934_731532_731555_731585_733356 = args[0];
+
+-closureN_type c_7324155;
+-object e_7324170 [5];
+-c_7324155.hdr.mark = gc_color_red;
+- c_7324155.hdr.grayed = 0;
+-c_7324155.tag = closureN_tag;
+- c_7324155.fn = (function_type)__lambda_1030;
+-c_7324155.num_args = 1;
+-c_7324155.num_elements = 5;
+-c_7324155.elements = (object *)e_7324170;
+-c_7324155.elements[0] = ((closureN)self_7314026)->elements[0];
+-c_7324155.elements[1] = lp_934_731532_731555_731585_733703;
+-c_7324155.elements[2] = ((closureN)self_7314026)->elements[3];
+-c_7324155.elements[3] = ((closureN)self_7314026)->elements[4];
+-c_7324155.elements[4] = ((closureN)self_7314026)->elements[5];
++closureN_type c_7322855;
++object e_7322870 [5];
++c_7322855.hdr.mark = gc_color_red;
++ c_7322855.hdr.grayed = 0;
++c_7322855.tag = closureN_tag;
++ c_7322855.fn = (function_type)__lambda_1030;
++c_7322855.num_args = 1;
++c_7322855.num_elements = 5;
++c_7322855.elements = (object *)e_7322870;
++c_7322855.elements[0] = ((closureN)self_7312773)->elements[0];
++c_7322855.elements[1] = lp_934_731532_731555_731585_733356;
++c_7322855.elements[2] = ((closureN)self_7312773)->elements[3];
++c_7322855.elements[3] = ((closureN)self_7312773)->elements[4];
++c_7322855.elements[4] = ((closureN)self_7312773)->elements[5];
+
+
+-closureN_type c_7324171;
+-object e_7324280 [3];
+-c_7324171.hdr.mark = gc_color_red;
+- c_7324171.hdr.grayed = 0;
+-c_7324171.tag = closureN_tag;
+- c_7324171.fn = (function_type)__lambda_1032;
+-c_7324171.num_args = 3;
+-c_7324171.num_elements = 3;
+-c_7324171.elements = (object *)e_7324280;
+-c_7324171.elements[0] = lp_934_731532_731555_731585_733703;
+-c_7324171.elements[1] = ((closureN)self_7314026)->elements[1];
+-c_7324171.elements[2] = ((closureN)self_7314026)->elements[2];
++closureN_type c_7322871;
++object e_7322980 [3];
++c_7322871.hdr.mark = gc_color_red;
++ c_7322871.hdr.grayed = 0;
++c_7322871.tag = closureN_tag;
++ c_7322871.fn = (function_type)__lambda_1032;
++c_7322871.num_args = 3;
++c_7322871.num_elements = 3;
++c_7322871.elements = (object *)e_7322980;
++c_7322871.elements[0] = lp_934_731532_731555_731585_733356;
++c_7322871.elements[1] = ((closureN)self_7312773)->elements[1];
++c_7322871.elements[2] = ((closureN)self_7312773)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7324155,__lambda_1030, &c_7324171);;
++return_direct_with_clo1(data,(closure)&c_7322855,__lambda_1030, &c_7322871);;
+ }
+
+-static void __lambda_1032(void *data, object self_7314027, int argc, object *args) /* object self_7314027, object k_736818, object w_933_731531_731556_731586_733704, object var_91ls5_731533_731557_731587_733705, object val_91ls6_731534_731558_731588_733706 */
++static void __lambda_1032(void *data, object self_7312774, int argc, object *args) /* object self_7312774, object k_736366, object w_933_731531_731556_731586_733357, object var_91ls5_731533_731557_731587_733358, object val_91ls6_731534_731558_731588_733359 */
+ {
+- object k_736818 = args[0]; object w_933_731531_731556_731586_733704 = args[1]; object var_91ls5_731533_731557_731587_733705 = args[2]; object val_91ls6_731534_731558_731588_733706 = args[3];
++ object k_736366 = args[0]; object w_933_731531_731556_731586_733357 = args[1]; object var_91ls5_731533_731557_731587_733358 = args[2]; object val_91ls6_731534_731558_731588_733359 = args[3];
+
+-if( (boolean_f != Cyc_is_null(w_933_731531_731556_731586_733704)) ){
++if( (boolean_f != Cyc_is_null(w_933_731531_731556_731586_733357)) ){
+
+-closureN_type c_7324175;
+-object e_7324233 [4];
+-c_7324175.hdr.mark = gc_color_red;
+- c_7324175.hdr.grayed = 0;
+-c_7324175.tag = closureN_tag;
+- c_7324175.fn = (function_type)__lambda_1033;
+-c_7324175.num_args = 1;
+-c_7324175.num_elements = 4;
+-c_7324175.elements = (object *)e_7324233;
+-c_7324175.elements[0] = k_736818;
+-c_7324175.elements[1] = ((closureN)self_7314027)->elements[1];
+-c_7324175.elements[2] = ((closureN)self_7314027)->elements[2];
+-c_7324175.elements[3] = val_91ls6_731534_731558_731588_733706;
++closureN_type c_7322875;
++object e_7322933 [4];
++c_7322875.hdr.mark = gc_color_red;
++ c_7322875.hdr.grayed = 0;
++c_7322875.tag = closureN_tag;
++ c_7322875.fn = (function_type)__lambda_1033;
++c_7322875.num_args = 1;
++c_7322875.num_elements = 4;
++c_7322875.elements = (object *)e_7322933;
++c_7322875.elements[0] = k_736366;
++c_7322875.elements[1] = ((closureN)self_7312774)->elements[1];
++c_7322875.elements[2] = ((closureN)self_7312774)->elements[2];
++c_7322875.elements[3] = val_91ls6_731534_731558_731588_733359;
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7324175, primitive_cons, NULL, var_91ls5_731533_731557_731587_733705);
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7322875, primitive_cons, NULL, var_91ls5_731533_731557_731587_733358);
+ } else {
+
+-if( (boolean_f != Cyc_is_pair(w_933_731531_731556_731586_733704)) ){
++if( (boolean_f != Cyc_is_pair(w_933_731531_731556_731586_733357)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_933_731531_731556_731586_733704))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_933_731531_731556_731586_733357))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733704)))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733357)))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733704))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733357))))) ){
+
+
+
+
+
+-pair_type local_7324262;
++pair_type local_7322962;
+
+
+
+
+
+-pair_type local_7324269;
++pair_type local_7322969;
+
+
+
+
+
+
+-return_closcall4(data, car(((closureN)self_7314027)->elements[0]), k_736818, Cyc_cdr(data, w_933_731531_731556_731586_733704), set_pair_as_expr(&local_7324262, Cyc_car(data, Cyc_car(data, w_933_731531_731556_731586_733704)), var_91ls5_731533_731557_731587_733705), set_pair_as_expr(&local_7324269, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733704))), val_91ls6_731534_731558_731588_733706));
++return_closcall4(data, car(((closureN)self_7312774)->elements[0]), k_736366, Cyc_cdr(data, w_933_731531_731556_731586_733357), set_pair_as_expr(&local_7322962, Cyc_car(data, Cyc_car(data, w_933_731531_731556_731586_733357)), var_91ls5_731533_731557_731587_733358), set_pair_as_expr(&local_7322969, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733357))), val_91ls6_731534_731558_731588_733359));
+ } else {
+- return_direct_with_clo1(data, k_736818, (((closure) k_736818)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736366, (((closure) k_736366)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736818, (((closure) k_736818)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736366, (((closure) k_736366)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736818, (((closure) k_736818)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736366, (((closure) k_736366)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_736818, (((closure) k_736818)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736366, (((closure) k_736366)->fn), boolean_f);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_1033(void *data, object self_7314028, int argc, object *args) /* object self_7314028, object r_736820_7312992 */
++static void __lambda_1033(void *data, object self_7312775, int argc, object *args) /* object self_7312775, object r_736368_7311739 */
+ {
+- object r_736820_7312992 = args[0];
++ object r_736368_7311739 = args[0];
+
+-closureN_type c_7324177;
+-object e_7324231 [4];
+-c_7324177.hdr.mark = gc_color_red;
+- c_7324177.hdr.grayed = 0;
+-c_7324177.tag = closureN_tag;
+- c_7324177.fn = (function_type)__lambda_1034;
+-c_7324177.num_args = 1;
+-c_7324177.num_elements = 4;
+-c_7324177.elements = (object *)e_7324231;
+-c_7324177.elements[0] = ((closureN)self_7314028)->elements[0];
+-c_7324177.elements[1] = r_736820_7312992;
+-c_7324177.elements[2] = ((closureN)self_7314028)->elements[1];
+-c_7324177.elements[3] = ((closureN)self_7314028)->elements[2];
+-
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7324177, primitive_cons, NULL, ((closureN)self_7314028)->elements[3]);;
+-}
+-
+-static void __lambda_1034(void *data, object self_7314029, int argc, object *args) /* object self_7314029, object r_736821_7312993_7313004 */
+- {
+- object r_736821_7312993_7313004 = args[0];
+-
+-closureN_type c_7324179;
+-object e_7324229 [3];
+-c_7324179.hdr.mark = gc_color_red;
+- c_7324179.hdr.grayed = 0;
+-c_7324179.tag = closureN_tag;
+- c_7324179.fn = (function_type)__lambda_1035;
+-c_7324179.num_args = 2;
+-c_7324179.num_elements = 3;
+-c_7324179.elements = (object *)e_7324229;
+-c_7324179.elements[0] = ((closureN)self_7314029)->elements[0];
+-c_7324179.elements[1] = ((closureN)self_7314029)->elements[2];
+-c_7324179.elements[2] = ((closureN)self_7314029)->elements[3];
+-
+-return_direct_with_clo2(data,(closure)&c_7324179,__lambda_1035, ((closureN)self_7314029)->elements[1], r_736821_7312993_7313004);;
+-}
+-
+-static void __lambda_1035(void *data, object self_7314030, int argc, object *args) /* object self_7314030, object var_731559_731589_733707_7312994_7313005, object val_731560_731590_733708_7312995_7313006 */
+- {
+- object var_731559_731589_733707_7312994_7313005 = args[0]; object val_731560_731590_733708_7312995_7313006 = args[1];
+-
+-closureN_type c_7324182;
+-object e_7324228 [5];
+-c_7324182.hdr.mark = gc_color_red;
+- c_7324182.hdr.grayed = 0;
+-c_7324182.tag = closureN_tag;
+- c_7324182.fn = (function_type)__lambda_1036;
+-c_7324182.num_args = 1;
+-c_7324182.num_elements = 5;
+-c_7324182.elements = (object *)e_7324228;
+-c_7324182.elements[0] = ((closureN)self_7314030)->elements[0];
+-c_7324182.elements[1] = ((closureN)self_7314030)->elements[1];
+-c_7324182.elements[2] = ((closureN)self_7314030)->elements[2];
+-c_7324182.elements[3] = val_731560_731590_733708_7312995_7313006;
+-c_7324182.elements[4] = var_731559_731589_733707_7312994_7313005;
+-
+-return_closcall2(data, ((closureN)self_7314030)->elements[1], &c_7324182, quote_let);;
+-}
+-
+-static void __lambda_1036(void *data, object self_7314031, int argc, object *args) /* object self_7314031, object r_736824_7312996_7313007 */
+- {
+- object r_736824_7312996_7313007 = args[0];
+-
+-closureN_type c_7324184;
+-object e_7324208 [5];
+-c_7324184.hdr.mark = gc_color_red;
+- c_7324184.hdr.grayed = 0;
+-c_7324184.tag = closureN_tag;
+- c_7324184.fn = (function_type)__lambda_1037;
+-c_7324184.num_args = 1;
+-c_7324184.num_elements = 5;
+-c_7324184.elements = (object *)e_7324208;
+-c_7324184.elements[0] = ((closureN)self_7314031)->elements[0];
+-c_7324184.elements[1] = r_736824_7312996_7313007;
+-c_7324184.elements[2] = ((closureN)self_7314031)->elements[2];
+-c_7324184.elements[3] = ((closureN)self_7314031)->elements[3];
+-c_7324184.elements[4] = ((closureN)self_7314031)->elements[4];
++closureN_type c_7322877;
++object e_7322931 [4];
++c_7322877.hdr.mark = gc_color_red;
++ c_7322877.hdr.grayed = 0;
++c_7322877.tag = closureN_tag;
++ c_7322877.fn = (function_type)__lambda_1034;
++c_7322877.num_args = 1;
++c_7322877.num_elements = 4;
++c_7322877.elements = (object *)e_7322931;
++c_7322877.elements[0] = ((closureN)self_7312775)->elements[0];
++c_7322877.elements[1] = r_736368_7311739;
++c_7322877.elements[2] = ((closureN)self_7312775)->elements[1];
++c_7322877.elements[3] = ((closureN)self_7312775)->elements[2];
++
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7322877, primitive_cons, NULL, ((closureN)self_7312775)->elements[3]);;
++}
++
++static void __lambda_1034(void *data, object self_7312776, int argc, object *args) /* object self_7312776, object r_736369_7311740_7311751 */
++ {
++ object r_736369_7311740_7311751 = args[0];
++
++closureN_type c_7322879;
++object e_7322929 [3];
++c_7322879.hdr.mark = gc_color_red;
++ c_7322879.hdr.grayed = 0;
++c_7322879.tag = closureN_tag;
++ c_7322879.fn = (function_type)__lambda_1035;
++c_7322879.num_args = 2;
++c_7322879.num_elements = 3;
++c_7322879.elements = (object *)e_7322929;
++c_7322879.elements[0] = ((closureN)self_7312776)->elements[0];
++c_7322879.elements[1] = ((closureN)self_7312776)->elements[2];
++c_7322879.elements[2] = ((closureN)self_7312776)->elements[3];
+
++return_direct_with_clo2(data,(closure)&c_7322879,__lambda_1035, ((closureN)self_7312776)->elements[1], r_736369_7311740_7311751);;
++}
+
+-closureN_type c_7324209;
+-object e_7324227 [1];
+-c_7324209.hdr.mark = gc_color_red;
+- c_7324209.hdr.grayed = 0;
+-c_7324209.tag = closureN_tag;
+- c_7324209.fn = (function_type)__lambda_1040;
+-c_7324209.num_args = 2;
+-c_7324209.num_elements = 1;
+-c_7324209.elements = (object *)e_7324227;
+-c_7324209.elements[0] = ((closureN)self_7314031)->elements[1];
++static void __lambda_1035(void *data, object self_7312777, int argc, object *args) /* object self_7312777, object var_731559_731589_733360_7311741_7311752, object val_731560_731590_733361_7311742_7311753 */
++ {
++ object var_731559_731589_733360_7311741_7311752 = args[0]; object val_731560_731590_733361_7311742_7311753 = args[1];
++
++closureN_type c_7322882;
++object e_7322928 [5];
++c_7322882.hdr.mark = gc_color_red;
++ c_7322882.hdr.grayed = 0;
++c_7322882.tag = closureN_tag;
++ c_7322882.fn = (function_type)__lambda_1036;
++c_7322882.num_args = 1;
++c_7322882.num_elements = 5;
++c_7322882.elements = (object *)e_7322928;
++c_7322882.elements[0] = ((closureN)self_7312777)->elements[0];
++c_7322882.elements[1] = ((closureN)self_7312777)->elements[1];
++c_7322882.elements[2] = ((closureN)self_7312777)->elements[2];
++c_7322882.elements[3] = val_731560_731590_733361_7311742_7311753;
++c_7322882.elements[4] = var_731559_731589_733360_7311741_7311752;
+
+-return_direct_with_clo1(data,(closure)&c_7324184,__lambda_1037, &c_7324209);;
++return_closcall2(data, ((closureN)self_7312777)->elements[1], &c_7322882, quote_let);;
+ }
+
+-static void __lambda_1040(void *data, object self_7314032, int argc, object *args) /* object self_7314032, object k_736832_7313000_7313011, object var_731563_731593_733711_7313001_7313012, object val_731564_731594_733712_7313002_7313013 */
++static void __lambda_1036(void *data, object self_7312778, int argc, object *args) /* object self_7312778, object r_736372_7311743_7311754 */
+ {
+- object k_736832_7313000_7313011 = args[0]; object var_731563_731593_733711_7313001_7313012 = args[1]; object val_731564_731594_733712_7313002_7313013 = args[2];
++ object r_736372_7311743_7311754 = args[0];
+
+-closureN_type c_7324212;
+-object e_7324226 [3];
+-c_7324212.hdr.mark = gc_color_red;
+- c_7324212.hdr.grayed = 0;
+-c_7324212.tag = closureN_tag;
+- c_7324212.fn = (function_type)__lambda_1041;
+-c_7324212.num_args = 1;
+-c_7324212.num_elements = 3;
+-c_7324212.elements = (object *)e_7324226;
+-c_7324212.elements[0] = k_736832_7313000_7313011;
+-c_7324212.elements[1] = val_731564_731594_733712_7313002_7313013;
+-c_7324212.elements[2] = var_731563_731593_733711_7313001_7313012;
++closureN_type c_7322884;
++object e_7322908 [5];
++c_7322884.hdr.mark = gc_color_red;
++ c_7322884.hdr.grayed = 0;
++c_7322884.tag = closureN_tag;
++ c_7322884.fn = (function_type)__lambda_1037;
++c_7322884.num_args = 1;
++c_7322884.num_elements = 5;
++c_7322884.elements = (object *)e_7322908;
++c_7322884.elements[0] = ((closureN)self_7312778)->elements[0];
++c_7322884.elements[1] = r_736372_7311743_7311754;
++c_7322884.elements[2] = ((closureN)self_7312778)->elements[2];
++c_7322884.elements[3] = ((closureN)self_7312778)->elements[3];
++c_7322884.elements[4] = ((closureN)self_7312778)->elements[4];
++
+
+-return_closcall2(data, ((closureN)self_7314032)->elements[0], &c_7324212, quote_define);;
++closureN_type c_7322909;
++object e_7322927 [1];
++c_7322909.hdr.mark = gc_color_red;
++ c_7322909.hdr.grayed = 0;
++c_7322909.tag = closureN_tag;
++ c_7322909.fn = (function_type)__lambda_1040;
++c_7322909.num_args = 2;
++c_7322909.num_elements = 1;
++c_7322909.elements = (object *)e_7322927;
++c_7322909.elements[0] = ((closureN)self_7312778)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7322884,__lambda_1037, &c_7322909);;
+ }
+
+-static void __lambda_1041(void *data, object self_7314033, int argc, object *args) /* object self_7314033, object r_736833_7313003_7313014 */
++static void __lambda_1040(void *data, object self_7312779, int argc, object *args) /* object self_7312779, object k_736380_7311747_7311758, object var_731563_731593_733364_7311748_7311759, object val_731564_731594_733365_7311749_7311760 */
+ {
+- object r_736833_7313003_7313014 = args[0];
++ object k_736380_7311747_7311758 = args[0]; object var_731563_731593_733364_7311748_7311759 = args[1]; object val_731564_731594_733365_7311749_7311760 = args[2];
+
+-pair_type local_7324217;
++closureN_type c_7322912;
++object e_7322926 [3];
++c_7322912.hdr.mark = gc_color_red;
++ c_7322912.hdr.grayed = 0;
++c_7322912.tag = closureN_tag;
++ c_7322912.fn = (function_type)__lambda_1041;
++c_7322912.num_args = 1;
++c_7322912.num_elements = 3;
++c_7322912.elements = (object *)e_7322926;
++c_7322912.elements[0] = k_736380_7311747_7311758;
++c_7322912.elements[1] = val_731564_731594_733365_7311749_7311760;
++c_7322912.elements[2] = var_731563_731593_733364_7311748_7311759;
+
+-pair_type local_7324220;
++return_closcall2(data, ((closureN)self_7312779)->elements[0], &c_7322912, quote_define);;
++}
++
++static void __lambda_1041(void *data, object self_7312780, int argc, object *args) /* object self_7312780, object r_736381_7311750_7311761 */
++ {
++ object r_736381_7311750_7311761 = args[0];
++
++pair_type local_7322917;
+
+-pair_type local_7324224;
+-return_direct_with_clo1(data, ((closureN)self_7314033)->elements[0], (((closure) ((closureN)self_7314033)->elements[0])->fn), set_pair_as_expr(&local_7324217, r_736833_7313003_7313014, set_pair_as_expr(&local_7324220, ((closureN)self_7314033)->elements[2], set_pair_as_expr(&local_7324224, ((closureN)self_7314033)->elements[1], NULL))));;
++pair_type local_7322920;
++
++pair_type local_7322924;
++return_direct_with_clo1(data, ((closureN)self_7312780)->elements[0], (((closure) ((closureN)self_7312780)->elements[0])->fn), set_pair_as_expr(&local_7322917, r_736381_7311750_7311761, set_pair_as_expr(&local_7322920, ((closureN)self_7312780)->elements[2], set_pair_as_expr(&local_7322924, ((closureN)self_7312780)->elements[1], NULL))));;
+ }
+
+-static void __lambda_1037(void *data, object self_7314034, int argc, object *args) /* object self_7314034, object r_736831_7312997_7313008 */
++static void __lambda_1037(void *data, object self_7312781, int argc, object *args) /* object self_7312781, object r_736379_7311744_7311755 */
+ {
+- object r_736831_7312997_7313008 = args[0];
++ object r_736379_7311744_7311755 = args[0];
+
+-closureN_type c_7324186;
+-object e_7324205 [3];
+-c_7324186.hdr.mark = gc_color_red;
+- c_7324186.hdr.grayed = 0;
+-c_7324186.tag = closureN_tag;
+- c_7324186.fn = (function_type)__lambda_1038;
+-c_7324186.num_args = 1;
+-c_7324186.num_elements = 3;
+-c_7324186.elements = (object *)e_7324205;
+-c_7324186.elements[0] = ((closureN)self_7314034)->elements[0];
+-c_7324186.elements[1] = ((closureN)self_7314034)->elements[1];
+-c_7324186.elements[2] = ((closureN)self_7314034)->elements[2];
++closureN_type c_7322886;
++object e_7322905 [3];
++c_7322886.hdr.mark = gc_color_red;
++ c_7322886.hdr.grayed = 0;
++c_7322886.tag = closureN_tag;
++ c_7322886.fn = (function_type)__lambda_1038;
++c_7322886.num_args = 1;
++c_7322886.num_elements = 3;
++c_7322886.elements = (object *)e_7322905;
++c_7322886.elements[0] = ((closureN)self_7312781)->elements[0];
++c_7322886.elements[1] = ((closureN)self_7312781)->elements[1];
++c_7322886.elements[2] = ((closureN)self_7312781)->elements[2];
+
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7324186, r_736831_7312997_7313008, ((closureN)self_7314034)->elements[4], ((closureN)self_7314034)->elements[3]);;
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7322886, r_736379_7311744_7311755, ((closureN)self_7312781)->elements[4], ((closureN)self_7312781)->elements[3]);;
+ }
+
+-static void __lambda_1038(void *data, object self_7314035, int argc, object *args) /* object self_7314035, object r_736830_7312998_7313009 */
++static void __lambda_1038(void *data, object self_7312782, int argc, object *args) /* object self_7312782, object r_736378_7311745_7311756 */
+ {
+- object r_736830_7312998_7313009 = args[0];
++ object r_736378_7311745_7311756 = args[0];
+
+-closureN_type c_7324188;
+-object e_7324201 [2];
+-c_7324188.hdr.mark = gc_color_red;
+- c_7324188.hdr.grayed = 0;
+-c_7324188.tag = closureN_tag;
+- c_7324188.fn = (function_type)__lambda_1039;
+-c_7324188.num_args = 1;
+-c_7324188.num_elements = 2;
+-c_7324188.elements = (object *)e_7324201;
+-c_7324188.elements[0] = ((closureN)self_7314035)->elements[0];
+-c_7324188.elements[1] = ((closureN)self_7314035)->elements[1];
++closureN_type c_7322888;
++object e_7322901 [2];
++c_7322888.hdr.mark = gc_color_red;
++ c_7322888.hdr.grayed = 0;
++c_7322888.tag = closureN_tag;
++ c_7322888.fn = (function_type)__lambda_1039;
++c_7322888.num_args = 1;
++c_7322888.num_elements = 2;
++c_7322888.elements = (object *)e_7322901;
++c_7322888.elements[0] = ((closureN)self_7312782)->elements[0];
++c_7322888.elements[1] = ((closureN)self_7312782)->elements[1];
+
+
+
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7324188, r_736830_7312998_7313009, Cyc_cdr(data, ((closureN)self_7314035)->elements[2]));;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7322888, r_736378_7311745_7311756, Cyc_cdr(data, ((closureN)self_7312782)->elements[2]));;
+ }
+
+-static void __lambda_1039(void *data, object self_7314036, int argc, object *args) /* object self_7314036, object r_736828_7312999_7313010 */
++static void __lambda_1039(void *data, object self_7312783, int argc, object *args) /* object self_7312783, object r_736376_7311746_7311757 */
+ {
+- object r_736828_7312999_7313010 = args[0];
++ object r_736376_7311746_7311757 = args[0];
+
+-pair_type local_7324193;
++pair_type local_7322893;
+
+-pair_type local_7324196;
++pair_type local_7322896;
+
+-pair_type local_7324200;
+-return_direct_with_clo1(data, ((closureN)self_7314036)->elements[0], (((closure) ((closureN)self_7314036)->elements[0])->fn), set_pair_as_expr(&local_7324193, set_pair_as_expr(&local_7324196, ((closureN)self_7314036)->elements[1], set_pair_as_expr(&local_7324200, NULL, r_736828_7312999_7313010)), boolean_f));;
++pair_type local_7322900;
++return_direct_with_clo1(data, ((closureN)self_7312783)->elements[0], (((closure) ((closureN)self_7312783)->elements[0])->fn), set_pair_as_expr(&local_7322893, set_pair_as_expr(&local_7322896, ((closureN)self_7312783)->elements[1], set_pair_as_expr(&local_7322900, NULL, r_736376_7311746_7311757)), boolean_f));;
+ }
+
+-static void __lambda_1030(void *data, object self_7314037, int argc, object *args) /* object self_7314037, object r_736817 */
++static void __lambda_1030(void *data, object self_7312784, int argc, object *args) /* object self_7312784, object r_736365 */
+ {
+- object r_736817 = args[0];
++ object r_736365 = args[0];
+
+-closureN_type c_7324157;
+-object e_7324166 [5];
+-c_7324157.hdr.mark = gc_color_red;
+- c_7324157.hdr.grayed = 0;
+-c_7324157.tag = closureN_tag;
+- c_7324157.fn = (function_type)__lambda_1031;
+-c_7324157.num_args = 1;
+-c_7324157.num_elements = 5;
+-c_7324157.elements = (object *)e_7324166;
+-c_7324157.elements[0] = ((closureN)self_7314037)->elements[0];
+-c_7324157.elements[1] = ((closureN)self_7314037)->elements[1];
+-c_7324157.elements[2] = ((closureN)self_7314037)->elements[2];
+-c_7324157.elements[3] = ((closureN)self_7314037)->elements[3];
+-c_7324157.elements[4] = ((closureN)self_7314037)->elements[4];
++closureN_type c_7322857;
++object e_7322866 [5];
++c_7322857.hdr.mark = gc_color_red;
++ c_7322857.hdr.grayed = 0;
++c_7322857.tag = closureN_tag;
++ c_7322857.fn = (function_type)__lambda_1031;
++c_7322857.num_args = 1;
++c_7322857.num_elements = 5;
++c_7322857.elements = (object *)e_7322866;
++c_7322857.elements[0] = ((closureN)self_7312784)->elements[0];
++c_7322857.elements[1] = ((closureN)self_7312784)->elements[1];
++c_7322857.elements[2] = ((closureN)self_7312784)->elements[2];
++c_7322857.elements[3] = ((closureN)self_7312784)->elements[3];
++c_7322857.elements[4] = ((closureN)self_7312784)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7324157,__lambda_1031, Cyc_set_cell(data, ((closureN)self_7314037)->elements[1], r_736817));;
++return_direct_with_clo1(data,(closure)&c_7322857,__lambda_1031, Cyc_set_cell(data, ((closureN)self_7312784)->elements[1], r_736365));;
+ }
+
+-static void __lambda_1031(void *data, object self_7314038, int argc, object *args) /* object self_7314038, object r_736816 */
++static void __lambda_1031(void *data, object self_7312785, int argc, object *args) /* object self_7312785, object r_736364 */
+ {
+
+
+
+-return_closcall4(data, car(((closureN)self_7314038)->elements[1]), ((closureN)self_7314038)->elements[0], ((closureN)self_7314038)->elements[4], ((closureN)self_7314038)->elements[3], ((closureN)self_7314038)->elements[2]);;
++return_closcall4(data, car(((closureN)self_7312785)->elements[1]), ((closureN)self_7312785)->elements[0], ((closureN)self_7312785)->elements[4], ((closureN)self_7312785)->elements[3], ((closureN)self_7312785)->elements[2]);;
+ }
+
+-static void __lambda_810(void *data, object _, int argc, object *args) /* closure _,object k_736347, object expr_731263_733551, object rename_731264_733552, object compare_731265_733553 */
++static void __lambda_810(void *data, object _, int argc, object *args) /* closure _,object k_735895, object expr_731263_733204, object rename_731264_733205, object compare_731265_733206 */
+ {
+-object k_736347 = args[0]; object expr_731263_733551 = args[1]; object rename_731264_733552 = args[2]; object compare_731265_733553 = args[3];
++object k_735895 = args[0]; object expr_731263_733204 = args[1]; object rename_731264_733205 = args[2]; object compare_731265_733206 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:syntax-rules");
+
+-closureN_type c_7322040;
+-object e_7324137 [4];
+-c_7322040.hdr.mark = gc_color_red;
+- c_7322040.hdr.grayed = 0;
+-c_7322040.tag = closureN_tag;
+- c_7322040.fn = (function_type)__lambda_811;
+-c_7322040.num_args = 1;
+-c_7322040.num_elements = 4;
+-c_7322040.elements = (object *)e_7324137;
+-c_7322040.elements[0] = compare_731265_733553;
+-c_7322040.elements[1] = expr_731263_733551;
+-c_7322040.elements[2] = k_736347;
+-c_7322040.elements[3] = rename_731264_733552;
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322040,__lambda_811, Cyc_cadr(data, expr_731263_733551));;
+-}
+-
+-static void __lambda_811(void *data, object self_7313786, int argc, object *args) /* object self_7313786, object r_736802 */
+- {
+- object r_736802 = args[0];
+-
+-closureN_type c_7322042;
+-object e_7324136 [4];
+-c_7322042.hdr.mark = gc_color_red;
+- c_7322042.hdr.grayed = 0;
+-c_7322042.tag = closureN_tag;
+- c_7322042.fn = (function_type)__lambda_812;
+-c_7322042.num_args = 1;
+-c_7322042.num_elements = 4;
+-c_7322042.elements = (object *)e_7324136;
+-c_7322042.elements[0] = ((closureN)self_7313786)->elements[0];
+-c_7322042.elements[1] = ((closureN)self_7313786)->elements[1];
+-c_7322042.elements[2] = ((closureN)self_7313786)->elements[2];
+-c_7322042.elements[3] = ((closureN)self_7313786)->elements[3];
+-
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7322042, r_736802);;
+-}
+-
+-static void __lambda_812(void *data, object self_7313787, int argc, object *args) /* object self_7313787, object r_736348 */
+- {
+- object r_736348 = args[0];
+-
+-closureN_type c_7322045;
+-object e_7324135 [5];
+-c_7322045.hdr.mark = gc_color_red;
+- c_7322045.hdr.grayed = 0;
+-c_7322045.tag = closureN_tag;
+- c_7322045.fn = (function_type)__lambda_813;
+-c_7322045.num_args = 1;
+-c_7322045.num_elements = 5;
+-c_7322045.elements = (object *)e_7324135;
+-c_7322045.elements[0] = ((closureN)self_7313787)->elements[0];
+-c_7322045.elements[1] = ((closureN)self_7313787)->elements[1];
+-c_7322045.elements[2] = ((closureN)self_7313787)->elements[2];
+-c_7322045.elements[3] = r_736348;
+-c_7322045.elements[4] = ((closureN)self_7313787)->elements[3];
+-
+-return_closcall2(data, ((closureN)self_7313787)->elements[3], &c_7322045, quote_er_91macro_91transformer);;
+-}
+-
+-static void __lambda_813(void *data, object self_7313788, int argc, object *args) /* object self_7313788, object r_736349 */
+- {
+- object r_736349 = args[0];
+-
+-closureN_type c_7322048;
+-object e_7324134 [6];
+-c_7322048.hdr.mark = gc_color_red;
+- c_7322048.hdr.grayed = 0;
+-c_7322048.tag = closureN_tag;
+- c_7322048.fn = (function_type)__lambda_814;
+-c_7322048.num_args = 1;
+-c_7322048.num_elements = 6;
+-c_7322048.elements = (object *)e_7324134;
+-c_7322048.elements[0] = ((closureN)self_7313788)->elements[0];
+-c_7322048.elements[1] = ((closureN)self_7313788)->elements[1];
+-c_7322048.elements[2] = ((closureN)self_7313788)->elements[2];
+-c_7322048.elements[3] = ((closureN)self_7313788)->elements[3];
+-c_7322048.elements[4] = r_736349;
+-c_7322048.elements[5] = ((closureN)self_7313788)->elements[4];
++closureN_type c_7320740;
++object e_7322837 [4];
++c_7320740.hdr.mark = gc_color_red;
++ c_7320740.hdr.grayed = 0;
++c_7320740.tag = closureN_tag;
++ c_7320740.fn = (function_type)__lambda_811;
++c_7320740.num_args = 1;
++c_7320740.num_elements = 4;
++c_7320740.elements = (object *)e_7322837;
++c_7320740.elements[0] = compare_731265_733206;
++c_7320740.elements[1] = expr_731263_733204;
++c_7320740.elements[2] = k_735895;
++c_7320740.elements[3] = rename_731264_733205;
++
++
+
+-return_closcall2(data, ((closureN)self_7313788)->elements[4], &c_7322048, quote_lambda);;
++return_direct_with_clo1(data,(closure)&c_7320740,__lambda_811, Cyc_cadr(data, expr_731263_733204));;
+ }
+
+-static void __lambda_814(void *data, object self_7313789, int argc, object *args) /* object self_7313789, object r_736350 */
++static void __lambda_811(void *data, object self_7312533, int argc, object *args) /* object self_7312533, object r_736350 */
+ {
+ object r_736350 = args[0];
+
+-closureN_type c_7322051;
+-object e_7324133 [7];
+-c_7322051.hdr.mark = gc_color_red;
+- c_7322051.hdr.grayed = 0;
+-c_7322051.tag = closureN_tag;
+- c_7322051.fn = (function_type)__lambda_815;
+-c_7322051.num_args = 1;
+-c_7322051.num_elements = 7;
+-c_7322051.elements = (object *)e_7324133;
+-c_7322051.elements[0] = ((closureN)self_7313789)->elements[0];
+-c_7322051.elements[1] = ((closureN)self_7313789)->elements[1];
+-c_7322051.elements[2] = ((closureN)self_7313789)->elements[2];
+-c_7322051.elements[3] = ((closureN)self_7313789)->elements[3];
+-c_7322051.elements[4] = ((closureN)self_7313789)->elements[4];
+-c_7322051.elements[5] = r_736350;
+-c_7322051.elements[6] = ((closureN)self_7313789)->elements[5];
+-
+-return_closcall2(data, ((closureN)self_7313789)->elements[5], &c_7322051, quote_let);;
+-}
+-
+-static void __lambda_815(void *data, object self_7313790, int argc, object *args) /* object self_7313790, object r_736351 */
+- {
+- object r_736351 = args[0];
+-
+-closureN_type c_7322054;
+-object e_7324132 [8];
+-c_7322054.hdr.mark = gc_color_red;
+- c_7322054.hdr.grayed = 0;
+-c_7322054.tag = closureN_tag;
+- c_7322054.fn = (function_type)__lambda_816;
+-c_7322054.num_args = 1;
+-c_7322054.num_elements = 8;
+-c_7322054.elements = (object *)e_7324132;
+-c_7322054.elements[0] = ((closureN)self_7313790)->elements[0];
+-c_7322054.elements[1] = ((closureN)self_7313790)->elements[1];
+-c_7322054.elements[2] = ((closureN)self_7313790)->elements[2];
+-c_7322054.elements[3] = ((closureN)self_7313790)->elements[3];
+-c_7322054.elements[4] = ((closureN)self_7313790)->elements[4];
+-c_7322054.elements[5] = ((closureN)self_7313790)->elements[5];
+-c_7322054.elements[6] = r_736351;
+-c_7322054.elements[7] = ((closureN)self_7313790)->elements[6];
+-
+-return_closcall2(data, ((closureN)self_7313790)->elements[6], &c_7322054, quote_begin);;
+-}
+-
+-static void __lambda_816(void *data, object self_7313791, int argc, object *args) /* object self_7313791, object r_736352 */
+- {
+- object r_736352 = args[0];
+-
+-closureN_type c_7322057;
+-object e_7324131 [9];
+-c_7322057.hdr.mark = gc_color_red;
+- c_7322057.hdr.grayed = 0;
+-c_7322057.tag = closureN_tag;
+- c_7322057.fn = (function_type)__lambda_817;
+-c_7322057.num_args = 1;
+-c_7322057.num_elements = 9;
+-c_7322057.elements = (object *)e_7324131;
+-c_7322057.elements[0] = ((closureN)self_7313791)->elements[0];
+-c_7322057.elements[1] = ((closureN)self_7313791)->elements[1];
+-c_7322057.elements[2] = ((closureN)self_7313791)->elements[2];
+-c_7322057.elements[3] = ((closureN)self_7313791)->elements[3];
+-c_7322057.elements[4] = ((closureN)self_7313791)->elements[4];
+-c_7322057.elements[5] = ((closureN)self_7313791)->elements[5];
+-c_7322057.elements[6] = ((closureN)self_7313791)->elements[6];
+-c_7322057.elements[7] = r_736352;
+-c_7322057.elements[8] = ((closureN)self_7313791)->elements[7];
+-
+-return_closcall2(data, ((closureN)self_7313791)->elements[7], &c_7322057, quote__if);;
+-}
+-
+-static void __lambda_817(void *data, object self_7313792, int argc, object *args) /* object self_7313792, object r_736353 */
+- {
+- object r_736353 = args[0];
+-
+-closureN_type c_7322060;
+-object e_7324130 [10];
+-c_7322060.hdr.mark = gc_color_red;
+- c_7322060.hdr.grayed = 0;
+-c_7322060.tag = closureN_tag;
+- c_7322060.fn = (function_type)__lambda_818;
+-c_7322060.num_args = 1;
+-c_7322060.num_elements = 10;
+-c_7322060.elements = (object *)e_7324130;
+-c_7322060.elements[0] = ((closureN)self_7313792)->elements[0];
+-c_7322060.elements[1] = ((closureN)self_7313792)->elements[1];
+-c_7322060.elements[2] = ((closureN)self_7313792)->elements[2];
+-c_7322060.elements[3] = ((closureN)self_7313792)->elements[3];
+-c_7322060.elements[4] = ((closureN)self_7313792)->elements[4];
+-c_7322060.elements[5] = ((closureN)self_7313792)->elements[5];
+-c_7322060.elements[6] = ((closureN)self_7313792)->elements[6];
+-c_7322060.elements[7] = ((closureN)self_7313792)->elements[7];
+-c_7322060.elements[8] = r_736353;
+-c_7322060.elements[9] = ((closureN)self_7313792)->elements[8];
++closureN_type c_7320742;
++object e_7322836 [4];
++c_7320742.hdr.mark = gc_color_red;
++ c_7320742.hdr.grayed = 0;
++c_7320742.tag = closureN_tag;
++ c_7320742.fn = (function_type)__lambda_812;
++c_7320742.num_args = 1;
++c_7320742.num_elements = 4;
++c_7320742.elements = (object *)e_7322836;
++c_7320742.elements[0] = ((closureN)self_7312533)->elements[0];
++c_7320742.elements[1] = ((closureN)self_7312533)->elements[1];
++c_7320742.elements[2] = ((closureN)self_7312533)->elements[2];
++c_7320742.elements[3] = ((closureN)self_7312533)->elements[3];
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7320742, r_736350);;
++}
++
++static void __lambda_812(void *data, object self_7312534, int argc, object *args) /* object self_7312534, object r_735896 */
++ {
++ object r_735896 = args[0];
++
++closureN_type c_7320745;
++object e_7322835 [5];
++c_7320745.hdr.mark = gc_color_red;
++ c_7320745.hdr.grayed = 0;
++c_7320745.tag = closureN_tag;
++ c_7320745.fn = (function_type)__lambda_813;
++c_7320745.num_args = 1;
++c_7320745.num_elements = 5;
++c_7320745.elements = (object *)e_7322835;
++c_7320745.elements[0] = ((closureN)self_7312534)->elements[0];
++c_7320745.elements[1] = ((closureN)self_7312534)->elements[1];
++c_7320745.elements[2] = ((closureN)self_7312534)->elements[2];
++c_7320745.elements[3] = r_735896;
++c_7320745.elements[4] = ((closureN)self_7312534)->elements[3];
++
++return_closcall2(data, ((closureN)self_7312534)->elements[3], &c_7320745, quote_er_91macro_91transformer);;
++}
++
++static void __lambda_813(void *data, object self_7312535, int argc, object *args) /* object self_7312535, object r_735897 */
++ {
++ object r_735897 = args[0];
++
++closureN_type c_7320748;
++object e_7322834 [6];
++c_7320748.hdr.mark = gc_color_red;
++ c_7320748.hdr.grayed = 0;
++c_7320748.tag = closureN_tag;
++ c_7320748.fn = (function_type)__lambda_814;
++c_7320748.num_args = 1;
++c_7320748.num_elements = 6;
++c_7320748.elements = (object *)e_7322834;
++c_7320748.elements[0] = ((closureN)self_7312535)->elements[0];
++c_7320748.elements[1] = ((closureN)self_7312535)->elements[1];
++c_7320748.elements[2] = ((closureN)self_7312535)->elements[2];
++c_7320748.elements[3] = ((closureN)self_7312535)->elements[3];
++c_7320748.elements[4] = r_735897;
++c_7320748.elements[5] = ((closureN)self_7312535)->elements[4];
++
++return_closcall2(data, ((closureN)self_7312535)->elements[4], &c_7320748, quote_lambda);;
++}
++
++static void __lambda_814(void *data, object self_7312536, int argc, object *args) /* object self_7312536, object r_735898 */
++ {
++ object r_735898 = args[0];
++
++closureN_type c_7320751;
++object e_7322833 [7];
++c_7320751.hdr.mark = gc_color_red;
++ c_7320751.hdr.grayed = 0;
++c_7320751.tag = closureN_tag;
++ c_7320751.fn = (function_type)__lambda_815;
++c_7320751.num_args = 1;
++c_7320751.num_elements = 7;
++c_7320751.elements = (object *)e_7322833;
++c_7320751.elements[0] = ((closureN)self_7312536)->elements[0];
++c_7320751.elements[1] = ((closureN)self_7312536)->elements[1];
++c_7320751.elements[2] = ((closureN)self_7312536)->elements[2];
++c_7320751.elements[3] = ((closureN)self_7312536)->elements[3];
++c_7320751.elements[4] = ((closureN)self_7312536)->elements[4];
++c_7320751.elements[5] = r_735898;
++c_7320751.elements[6] = ((closureN)self_7312536)->elements[5];
++
++return_closcall2(data, ((closureN)self_7312536)->elements[5], &c_7320751, quote_let);;
++}
++
++static void __lambda_815(void *data, object self_7312537, int argc, object *args) /* object self_7312537, object r_735899 */
++ {
++ object r_735899 = args[0];
++
++closureN_type c_7320754;
++object e_7322832 [8];
++c_7320754.hdr.mark = gc_color_red;
++ c_7320754.hdr.grayed = 0;
++c_7320754.tag = closureN_tag;
++ c_7320754.fn = (function_type)__lambda_816;
++c_7320754.num_args = 1;
++c_7320754.num_elements = 8;
++c_7320754.elements = (object *)e_7322832;
++c_7320754.elements[0] = ((closureN)self_7312537)->elements[0];
++c_7320754.elements[1] = ((closureN)self_7312537)->elements[1];
++c_7320754.elements[2] = ((closureN)self_7312537)->elements[2];
++c_7320754.elements[3] = ((closureN)self_7312537)->elements[3];
++c_7320754.elements[4] = ((closureN)self_7312537)->elements[4];
++c_7320754.elements[5] = ((closureN)self_7312537)->elements[5];
++c_7320754.elements[6] = r_735899;
++c_7320754.elements[7] = ((closureN)self_7312537)->elements[6];
++
++return_closcall2(data, ((closureN)self_7312537)->elements[6], &c_7320754, quote_begin);;
++}
++
++static void __lambda_816(void *data, object self_7312538, int argc, object *args) /* object self_7312538, object r_735900 */
++ {
++ object r_735900 = args[0];
++
++closureN_type c_7320757;
++object e_7322831 [9];
++c_7320757.hdr.mark = gc_color_red;
++ c_7320757.hdr.grayed = 0;
++c_7320757.tag = closureN_tag;
++ c_7320757.fn = (function_type)__lambda_817;
++c_7320757.num_args = 1;
++c_7320757.num_elements = 9;
++c_7320757.elements = (object *)e_7322831;
++c_7320757.elements[0] = ((closureN)self_7312538)->elements[0];
++c_7320757.elements[1] = ((closureN)self_7312538)->elements[1];
++c_7320757.elements[2] = ((closureN)self_7312538)->elements[2];
++c_7320757.elements[3] = ((closureN)self_7312538)->elements[3];
++c_7320757.elements[4] = ((closureN)self_7312538)->elements[4];
++c_7320757.elements[5] = ((closureN)self_7312538)->elements[5];
++c_7320757.elements[6] = ((closureN)self_7312538)->elements[6];
++c_7320757.elements[7] = r_735900;
++c_7320757.elements[8] = ((closureN)self_7312538)->elements[7];
++
++return_closcall2(data, ((closureN)self_7312538)->elements[7], &c_7320757, quote__if);;
++}
++
++static void __lambda_817(void *data, object self_7312539, int argc, object *args) /* object self_7312539, object r_735901 */
++ {
++ object r_735901 = args[0];
++
++closureN_type c_7320760;
++object e_7322830 [10];
++c_7320760.hdr.mark = gc_color_red;
++ c_7320760.hdr.grayed = 0;
++c_7320760.tag = closureN_tag;
++ c_7320760.fn = (function_type)__lambda_818;
++c_7320760.num_args = 1;
++c_7320760.num_elements = 10;
++c_7320760.elements = (object *)e_7322830;
++c_7320760.elements[0] = ((closureN)self_7312539)->elements[0];
++c_7320760.elements[1] = ((closureN)self_7312539)->elements[1];
++c_7320760.elements[2] = ((closureN)self_7312539)->elements[2];
++c_7320760.elements[3] = ((closureN)self_7312539)->elements[3];
++c_7320760.elements[4] = ((closureN)self_7312539)->elements[4];
++c_7320760.elements[5] = ((closureN)self_7312539)->elements[5];
++c_7320760.elements[6] = ((closureN)self_7312539)->elements[6];
++c_7320760.elements[7] = ((closureN)self_7312539)->elements[7];
++c_7320760.elements[8] = r_735901;
++c_7320760.elements[9] = ((closureN)self_7312539)->elements[8];
++
++return_closcall2(data, ((closureN)self_7312539)->elements[8], &c_7320760, quote_and);;
++}
++
++static void __lambda_818(void *data, object self_7312540, int argc, object *args) /* object self_7312540, object r_735902 */
++ {
++ object r_735902 = args[0];
++
++closureN_type c_7320763;
++object e_7322829 [11];
++c_7320763.hdr.mark = gc_color_red;
++ c_7320763.hdr.grayed = 0;
++c_7320763.tag = closureN_tag;
++ c_7320763.fn = (function_type)__lambda_819;
++c_7320763.num_args = 1;
++c_7320763.num_elements = 11;
++c_7320763.elements = (object *)e_7322829;
++c_7320763.elements[0] = ((closureN)self_7312540)->elements[0];
++c_7320763.elements[1] = ((closureN)self_7312540)->elements[1];
++c_7320763.elements[2] = ((closureN)self_7312540)->elements[2];
++c_7320763.elements[3] = ((closureN)self_7312540)->elements[3];
++c_7320763.elements[4] = ((closureN)self_7312540)->elements[4];
++c_7320763.elements[5] = ((closureN)self_7312540)->elements[5];
++c_7320763.elements[6] = ((closureN)self_7312540)->elements[6];
++c_7320763.elements[7] = ((closureN)self_7312540)->elements[7];
++c_7320763.elements[8] = ((closureN)self_7312540)->elements[8];
++c_7320763.elements[9] = r_735902;
++c_7320763.elements[10] = ((closureN)self_7312540)->elements[9];
++
++return_closcall2(data, ((closureN)self_7312540)->elements[9], &c_7320763, quote_or);;
++}
++
++static void __lambda_819(void *data, object self_7312541, int argc, object *args) /* object self_7312541, object r_735903 */
++ {
++ object r_735903 = args[0];
++
++closureN_type c_7320766;
++object e_7322828 [12];
++c_7320766.hdr.mark = gc_color_red;
++ c_7320766.hdr.grayed = 0;
++c_7320766.tag = closureN_tag;
++ c_7320766.fn = (function_type)__lambda_820;
++c_7320766.num_args = 1;
++c_7320766.num_elements = 12;
++c_7320766.elements = (object *)e_7322828;
++c_7320766.elements[0] = ((closureN)self_7312541)->elements[0];
++c_7320766.elements[1] = ((closureN)self_7312541)->elements[1];
++c_7320766.elements[2] = ((closureN)self_7312541)->elements[2];
++c_7320766.elements[3] = ((closureN)self_7312541)->elements[3];
++c_7320766.elements[4] = ((closureN)self_7312541)->elements[4];
++c_7320766.elements[5] = ((closureN)self_7312541)->elements[5];
++c_7320766.elements[6] = ((closureN)self_7312541)->elements[6];
++c_7320766.elements[7] = ((closureN)self_7312541)->elements[7];
++c_7320766.elements[8] = ((closureN)self_7312541)->elements[8];
++c_7320766.elements[9] = ((closureN)self_7312541)->elements[9];
++c_7320766.elements[10] = r_735903;
++c_7320766.elements[11] = ((closureN)self_7312541)->elements[10];
++
++return_closcall2(data, ((closureN)self_7312541)->elements[10], &c_7320766, quote_eq_127);;
++}
++
++static void __lambda_820(void *data, object self_7312542, int argc, object *args) /* object self_7312542, object r_735904 */
++ {
++ object r_735904 = args[0];
++
++closureN_type c_7320769;
++object e_7322827 [13];
++c_7320769.hdr.mark = gc_color_red;
++ c_7320769.hdr.grayed = 0;
++c_7320769.tag = closureN_tag;
++ c_7320769.fn = (function_type)__lambda_821;
++c_7320769.num_args = 1;
++c_7320769.num_elements = 13;
++c_7320769.elements = (object *)e_7322827;
++c_7320769.elements[0] = ((closureN)self_7312542)->elements[0];
++c_7320769.elements[1] = ((closureN)self_7312542)->elements[1];
++c_7320769.elements[2] = ((closureN)self_7312542)->elements[2];
++c_7320769.elements[3] = ((closureN)self_7312542)->elements[3];
++c_7320769.elements[4] = ((closureN)self_7312542)->elements[4];
++c_7320769.elements[5] = ((closureN)self_7312542)->elements[5];
++c_7320769.elements[6] = ((closureN)self_7312542)->elements[6];
++c_7320769.elements[7] = ((closureN)self_7312542)->elements[7];
++c_7320769.elements[8] = ((closureN)self_7312542)->elements[8];
++c_7320769.elements[9] = ((closureN)self_7312542)->elements[9];
++c_7320769.elements[10] = ((closureN)self_7312542)->elements[10];
++c_7320769.elements[11] = r_735904;
++c_7320769.elements[12] = ((closureN)self_7312542)->elements[11];
++
++return_closcall2(data, ((closureN)self_7312542)->elements[11], &c_7320769, quote_equal_127);;
++}
++
++static void __lambda_821(void *data, object self_7312543, int argc, object *args) /* object self_7312543, object r_735905 */
++ {
++ object r_735905 = args[0];
++
++closureN_type c_7320772;
++object e_7322826 [14];
++c_7320772.hdr.mark = gc_color_red;
++ c_7320772.hdr.grayed = 0;
++c_7320772.tag = closureN_tag;
++ c_7320772.fn = (function_type)__lambda_822;
++c_7320772.num_args = 1;
++c_7320772.num_elements = 14;
++c_7320772.elements = (object *)e_7322826;
++c_7320772.elements[0] = ((closureN)self_7312543)->elements[0];
++c_7320772.elements[1] = ((closureN)self_7312543)->elements[1];
++c_7320772.elements[2] = ((closureN)self_7312543)->elements[2];
++c_7320772.elements[3] = ((closureN)self_7312543)->elements[3];
++c_7320772.elements[4] = ((closureN)self_7312543)->elements[4];
++c_7320772.elements[5] = ((closureN)self_7312543)->elements[5];
++c_7320772.elements[6] = ((closureN)self_7312543)->elements[6];
++c_7320772.elements[7] = ((closureN)self_7312543)->elements[7];
++c_7320772.elements[8] = ((closureN)self_7312543)->elements[8];
++c_7320772.elements[9] = ((closureN)self_7312543)->elements[9];
++c_7320772.elements[10] = ((closureN)self_7312543)->elements[10];
++c_7320772.elements[11] = ((closureN)self_7312543)->elements[11];
++c_7320772.elements[12] = r_735905;
++c_7320772.elements[13] = ((closureN)self_7312543)->elements[12];
++
++return_closcall2(data, ((closureN)self_7312543)->elements[12], &c_7320772, quote_car);;
++}
++
++static void __lambda_822(void *data, object self_7312544, int argc, object *args) /* object self_7312544, object r_735906 */
++ {
++ object r_735906 = args[0];
++
++closureN_type c_7320775;
++object e_7322825 [15];
++c_7320775.hdr.mark = gc_color_red;
++ c_7320775.hdr.grayed = 0;
++c_7320775.tag = closureN_tag;
++ c_7320775.fn = (function_type)__lambda_823;
++c_7320775.num_args = 1;
++c_7320775.num_elements = 15;
++c_7320775.elements = (object *)e_7322825;
++c_7320775.elements[0] = ((closureN)self_7312544)->elements[0];
++c_7320775.elements[1] = ((closureN)self_7312544)->elements[1];
++c_7320775.elements[2] = ((closureN)self_7312544)->elements[2];
++c_7320775.elements[3] = ((closureN)self_7312544)->elements[3];
++c_7320775.elements[4] = ((closureN)self_7312544)->elements[4];
++c_7320775.elements[5] = ((closureN)self_7312544)->elements[5];
++c_7320775.elements[6] = ((closureN)self_7312544)->elements[6];
++c_7320775.elements[7] = ((closureN)self_7312544)->elements[7];
++c_7320775.elements[8] = ((closureN)self_7312544)->elements[8];
++c_7320775.elements[9] = ((closureN)self_7312544)->elements[9];
++c_7320775.elements[10] = ((closureN)self_7312544)->elements[10];
++c_7320775.elements[11] = ((closureN)self_7312544)->elements[11];
++c_7320775.elements[12] = ((closureN)self_7312544)->elements[12];
++c_7320775.elements[13] = r_735906;
++c_7320775.elements[14] = ((closureN)self_7312544)->elements[13];
++
++return_closcall2(data, ((closureN)self_7312544)->elements[13], &c_7320775, quote_cdr);;
++}
++
++static void __lambda_823(void *data, object self_7312545, int argc, object *args) /* object self_7312545, object r_735907 */
++ {
++ object r_735907 = args[0];
++
++closureN_type c_7320778;
++object e_7322824 [16];
++c_7320778.hdr.mark = gc_color_red;
++ c_7320778.hdr.grayed = 0;
++c_7320778.tag = closureN_tag;
++ c_7320778.fn = (function_type)__lambda_824;
++c_7320778.num_args = 1;
++c_7320778.num_elements = 16;
++c_7320778.elements = (object *)e_7322824;
++c_7320778.elements[0] = ((closureN)self_7312545)->elements[0];
++c_7320778.elements[1] = ((closureN)self_7312545)->elements[1];
++c_7320778.elements[2] = ((closureN)self_7312545)->elements[2];
++c_7320778.elements[3] = ((closureN)self_7312545)->elements[3];
++c_7320778.elements[4] = ((closureN)self_7312545)->elements[4];
++c_7320778.elements[5] = ((closureN)self_7312545)->elements[5];
++c_7320778.elements[6] = ((closureN)self_7312545)->elements[6];
++c_7320778.elements[7] = ((closureN)self_7312545)->elements[7];
++c_7320778.elements[8] = ((closureN)self_7312545)->elements[8];
++c_7320778.elements[9] = ((closureN)self_7312545)->elements[9];
++c_7320778.elements[10] = ((closureN)self_7312545)->elements[10];
++c_7320778.elements[11] = ((closureN)self_7312545)->elements[11];
++c_7320778.elements[12] = ((closureN)self_7312545)->elements[12];
++c_7320778.elements[13] = ((closureN)self_7312545)->elements[13];
++c_7320778.elements[14] = r_735907;
++c_7320778.elements[15] = ((closureN)self_7312545)->elements[14];
++
++return_closcall2(data, ((closureN)self_7312545)->elements[14], &c_7320778, quote_cons);;
++}
++
++static void __lambda_824(void *data, object self_7312546, int argc, object *args) /* object self_7312546, object r_735908 */
++ {
++ object r_735908 = args[0];
++
++closureN_type c_7320781;
++object e_7322823 [17];
++c_7320781.hdr.mark = gc_color_red;
++ c_7320781.hdr.grayed = 0;
++c_7320781.tag = closureN_tag;
++ c_7320781.fn = (function_type)__lambda_825;
++c_7320781.num_args = 1;
++c_7320781.num_elements = 17;
++c_7320781.elements = (object *)e_7322823;
++c_7320781.elements[0] = ((closureN)self_7312546)->elements[0];
++c_7320781.elements[1] = ((closureN)self_7312546)->elements[1];
++c_7320781.elements[2] = ((closureN)self_7312546)->elements[2];
++c_7320781.elements[3] = ((closureN)self_7312546)->elements[3];
++c_7320781.elements[4] = ((closureN)self_7312546)->elements[4];
++c_7320781.elements[5] = ((closureN)self_7312546)->elements[5];
++c_7320781.elements[6] = ((closureN)self_7312546)->elements[6];
++c_7320781.elements[7] = ((closureN)self_7312546)->elements[7];
++c_7320781.elements[8] = ((closureN)self_7312546)->elements[8];
++c_7320781.elements[9] = ((closureN)self_7312546)->elements[9];
++c_7320781.elements[10] = ((closureN)self_7312546)->elements[10];
++c_7320781.elements[11] = ((closureN)self_7312546)->elements[11];
++c_7320781.elements[12] = ((closureN)self_7312546)->elements[12];
++c_7320781.elements[13] = ((closureN)self_7312546)->elements[13];
++c_7320781.elements[14] = ((closureN)self_7312546)->elements[14];
++c_7320781.elements[15] = r_735908;
++c_7320781.elements[16] = ((closureN)self_7312546)->elements[15];
++
++return_closcall2(data, ((closureN)self_7312546)->elements[15], &c_7320781, quote_pair_127);;
++}
++
++static void __lambda_825(void *data, object self_7312547, int argc, object *args) /* object self_7312547, object r_735909 */
++ {
++ object r_735909 = args[0];
++
++closureN_type c_7320784;
++object e_7322822 [18];
++c_7320784.hdr.mark = gc_color_red;
++ c_7320784.hdr.grayed = 0;
++c_7320784.tag = closureN_tag;
++ c_7320784.fn = (function_type)__lambda_826;
++c_7320784.num_args = 1;
++c_7320784.num_elements = 18;
++c_7320784.elements = (object *)e_7322822;
++c_7320784.elements[0] = ((closureN)self_7312547)->elements[0];
++c_7320784.elements[1] = ((closureN)self_7312547)->elements[1];
++c_7320784.elements[2] = ((closureN)self_7312547)->elements[2];
++c_7320784.elements[3] = ((closureN)self_7312547)->elements[3];
++c_7320784.elements[4] = ((closureN)self_7312547)->elements[4];
++c_7320784.elements[5] = ((closureN)self_7312547)->elements[5];
++c_7320784.elements[6] = ((closureN)self_7312547)->elements[6];
++c_7320784.elements[7] = ((closureN)self_7312547)->elements[7];
++c_7320784.elements[8] = ((closureN)self_7312547)->elements[8];
++c_7320784.elements[9] = ((closureN)self_7312547)->elements[9];
++c_7320784.elements[10] = ((closureN)self_7312547)->elements[10];
++c_7320784.elements[11] = ((closureN)self_7312547)->elements[11];
++c_7320784.elements[12] = ((closureN)self_7312547)->elements[12];
++c_7320784.elements[13] = ((closureN)self_7312547)->elements[13];
++c_7320784.elements[14] = ((closureN)self_7312547)->elements[14];
++c_7320784.elements[15] = ((closureN)self_7312547)->elements[15];
++c_7320784.elements[16] = r_735909;
++c_7320784.elements[17] = ((closureN)self_7312547)->elements[16];
++
++return_closcall2(data, ((closureN)self_7312547)->elements[16], &c_7320784, quote_null_127);;
++}
++
++static void __lambda_826(void *data, object self_7312548, int argc, object *args) /* object self_7312548, object r_735910 */
++ {
++ object r_735910 = args[0];
++
++closureN_type c_7320787;
++object e_7322821 [19];
++c_7320787.hdr.mark = gc_color_red;
++ c_7320787.hdr.grayed = 0;
++c_7320787.tag = closureN_tag;
++ c_7320787.fn = (function_type)__lambda_827;
++c_7320787.num_args = 1;
++c_7320787.num_elements = 19;
++c_7320787.elements = (object *)e_7322821;
++c_7320787.elements[0] = ((closureN)self_7312548)->elements[0];
++c_7320787.elements[1] = ((closureN)self_7312548)->elements[1];
++c_7320787.elements[2] = ((closureN)self_7312548)->elements[2];
++c_7320787.elements[3] = ((closureN)self_7312548)->elements[3];
++c_7320787.elements[4] = ((closureN)self_7312548)->elements[4];
++c_7320787.elements[5] = ((closureN)self_7312548)->elements[5];
++c_7320787.elements[6] = ((closureN)self_7312548)->elements[6];
++c_7320787.elements[7] = ((closureN)self_7312548)->elements[7];
++c_7320787.elements[8] = ((closureN)self_7312548)->elements[8];
++c_7320787.elements[9] = ((closureN)self_7312548)->elements[9];
++c_7320787.elements[10] = ((closureN)self_7312548)->elements[10];
++c_7320787.elements[11] = ((closureN)self_7312548)->elements[11];
++c_7320787.elements[12] = ((closureN)self_7312548)->elements[12];
++c_7320787.elements[13] = ((closureN)self_7312548)->elements[13];
++c_7320787.elements[14] = ((closureN)self_7312548)->elements[14];
++c_7320787.elements[15] = ((closureN)self_7312548)->elements[15];
++c_7320787.elements[16] = ((closureN)self_7312548)->elements[16];
++c_7320787.elements[17] = r_735910;
++c_7320787.elements[18] = ((closureN)self_7312548)->elements[17];
++
++return_closcall2(data, ((closureN)self_7312548)->elements[17], &c_7320787, quote_expr);;
++}
++
++static void __lambda_827(void *data, object self_7312549, int argc, object *args) /* object self_7312549, object r_735911 */
++ {
++ object r_735911 = args[0];
++
++closureN_type c_7320790;
++object e_7322820 [20];
++c_7320790.hdr.mark = gc_color_red;
++ c_7320790.hdr.grayed = 0;
++c_7320790.tag = closureN_tag;
++ c_7320790.fn = (function_type)__lambda_828;
++c_7320790.num_args = 1;
++c_7320790.num_elements = 20;
++c_7320790.elements = (object *)e_7322820;
++c_7320790.elements[0] = ((closureN)self_7312549)->elements[0];
++c_7320790.elements[1] = ((closureN)self_7312549)->elements[1];
++c_7320790.elements[2] = ((closureN)self_7312549)->elements[2];
++c_7320790.elements[3] = ((closureN)self_7312549)->elements[3];
++c_7320790.elements[4] = ((closureN)self_7312549)->elements[4];
++c_7320790.elements[5] = ((closureN)self_7312549)->elements[5];
++c_7320790.elements[6] = ((closureN)self_7312549)->elements[6];
++c_7320790.elements[7] = ((closureN)self_7312549)->elements[7];
++c_7320790.elements[8] = ((closureN)self_7312549)->elements[8];
++c_7320790.elements[9] = ((closureN)self_7312549)->elements[9];
++c_7320790.elements[10] = ((closureN)self_7312549)->elements[10];
++c_7320790.elements[11] = ((closureN)self_7312549)->elements[11];
++c_7320790.elements[12] = ((closureN)self_7312549)->elements[12];
++c_7320790.elements[13] = ((closureN)self_7312549)->elements[13];
++c_7320790.elements[14] = ((closureN)self_7312549)->elements[14];
++c_7320790.elements[15] = ((closureN)self_7312549)->elements[15];
++c_7320790.elements[16] = ((closureN)self_7312549)->elements[16];
++c_7320790.elements[17] = ((closureN)self_7312549)->elements[17];
++c_7320790.elements[18] = r_735911;
++c_7320790.elements[19] = ((closureN)self_7312549)->elements[18];
++
++return_closcall2(data, ((closureN)self_7312549)->elements[18], &c_7320790, quote_rename);;
++}
++
++static void __lambda_828(void *data, object self_7312550, int argc, object *args) /* object self_7312550, object r_735912 */
++ {
++ object r_735912 = args[0];
++
++closureN_type c_7320793;
++object e_7322819 [21];
++c_7320793.hdr.mark = gc_color_red;
++ c_7320793.hdr.grayed = 0;
++c_7320793.tag = closureN_tag;
++ c_7320793.fn = (function_type)__lambda_829;
++c_7320793.num_args = 1;
++c_7320793.num_elements = 21;
++c_7320793.elements = (object *)e_7322819;
++c_7320793.elements[0] = ((closureN)self_7312550)->elements[0];
++c_7320793.elements[1] = ((closureN)self_7312550)->elements[1];
++c_7320793.elements[2] = ((closureN)self_7312550)->elements[2];
++c_7320793.elements[3] = ((closureN)self_7312550)->elements[3];
++c_7320793.elements[4] = ((closureN)self_7312550)->elements[4];
++c_7320793.elements[5] = ((closureN)self_7312550)->elements[5];
++c_7320793.elements[6] = ((closureN)self_7312550)->elements[6];
++c_7320793.elements[7] = ((closureN)self_7312550)->elements[7];
++c_7320793.elements[8] = ((closureN)self_7312550)->elements[8];
++c_7320793.elements[9] = ((closureN)self_7312550)->elements[9];
++c_7320793.elements[10] = ((closureN)self_7312550)->elements[10];
++c_7320793.elements[11] = ((closureN)self_7312550)->elements[11];
++c_7320793.elements[12] = ((closureN)self_7312550)->elements[12];
++c_7320793.elements[13] = ((closureN)self_7312550)->elements[13];
++c_7320793.elements[14] = ((closureN)self_7312550)->elements[14];
++c_7320793.elements[15] = ((closureN)self_7312550)->elements[15];
++c_7320793.elements[16] = ((closureN)self_7312550)->elements[16];
++c_7320793.elements[17] = ((closureN)self_7312550)->elements[17];
++c_7320793.elements[18] = ((closureN)self_7312550)->elements[18];
++c_7320793.elements[19] = r_735912;
++c_7320793.elements[20] = ((closureN)self_7312550)->elements[19];
++
++return_closcall2(data, ((closureN)self_7312550)->elements[19], &c_7320793, quote_compare);;
++}
++
++static void __lambda_829(void *data, object self_7312551, int argc, object *args) /* object self_7312551, object r_735913 */
++ {
++ object r_735913 = args[0];
++
++closureN_type c_7320796;
++object e_7322818 [22];
++c_7320796.hdr.mark = gc_color_red;
++ c_7320796.hdr.grayed = 0;
++c_7320796.tag = closureN_tag;
++ c_7320796.fn = (function_type)__lambda_830;
++c_7320796.num_args = 1;
++c_7320796.num_elements = 22;
++c_7320796.elements = (object *)e_7322818;
++c_7320796.elements[0] = ((closureN)self_7312551)->elements[0];
++c_7320796.elements[1] = ((closureN)self_7312551)->elements[1];
++c_7320796.elements[2] = ((closureN)self_7312551)->elements[2];
++c_7320796.elements[3] = ((closureN)self_7312551)->elements[3];
++c_7320796.elements[4] = ((closureN)self_7312551)->elements[4];
++c_7320796.elements[5] = ((closureN)self_7312551)->elements[5];
++c_7320796.elements[6] = ((closureN)self_7312551)->elements[6];
++c_7320796.elements[7] = ((closureN)self_7312551)->elements[7];
++c_7320796.elements[8] = ((closureN)self_7312551)->elements[8];
++c_7320796.elements[9] = ((closureN)self_7312551)->elements[9];
++c_7320796.elements[10] = ((closureN)self_7312551)->elements[10];
++c_7320796.elements[11] = ((closureN)self_7312551)->elements[11];
++c_7320796.elements[12] = ((closureN)self_7312551)->elements[12];
++c_7320796.elements[13] = ((closureN)self_7312551)->elements[13];
++c_7320796.elements[14] = ((closureN)self_7312551)->elements[14];
++c_7320796.elements[15] = ((closureN)self_7312551)->elements[15];
++c_7320796.elements[16] = ((closureN)self_7312551)->elements[16];
++c_7320796.elements[17] = ((closureN)self_7312551)->elements[17];
++c_7320796.elements[18] = ((closureN)self_7312551)->elements[18];
++c_7320796.elements[19] = ((closureN)self_7312551)->elements[19];
++c_7320796.elements[20] = r_735913;
++c_7320796.elements[21] = ((closureN)self_7312551)->elements[20];
++
++return_closcall2(data, ((closureN)self_7312551)->elements[20], &c_7320796, quote_quote);;
++}
++
++static void __lambda_830(void *data, object self_7312552, int argc, object *args) /* object self_7312552, object r_735914 */
++ {
++ object r_735914 = args[0];
++
++closureN_type c_7320799;
++object e_7322817 [23];
++c_7320799.hdr.mark = gc_color_red;
++ c_7320799.hdr.grayed = 0;
++c_7320799.tag = closureN_tag;
++ c_7320799.fn = (function_type)__lambda_831;
++c_7320799.num_args = 1;
++c_7320799.num_elements = 23;
++c_7320799.elements = (object *)e_7322817;
++c_7320799.elements[0] = ((closureN)self_7312552)->elements[0];
++c_7320799.elements[1] = ((closureN)self_7312552)->elements[1];
++c_7320799.elements[2] = ((closureN)self_7312552)->elements[2];
++c_7320799.elements[3] = ((closureN)self_7312552)->elements[3];
++c_7320799.elements[4] = ((closureN)self_7312552)->elements[4];
++c_7320799.elements[5] = ((closureN)self_7312552)->elements[5];
++c_7320799.elements[6] = ((closureN)self_7312552)->elements[6];
++c_7320799.elements[7] = ((closureN)self_7312552)->elements[7];
++c_7320799.elements[8] = ((closureN)self_7312552)->elements[8];
++c_7320799.elements[9] = ((closureN)self_7312552)->elements[9];
++c_7320799.elements[10] = ((closureN)self_7312552)->elements[10];
++c_7320799.elements[11] = ((closureN)self_7312552)->elements[11];
++c_7320799.elements[12] = ((closureN)self_7312552)->elements[12];
++c_7320799.elements[13] = ((closureN)self_7312552)->elements[13];
++c_7320799.elements[14] = ((closureN)self_7312552)->elements[14];
++c_7320799.elements[15] = ((closureN)self_7312552)->elements[15];
++c_7320799.elements[16] = ((closureN)self_7312552)->elements[16];
++c_7320799.elements[17] = ((closureN)self_7312552)->elements[17];
++c_7320799.elements[18] = ((closureN)self_7312552)->elements[18];
++c_7320799.elements[19] = ((closureN)self_7312552)->elements[19];
++c_7320799.elements[20] = ((closureN)self_7312552)->elements[20];
++c_7320799.elements[21] = r_735914;
++c_7320799.elements[22] = ((closureN)self_7312552)->elements[21];
++
++return_closcall2(data, ((closureN)self_7312552)->elements[21], &c_7320799, quote_apply);;
++}
++
++static void __lambda_831(void *data, object self_7312553, int argc, object *args) /* object self_7312553, object r_735915 */
++ {
++ object r_735915 = args[0];
++
++closureN_type c_7320802;
++object e_7322816 [24];
++c_7320802.hdr.mark = gc_color_red;
++ c_7320802.hdr.grayed = 0;
++c_7320802.tag = closureN_tag;
++ c_7320802.fn = (function_type)__lambda_832;
++c_7320802.num_args = 1;
++c_7320802.num_elements = 24;
++c_7320802.elements = (object *)e_7322816;
++c_7320802.elements[0] = ((closureN)self_7312553)->elements[0];
++c_7320802.elements[1] = ((closureN)self_7312553)->elements[1];
++c_7320802.elements[2] = ((closureN)self_7312553)->elements[2];
++c_7320802.elements[3] = ((closureN)self_7312553)->elements[3];
++c_7320802.elements[4] = ((closureN)self_7312553)->elements[4];
++c_7320802.elements[5] = ((closureN)self_7312553)->elements[5];
++c_7320802.elements[6] = ((closureN)self_7312553)->elements[6];
++c_7320802.elements[7] = ((closureN)self_7312553)->elements[7];
++c_7320802.elements[8] = ((closureN)self_7312553)->elements[8];
++c_7320802.elements[9] = ((closureN)self_7312553)->elements[9];
++c_7320802.elements[10] = ((closureN)self_7312553)->elements[10];
++c_7320802.elements[11] = ((closureN)self_7312553)->elements[11];
++c_7320802.elements[12] = ((closureN)self_7312553)->elements[12];
++c_7320802.elements[13] = ((closureN)self_7312553)->elements[13];
++c_7320802.elements[14] = ((closureN)self_7312553)->elements[14];
++c_7320802.elements[15] = ((closureN)self_7312553)->elements[15];
++c_7320802.elements[16] = ((closureN)self_7312553)->elements[16];
++c_7320802.elements[17] = ((closureN)self_7312553)->elements[17];
++c_7320802.elements[18] = ((closureN)self_7312553)->elements[18];
++c_7320802.elements[19] = ((closureN)self_7312553)->elements[19];
++c_7320802.elements[20] = ((closureN)self_7312553)->elements[20];
++c_7320802.elements[21] = ((closureN)self_7312553)->elements[21];
++c_7320802.elements[22] = r_735915;
++c_7320802.elements[23] = ((closureN)self_7312553)->elements[22];
++
++return_closcall2(data, ((closureN)self_7312553)->elements[22], &c_7320802, quote_append);;
++}
++
++static void __lambda_832(void *data, object self_7312554, int argc, object *args) /* object self_7312554, object r_735916 */
++ {
++ object r_735916 = args[0];
++
++closureN_type c_7320805;
++object e_7322815 [25];
++c_7320805.hdr.mark = gc_color_red;
++ c_7320805.hdr.grayed = 0;
++c_7320805.tag = closureN_tag;
++ c_7320805.fn = (function_type)__lambda_833;
++c_7320805.num_args = 1;
++c_7320805.num_elements = 25;
++c_7320805.elements = (object *)e_7322815;
++c_7320805.elements[0] = ((closureN)self_7312554)->elements[0];
++c_7320805.elements[1] = ((closureN)self_7312554)->elements[1];
++c_7320805.elements[2] = ((closureN)self_7312554)->elements[2];
++c_7320805.elements[3] = ((closureN)self_7312554)->elements[3];
++c_7320805.elements[4] = ((closureN)self_7312554)->elements[4];
++c_7320805.elements[5] = ((closureN)self_7312554)->elements[5];
++c_7320805.elements[6] = ((closureN)self_7312554)->elements[6];
++c_7320805.elements[7] = ((closureN)self_7312554)->elements[7];
++c_7320805.elements[8] = ((closureN)self_7312554)->elements[8];
++c_7320805.elements[9] = ((closureN)self_7312554)->elements[9];
++c_7320805.elements[10] = ((closureN)self_7312554)->elements[10];
++c_7320805.elements[11] = ((closureN)self_7312554)->elements[11];
++c_7320805.elements[12] = ((closureN)self_7312554)->elements[12];
++c_7320805.elements[13] = ((closureN)self_7312554)->elements[13];
++c_7320805.elements[14] = ((closureN)self_7312554)->elements[14];
++c_7320805.elements[15] = ((closureN)self_7312554)->elements[15];
++c_7320805.elements[16] = ((closureN)self_7312554)->elements[16];
++c_7320805.elements[17] = ((closureN)self_7312554)->elements[17];
++c_7320805.elements[18] = ((closureN)self_7312554)->elements[18];
++c_7320805.elements[19] = ((closureN)self_7312554)->elements[19];
++c_7320805.elements[20] = ((closureN)self_7312554)->elements[20];
++c_7320805.elements[21] = ((closureN)self_7312554)->elements[21];
++c_7320805.elements[22] = ((closureN)self_7312554)->elements[22];
++c_7320805.elements[23] = r_735916;
++c_7320805.elements[24] = ((closureN)self_7312554)->elements[23];
++
++return_closcall2(data, ((closureN)self_7312554)->elements[23], &c_7320805, quote_map);;
++}
++
++static void __lambda_833(void *data, object self_7312555, int argc, object *args) /* object self_7312555, object r_735917 */
++ {
++ object r_735917 = args[0];
++
++closureN_type c_7320808;
++object e_7322814 [26];
++c_7320808.hdr.mark = gc_color_red;
++ c_7320808.hdr.grayed = 0;
++c_7320808.tag = closureN_tag;
++ c_7320808.fn = (function_type)__lambda_834;
++c_7320808.num_args = 1;
++c_7320808.num_elements = 26;
++c_7320808.elements = (object *)e_7322814;
++c_7320808.elements[0] = ((closureN)self_7312555)->elements[0];
++c_7320808.elements[1] = ((closureN)self_7312555)->elements[1];
++c_7320808.elements[2] = ((closureN)self_7312555)->elements[2];
++c_7320808.elements[3] = ((closureN)self_7312555)->elements[3];
++c_7320808.elements[4] = ((closureN)self_7312555)->elements[4];
++c_7320808.elements[5] = ((closureN)self_7312555)->elements[5];
++c_7320808.elements[6] = ((closureN)self_7312555)->elements[6];
++c_7320808.elements[7] = ((closureN)self_7312555)->elements[7];
++c_7320808.elements[8] = ((closureN)self_7312555)->elements[8];
++c_7320808.elements[9] = ((closureN)self_7312555)->elements[9];
++c_7320808.elements[10] = ((closureN)self_7312555)->elements[10];
++c_7320808.elements[11] = ((closureN)self_7312555)->elements[11];
++c_7320808.elements[12] = ((closureN)self_7312555)->elements[12];
++c_7320808.elements[13] = ((closureN)self_7312555)->elements[13];
++c_7320808.elements[14] = ((closureN)self_7312555)->elements[14];
++c_7320808.elements[15] = ((closureN)self_7312555)->elements[15];
++c_7320808.elements[16] = ((closureN)self_7312555)->elements[16];
++c_7320808.elements[17] = ((closureN)self_7312555)->elements[17];
++c_7320808.elements[18] = ((closureN)self_7312555)->elements[18];
++c_7320808.elements[19] = ((closureN)self_7312555)->elements[19];
++c_7320808.elements[20] = ((closureN)self_7312555)->elements[20];
++c_7320808.elements[21] = ((closureN)self_7312555)->elements[21];
++c_7320808.elements[22] = ((closureN)self_7312555)->elements[22];
++c_7320808.elements[23] = ((closureN)self_7312555)->elements[23];
++c_7320808.elements[24] = r_735917;
++c_7320808.elements[25] = ((closureN)self_7312555)->elements[24];
++
++return_closcall2(data, ((closureN)self_7312555)->elements[24], &c_7320808, quote_vector_127);;
++}
++
++static void __lambda_834(void *data, object self_7312556, int argc, object *args) /* object self_7312556, object r_735918 */
++ {
++ object r_735918 = args[0];
++
++closureN_type c_7320811;
++object e_7322813 [27];
++c_7320811.hdr.mark = gc_color_red;
++ c_7320811.hdr.grayed = 0;
++c_7320811.tag = closureN_tag;
++ c_7320811.fn = (function_type)__lambda_835;
++c_7320811.num_args = 1;
++c_7320811.num_elements = 27;
++c_7320811.elements = (object *)e_7322813;
++c_7320811.elements[0] = ((closureN)self_7312556)->elements[0];
++c_7320811.elements[1] = ((closureN)self_7312556)->elements[1];
++c_7320811.elements[2] = ((closureN)self_7312556)->elements[2];
++c_7320811.elements[3] = ((closureN)self_7312556)->elements[3];
++c_7320811.elements[4] = ((closureN)self_7312556)->elements[4];
++c_7320811.elements[5] = ((closureN)self_7312556)->elements[5];
++c_7320811.elements[6] = ((closureN)self_7312556)->elements[6];
++c_7320811.elements[7] = ((closureN)self_7312556)->elements[7];
++c_7320811.elements[8] = ((closureN)self_7312556)->elements[8];
++c_7320811.elements[9] = ((closureN)self_7312556)->elements[9];
++c_7320811.elements[10] = ((closureN)self_7312556)->elements[10];
++c_7320811.elements[11] = ((closureN)self_7312556)->elements[11];
++c_7320811.elements[12] = ((closureN)self_7312556)->elements[12];
++c_7320811.elements[13] = ((closureN)self_7312556)->elements[13];
++c_7320811.elements[14] = ((closureN)self_7312556)->elements[14];
++c_7320811.elements[15] = ((closureN)self_7312556)->elements[15];
++c_7320811.elements[16] = ((closureN)self_7312556)->elements[16];
++c_7320811.elements[17] = ((closureN)self_7312556)->elements[17];
++c_7320811.elements[18] = ((closureN)self_7312556)->elements[18];
++c_7320811.elements[19] = ((closureN)self_7312556)->elements[19];
++c_7320811.elements[20] = ((closureN)self_7312556)->elements[20];
++c_7320811.elements[21] = ((closureN)self_7312556)->elements[21];
++c_7320811.elements[22] = ((closureN)self_7312556)->elements[22];
++c_7320811.elements[23] = ((closureN)self_7312556)->elements[23];
++c_7320811.elements[24] = ((closureN)self_7312556)->elements[24];
++c_7320811.elements[25] = r_735918;
++c_7320811.elements[26] = ((closureN)self_7312556)->elements[25];
++
++return_closcall2(data, ((closureN)self_7312556)->elements[25], &c_7320811, quote_list_127);;
++}
++
++static void __lambda_835(void *data, object self_7312557, int argc, object *args) /* object self_7312557, object r_735919 */
++ {
++ object r_735919 = args[0];
++
++closureN_type c_7320814;
++object e_7322812 [28];
++c_7320814.hdr.mark = gc_color_red;
++ c_7320814.hdr.grayed = 0;
++c_7320814.tag = closureN_tag;
++ c_7320814.fn = (function_type)__lambda_836;
++c_7320814.num_args = 1;
++c_7320814.num_elements = 28;
++c_7320814.elements = (object *)e_7322812;
++c_7320814.elements[0] = ((closureN)self_7312557)->elements[0];
++c_7320814.elements[1] = ((closureN)self_7312557)->elements[1];
++c_7320814.elements[2] = ((closureN)self_7312557)->elements[2];
++c_7320814.elements[3] = ((closureN)self_7312557)->elements[3];
++c_7320814.elements[4] = ((closureN)self_7312557)->elements[4];
++c_7320814.elements[5] = ((closureN)self_7312557)->elements[5];
++c_7320814.elements[6] = ((closureN)self_7312557)->elements[6];
++c_7320814.elements[7] = ((closureN)self_7312557)->elements[7];
++c_7320814.elements[8] = ((closureN)self_7312557)->elements[8];
++c_7320814.elements[9] = ((closureN)self_7312557)->elements[9];
++c_7320814.elements[10] = ((closureN)self_7312557)->elements[10];
++c_7320814.elements[11] = ((closureN)self_7312557)->elements[11];
++c_7320814.elements[12] = ((closureN)self_7312557)->elements[12];
++c_7320814.elements[13] = ((closureN)self_7312557)->elements[13];
++c_7320814.elements[14] = ((closureN)self_7312557)->elements[14];
++c_7320814.elements[15] = ((closureN)self_7312557)->elements[15];
++c_7320814.elements[16] = ((closureN)self_7312557)->elements[16];
++c_7320814.elements[17] = ((closureN)self_7312557)->elements[17];
++c_7320814.elements[18] = ((closureN)self_7312557)->elements[18];
++c_7320814.elements[19] = ((closureN)self_7312557)->elements[19];
++c_7320814.elements[20] = ((closureN)self_7312557)->elements[20];
++c_7320814.elements[21] = ((closureN)self_7312557)->elements[21];
++c_7320814.elements[22] = ((closureN)self_7312557)->elements[22];
++c_7320814.elements[23] = ((closureN)self_7312557)->elements[23];
++c_7320814.elements[24] = ((closureN)self_7312557)->elements[24];
++c_7320814.elements[25] = ((closureN)self_7312557)->elements[25];
++c_7320814.elements[26] = r_735919;
++c_7320814.elements[27] = ((closureN)self_7312557)->elements[26];
++
++return_closcall2(data, ((closureN)self_7312557)->elements[26], &c_7320814, quote_len);;
++}
++
++static void __lambda_836(void *data, object self_7312558, int argc, object *args) /* object self_7312558, object r_735920 */
++ {
++ object r_735920 = args[0];
++
++closureN_type c_7320817;
++object e_7322811 [29];
++c_7320817.hdr.mark = gc_color_red;
++ c_7320817.hdr.grayed = 0;
++c_7320817.tag = closureN_tag;
++ c_7320817.fn = (function_type)__lambda_837;
++c_7320817.num_args = 1;
++c_7320817.num_elements = 29;
++c_7320817.elements = (object *)e_7322811;
++c_7320817.elements[0] = ((closureN)self_7312558)->elements[0];
++c_7320817.elements[1] = ((closureN)self_7312558)->elements[1];
++c_7320817.elements[2] = ((closureN)self_7312558)->elements[2];
++c_7320817.elements[3] = ((closureN)self_7312558)->elements[3];
++c_7320817.elements[4] = ((closureN)self_7312558)->elements[4];
++c_7320817.elements[5] = ((closureN)self_7312558)->elements[5];
++c_7320817.elements[6] = ((closureN)self_7312558)->elements[6];
++c_7320817.elements[7] = ((closureN)self_7312558)->elements[7];
++c_7320817.elements[8] = ((closureN)self_7312558)->elements[8];
++c_7320817.elements[9] = ((closureN)self_7312558)->elements[9];
++c_7320817.elements[10] = ((closureN)self_7312558)->elements[10];
++c_7320817.elements[11] = ((closureN)self_7312558)->elements[11];
++c_7320817.elements[12] = ((closureN)self_7312558)->elements[12];
++c_7320817.elements[13] = ((closureN)self_7312558)->elements[13];
++c_7320817.elements[14] = ((closureN)self_7312558)->elements[14];
++c_7320817.elements[15] = ((closureN)self_7312558)->elements[15];
++c_7320817.elements[16] = ((closureN)self_7312558)->elements[16];
++c_7320817.elements[17] = ((closureN)self_7312558)->elements[17];
++c_7320817.elements[18] = ((closureN)self_7312558)->elements[18];
++c_7320817.elements[19] = ((closureN)self_7312558)->elements[19];
++c_7320817.elements[20] = ((closureN)self_7312558)->elements[20];
++c_7320817.elements[21] = ((closureN)self_7312558)->elements[21];
++c_7320817.elements[22] = ((closureN)self_7312558)->elements[22];
++c_7320817.elements[23] = ((closureN)self_7312558)->elements[23];
++c_7320817.elements[24] = ((closureN)self_7312558)->elements[24];
++c_7320817.elements[25] = ((closureN)self_7312558)->elements[25];
++c_7320817.elements[26] = ((closureN)self_7312558)->elements[26];
++c_7320817.elements[27] = r_735920;
++c_7320817.elements[28] = ((closureN)self_7312558)->elements[27];
++
++return_closcall2(data, ((closureN)self_7312558)->elements[27], &c_7320817, quote_length);;
++}
++
++static void __lambda_837(void *data, object self_7312559, int argc, object *args) /* object self_7312559, object r_735921 */
++ {
++ object r_735921 = args[0];
++
++closureN_type c_7320820;
++object e_7322810 [30];
++c_7320820.hdr.mark = gc_color_red;
++ c_7320820.hdr.grayed = 0;
++c_7320820.tag = closureN_tag;
++ c_7320820.fn = (function_type)__lambda_838;
++c_7320820.num_args = 1;
++c_7320820.num_elements = 30;
++c_7320820.elements = (object *)e_7322810;
++c_7320820.elements[0] = ((closureN)self_7312559)->elements[0];
++c_7320820.elements[1] = ((closureN)self_7312559)->elements[1];
++c_7320820.elements[2] = ((closureN)self_7312559)->elements[2];
++c_7320820.elements[3] = ((closureN)self_7312559)->elements[3];
++c_7320820.elements[4] = ((closureN)self_7312559)->elements[4];
++c_7320820.elements[5] = ((closureN)self_7312559)->elements[5];
++c_7320820.elements[6] = ((closureN)self_7312559)->elements[6];
++c_7320820.elements[7] = ((closureN)self_7312559)->elements[7];
++c_7320820.elements[8] = ((closureN)self_7312559)->elements[8];
++c_7320820.elements[9] = ((closureN)self_7312559)->elements[9];
++c_7320820.elements[10] = ((closureN)self_7312559)->elements[10];
++c_7320820.elements[11] = ((closureN)self_7312559)->elements[11];
++c_7320820.elements[12] = ((closureN)self_7312559)->elements[12];
++c_7320820.elements[13] = ((closureN)self_7312559)->elements[13];
++c_7320820.elements[14] = ((closureN)self_7312559)->elements[14];
++c_7320820.elements[15] = ((closureN)self_7312559)->elements[15];
++c_7320820.elements[16] = ((closureN)self_7312559)->elements[16];
++c_7320820.elements[17] = ((closureN)self_7312559)->elements[17];
++c_7320820.elements[18] = ((closureN)self_7312559)->elements[18];
++c_7320820.elements[19] = ((closureN)self_7312559)->elements[19];
++c_7320820.elements[20] = ((closureN)self_7312559)->elements[20];
++c_7320820.elements[21] = ((closureN)self_7312559)->elements[21];
++c_7320820.elements[22] = ((closureN)self_7312559)->elements[22];
++c_7320820.elements[23] = ((closureN)self_7312559)->elements[23];
++c_7320820.elements[24] = ((closureN)self_7312559)->elements[24];
++c_7320820.elements[25] = ((closureN)self_7312559)->elements[25];
++c_7320820.elements[26] = ((closureN)self_7312559)->elements[26];
++c_7320820.elements[27] = ((closureN)self_7312559)->elements[27];
++c_7320820.elements[28] = r_735921;
++c_7320820.elements[29] = ((closureN)self_7312559)->elements[28];
++
++return_closcall2(data, ((closureN)self_7312559)->elements[28], &c_7320820, quote__91);;
++}
++
++static void __lambda_838(void *data, object self_7312560, int argc, object *args) /* object self_7312560, object r_735922 */
++ {
++ object r_735922 = args[0];
++
++closureN_type c_7320823;
++object e_7322809 [31];
++c_7320823.hdr.mark = gc_color_red;
++ c_7320823.hdr.grayed = 0;
++c_7320823.tag = closureN_tag;
++ c_7320823.fn = (function_type)__lambda_839;
++c_7320823.num_args = 1;
++c_7320823.num_elements = 31;
++c_7320823.elements = (object *)e_7322809;
++c_7320823.elements[0] = ((closureN)self_7312560)->elements[0];
++c_7320823.elements[1] = ((closureN)self_7312560)->elements[1];
++c_7320823.elements[2] = ((closureN)self_7312560)->elements[2];
++c_7320823.elements[3] = ((closureN)self_7312560)->elements[3];
++c_7320823.elements[4] = ((closureN)self_7312560)->elements[4];
++c_7320823.elements[5] = ((closureN)self_7312560)->elements[5];
++c_7320823.elements[6] = ((closureN)self_7312560)->elements[6];
++c_7320823.elements[7] = ((closureN)self_7312560)->elements[7];
++c_7320823.elements[8] = ((closureN)self_7312560)->elements[8];
++c_7320823.elements[9] = ((closureN)self_7312560)->elements[9];
++c_7320823.elements[10] = ((closureN)self_7312560)->elements[10];
++c_7320823.elements[11] = ((closureN)self_7312560)->elements[11];
++c_7320823.elements[12] = ((closureN)self_7312560)->elements[12];
++c_7320823.elements[13] = ((closureN)self_7312560)->elements[13];
++c_7320823.elements[14] = ((closureN)self_7312560)->elements[14];
++c_7320823.elements[15] = ((closureN)self_7312560)->elements[15];
++c_7320823.elements[16] = ((closureN)self_7312560)->elements[16];
++c_7320823.elements[17] = ((closureN)self_7312560)->elements[17];
++c_7320823.elements[18] = ((closureN)self_7312560)->elements[18];
++c_7320823.elements[19] = ((closureN)self_7312560)->elements[19];
++c_7320823.elements[20] = ((closureN)self_7312560)->elements[20];
++c_7320823.elements[21] = ((closureN)self_7312560)->elements[21];
++c_7320823.elements[22] = ((closureN)self_7312560)->elements[22];
++c_7320823.elements[23] = ((closureN)self_7312560)->elements[23];
++c_7320823.elements[24] = ((closureN)self_7312560)->elements[24];
++c_7320823.elements[25] = ((closureN)self_7312560)->elements[25];
++c_7320823.elements[26] = ((closureN)self_7312560)->elements[26];
++c_7320823.elements[27] = ((closureN)self_7312560)->elements[27];
++c_7320823.elements[28] = ((closureN)self_7312560)->elements[28];
++c_7320823.elements[29] = r_735922;
++c_7320823.elements[30] = ((closureN)self_7312560)->elements[29];
++
++return_closcall2(data, ((closureN)self_7312560)->elements[29], &c_7320823, quote__125_123);;
++}
++
++static void __lambda_839(void *data, object self_7312561, int argc, object *args) /* object self_7312561, object r_735923 */
++ {
++ object r_735923 = args[0];
++
++closureN_type c_7320826;
++object e_7322808 [32];
++c_7320826.hdr.mark = gc_color_red;
++ c_7320826.hdr.grayed = 0;
++c_7320826.tag = closureN_tag;
++ c_7320826.fn = (function_type)__lambda_840;
++c_7320826.num_args = 1;
++c_7320826.num_elements = 32;
++c_7320826.elements = (object *)e_7322808;
++c_7320826.elements[0] = ((closureN)self_7312561)->elements[0];
++c_7320826.elements[1] = ((closureN)self_7312561)->elements[1];
++c_7320826.elements[2] = ((closureN)self_7312561)->elements[2];
++c_7320826.elements[3] = ((closureN)self_7312561)->elements[3];
++c_7320826.elements[4] = ((closureN)self_7312561)->elements[4];
++c_7320826.elements[5] = ((closureN)self_7312561)->elements[5];
++c_7320826.elements[6] = ((closureN)self_7312561)->elements[6];
++c_7320826.elements[7] = ((closureN)self_7312561)->elements[7];
++c_7320826.elements[8] = ((closureN)self_7312561)->elements[8];
++c_7320826.elements[9] = ((closureN)self_7312561)->elements[9];
++c_7320826.elements[10] = ((closureN)self_7312561)->elements[10];
++c_7320826.elements[11] = ((closureN)self_7312561)->elements[11];
++c_7320826.elements[12] = ((closureN)self_7312561)->elements[12];
++c_7320826.elements[13] = ((closureN)self_7312561)->elements[13];
++c_7320826.elements[14] = ((closureN)self_7312561)->elements[14];
++c_7320826.elements[15] = ((closureN)self_7312561)->elements[15];
++c_7320826.elements[16] = ((closureN)self_7312561)->elements[16];
++c_7320826.elements[17] = ((closureN)self_7312561)->elements[17];
++c_7320826.elements[18] = ((closureN)self_7312561)->elements[18];
++c_7320826.elements[19] = ((closureN)self_7312561)->elements[19];
++c_7320826.elements[20] = ((closureN)self_7312561)->elements[20];
++c_7320826.elements[21] = ((closureN)self_7312561)->elements[21];
++c_7320826.elements[22] = ((closureN)self_7312561)->elements[22];
++c_7320826.elements[23] = ((closureN)self_7312561)->elements[23];
++c_7320826.elements[24] = ((closureN)self_7312561)->elements[24];
++c_7320826.elements[25] = ((closureN)self_7312561)->elements[25];
++c_7320826.elements[26] = ((closureN)self_7312561)->elements[26];
++c_7320826.elements[27] = ((closureN)self_7312561)->elements[27];
++c_7320826.elements[28] = ((closureN)self_7312561)->elements[28];
++c_7320826.elements[29] = ((closureN)self_7312561)->elements[29];
++c_7320826.elements[30] = r_735923;
++c_7320826.elements[31] = ((closureN)self_7312561)->elements[30];
++
++return_closcall2(data, ((closureN)self_7312561)->elements[30], &c_7320826, quote_error_95loc);;
++}
++
++static void __lambda_840(void *data, object self_7312562, int argc, object *args) /* object self_7312562, object r_735924 */
++ {
++ object r_735924 = args[0];
++
++closureN_type c_7320829;
++object e_7322807 [33];
++c_7320829.hdr.mark = gc_color_red;
++ c_7320829.hdr.grayed = 0;
++c_7320829.tag = closureN_tag;
++ c_7320829.fn = (function_type)__lambda_841;
++c_7320829.num_args = 1;
++c_7320829.num_elements = 33;
++c_7320829.elements = (object *)e_7322807;
++c_7320829.elements[0] = ((closureN)self_7312562)->elements[0];
++c_7320829.elements[1] = ((closureN)self_7312562)->elements[1];
++c_7320829.elements[2] = ((closureN)self_7312562)->elements[2];
++c_7320829.elements[3] = ((closureN)self_7312562)->elements[3];
++c_7320829.elements[4] = ((closureN)self_7312562)->elements[4];
++c_7320829.elements[5] = ((closureN)self_7312562)->elements[5];
++c_7320829.elements[6] = ((closureN)self_7312562)->elements[6];
++c_7320829.elements[7] = ((closureN)self_7312562)->elements[7];
++c_7320829.elements[8] = ((closureN)self_7312562)->elements[8];
++c_7320829.elements[9] = ((closureN)self_7312562)->elements[9];
++c_7320829.elements[10] = ((closureN)self_7312562)->elements[10];
++c_7320829.elements[11] = ((closureN)self_7312562)->elements[11];
++c_7320829.elements[12] = ((closureN)self_7312562)->elements[12];
++c_7320829.elements[13] = ((closureN)self_7312562)->elements[13];
++c_7320829.elements[14] = ((closureN)self_7312562)->elements[14];
++c_7320829.elements[15] = ((closureN)self_7312562)->elements[15];
++c_7320829.elements[16] = ((closureN)self_7312562)->elements[16];
++c_7320829.elements[17] = ((closureN)self_7312562)->elements[17];
++c_7320829.elements[18] = ((closureN)self_7312562)->elements[18];
++c_7320829.elements[19] = ((closureN)self_7312562)->elements[19];
++c_7320829.elements[20] = ((closureN)self_7312562)->elements[20];
++c_7320829.elements[21] = ((closureN)self_7312562)->elements[21];
++c_7320829.elements[22] = ((closureN)self_7312562)->elements[22];
++c_7320829.elements[23] = ((closureN)self_7312562)->elements[23];
++c_7320829.elements[24] = ((closureN)self_7312562)->elements[24];
++c_7320829.elements[25] = ((closureN)self_7312562)->elements[25];
++c_7320829.elements[26] = ((closureN)self_7312562)->elements[26];
++c_7320829.elements[27] = ((closureN)self_7312562)->elements[27];
++c_7320829.elements[28] = ((closureN)self_7312562)->elements[28];
++c_7320829.elements[29] = ((closureN)self_7312562)->elements[29];
++c_7320829.elements[30] = ((closureN)self_7312562)->elements[30];
++c_7320829.elements[31] = r_735924;
++c_7320829.elements[32] = ((closureN)self_7312562)->elements[31];
++
++return_closcall2(data, ((closureN)self_7312562)->elements[31], &c_7320829, quote_ls);;
++}
++
++static void __lambda_841(void *data, object self_7312563, int argc, object *args) /* object self_7312563, object r_735925 */
++ {
++ object r_735925 = args[0];
++
++closureN_type c_7320832;
++object e_7322806 [34];
++c_7320832.hdr.mark = gc_color_red;
++ c_7320832.hdr.grayed = 0;
++c_7320832.tag = closureN_tag;
++ c_7320832.fn = (function_type)__lambda_842;
++c_7320832.num_args = 1;
++c_7320832.num_elements = 34;
++c_7320832.elements = (object *)e_7322806;
++c_7320832.elements[0] = ((closureN)self_7312563)->elements[0];
++c_7320832.elements[1] = ((closureN)self_7312563)->elements[1];
++c_7320832.elements[2] = ((closureN)self_7312563)->elements[2];
++c_7320832.elements[3] = ((closureN)self_7312563)->elements[3];
++c_7320832.elements[4] = ((closureN)self_7312563)->elements[4];
++c_7320832.elements[5] = ((closureN)self_7312563)->elements[5];
++c_7320832.elements[6] = ((closureN)self_7312563)->elements[6];
++c_7320832.elements[7] = ((closureN)self_7312563)->elements[7];
++c_7320832.elements[8] = ((closureN)self_7312563)->elements[8];
++c_7320832.elements[9] = ((closureN)self_7312563)->elements[9];
++c_7320832.elements[10] = ((closureN)self_7312563)->elements[10];
++c_7320832.elements[11] = ((closureN)self_7312563)->elements[11];
++c_7320832.elements[12] = ((closureN)self_7312563)->elements[12];
++c_7320832.elements[13] = ((closureN)self_7312563)->elements[13];
++c_7320832.elements[14] = ((closureN)self_7312563)->elements[14];
++c_7320832.elements[15] = ((closureN)self_7312563)->elements[15];
++c_7320832.elements[16] = ((closureN)self_7312563)->elements[16];
++c_7320832.elements[17] = ((closureN)self_7312563)->elements[17];
++c_7320832.elements[18] = ((closureN)self_7312563)->elements[18];
++c_7320832.elements[19] = ((closureN)self_7312563)->elements[19];
++c_7320832.elements[20] = ((closureN)self_7312563)->elements[20];
++c_7320832.elements[21] = ((closureN)self_7312563)->elements[21];
++c_7320832.elements[22] = ((closureN)self_7312563)->elements[22];
++c_7320832.elements[23] = ((closureN)self_7312563)->elements[23];
++c_7320832.elements[24] = ((closureN)self_7312563)->elements[24];
++c_7320832.elements[25] = ((closureN)self_7312563)->elements[25];
++c_7320832.elements[26] = ((closureN)self_7312563)->elements[26];
++c_7320832.elements[27] = ((closureN)self_7312563)->elements[27];
++c_7320832.elements[28] = ((closureN)self_7312563)->elements[28];
++c_7320832.elements[29] = ((closureN)self_7312563)->elements[29];
++c_7320832.elements[30] = ((closureN)self_7312563)->elements[30];
++c_7320832.elements[31] = ((closureN)self_7312563)->elements[31];
++c_7320832.elements[32] = r_735925;
++c_7320832.elements[33] = ((closureN)self_7312563)->elements[32];
++
++return_closcall2(data, ((closureN)self_7312563)->elements[32], &c_7320832, quote_res);;
++}
++
++static void __lambda_842(void *data, object self_7312564, int argc, object *args) /* object self_7312564, object r_735926 */
++ {
++ object r_735926 = args[0];
++
++closureN_type c_7320835;
++object e_7322805 [35];
++c_7320835.hdr.mark = gc_color_red;
++ c_7320835.hdr.grayed = 0;
++c_7320835.tag = closureN_tag;
++ c_7320835.fn = (function_type)__lambda_843;
++c_7320835.num_args = 1;
++c_7320835.num_elements = 35;
++c_7320835.elements = (object *)e_7322805;
++c_7320835.elements[0] = ((closureN)self_7312564)->elements[0];
++c_7320835.elements[1] = ((closureN)self_7312564)->elements[1];
++c_7320835.elements[2] = ((closureN)self_7312564)->elements[2];
++c_7320835.elements[3] = ((closureN)self_7312564)->elements[3];
++c_7320835.elements[4] = ((closureN)self_7312564)->elements[4];
++c_7320835.elements[5] = ((closureN)self_7312564)->elements[5];
++c_7320835.elements[6] = ((closureN)self_7312564)->elements[6];
++c_7320835.elements[7] = ((closureN)self_7312564)->elements[7];
++c_7320835.elements[8] = ((closureN)self_7312564)->elements[8];
++c_7320835.elements[9] = ((closureN)self_7312564)->elements[9];
++c_7320835.elements[10] = ((closureN)self_7312564)->elements[10];
++c_7320835.elements[11] = ((closureN)self_7312564)->elements[11];
++c_7320835.elements[12] = ((closureN)self_7312564)->elements[12];
++c_7320835.elements[13] = ((closureN)self_7312564)->elements[13];
++c_7320835.elements[14] = ((closureN)self_7312564)->elements[14];
++c_7320835.elements[15] = ((closureN)self_7312564)->elements[15];
++c_7320835.elements[16] = ((closureN)self_7312564)->elements[16];
++c_7320835.elements[17] = ((closureN)self_7312564)->elements[17];
++c_7320835.elements[18] = ((closureN)self_7312564)->elements[18];
++c_7320835.elements[19] = ((closureN)self_7312564)->elements[19];
++c_7320835.elements[20] = ((closureN)self_7312564)->elements[20];
++c_7320835.elements[21] = ((closureN)self_7312564)->elements[21];
++c_7320835.elements[22] = ((closureN)self_7312564)->elements[22];
++c_7320835.elements[23] = ((closureN)self_7312564)->elements[23];
++c_7320835.elements[24] = ((closureN)self_7312564)->elements[24];
++c_7320835.elements[25] = ((closureN)self_7312564)->elements[25];
++c_7320835.elements[26] = ((closureN)self_7312564)->elements[26];
++c_7320835.elements[27] = ((closureN)self_7312564)->elements[27];
++c_7320835.elements[28] = ((closureN)self_7312564)->elements[28];
++c_7320835.elements[29] = ((closureN)self_7312564)->elements[29];
++c_7320835.elements[30] = ((closureN)self_7312564)->elements[30];
++c_7320835.elements[31] = ((closureN)self_7312564)->elements[31];
++c_7320835.elements[32] = ((closureN)self_7312564)->elements[32];
++c_7320835.elements[33] = r_735926;
++c_7320835.elements[34] = ((closureN)self_7312564)->elements[33];
++
++return_closcall2(data, ((closureN)self_7312564)->elements[33], &c_7320835, quote_i);;
++}
++
++static void __lambda_843(void *data, object self_7312565, int argc, object *args) /* object self_7312565, object r_735927 */
++ {
++ object r_735927 = args[0];
++
++closureN_type c_7320838;
++object e_7322804 [36];
++c_7320838.hdr.mark = gc_color_red;
++ c_7320838.hdr.grayed = 0;
++c_7320838.tag = closureN_tag;
++ c_7320838.fn = (function_type)__lambda_844;
++c_7320838.num_args = 1;
++c_7320838.num_elements = 36;
++c_7320838.elements = (object *)e_7322804;
++c_7320838.elements[0] = ((closureN)self_7312565)->elements[0];
++c_7320838.elements[1] = ((closureN)self_7312565)->elements[1];
++c_7320838.elements[2] = ((closureN)self_7312565)->elements[2];
++c_7320838.elements[3] = ((closureN)self_7312565)->elements[3];
++c_7320838.elements[4] = ((closureN)self_7312565)->elements[4];
++c_7320838.elements[5] = ((closureN)self_7312565)->elements[5];
++c_7320838.elements[6] = ((closureN)self_7312565)->elements[6];
++c_7320838.elements[7] = ((closureN)self_7312565)->elements[7];
++c_7320838.elements[8] = ((closureN)self_7312565)->elements[8];
++c_7320838.elements[9] = ((closureN)self_7312565)->elements[9];
++c_7320838.elements[10] = ((closureN)self_7312565)->elements[10];
++c_7320838.elements[11] = ((closureN)self_7312565)->elements[11];
++c_7320838.elements[12] = ((closureN)self_7312565)->elements[12];
++c_7320838.elements[13] = ((closureN)self_7312565)->elements[13];
++c_7320838.elements[14] = ((closureN)self_7312565)->elements[14];
++c_7320838.elements[15] = ((closureN)self_7312565)->elements[15];
++c_7320838.elements[16] = ((closureN)self_7312565)->elements[16];
++c_7320838.elements[17] = ((closureN)self_7312565)->elements[17];
++c_7320838.elements[18] = ((closureN)self_7312565)->elements[18];
++c_7320838.elements[19] = ((closureN)self_7312565)->elements[19];
++c_7320838.elements[20] = ((closureN)self_7312565)->elements[20];
++c_7320838.elements[21] = ((closureN)self_7312565)->elements[21];
++c_7320838.elements[22] = ((closureN)self_7312565)->elements[22];
++c_7320838.elements[23] = ((closureN)self_7312565)->elements[23];
++c_7320838.elements[24] = ((closureN)self_7312565)->elements[24];
++c_7320838.elements[25] = ((closureN)self_7312565)->elements[25];
++c_7320838.elements[26] = ((closureN)self_7312565)->elements[26];
++c_7320838.elements[27] = ((closureN)self_7312565)->elements[27];
++c_7320838.elements[28] = ((closureN)self_7312565)->elements[28];
++c_7320838.elements[29] = ((closureN)self_7312565)->elements[29];
++c_7320838.elements[30] = ((closureN)self_7312565)->elements[30];
++c_7320838.elements[31] = ((closureN)self_7312565)->elements[31];
++c_7320838.elements[32] = ((closureN)self_7312565)->elements[32];
++c_7320838.elements[33] = ((closureN)self_7312565)->elements[33];
++c_7320838.elements[34] = r_735927;
++c_7320838.elements[35] = ((closureN)self_7312565)->elements[34];
++
++return_closcall2(data, ((closureN)self_7312565)->elements[34], &c_7320838, quote_reverse);;
++}
++
++static void __lambda_844(void *data, object self_7312566, int argc, object *args) /* object self_7312566, object r_735928 */
++ {
++ object r_735928 = args[0];
++
++closureN_type c_7320841;
++object e_7322803 [37];
++c_7320841.hdr.mark = gc_color_red;
++ c_7320841.hdr.grayed = 0;
++c_7320841.tag = closureN_tag;
++ c_7320841.fn = (function_type)__lambda_845;
++c_7320841.num_args = 1;
++c_7320841.num_elements = 37;
++c_7320841.elements = (object *)e_7322803;
++c_7320841.elements[0] = ((closureN)self_7312566)->elements[0];
++c_7320841.elements[1] = ((closureN)self_7312566)->elements[1];
++c_7320841.elements[2] = ((closureN)self_7312566)->elements[2];
++c_7320841.elements[3] = ((closureN)self_7312566)->elements[3];
++c_7320841.elements[4] = ((closureN)self_7312566)->elements[4];
++c_7320841.elements[5] = ((closureN)self_7312566)->elements[5];
++c_7320841.elements[6] = ((closureN)self_7312566)->elements[6];
++c_7320841.elements[7] = ((closureN)self_7312566)->elements[7];
++c_7320841.elements[8] = ((closureN)self_7312566)->elements[8];
++c_7320841.elements[9] = ((closureN)self_7312566)->elements[9];
++c_7320841.elements[10] = ((closureN)self_7312566)->elements[10];
++c_7320841.elements[11] = ((closureN)self_7312566)->elements[11];
++c_7320841.elements[12] = ((closureN)self_7312566)->elements[12];
++c_7320841.elements[13] = ((closureN)self_7312566)->elements[13];
++c_7320841.elements[14] = ((closureN)self_7312566)->elements[14];
++c_7320841.elements[15] = ((closureN)self_7312566)->elements[15];
++c_7320841.elements[16] = ((closureN)self_7312566)->elements[16];
++c_7320841.elements[17] = ((closureN)self_7312566)->elements[17];
++c_7320841.elements[18] = ((closureN)self_7312566)->elements[18];
++c_7320841.elements[19] = ((closureN)self_7312566)->elements[19];
++c_7320841.elements[20] = ((closureN)self_7312566)->elements[20];
++c_7320841.elements[21] = ((closureN)self_7312566)->elements[21];
++c_7320841.elements[22] = ((closureN)self_7312566)->elements[22];
++c_7320841.elements[23] = ((closureN)self_7312566)->elements[23];
++c_7320841.elements[24] = ((closureN)self_7312566)->elements[24];
++c_7320841.elements[25] = ((closureN)self_7312566)->elements[25];
++c_7320841.elements[26] = ((closureN)self_7312566)->elements[26];
++c_7320841.elements[27] = ((closureN)self_7312566)->elements[27];
++c_7320841.elements[28] = ((closureN)self_7312566)->elements[28];
++c_7320841.elements[29] = ((closureN)self_7312566)->elements[29];
++c_7320841.elements[30] = ((closureN)self_7312566)->elements[30];
++c_7320841.elements[31] = ((closureN)self_7312566)->elements[31];
++c_7320841.elements[32] = ((closureN)self_7312566)->elements[32];
++c_7320841.elements[33] = ((closureN)self_7312566)->elements[33];
++c_7320841.elements[34] = ((closureN)self_7312566)->elements[34];
++c_7320841.elements[35] = r_735928;
++c_7320841.elements[36] = ((closureN)self_7312566)->elements[35];
++
++return_closcall2(data, ((closureN)self_7312566)->elements[35], &c_7320841, quote_vector_91_125list);;
++}
++
++static void __lambda_845(void *data, object self_7312567, int argc, object *args) /* object self_7312567, object r_735929 */
++ {
++ object r_735929 = args[0];
++
++closureN_type c_7320844;
++object e_7322802 [38];
++c_7320844.hdr.mark = gc_color_red;
++ c_7320844.hdr.grayed = 0;
++c_7320844.tag = closureN_tag;
++ c_7320844.fn = (function_type)__lambda_846;
++c_7320844.num_args = 1;
++c_7320844.num_elements = 38;
++c_7320844.elements = (object *)e_7322802;
++c_7320844.elements[0] = ((closureN)self_7312567)->elements[0];
++c_7320844.elements[1] = ((closureN)self_7312567)->elements[1];
++c_7320844.elements[2] = ((closureN)self_7312567)->elements[2];
++c_7320844.elements[3] = ((closureN)self_7312567)->elements[3];
++c_7320844.elements[4] = ((closureN)self_7312567)->elements[4];
++c_7320844.elements[5] = ((closureN)self_7312567)->elements[5];
++c_7320844.elements[6] = ((closureN)self_7312567)->elements[6];
++c_7320844.elements[7] = ((closureN)self_7312567)->elements[7];
++c_7320844.elements[8] = ((closureN)self_7312567)->elements[8];
++c_7320844.elements[9] = ((closureN)self_7312567)->elements[9];
++c_7320844.elements[10] = ((closureN)self_7312567)->elements[10];
++c_7320844.elements[11] = ((closureN)self_7312567)->elements[11];
++c_7320844.elements[12] = ((closureN)self_7312567)->elements[12];
++c_7320844.elements[13] = ((closureN)self_7312567)->elements[13];
++c_7320844.elements[14] = ((closureN)self_7312567)->elements[14];
++c_7320844.elements[15] = ((closureN)self_7312567)->elements[15];
++c_7320844.elements[16] = ((closureN)self_7312567)->elements[16];
++c_7320844.elements[17] = ((closureN)self_7312567)->elements[17];
++c_7320844.elements[18] = ((closureN)self_7312567)->elements[18];
++c_7320844.elements[19] = ((closureN)self_7312567)->elements[19];
++c_7320844.elements[20] = ((closureN)self_7312567)->elements[20];
++c_7320844.elements[21] = ((closureN)self_7312567)->elements[21];
++c_7320844.elements[22] = ((closureN)self_7312567)->elements[22];
++c_7320844.elements[23] = ((closureN)self_7312567)->elements[23];
++c_7320844.elements[24] = ((closureN)self_7312567)->elements[24];
++c_7320844.elements[25] = ((closureN)self_7312567)->elements[25];
++c_7320844.elements[26] = ((closureN)self_7312567)->elements[26];
++c_7320844.elements[27] = ((closureN)self_7312567)->elements[27];
++c_7320844.elements[28] = ((closureN)self_7312567)->elements[28];
++c_7320844.elements[29] = ((closureN)self_7312567)->elements[29];
++c_7320844.elements[30] = ((closureN)self_7312567)->elements[30];
++c_7320844.elements[31] = ((closureN)self_7312567)->elements[31];
++c_7320844.elements[32] = ((closureN)self_7312567)->elements[32];
++c_7320844.elements[33] = ((closureN)self_7312567)->elements[33];
++c_7320844.elements[34] = ((closureN)self_7312567)->elements[34];
++c_7320844.elements[35] = ((closureN)self_7312567)->elements[35];
++c_7320844.elements[36] = r_735929;
++c_7320844.elements[37] = ((closureN)self_7312567)->elements[36];
++
++return_closcall2(data, ((closureN)self_7312567)->elements[36], &c_7320844, quote_list_91_125vector);;
++}
++
++static void __lambda_846(void *data, object self_7312568, int argc, object *args) /* object self_7312568, object r_735930 */
++ {
++ object r_735930 = args[0];
++
++closureN_type c_7320847;
++object e_7322801 [39];
++c_7320847.hdr.mark = gc_color_red;
++ c_7320847.hdr.grayed = 0;
++c_7320847.tag = closureN_tag;
++ c_7320847.fn = (function_type)__lambda_847;
++c_7320847.num_args = 1;
++c_7320847.num_elements = 39;
++c_7320847.elements = (object *)e_7322801;
++c_7320847.elements[0] = ((closureN)self_7312568)->elements[0];
++c_7320847.elements[1] = ((closureN)self_7312568)->elements[1];
++c_7320847.elements[2] = ((closureN)self_7312568)->elements[2];
++c_7320847.elements[3] = ((closureN)self_7312568)->elements[3];
++c_7320847.elements[4] = ((closureN)self_7312568)->elements[4];
++c_7320847.elements[5] = ((closureN)self_7312568)->elements[5];
++c_7320847.elements[6] = ((closureN)self_7312568)->elements[6];
++c_7320847.elements[7] = ((closureN)self_7312568)->elements[7];
++c_7320847.elements[8] = ((closureN)self_7312568)->elements[8];
++c_7320847.elements[9] = ((closureN)self_7312568)->elements[9];
++c_7320847.elements[10] = ((closureN)self_7312568)->elements[10];
++c_7320847.elements[11] = ((closureN)self_7312568)->elements[11];
++c_7320847.elements[12] = ((closureN)self_7312568)->elements[12];
++c_7320847.elements[13] = ((closureN)self_7312568)->elements[13];
++c_7320847.elements[14] = ((closureN)self_7312568)->elements[14];
++c_7320847.elements[15] = ((closureN)self_7312568)->elements[15];
++c_7320847.elements[16] = ((closureN)self_7312568)->elements[16];
++c_7320847.elements[17] = ((closureN)self_7312568)->elements[17];
++c_7320847.elements[18] = ((closureN)self_7312568)->elements[18];
++c_7320847.elements[19] = ((closureN)self_7312568)->elements[19];
++c_7320847.elements[20] = ((closureN)self_7312568)->elements[20];
++c_7320847.elements[21] = ((closureN)self_7312568)->elements[21];
++c_7320847.elements[22] = ((closureN)self_7312568)->elements[22];
++c_7320847.elements[23] = ((closureN)self_7312568)->elements[23];
++c_7320847.elements[24] = ((closureN)self_7312568)->elements[24];
++c_7320847.elements[25] = ((closureN)self_7312568)->elements[25];
++c_7320847.elements[26] = ((closureN)self_7312568)->elements[26];
++c_7320847.elements[27] = ((closureN)self_7312568)->elements[27];
++c_7320847.elements[28] = ((closureN)self_7312568)->elements[28];
++c_7320847.elements[29] = ((closureN)self_7312568)->elements[29];
++c_7320847.elements[30] = ((closureN)self_7312568)->elements[30];
++c_7320847.elements[31] = ((closureN)self_7312568)->elements[31];
++c_7320847.elements[32] = ((closureN)self_7312568)->elements[32];
++c_7320847.elements[33] = ((closureN)self_7312568)->elements[33];
++c_7320847.elements[34] = ((closureN)self_7312568)->elements[34];
++c_7320847.elements[35] = ((closureN)self_7312568)->elements[35];
++c_7320847.elements[36] = ((closureN)self_7312568)->elements[36];
++c_7320847.elements[37] = r_735930;
++c_7320847.elements[38] = ((closureN)self_7312568)->elements[37];
++
++return_closcall2(data, ((closureN)self_7312568)->elements[37], &c_7320847, quote_cons_91source);;
++}
++
++static void __lambda_847(void *data, object self_7312569, int argc, object *args) /* object self_7312569, object r_735931 */
++ {
++ object r_735931 = args[0];
++
++closureN_type c_7320849;
++object e_7322765 [4];
++c_7320849.hdr.mark = gc_color_red;
++ c_7320849.hdr.grayed = 0;
++c_7320849.tag = closureN_tag;
++ c_7320849.fn = (function_type)__lambda_848;
++c_7320849.num_args = 37;
++c_7320849.num_elements = 4;
++c_7320849.elements = (object *)e_7322765;
++c_7320849.elements[0] = ((closureN)self_7312569)->elements[0];
++c_7320849.elements[1] = ((closureN)self_7312569)->elements[1];
++c_7320849.elements[2] = ((closureN)self_7312569)->elements[2];
++c_7320849.elements[3] = ((closureN)self_7312569)->elements[38];
++
++return_direct_with_clo37(data,(closure)&c_7320849,__lambda_848, ((closureN)self_7312569)->elements[3], obj_int2obj(0), ((closureN)self_7312569)->elements[4], ((closureN)self_7312569)->elements[5], ((closureN)self_7312569)->elements[6], ((closureN)self_7312569)->elements[7], ((closureN)self_7312569)->elements[8], ((closureN)self_7312569)->elements[9], ((closureN)self_7312569)->elements[10], ((closureN)self_7312569)->elements[11], ((closureN)self_7312569)->elements[12], ((closureN)self_7312569)->elements[13], ((closureN)self_7312569)->elements[14], ((closureN)self_7312569)->elements[15], ((closureN)self_7312569)->elements[16], ((closureN)self_7312569)->elements[17], ((closureN)self_7312569)->elements[18], ((closureN)self_7312569)->elements[19], ((closureN)self_7312569)->elements[20], ((closureN)self_7312569)->elements[21], ((closureN)self_7312569)->elements[22], ((closureN)self_7312569)->elements[23], ((closureN)self_7312569)->elements[24], ((closureN)self_7312569)->elements
[25], ((closureN)self_7312569)->elements[26], ((closureN)self_7312569)->elements[27], ((closureN)self_7312569)->elements[28], ((closureN)self_7312569)->elements[29], ((closureN)self_7312569)->elements[30], ((closureN)self_7312569)->elements[31], ((closureN)self_7312569)->elements[32], ((closureN)self_7312569)->elements[33], ((closureN)self_7312569)->elements[34], ((closureN)self_7312569)->elements[35], ((closureN)self_7312569)->elements[36], ((closureN)self_7312569)->elements[37], r_735931);;
++}
++
++static void __lambda_848(void *data, object self_7312570, int argc, object *args) /* object self_7312570, object ellipsis_91specified_127_731266_733219, object count_731267_733220, object _191er_91macro_91transformer_731268_733221, object _191lambda_731269_733222, object _191let_731270_733223, object _191begin_731271_733224, object _191if_731272_733225, object _191and_731273_733226, object _191or_731274_733227, object _191eq_127_731275_733228, object _191equal_127_731276_733229, object _191car_731277_733230, object _191cdr_731278_733231, object _191cons_731279_733232, object _191pair_127_731280_733233, object _191null_127_731281_733234, object _191expr_731282_733235, object _191rename_731283_733236, object _191compare_731284_733237, object _191quote_731285_733238, object _191apply_731286_733239, object _191append_731287_733240, object _191map_731288_733241, object _191vector_127_731289_733242, object _191list_127_731290_733243, object _191len_731291_733244, object _191lengt
h_731292_733245, object _191_91_731293_733246, object _191_125_123_731294_733247, object _191error_731295_733248, object _191ls_731296_733249, object _191res_731297_733250, object _191i_731298_733251, object _191reverse_731299_733252, object _191vector_91_125list_731300_733253, object _191list_91_125vector_731301_733254, object _191cons3_731302_733255 */
++ {
++ object ellipsis_91specified_127_731266_733219 = args[0]; object count_731267_733220 = args[1]; object _191er_91macro_91transformer_731268_733221 = args[2]; object _191lambda_731269_733222 = args[3]; object _191let_731270_733223 = args[4]; object _191if_731272_733225 = args[6]; object _191and_731273_733226 = args[7]; object _191or_731274_733227 = args[8]; object _191equal_127_731276_733229 = args[10]; object _191car_731277_733230 = args[11]; object _191cdr_731278_733231 = args[12]; object _191cons_731279_733232 = args[13]; object _191pair_127_731280_733233 = args[14]; object _191null_127_731281_733234 = args[15]; object _191expr_731282_733235 = args[16]; object _191rename_731283_733236 = args[17]; object _191compare_731284_733237 = args[18]; object _191quote_731285_733238 = args[19]; object _191apply_731286_733239 = args[20]; object _191append_731287_733240 = args[21]; object _191map_731288_733241 = args[22]; object _191vector_127_731289_733242 = args[23]; object _191list_1
27_731290_733243 = args[24]; object _191len_731291_733244 = args[25]; object _191length_731292_733245 = args[26]; object _191_91_731293_733246 = args[27]; object _191_125_123_731294_733247 = args[28]; object _191error_731295_733248 = args[29]; object _191ls_731296_733249 = args[30]; object _191res_731297_733250 = args[31]; object _191i_731298_733251 = args[32]; object _191reverse_731299_733252 = args[33]; object _191vector_91_125list_731300_733253 = args[34]; object _191list_91_125vector_731301_733254 = args[35]; object _191cons3_731302_733255 = args[36];
++
++closureN_type c_7320851;
++object e_7322761 [38];
++c_7320851.hdr.mark = gc_color_red;
++ c_7320851.hdr.grayed = 0;
++c_7320851.tag = closureN_tag;
++ c_7320851.fn = (function_type)__lambda_1394;
++c_7320851.num_args = 1;
++c_7320851.num_elements = 38;
++c_7320851.elements = (object *)e_7322761;
++c_7320851.elements[0] = _191_91_731293_733246;
++c_7320851.elements[1] = _191_125_123_731294_733247;
++c_7320851.elements[2] = _191and_731273_733226;
++c_7320851.elements[3] = _191append_731287_733240;
++c_7320851.elements[4] = _191apply_731286_733239;
++c_7320851.elements[5] = _191car_731277_733230;
++c_7320851.elements[6] = _191cdr_731278_733231;
++c_7320851.elements[7] = _191compare_731284_733237;
++c_7320851.elements[8] = _191cons_731279_733232;
++c_7320851.elements[9] = _191cons3_731302_733255;
++c_7320851.elements[10] = _191equal_127_731276_733229;
++c_7320851.elements[11] = _191er_91macro_91transformer_731268_733221;
++c_7320851.elements[12] = _191error_731295_733248;
++c_7320851.elements[13] = _191expr_731282_733235;
++c_7320851.elements[14] = _191i_731298_733251;
++c_7320851.elements[15] = _191if_731272_733225;
++c_7320851.elements[16] = _191lambda_731269_733222;
++c_7320851.elements[17] = _191len_731291_733244;
++c_7320851.elements[18] = _191length_731292_733245;
++c_7320851.elements[19] = _191let_731270_733223;
++c_7320851.elements[20] = _191list_91_125vector_731301_733254;
++c_7320851.elements[21] = _191list_127_731290_733243;
++c_7320851.elements[22] = _191ls_731296_733249;
++c_7320851.elements[23] = _191map_731288_733241;
++c_7320851.elements[24] = _191null_127_731281_733234;
++c_7320851.elements[25] = _191or_731274_733227;
++c_7320851.elements[26] = _191pair_127_731280_733233;
++c_7320851.elements[27] = _191quote_731285_733238;
++c_7320851.elements[28] = _191rename_731283_733236;
++c_7320851.elements[29] = _191res_731297_733250;
++c_7320851.elements[30] = _191reverse_731299_733252;
++c_7320851.elements[31] = _191vector_91_125list_731300_733253;
++c_7320851.elements[32] = _191vector_127_731289_733242;
++c_7320851.elements[33] = ((closureN)self_7312570)->elements[0];
++c_7320851.elements[34] = ellipsis_91specified_127_731266_733219;
++c_7320851.elements[35] = ((closureN)self_7312570)->elements[1];
++c_7320851.elements[36] = ((closureN)self_7312570)->elements[2];
++c_7320851.elements[37] = ((closureN)self_7312570)->elements[3];
++
++
++pair_type local_7322764;
++return_direct_with_clo1(data,(closure)&c_7320851,__lambda_1394, set_cell_as_expr(&local_7322764, count_731267_733220));;
++}
++
++static void __lambda_1394(void *data, object self_7312571, int argc, object *args) /* object self_7312571, object count_731267_733220 */
++ {
++ object count_731267_733220 = args[0];
++
++closureN_type c_7320853;
++object e_7322760 [39];
++c_7320853.hdr.mark = gc_color_red;
++ c_7320853.hdr.grayed = 0;
++c_7320853.tag = closureN_tag;
++ c_7320853.fn = (function_type)__lambda_849;
++c_7320853.num_args = 12;
++c_7320853.num_elements = 39;
++c_7320853.elements = (object *)e_7322760;
++c_7320853.elements[0] = ((closureN)self_7312571)->elements[0];
++c_7320853.elements[1] = ((closureN)self_7312571)->elements[1];
++c_7320853.elements[2] = ((closureN)self_7312571)->elements[2];
++c_7320853.elements[3] = ((closureN)self_7312571)->elements[3];
++c_7320853.elements[4] = ((closureN)self_7312571)->elements[4];
++c_7320853.elements[5] = ((closureN)self_7312571)->elements[5];
++c_7320853.elements[6] = ((closureN)self_7312571)->elements[6];
++c_7320853.elements[7] = ((closureN)self_7312571)->elements[7];
++c_7320853.elements[8] = ((closureN)self_7312571)->elements[8];
++c_7320853.elements[9] = ((closureN)self_7312571)->elements[9];
++c_7320853.elements[10] = ((closureN)self_7312571)->elements[10];
++c_7320853.elements[11] = ((closureN)self_7312571)->elements[11];
++c_7320853.elements[12] = ((closureN)self_7312571)->elements[12];
++c_7320853.elements[13] = ((closureN)self_7312571)->elements[13];
++c_7320853.elements[14] = ((closureN)self_7312571)->elements[14];
++c_7320853.elements[15] = ((closureN)self_7312571)->elements[15];
++c_7320853.elements[16] = ((closureN)self_7312571)->elements[16];
++c_7320853.elements[17] = ((closureN)self_7312571)->elements[17];
++c_7320853.elements[18] = ((closureN)self_7312571)->elements[18];
++c_7320853.elements[19] = ((closureN)self_7312571)->elements[19];
++c_7320853.elements[20] = ((closureN)self_7312571)->elements[20];
++c_7320853.elements[21] = ((closureN)self_7312571)->elements[21];
++c_7320853.elements[22] = ((closureN)self_7312571)->elements[22];
++c_7320853.elements[23] = ((closureN)self_7312571)->elements[23];
++c_7320853.elements[24] = ((closureN)self_7312571)->elements[24];
++c_7320853.elements[25] = ((closureN)self_7312571)->elements[25];
++c_7320853.elements[26] = ((closureN)self_7312571)->elements[26];
++c_7320853.elements[27] = ((closureN)self_7312571)->elements[27];
++c_7320853.elements[28] = ((closureN)self_7312571)->elements[28];
++c_7320853.elements[29] = ((closureN)self_7312571)->elements[29];
++c_7320853.elements[30] = ((closureN)self_7312571)->elements[30];
++c_7320853.elements[31] = ((closureN)self_7312571)->elements[31];
++c_7320853.elements[32] = ((closureN)self_7312571)->elements[32];
++c_7320853.elements[33] = ((closureN)self_7312571)->elements[33];
++c_7320853.elements[34] = count_731267_733220;
++c_7320853.elements[35] = ((closureN)self_7312571)->elements[34];
++c_7320853.elements[36] = ((closureN)self_7312571)->elements[35];
++c_7320853.elements[37] = ((closureN)self_7312571)->elements[36];
++c_7320853.elements[38] = ((closureN)self_7312571)->elements[37];
++
++return_direct_with_clo12(data,(closure)&c_7320853,__lambda_849, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);;
++}
++
++static void __lambda_849(void *data, object self_7312572, int argc, object *args) /* object self_7312572, object ellipsis_733256, object lits_733257, object forms_733258, object next_91symbol_733259, object expand_91pattern_733260, object ellipsis_91escape_127_733261, object ellipsis_127_733262, object ellipsis_91depth_733263, object ellipsis_91tail_733264, object all_91vars_733265, object free_91vars_733266, object expand_91template_733267 */
++ {
++ object ellipsis_733256 = args[0]; object lits_733257 = args[1]; object forms_733258 = args[2]; object next_91symbol_733259 = args[3]; object expand_91pattern_733260 = args[4]; object ellipsis_91escape_127_733261 = args[5]; object ellipsis_127_733262 = args[6]; object ellipsis_91depth_733263 = args[7]; object ellipsis_91tail_733264 = args[8]; object all_91vars_733265 = args[9]; object free_91vars_733266 = args[10]; object expand_91template_733267 = args[11];
++
++closureN_type c_7320855;
++object e_7322756 [50];
++c_7320855.hdr.mark = gc_color_red;
++ c_7320855.hdr.grayed = 0;
++c_7320855.tag = closureN_tag;
++ c_7320855.fn = (function_type)__lambda_1393;
++c_7320855.num_args = 1;
++c_7320855.num_elements = 50;
++c_7320855.elements = (object *)e_7322756;
++c_7320855.elements[0] = ((closureN)self_7312572)->elements[0];
++c_7320855.elements[1] = ((closureN)self_7312572)->elements[1];
++c_7320855.elements[2] = ((closureN)self_7312572)->elements[2];
++c_7320855.elements[3] = ((closureN)self_7312572)->elements[3];
++c_7320855.elements[4] = ((closureN)self_7312572)->elements[4];
++c_7320855.elements[5] = ((closureN)self_7312572)->elements[5];
++c_7320855.elements[6] = ((closureN)self_7312572)->elements[6];
++c_7320855.elements[7] = ((closureN)self_7312572)->elements[7];
++c_7320855.elements[8] = ((closureN)self_7312572)->elements[8];
++c_7320855.elements[9] = ((closureN)self_7312572)->elements[9];
++c_7320855.elements[10] = ((closureN)self_7312572)->elements[10];
++c_7320855.elements[11] = ((closureN)self_7312572)->elements[11];
++c_7320855.elements[12] = ((closureN)self_7312572)->elements[12];
++c_7320855.elements[13] = ((closureN)self_7312572)->elements[13];
++c_7320855.elements[14] = ((closureN)self_7312572)->elements[14];
++c_7320855.elements[15] = ((closureN)self_7312572)->elements[15];
++c_7320855.elements[16] = ((closureN)self_7312572)->elements[16];
++c_7320855.elements[17] = ((closureN)self_7312572)->elements[17];
++c_7320855.elements[18] = ((closureN)self_7312572)->elements[18];
++c_7320855.elements[19] = ((closureN)self_7312572)->elements[19];
++c_7320855.elements[20] = ((closureN)self_7312572)->elements[20];
++c_7320855.elements[21] = ((closureN)self_7312572)->elements[21];
++c_7320855.elements[22] = ((closureN)self_7312572)->elements[22];
++c_7320855.elements[23] = ((closureN)self_7312572)->elements[23];
++c_7320855.elements[24] = ((closureN)self_7312572)->elements[24];
++c_7320855.elements[25] = ((closureN)self_7312572)->elements[25];
++c_7320855.elements[26] = ((closureN)self_7312572)->elements[26];
++c_7320855.elements[27] = ((closureN)self_7312572)->elements[27];
++c_7320855.elements[28] = ((closureN)self_7312572)->elements[28];
++c_7320855.elements[29] = ((closureN)self_7312572)->elements[29];
++c_7320855.elements[30] = ((closureN)self_7312572)->elements[30];
++c_7320855.elements[31] = ((closureN)self_7312572)->elements[31];
++c_7320855.elements[32] = ((closureN)self_7312572)->elements[32];
++c_7320855.elements[33] = all_91vars_733265;
++c_7320855.elements[34] = ((closureN)self_7312572)->elements[33];
++c_7320855.elements[35] = ((closureN)self_7312572)->elements[34];
++c_7320855.elements[36] = ellipsis_91depth_733263;
++c_7320855.elements[37] = ellipsis_91escape_127_733261;
++c_7320855.elements[38] = ((closureN)self_7312572)->elements[35];
++c_7320855.elements[39] = ellipsis_91tail_733264;
++c_7320855.elements[40] = ellipsis_127_733262;
++c_7320855.elements[41] = expand_91pattern_733260;
++c_7320855.elements[42] = expand_91template_733267;
++c_7320855.elements[43] = ((closureN)self_7312572)->elements[36];
++c_7320855.elements[44] = forms_733258;
++c_7320855.elements[45] = free_91vars_733266;
++c_7320855.elements[46] = ((closureN)self_7312572)->elements[37];
++c_7320855.elements[47] = lits_733257;
++c_7320855.elements[48] = next_91symbol_733259;
++c_7320855.elements[49] = ((closureN)self_7312572)->elements[38];
++
++
++pair_type local_7322759;
++return_direct_with_clo1(data,(closure)&c_7320855,__lambda_1393, set_cell_as_expr(&local_7322759, ellipsis_733256));;
++}
++
++static void __lambda_1393(void *data, object self_7312573, int argc, object *args) /* object self_7312573, object ellipsis_733256 */
++ {
++ object ellipsis_733256 = args[0];
++
++closureN_type c_7320857;
++object e_7322751 [50];
++c_7320857.hdr.mark = gc_color_red;
++ c_7320857.hdr.grayed = 0;
++c_7320857.tag = closureN_tag;
++ c_7320857.fn = (function_type)__lambda_1392;
++c_7320857.num_args = 1;
++c_7320857.num_elements = 50;
++c_7320857.elements = (object *)e_7322751;
++c_7320857.elements[0] = ((closureN)self_7312573)->elements[0];
++c_7320857.elements[1] = ((closureN)self_7312573)->elements[1];
++c_7320857.elements[2] = ((closureN)self_7312573)->elements[2];
++c_7320857.elements[3] = ((closureN)self_7312573)->elements[3];
++c_7320857.elements[4] = ((closureN)self_7312573)->elements[4];
++c_7320857.elements[5] = ((closureN)self_7312573)->elements[5];
++c_7320857.elements[6] = ((closureN)self_7312573)->elements[6];
++c_7320857.elements[7] = ((closureN)self_7312573)->elements[7];
++c_7320857.elements[8] = ((closureN)self_7312573)->elements[8];
++c_7320857.elements[9] = ((closureN)self_7312573)->elements[9];
++c_7320857.elements[10] = ((closureN)self_7312573)->elements[10];
++c_7320857.elements[11] = ((closureN)self_7312573)->elements[11];
++c_7320857.elements[12] = ((closureN)self_7312573)->elements[12];
++c_7320857.elements[13] = ((closureN)self_7312573)->elements[13];
++c_7320857.elements[14] = ((closureN)self_7312573)->elements[14];
++c_7320857.elements[15] = ((closureN)self_7312573)->elements[15];
++c_7320857.elements[16] = ((closureN)self_7312573)->elements[16];
++c_7320857.elements[17] = ((closureN)self_7312573)->elements[17];
++c_7320857.elements[18] = ((closureN)self_7312573)->elements[18];
++c_7320857.elements[19] = ((closureN)self_7312573)->elements[19];
++c_7320857.elements[20] = ((closureN)self_7312573)->elements[20];
++c_7320857.elements[21] = ((closureN)self_7312573)->elements[21];
++c_7320857.elements[22] = ((closureN)self_7312573)->elements[22];
++c_7320857.elements[23] = ((closureN)self_7312573)->elements[23];
++c_7320857.elements[24] = ((closureN)self_7312573)->elements[24];
++c_7320857.elements[25] = ((closureN)self_7312573)->elements[25];
++c_7320857.elements[26] = ((closureN)self_7312573)->elements[26];
++c_7320857.elements[27] = ((closureN)self_7312573)->elements[27];
++c_7320857.elements[28] = ((closureN)self_7312573)->elements[28];
++c_7320857.elements[29] = ((closureN)self_7312573)->elements[29];
++c_7320857.elements[30] = ((closureN)self_7312573)->elements[30];
++c_7320857.elements[31] = ((closureN)self_7312573)->elements[31];
++c_7320857.elements[32] = ((closureN)self_7312573)->elements[32];
++c_7320857.elements[33] = ((closureN)self_7312573)->elements[33];
++c_7320857.elements[34] = ((closureN)self_7312573)->elements[34];
++c_7320857.elements[35] = ((closureN)self_7312573)->elements[35];
++c_7320857.elements[36] = ellipsis_733256;
++c_7320857.elements[37] = ((closureN)self_7312573)->elements[36];
++c_7320857.elements[38] = ((closureN)self_7312573)->elements[37];
++c_7320857.elements[39] = ((closureN)self_7312573)->elements[38];
++c_7320857.elements[40] = ((closureN)self_7312573)->elements[39];
++c_7320857.elements[41] = ((closureN)self_7312573)->elements[40];
++c_7320857.elements[42] = ((closureN)self_7312573)->elements[41];
++c_7320857.elements[43] = ((closureN)self_7312573)->elements[42];
++c_7320857.elements[44] = ((closureN)self_7312573)->elements[43];
++c_7320857.elements[45] = ((closureN)self_7312573)->elements[44];
++c_7320857.elements[46] = ((closureN)self_7312573)->elements[45];
++c_7320857.elements[47] = ((closureN)self_7312573)->elements[46];
++c_7320857.elements[48] = ((closureN)self_7312573)->elements[48];
++c_7320857.elements[49] = ((closureN)self_7312573)->elements[49];
++
++
++pair_type local_7322754;
++return_direct_with_clo1(data,(closure)&c_7320857,__lambda_1392, set_cell_as_expr(&local_7322754, ((closureN)self_7312573)->elements[47]));;
++}
++
++static void __lambda_1392(void *data, object self_7312574, int argc, object *args) /* object self_7312574, object lits_733257 */
++ {
++ object lits_733257 = args[0];
++
++closureN_type c_7320859;
++object e_7322746 [50];
++c_7320859.hdr.mark = gc_color_red;
++ c_7320859.hdr.grayed = 0;
++c_7320859.tag = closureN_tag;
++ c_7320859.fn = (function_type)__lambda_1391;
++c_7320859.num_args = 1;
++c_7320859.num_elements = 50;
++c_7320859.elements = (object *)e_7322746;
++c_7320859.elements[0] = ((closureN)self_7312574)->elements[0];
++c_7320859.elements[1] = ((closureN)self_7312574)->elements[1];
++c_7320859.elements[2] = ((closureN)self_7312574)->elements[2];
++c_7320859.elements[3] = ((closureN)self_7312574)->elements[3];
++c_7320859.elements[4] = ((closureN)self_7312574)->elements[4];
++c_7320859.elements[5] = ((closureN)self_7312574)->elements[5];
++c_7320859.elements[6] = ((closureN)self_7312574)->elements[6];
++c_7320859.elements[7] = ((closureN)self_7312574)->elements[7];
++c_7320859.elements[8] = ((closureN)self_7312574)->elements[8];
++c_7320859.elements[9] = ((closureN)self_7312574)->elements[9];
++c_7320859.elements[10] = ((closureN)self_7312574)->elements[10];
++c_7320859.elements[11] = ((closureN)self_7312574)->elements[11];
++c_7320859.elements[12] = ((closureN)self_7312574)->elements[12];
++c_7320859.elements[13] = ((closureN)self_7312574)->elements[13];
++c_7320859.elements[14] = ((closureN)self_7312574)->elements[14];
++c_7320859.elements[15] = ((closureN)self_7312574)->elements[15];
++c_7320859.elements[16] = ((closureN)self_7312574)->elements[16];
++c_7320859.elements[17] = ((closureN)self_7312574)->elements[17];
++c_7320859.elements[18] = ((closureN)self_7312574)->elements[18];
++c_7320859.elements[19] = ((closureN)self_7312574)->elements[19];
++c_7320859.elements[20] = ((closureN)self_7312574)->elements[20];
++c_7320859.elements[21] = ((closureN)self_7312574)->elements[21];
++c_7320859.elements[22] = ((closureN)self_7312574)->elements[22];
++c_7320859.elements[23] = ((closureN)self_7312574)->elements[23];
++c_7320859.elements[24] = ((closureN)self_7312574)->elements[24];
++c_7320859.elements[25] = ((closureN)self_7312574)->elements[25];
++c_7320859.elements[26] = ((closureN)self_7312574)->elements[26];
++c_7320859.elements[27] = ((closureN)self_7312574)->elements[27];
++c_7320859.elements[28] = ((closureN)self_7312574)->elements[28];
++c_7320859.elements[29] = ((closureN)self_7312574)->elements[29];
++c_7320859.elements[30] = ((closureN)self_7312574)->elements[30];
++c_7320859.elements[31] = ((closureN)self_7312574)->elements[31];
++c_7320859.elements[32] = ((closureN)self_7312574)->elements[32];
++c_7320859.elements[33] = ((closureN)self_7312574)->elements[33];
++c_7320859.elements[34] = ((closureN)self_7312574)->elements[34];
++c_7320859.elements[35] = ((closureN)self_7312574)->elements[35];
++c_7320859.elements[36] = ((closureN)self_7312574)->elements[36];
++c_7320859.elements[37] = ((closureN)self_7312574)->elements[37];
++c_7320859.elements[38] = ((closureN)self_7312574)->elements[38];
++c_7320859.elements[39] = ((closureN)self_7312574)->elements[39];
++c_7320859.elements[40] = ((closureN)self_7312574)->elements[40];
++c_7320859.elements[41] = ((closureN)self_7312574)->elements[41];
++c_7320859.elements[42] = ((closureN)self_7312574)->elements[42];
++c_7320859.elements[43] = ((closureN)self_7312574)->elements[43];
++c_7320859.elements[44] = ((closureN)self_7312574)->elements[44];
++c_7320859.elements[45] = ((closureN)self_7312574)->elements[46];
++c_7320859.elements[46] = ((closureN)self_7312574)->elements[47];
++c_7320859.elements[47] = lits_733257;
++c_7320859.elements[48] = ((closureN)self_7312574)->elements[48];
++c_7320859.elements[49] = ((closureN)self_7312574)->elements[49];
++
++
++pair_type local_7322749;
++return_direct_with_clo1(data,(closure)&c_7320859,__lambda_1391, set_cell_as_expr(&local_7322749, ((closureN)self_7312574)->elements[45]));;
++}
++
++static void __lambda_1391(void *data, object self_7312575, int argc, object *args) /* object self_7312575, object forms_733258 */
++ {
++ object forms_733258 = args[0];
++
++closureN_type c_7320861;
++object e_7322741 [50];
++c_7320861.hdr.mark = gc_color_red;
++ c_7320861.hdr.grayed = 0;
++c_7320861.tag = closureN_tag;
++ c_7320861.fn = (function_type)__lambda_1390;
++c_7320861.num_args = 1;
++c_7320861.num_elements = 50;
++c_7320861.elements = (object *)e_7322741;
++c_7320861.elements[0] = ((closureN)self_7312575)->elements[0];
++c_7320861.elements[1] = ((closureN)self_7312575)->elements[1];
++c_7320861.elements[2] = ((closureN)self_7312575)->elements[2];
++c_7320861.elements[3] = ((closureN)self_7312575)->elements[3];
++c_7320861.elements[4] = ((closureN)self_7312575)->elements[4];
++c_7320861.elements[5] = ((closureN)self_7312575)->elements[5];
++c_7320861.elements[6] = ((closureN)self_7312575)->elements[6];
++c_7320861.elements[7] = ((closureN)self_7312575)->elements[7];
++c_7320861.elements[8] = ((closureN)self_7312575)->elements[8];
++c_7320861.elements[9] = ((closureN)self_7312575)->elements[9];
++c_7320861.elements[10] = ((closureN)self_7312575)->elements[10];
++c_7320861.elements[11] = ((closureN)self_7312575)->elements[11];
++c_7320861.elements[12] = ((closureN)self_7312575)->elements[12];
++c_7320861.elements[13] = ((closureN)self_7312575)->elements[13];
++c_7320861.elements[14] = ((closureN)self_7312575)->elements[14];
++c_7320861.elements[15] = ((closureN)self_7312575)->elements[15];
++c_7320861.elements[16] = ((closureN)self_7312575)->elements[16];
++c_7320861.elements[17] = ((closureN)self_7312575)->elements[17];
++c_7320861.elements[18] = ((closureN)self_7312575)->elements[18];
++c_7320861.elements[19] = ((closureN)self_7312575)->elements[19];
++c_7320861.elements[20] = ((closureN)self_7312575)->elements[20];
++c_7320861.elements[21] = ((closureN)self_7312575)->elements[21];
++c_7320861.elements[22] = ((closureN)self_7312575)->elements[22];
++c_7320861.elements[23] = ((closureN)self_7312575)->elements[23];
++c_7320861.elements[24] = ((closureN)self_7312575)->elements[24];
++c_7320861.elements[25] = ((closureN)self_7312575)->elements[25];
++c_7320861.elements[26] = ((closureN)self_7312575)->elements[26];
++c_7320861.elements[27] = ((closureN)self_7312575)->elements[27];
++c_7320861.elements[28] = ((closureN)self_7312575)->elements[28];
++c_7320861.elements[29] = ((closureN)self_7312575)->elements[29];
++c_7320861.elements[30] = ((closureN)self_7312575)->elements[30];
++c_7320861.elements[31] = ((closureN)self_7312575)->elements[31];
++c_7320861.elements[32] = ((closureN)self_7312575)->elements[32];
++c_7320861.elements[33] = ((closureN)self_7312575)->elements[33];
++c_7320861.elements[34] = ((closureN)self_7312575)->elements[34];
++c_7320861.elements[35] = ((closureN)self_7312575)->elements[35];
++c_7320861.elements[36] = ((closureN)self_7312575)->elements[36];
++c_7320861.elements[37] = ((closureN)self_7312575)->elements[37];
++c_7320861.elements[38] = ((closureN)self_7312575)->elements[38];
++c_7320861.elements[39] = ((closureN)self_7312575)->elements[39];
++c_7320861.elements[40] = ((closureN)self_7312575)->elements[40];
++c_7320861.elements[41] = ((closureN)self_7312575)->elements[41];
++c_7320861.elements[42] = ((closureN)self_7312575)->elements[42];
++c_7320861.elements[43] = ((closureN)self_7312575)->elements[43];
++c_7320861.elements[44] = ((closureN)self_7312575)->elements[44];
++c_7320861.elements[45] = forms_733258;
++c_7320861.elements[46] = ((closureN)self_7312575)->elements[45];
++c_7320861.elements[47] = ((closureN)self_7312575)->elements[46];
++c_7320861.elements[48] = ((closureN)self_7312575)->elements[47];
++c_7320861.elements[49] = ((closureN)self_7312575)->elements[49];
++
++
++pair_type local_7322744;
++return_direct_with_clo1(data,(closure)&c_7320861,__lambda_1390, set_cell_as_expr(&local_7322744, ((closureN)self_7312575)->elements[48]));;
++}
++
++static void __lambda_1390(void *data, object self_7312576, int argc, object *args) /* object self_7312576, object next_91symbol_733259 */
++ {
++ object next_91symbol_733259 = args[0];
++
++closureN_type c_7320863;
++object e_7322736 [50];
++c_7320863.hdr.mark = gc_color_red;
++ c_7320863.hdr.grayed = 0;
++c_7320863.tag = closureN_tag;
++ c_7320863.fn = (function_type)__lambda_1389;
++c_7320863.num_args = 1;
++c_7320863.num_elements = 50;
++c_7320863.elements = (object *)e_7322736;
++c_7320863.elements[0] = ((closureN)self_7312576)->elements[0];
++c_7320863.elements[1] = ((closureN)self_7312576)->elements[1];
++c_7320863.elements[2] = ((closureN)self_7312576)->elements[2];
++c_7320863.elements[3] = ((closureN)self_7312576)->elements[3];
++c_7320863.elements[4] = ((closureN)self_7312576)->elements[4];
++c_7320863.elements[5] = ((closureN)self_7312576)->elements[5];
++c_7320863.elements[6] = ((closureN)self_7312576)->elements[6];
++c_7320863.elements[7] = ((closureN)self_7312576)->elements[7];
++c_7320863.elements[8] = ((closureN)self_7312576)->elements[8];
++c_7320863.elements[9] = ((closureN)self_7312576)->elements[9];
++c_7320863.elements[10] = ((closureN)self_7312576)->elements[10];
++c_7320863.elements[11] = ((closureN)self_7312576)->elements[11];
++c_7320863.elements[12] = ((closureN)self_7312576)->elements[12];
++c_7320863.elements[13] = ((closureN)self_7312576)->elements[13];
++c_7320863.elements[14] = ((closureN)self_7312576)->elements[14];
++c_7320863.elements[15] = ((closureN)self_7312576)->elements[15];
++c_7320863.elements[16] = ((closureN)self_7312576)->elements[16];
++c_7320863.elements[17] = ((closureN)self_7312576)->elements[17];
++c_7320863.elements[18] = ((closureN)self_7312576)->elements[18];
++c_7320863.elements[19] = ((closureN)self_7312576)->elements[19];
++c_7320863.elements[20] = ((closureN)self_7312576)->elements[20];
++c_7320863.elements[21] = ((closureN)self_7312576)->elements[21];
++c_7320863.elements[22] = ((closureN)self_7312576)->elements[22];
++c_7320863.elements[23] = ((closureN)self_7312576)->elements[23];
++c_7320863.elements[24] = ((closureN)self_7312576)->elements[24];
++c_7320863.elements[25] = ((closureN)self_7312576)->elements[25];
++c_7320863.elements[26] = ((closureN)self_7312576)->elements[26];
++c_7320863.elements[27] = ((closureN)self_7312576)->elements[27];
++c_7320863.elements[28] = ((closureN)self_7312576)->elements[28];
++c_7320863.elements[29] = ((closureN)self_7312576)->elements[29];
++c_7320863.elements[30] = ((closureN)self_7312576)->elements[30];
++c_7320863.elements[31] = ((closureN)self_7312576)->elements[31];
++c_7320863.elements[32] = ((closureN)self_7312576)->elements[32];
++c_7320863.elements[33] = ((closureN)self_7312576)->elements[33];
++c_7320863.elements[34] = ((closureN)self_7312576)->elements[34];
++c_7320863.elements[35] = ((closureN)self_7312576)->elements[35];
++c_7320863.elements[36] = ((closureN)self_7312576)->elements[36];
++c_7320863.elements[37] = ((closureN)self_7312576)->elements[37];
++c_7320863.elements[38] = ((closureN)self_7312576)->elements[38];
++c_7320863.elements[39] = ((closureN)self_7312576)->elements[39];
++c_7320863.elements[40] = ((closureN)self_7312576)->elements[40];
++c_7320863.elements[41] = ((closureN)self_7312576)->elements[41];
++c_7320863.elements[42] = ((closureN)self_7312576)->elements[43];
++c_7320863.elements[43] = ((closureN)self_7312576)->elements[44];
++c_7320863.elements[44] = ((closureN)self_7312576)->elements[45];
++c_7320863.elements[45] = ((closureN)self_7312576)->elements[46];
++c_7320863.elements[46] = ((closureN)self_7312576)->elements[47];
++c_7320863.elements[47] = ((closureN)self_7312576)->elements[48];
++c_7320863.elements[48] = next_91symbol_733259;
++c_7320863.elements[49] = ((closureN)self_7312576)->elements[49];
++
++
++pair_type local_7322739;
++return_direct_with_clo1(data,(closure)&c_7320863,__lambda_1389, set_cell_as_expr(&local_7322739, ((closureN)self_7312576)->elements[42]));;
++}
++
++static void __lambda_1389(void *data, object self_7312577, int argc, object *args) /* object self_7312577, object expand_91pattern_733260 */
++ {
++ object expand_91pattern_733260 = args[0];
++
++closureN_type c_7320865;
++object e_7322731 [50];
++c_7320865.hdr.mark = gc_color_red;
++ c_7320865.hdr.grayed = 0;
++c_7320865.tag = closureN_tag;
++ c_7320865.fn = (function_type)__lambda_1388;
++c_7320865.num_args = 1;
++c_7320865.num_elements = 50;
++c_7320865.elements = (object *)e_7322731;
++c_7320865.elements[0] = ((closureN)self_7312577)->elements[0];
++c_7320865.elements[1] = ((closureN)self_7312577)->elements[1];
++c_7320865.elements[2] = ((closureN)self_7312577)->elements[2];
++c_7320865.elements[3] = ((closureN)self_7312577)->elements[3];
++c_7320865.elements[4] = ((closureN)self_7312577)->elements[4];
++c_7320865.elements[5] = ((closureN)self_7312577)->elements[5];
++c_7320865.elements[6] = ((closureN)self_7312577)->elements[6];
++c_7320865.elements[7] = ((closureN)self_7312577)->elements[7];
++c_7320865.elements[8] = ((closureN)self_7312577)->elements[8];
++c_7320865.elements[9] = ((closureN)self_7312577)->elements[9];
++c_7320865.elements[10] = ((closureN)self_7312577)->elements[10];
++c_7320865.elements[11] = ((closureN)self_7312577)->elements[11];
++c_7320865.elements[12] = ((closureN)self_7312577)->elements[12];
++c_7320865.elements[13] = ((closureN)self_7312577)->elements[13];
++c_7320865.elements[14] = ((closureN)self_7312577)->elements[14];
++c_7320865.elements[15] = ((closureN)self_7312577)->elements[15];
++c_7320865.elements[16] = ((closureN)self_7312577)->elements[16];
++c_7320865.elements[17] = ((closureN)self_7312577)->elements[17];
++c_7320865.elements[18] = ((closureN)self_7312577)->elements[18];
++c_7320865.elements[19] = ((closureN)self_7312577)->elements[19];
++c_7320865.elements[20] = ((closureN)self_7312577)->elements[20];
++c_7320865.elements[21] = ((closureN)self_7312577)->elements[21];
++c_7320865.elements[22] = ((closureN)self_7312577)->elements[22];
++c_7320865.elements[23] = ((closureN)self_7312577)->elements[23];
++c_7320865.elements[24] = ((closureN)self_7312577)->elements[24];
++c_7320865.elements[25] = ((closureN)self_7312577)->elements[25];
++c_7320865.elements[26] = ((closureN)self_7312577)->elements[26];
++c_7320865.elements[27] = ((closureN)self_7312577)->elements[27];
++c_7320865.elements[28] = ((closureN)self_7312577)->elements[28];
++c_7320865.elements[29] = ((closureN)self_7312577)->elements[29];
++c_7320865.elements[30] = ((closureN)self_7312577)->elements[30];
++c_7320865.elements[31] = ((closureN)self_7312577)->elements[31];
++c_7320865.elements[32] = ((closureN)self_7312577)->elements[32];
++c_7320865.elements[33] = ((closureN)self_7312577)->elements[33];
++c_7320865.elements[34] = ((closureN)self_7312577)->elements[34];
++c_7320865.elements[35] = ((closureN)self_7312577)->elements[35];
++c_7320865.elements[36] = ((closureN)self_7312577)->elements[36];
++c_7320865.elements[37] = ((closureN)self_7312577)->elements[37];
++c_7320865.elements[38] = ((closureN)self_7312577)->elements[39];
++c_7320865.elements[39] = ((closureN)self_7312577)->elements[40];
++c_7320865.elements[40] = ((closureN)self_7312577)->elements[41];
++c_7320865.elements[41] = expand_91pattern_733260;
++c_7320865.elements[42] = ((closureN)self_7312577)->elements[42];
++c_7320865.elements[43] = ((closureN)self_7312577)->elements[43];
++c_7320865.elements[44] = ((closureN)self_7312577)->elements[44];
++c_7320865.elements[45] = ((closureN)self_7312577)->elements[45];
++c_7320865.elements[46] = ((closureN)self_7312577)->elements[46];
++c_7320865.elements[47] = ((closureN)self_7312577)->elements[47];
++c_7320865.elements[48] = ((closureN)self_7312577)->elements[48];
++c_7320865.elements[49] = ((closureN)self_7312577)->elements[49];
++
++
++pair_type local_7322734;
++return_direct_with_clo1(data,(closure)&c_7320865,__lambda_1388, set_cell_as_expr(&local_7322734, ((closureN)self_7312577)->elements[38]));;
++}
++
++static void __lambda_1388(void *data, object self_7312578, int argc, object *args) /* object self_7312578, object ellipsis_91escape_127_733261 */
++ {
++ object ellipsis_91escape_127_733261 = args[0];
++
++closureN_type c_7320867;
++object e_7322726 [50];
++c_7320867.hdr.mark = gc_color_red;
++ c_7320867.hdr.grayed = 0;
++c_7320867.tag = closureN_tag;
++ c_7320867.fn = (function_type)__lambda_1387;
++c_7320867.num_args = 1;
++c_7320867.num_elements = 50;
++c_7320867.elements = (object *)e_7322726;
++c_7320867.elements[0] = ((closureN)self_7312578)->elements[0];
++c_7320867.elements[1] = ((closureN)self_7312578)->elements[1];
++c_7320867.elements[2] = ((closureN)self_7312578)->elements[2];
++c_7320867.elements[3] = ((closureN)self_7312578)->elements[3];
++c_7320867.elements[4] = ((closureN)self_7312578)->elements[4];
++c_7320867.elements[5] = ((closureN)self_7312578)->elements[5];
++c_7320867.elements[6] = ((closureN)self_7312578)->elements[6];
++c_7320867.elements[7] = ((closureN)self_7312578)->elements[7];
++c_7320867.elements[8] = ((closureN)self_7312578)->elements[8];
++c_7320867.elements[9] = ((closureN)self_7312578)->elements[9];
++c_7320867.elements[10] = ((closureN)self_7312578)->elements[10];
++c_7320867.elements[11] = ((closureN)self_7312578)->elements[11];
++c_7320867.elements[12] = ((closureN)self_7312578)->elements[12];
++c_7320867.elements[13] = ((closureN)self_7312578)->elements[13];
++c_7320867.elements[14] = ((closureN)self_7312578)->elements[14];
++c_7320867.elements[15] = ((closureN)self_7312578)->elements[15];
++c_7320867.elements[16] = ((closureN)self_7312578)->elements[16];
++c_7320867.elements[17] = ((closureN)self_7312578)->elements[17];
++c_7320867.elements[18] = ((closureN)self_7312578)->elements[18];
++c_7320867.elements[19] = ((closureN)self_7312578)->elements[19];
++c_7320867.elements[20] = ((closureN)self_7312578)->elements[20];
++c_7320867.elements[21] = ((closureN)self_7312578)->elements[21];
++c_7320867.elements[22] = ((closureN)self_7312578)->elements[22];
++c_7320867.elements[23] = ((closureN)self_7312578)->elements[23];
++c_7320867.elements[24] = ((closureN)self_7312578)->elements[24];
++c_7320867.elements[25] = ((closureN)self_7312578)->elements[25];
++c_7320867.elements[26] = ((closureN)self_7312578)->elements[26];
++c_7320867.elements[27] = ((closureN)self_7312578)->elements[27];
++c_7320867.elements[28] = ((closureN)self_7312578)->elements[28];
++c_7320867.elements[29] = ((closureN)self_7312578)->elements[29];
++c_7320867.elements[30] = ((closureN)self_7312578)->elements[30];
++c_7320867.elements[31] = ((closureN)self_7312578)->elements[31];
++c_7320867.elements[32] = ((closureN)self_7312578)->elements[32];
++c_7320867.elements[33] = ((closureN)self_7312578)->elements[33];
++c_7320867.elements[34] = ((closureN)self_7312578)->elements[34];
++c_7320867.elements[35] = ((closureN)self_7312578)->elements[35];
++c_7320867.elements[36] = ((closureN)self_7312578)->elements[36];
++c_7320867.elements[37] = ((closureN)self_7312578)->elements[37];
++c_7320867.elements[38] = ellipsis_91escape_127_733261;
++c_7320867.elements[39] = ((closureN)self_7312578)->elements[38];
++c_7320867.elements[40] = ((closureN)self_7312578)->elements[39];
++c_7320867.elements[41] = ((closureN)self_7312578)->elements[41];
++c_7320867.elements[42] = ((closureN)self_7312578)->elements[42];
++c_7320867.elements[43] = ((closureN)self_7312578)->elements[43];
++c_7320867.elements[44] = ((closureN)self_7312578)->elements[44];
++c_7320867.elements[45] = ((closureN)self_7312578)->elements[45];
++c_7320867.elements[46] = ((closureN)self_7312578)->elements[46];
++c_7320867.elements[47] = ((closureN)self_7312578)->elements[47];
++c_7320867.elements[48] = ((closureN)self_7312578)->elements[48];
++c_7320867.elements[49] = ((closureN)self_7312578)->elements[49];
++
++
++pair_type local_7322729;
++return_direct_with_clo1(data,(closure)&c_7320867,__lambda_1387, set_cell_as_expr(&local_7322729, ((closureN)self_7312578)->elements[40]));;
++}
++
++static void __lambda_1387(void *data, object self_7312579, int argc, object *args) /* object self_7312579, object ellipsis_127_733262 */
++ {
++ object ellipsis_127_733262 = args[0];
++
++closureN_type c_7320869;
++object e_7322721 [50];
++c_7320869.hdr.mark = gc_color_red;
++ c_7320869.hdr.grayed = 0;
++c_7320869.tag = closureN_tag;
++ c_7320869.fn = (function_type)__lambda_1386;
++c_7320869.num_args = 1;
++c_7320869.num_elements = 50;
++c_7320869.elements = (object *)e_7322721;
++c_7320869.elements[0] = ((closureN)self_7312579)->elements[0];
++c_7320869.elements[1] = ((closureN)self_7312579)->elements[1];
++c_7320869.elements[2] = ((closureN)self_7312579)->elements[2];
++c_7320869.elements[3] = ((closureN)self_7312579)->elements[3];
++c_7320869.elements[4] = ((closureN)self_7312579)->elements[4];
++c_7320869.elements[5] = ((closureN)self_7312579)->elements[5];
++c_7320869.elements[6] = ((closureN)self_7312579)->elements[6];
++c_7320869.elements[7] = ((closureN)self_7312579)->elements[7];
++c_7320869.elements[8] = ((closureN)self_7312579)->elements[8];
++c_7320869.elements[9] = ((closureN)self_7312579)->elements[9];
++c_7320869.elements[10] = ((closureN)self_7312579)->elements[10];
++c_7320869.elements[11] = ((closureN)self_7312579)->elements[11];
++c_7320869.elements[12] = ((closureN)self_7312579)->elements[12];
++c_7320869.elements[13] = ((closureN)self_7312579)->elements[13];
++c_7320869.elements[14] = ((closureN)self_7312579)->elements[14];
++c_7320869.elements[15] = ((closureN)self_7312579)->elements[15];
++c_7320869.elements[16] = ((closureN)self_7312579)->elements[16];
++c_7320869.elements[17] = ((closureN)self_7312579)->elements[17];
++c_7320869.elements[18] = ((closureN)self_7312579)->elements[18];
++c_7320869.elements[19] = ((closureN)self_7312579)->elements[19];
++c_7320869.elements[20] = ((closureN)self_7312579)->elements[20];
++c_7320869.elements[21] = ((closureN)self_7312579)->elements[21];
++c_7320869.elements[22] = ((closureN)self_7312579)->elements[22];
++c_7320869.elements[23] = ((closureN)self_7312579)->elements[23];
++c_7320869.elements[24] = ((closureN)self_7312579)->elements[24];
++c_7320869.elements[25] = ((closureN)self_7312579)->elements[25];
++c_7320869.elements[26] = ((closureN)self_7312579)->elements[26];
++c_7320869.elements[27] = ((closureN)self_7312579)->elements[27];
++c_7320869.elements[28] = ((closureN)self_7312579)->elements[28];
++c_7320869.elements[29] = ((closureN)self_7312579)->elements[29];
++c_7320869.elements[30] = ((closureN)self_7312579)->elements[30];
++c_7320869.elements[31] = ((closureN)self_7312579)->elements[31];
++c_7320869.elements[32] = ((closureN)self_7312579)->elements[32];
++c_7320869.elements[33] = ((closureN)self_7312579)->elements[33];
++c_7320869.elements[34] = ((closureN)self_7312579)->elements[34];
++c_7320869.elements[35] = ((closureN)self_7312579)->elements[35];
++c_7320869.elements[36] = ((closureN)self_7312579)->elements[36];
++c_7320869.elements[37] = ((closureN)self_7312579)->elements[38];
++c_7320869.elements[38] = ((closureN)self_7312579)->elements[39];
++c_7320869.elements[39] = ((closureN)self_7312579)->elements[40];
++c_7320869.elements[40] = ellipsis_127_733262;
++c_7320869.elements[41] = ((closureN)self_7312579)->elements[41];
++c_7320869.elements[42] = ((closureN)self_7312579)->elements[42];
++c_7320869.elements[43] = ((closureN)self_7312579)->elements[43];
++c_7320869.elements[44] = ((closureN)self_7312579)->elements[44];
++c_7320869.elements[45] = ((closureN)self_7312579)->elements[45];
++c_7320869.elements[46] = ((closureN)self_7312579)->elements[46];
++c_7320869.elements[47] = ((closureN)self_7312579)->elements[47];
++c_7320869.elements[48] = ((closureN)self_7312579)->elements[48];
++c_7320869.elements[49] = ((closureN)self_7312579)->elements[49];
++
++
++pair_type local_7322724;
++return_direct_with_clo1(data,(closure)&c_7320869,__lambda_1386, set_cell_as_expr(&local_7322724, ((closureN)self_7312579)->elements[37]));;
++}
++
++static void __lambda_1386(void *data, object self_7312580, int argc, object *args) /* object self_7312580, object ellipsis_91depth_733263 */
++ {
++ object ellipsis_91depth_733263 = args[0];
++
++closureN_type c_7320871;
++object e_7322716 [50];
++c_7320871.hdr.mark = gc_color_red;
++ c_7320871.hdr.grayed = 0;
++c_7320871.tag = closureN_tag;
++ c_7320871.fn = (function_type)__lambda_1385;
++c_7320871.num_args = 1;
++c_7320871.num_elements = 50;
++c_7320871.elements = (object *)e_7322716;
++c_7320871.elements[0] = ((closureN)self_7312580)->elements[0];
++c_7320871.elements[1] = ((closureN)self_7312580)->elements[1];
++c_7320871.elements[2] = ((closureN)self_7312580)->elements[2];
++c_7320871.elements[3] = ((closureN)self_7312580)->elements[3];
++c_7320871.elements[4] = ((closureN)self_7312580)->elements[4];
++c_7320871.elements[5] = ((closureN)self_7312580)->elements[5];
++c_7320871.elements[6] = ((closureN)self_7312580)->elements[6];
++c_7320871.elements[7] = ((closureN)self_7312580)->elements[7];
++c_7320871.elements[8] = ((closureN)self_7312580)->elements[8];
++c_7320871.elements[9] = ((closureN)self_7312580)->elements[9];
++c_7320871.elements[10] = ((closureN)self_7312580)->elements[10];
++c_7320871.elements[11] = ((closureN)self_7312580)->elements[11];
++c_7320871.elements[12] = ((closureN)self_7312580)->elements[12];
++c_7320871.elements[13] = ((closureN)self_7312580)->elements[13];
++c_7320871.elements[14] = ((closureN)self_7312580)->elements[14];
++c_7320871.elements[15] = ((closureN)self_7312580)->elements[15];
++c_7320871.elements[16] = ((closureN)self_7312580)->elements[16];
++c_7320871.elements[17] = ((closureN)self_7312580)->elements[17];
++c_7320871.elements[18] = ((closureN)self_7312580)->elements[18];
++c_7320871.elements[19] = ((closureN)self_7312580)->elements[19];
++c_7320871.elements[20] = ((closureN)self_7312580)->elements[20];
++c_7320871.elements[21] = ((closureN)self_7312580)->elements[21];
++c_7320871.elements[22] = ((closureN)self_7312580)->elements[22];
++c_7320871.elements[23] = ((closureN)self_7312580)->elements[23];
++c_7320871.elements[24] = ((closureN)self_7312580)->elements[24];
++c_7320871.elements[25] = ((closureN)self_7312580)->elements[25];
++c_7320871.elements[26] = ((closureN)self_7312580)->elements[26];
++c_7320871.elements[27] = ((closureN)self_7312580)->elements[27];
++c_7320871.elements[28] = ((closureN)self_7312580)->elements[28];
++c_7320871.elements[29] = ((closureN)self_7312580)->elements[29];
++c_7320871.elements[30] = ((closureN)self_7312580)->elements[30];
++c_7320871.elements[31] = ((closureN)self_7312580)->elements[31];
++c_7320871.elements[32] = ((closureN)self_7312580)->elements[32];
++c_7320871.elements[33] = ((closureN)self_7312580)->elements[33];
++c_7320871.elements[34] = ((closureN)self_7312580)->elements[34];
++c_7320871.elements[35] = ((closureN)self_7312580)->elements[35];
++c_7320871.elements[36] = ((closureN)self_7312580)->elements[36];
++c_7320871.elements[37] = ellipsis_91depth_733263;
++c_7320871.elements[38] = ((closureN)self_7312580)->elements[37];
++c_7320871.elements[39] = ((closureN)self_7312580)->elements[38];
++c_7320871.elements[40] = ((closureN)self_7312580)->elements[40];
++c_7320871.elements[41] = ((closureN)self_7312580)->elements[41];
++c_7320871.elements[42] = ((closureN)self_7312580)->elements[42];
++c_7320871.elements[43] = ((closureN)self_7312580)->elements[43];
++c_7320871.elements[44] = ((closureN)self_7312580)->elements[44];
++c_7320871.elements[45] = ((closureN)self_7312580)->elements[45];
++c_7320871.elements[46] = ((closureN)self_7312580)->elements[46];
++c_7320871.elements[47] = ((closureN)self_7312580)->elements[47];
++c_7320871.elements[48] = ((closureN)self_7312580)->elements[48];
++c_7320871.elements[49] = ((closureN)self_7312580)->elements[49];
++
++
++pair_type local_7322719;
++return_direct_with_clo1(data,(closure)&c_7320871,__lambda_1385, set_cell_as_expr(&local_7322719, ((closureN)self_7312580)->elements[39]));;
++}
++
++static void __lambda_1385(void *data, object self_7312581, int argc, object *args) /* object self_7312581, object ellipsis_91tail_733264 */
++ {
++ object ellipsis_91tail_733264 = args[0];
++
++closureN_type c_7320873;
++object e_7322711 [50];
++c_7320873.hdr.mark = gc_color_red;
++ c_7320873.hdr.grayed = 0;
++c_7320873.tag = closureN_tag;
++ c_7320873.fn = (function_type)__lambda_1384;
++c_7320873.num_args = 1;
++c_7320873.num_elements = 50;
++c_7320873.elements = (object *)e_7322711;
++c_7320873.elements[0] = ((closureN)self_7312581)->elements[0];
++c_7320873.elements[1] = ((closureN)self_7312581)->elements[1];
++c_7320873.elements[2] = ((closureN)self_7312581)->elements[2];
++c_7320873.elements[3] = ((closureN)self_7312581)->elements[3];
++c_7320873.elements[4] = ((closureN)self_7312581)->elements[4];
++c_7320873.elements[5] = ((closureN)self_7312581)->elements[5];
++c_7320873.elements[6] = ((closureN)self_7312581)->elements[6];
++c_7320873.elements[7] = ((closureN)self_7312581)->elements[7];
++c_7320873.elements[8] = ((closureN)self_7312581)->elements[8];
++c_7320873.elements[9] = ((closureN)self_7312581)->elements[9];
++c_7320873.elements[10] = ((closureN)self_7312581)->elements[10];
++c_7320873.elements[11] = ((closureN)self_7312581)->elements[11];
++c_7320873.elements[12] = ((closureN)self_7312581)->elements[12];
++c_7320873.elements[13] = ((closureN)self_7312581)->elements[13];
++c_7320873.elements[14] = ((closureN)self_7312581)->elements[14];
++c_7320873.elements[15] = ((closureN)self_7312581)->elements[15];
++c_7320873.elements[16] = ((closureN)self_7312581)->elements[16];
++c_7320873.elements[17] = ((closureN)self_7312581)->elements[17];
++c_7320873.elements[18] = ((closureN)self_7312581)->elements[18];
++c_7320873.elements[19] = ((closureN)self_7312581)->elements[19];
++c_7320873.elements[20] = ((closureN)self_7312581)->elements[20];
++c_7320873.elements[21] = ((closureN)self_7312581)->elements[21];
++c_7320873.elements[22] = ((closureN)self_7312581)->elements[22];
++c_7320873.elements[23] = ((closureN)self_7312581)->elements[23];
++c_7320873.elements[24] = ((closureN)self_7312581)->elements[24];
++c_7320873.elements[25] = ((closureN)self_7312581)->elements[25];
++c_7320873.elements[26] = ((closureN)self_7312581)->elements[26];
++c_7320873.elements[27] = ((closureN)self_7312581)->elements[27];
++c_7320873.elements[28] = ((closureN)self_7312581)->elements[28];
++c_7320873.elements[29] = ((closureN)self_7312581)->elements[29];
++c_7320873.elements[30] = ((closureN)self_7312581)->elements[30];
++c_7320873.elements[31] = ((closureN)self_7312581)->elements[31];
++c_7320873.elements[32] = ((closureN)self_7312581)->elements[32];
++c_7320873.elements[33] = ((closureN)self_7312581)->elements[34];
++c_7320873.elements[34] = ((closureN)self_7312581)->elements[35];
++c_7320873.elements[35] = ((closureN)self_7312581)->elements[36];
++c_7320873.elements[36] = ((closureN)self_7312581)->elements[37];
++c_7320873.elements[37] = ((closureN)self_7312581)->elements[38];
++c_7320873.elements[38] = ((closureN)self_7312581)->elements[39];
++c_7320873.elements[39] = ellipsis_91tail_733264;
++c_7320873.elements[40] = ((closureN)self_7312581)->elements[40];
++c_7320873.elements[41] = ((closureN)self_7312581)->elements[41];
++c_7320873.elements[42] = ((closureN)self_7312581)->elements[42];
++c_7320873.elements[43] = ((closureN)self_7312581)->elements[43];
++c_7320873.elements[44] = ((closureN)self_7312581)->elements[44];
++c_7320873.elements[45] = ((closureN)self_7312581)->elements[45];
++c_7320873.elements[46] = ((closureN)self_7312581)->elements[46];
++c_7320873.elements[47] = ((closureN)self_7312581)->elements[47];
++c_7320873.elements[48] = ((closureN)self_7312581)->elements[48];
++c_7320873.elements[49] = ((closureN)self_7312581)->elements[49];
++
++
++pair_type local_7322714;
++return_direct_with_clo1(data,(closure)&c_7320873,__lambda_1384, set_cell_as_expr(&local_7322714, ((closureN)self_7312581)->elements[33]));;
++}
++
++static void __lambda_1384(void *data, object self_7312582, int argc, object *args) /* object self_7312582, object all_91vars_733265 */
++ {
++ object all_91vars_733265 = args[0];
++
++closureN_type c_7320875;
++object e_7322706 [50];
++c_7320875.hdr.mark = gc_color_red;
++ c_7320875.hdr.grayed = 0;
++c_7320875.tag = closureN_tag;
++ c_7320875.fn = (function_type)__lambda_1383;
++c_7320875.num_args = 1;
++c_7320875.num_elements = 50;
++c_7320875.elements = (object *)e_7322706;
++c_7320875.elements[0] = ((closureN)self_7312582)->elements[0];
++c_7320875.elements[1] = ((closureN)self_7312582)->elements[1];
++c_7320875.elements[2] = ((closureN)self_7312582)->elements[2];
++c_7320875.elements[3] = ((closureN)self_7312582)->elements[3];
++c_7320875.elements[4] = ((closureN)self_7312582)->elements[4];
++c_7320875.elements[5] = ((closureN)self_7312582)->elements[5];
++c_7320875.elements[6] = ((closureN)self_7312582)->elements[6];
++c_7320875.elements[7] = ((closureN)self_7312582)->elements[7];
++c_7320875.elements[8] = ((closureN)self_7312582)->elements[8];
++c_7320875.elements[9] = ((closureN)self_7312582)->elements[9];
++c_7320875.elements[10] = ((closureN)self_7312582)->elements[10];
++c_7320875.elements[11] = ((closureN)self_7312582)->elements[11];
++c_7320875.elements[12] = ((closureN)self_7312582)->elements[12];
++c_7320875.elements[13] = ((closureN)self_7312582)->elements[13];
++c_7320875.elements[14] = ((closureN)self_7312582)->elements[14];
++c_7320875.elements[15] = ((closureN)self_7312582)->elements[15];
++c_7320875.elements[16] = ((closureN)self_7312582)->elements[16];
++c_7320875.elements[17] = ((closureN)self_7312582)->elements[17];
++c_7320875.elements[18] = ((closureN)self_7312582)->elements[18];
++c_7320875.elements[19] = ((closureN)self_7312582)->elements[19];
++c_7320875.elements[20] = ((closureN)self_7312582)->elements[20];
++c_7320875.elements[21] = ((closureN)self_7312582)->elements[21];
++c_7320875.elements[22] = ((closureN)self_7312582)->elements[22];
++c_7320875.elements[23] = ((closureN)self_7312582)->elements[23];
++c_7320875.elements[24] = ((closureN)self_7312582)->elements[24];
++c_7320875.elements[25] = ((closureN)self_7312582)->elements[25];
++c_7320875.elements[26] = ((closureN)self_7312582)->elements[26];
++c_7320875.elements[27] = ((closureN)self_7312582)->elements[27];
++c_7320875.elements[28] = ((closureN)self_7312582)->elements[28];
++c_7320875.elements[29] = ((closureN)self_7312582)->elements[29];
++c_7320875.elements[30] = ((closureN)self_7312582)->elements[30];
++c_7320875.elements[31] = ((closureN)self_7312582)->elements[31];
++c_7320875.elements[32] = ((closureN)self_7312582)->elements[32];
++c_7320875.elements[33] = all_91vars_733265;
++c_7320875.elements[34] = ((closureN)self_7312582)->elements[33];
++c_7320875.elements[35] = ((closureN)self_7312582)->elements[34];
++c_7320875.elements[36] = ((closureN)self_7312582)->elements[35];
++c_7320875.elements[37] = ((closureN)self_7312582)->elements[36];
++c_7320875.elements[38] = ((closureN)self_7312582)->elements[37];
++c_7320875.elements[39] = ((closureN)self_7312582)->elements[38];
++c_7320875.elements[40] = ((closureN)self_7312582)->elements[39];
++c_7320875.elements[41] = ((closureN)self_7312582)->elements[40];
++c_7320875.elements[42] = ((closureN)self_7312582)->elements[41];
++c_7320875.elements[43] = ((closureN)self_7312582)->elements[42];
++c_7320875.elements[44] = ((closureN)self_7312582)->elements[43];
++c_7320875.elements[45] = ((closureN)self_7312582)->elements[44];
++c_7320875.elements[46] = ((closureN)self_7312582)->elements[46];
++c_7320875.elements[47] = ((closureN)self_7312582)->elements[47];
++c_7320875.elements[48] = ((closureN)self_7312582)->elements[48];
++c_7320875.elements[49] = ((closureN)self_7312582)->elements[49];
++
++
++pair_type local_7322709;
++return_direct_with_clo1(data,(closure)&c_7320875,__lambda_1383, set_cell_as_expr(&local_7322709, ((closureN)self_7312582)->elements[45]));;
++}
++
++static void __lambda_1383(void *data, object self_7312583, int argc, object *args) /* object self_7312583, object free_91vars_733266 */
++ {
++ object free_91vars_733266 = args[0];
++
++closureN_type c_7320877;
++object e_7322701 [50];
++c_7320877.hdr.mark = gc_color_red;
++ c_7320877.hdr.grayed = 0;
++c_7320877.tag = closureN_tag;
++ c_7320877.fn = (function_type)__lambda_1382;
++c_7320877.num_args = 1;
++c_7320877.num_elements = 50;
++c_7320877.elements = (object *)e_7322701;
++c_7320877.elements[0] = ((closureN)self_7312583)->elements[0];
++c_7320877.elements[1] = ((closureN)self_7312583)->elements[1];
++c_7320877.elements[2] = ((closureN)self_7312583)->elements[2];
++c_7320877.elements[3] = ((closureN)self_7312583)->elements[3];
++c_7320877.elements[4] = ((closureN)self_7312583)->elements[4];
++c_7320877.elements[5] = ((closureN)self_7312583)->elements[5];
++c_7320877.elements[6] = ((closureN)self_7312583)->elements[6];
++c_7320877.elements[7] = ((closureN)self_7312583)->elements[7];
++c_7320877.elements[8] = ((closureN)self_7312583)->elements[8];
++c_7320877.elements[9] = ((closureN)self_7312583)->elements[9];
++c_7320877.elements[10] = ((closureN)self_7312583)->elements[10];
++c_7320877.elements[11] = ((closureN)self_7312583)->elements[11];
++c_7320877.elements[12] = ((closureN)self_7312583)->elements[12];
++c_7320877.elements[13] = ((closureN)self_7312583)->elements[13];
++c_7320877.elements[14] = ((closureN)self_7312583)->elements[14];
++c_7320877.elements[15] = ((closureN)self_7312583)->elements[15];
++c_7320877.elements[16] = ((closureN)self_7312583)->elements[16];
++c_7320877.elements[17] = ((closureN)self_7312583)->elements[17];
++c_7320877.elements[18] = ((closureN)self_7312583)->elements[18];
++c_7320877.elements[19] = ((closureN)self_7312583)->elements[19];
++c_7320877.elements[20] = ((closureN)self_7312583)->elements[20];
++c_7320877.elements[21] = ((closureN)self_7312583)->elements[21];
++c_7320877.elements[22] = ((closureN)self_7312583)->elements[22];
++c_7320877.elements[23] = ((closureN)self_7312583)->elements[23];
++c_7320877.elements[24] = ((closureN)self_7312583)->elements[24];
++c_7320877.elements[25] = ((closureN)self_7312583)->elements[25];
++c_7320877.elements[26] = ((closureN)self_7312583)->elements[26];
++c_7320877.elements[27] = ((closureN)self_7312583)->elements[27];
++c_7320877.elements[28] = ((closureN)self_7312583)->elements[28];
++c_7320877.elements[29] = ((closureN)self_7312583)->elements[29];
++c_7320877.elements[30] = ((closureN)self_7312583)->elements[30];
++c_7320877.elements[31] = ((closureN)self_7312583)->elements[31];
++c_7320877.elements[32] = ((closureN)self_7312583)->elements[32];
++c_7320877.elements[33] = ((closureN)self_7312583)->elements[33];
++c_7320877.elements[34] = ((closureN)self_7312583)->elements[34];
++c_7320877.elements[35] = ((closureN)self_7312583)->elements[35];
++c_7320877.elements[36] = ((closureN)self_7312583)->elements[36];
++c_7320877.elements[37] = ((closureN)self_7312583)->elements[37];
++c_7320877.elements[38] = ((closureN)self_7312583)->elements[38];
++c_7320877.elements[39] = ((closureN)self_7312583)->elements[39];
++c_7320877.elements[40] = ((closureN)self_7312583)->elements[40];
++c_7320877.elements[41] = ((closureN)self_7312583)->elements[41];
++c_7320877.elements[42] = ((closureN)self_7312583)->elements[42];
++c_7320877.elements[43] = ((closureN)self_7312583)->elements[44];
++c_7320877.elements[44] = ((closureN)self_7312583)->elements[45];
++c_7320877.elements[45] = free_91vars_733266;
++c_7320877.elements[46] = ((closureN)self_7312583)->elements[46];
++c_7320877.elements[47] = ((closureN)self_7312583)->elements[47];
++c_7320877.elements[48] = ((closureN)self_7312583)->elements[48];
++c_7320877.elements[49] = ((closureN)self_7312583)->elements[49];
++
++
++pair_type local_7322704;
++return_direct_with_clo1(data,(closure)&c_7320877,__lambda_1382, set_cell_as_expr(&local_7322704, ((closureN)self_7312583)->elements[43]));;
++}
++
++static void __lambda_1382(void *data, object self_7312584, int argc, object *args) /* object self_7312584, object expand_91template_733267 */
++ {
++ object expand_91template_733267 = args[0];
++ object r_736313;
++ if( (boolean_f != ((closureN)self_7312584)->elements[39]) ){
++
++ r_736313 = Cyc_cadr(data, ((closureN)self_7312584)->elements[43]);
++} else {
++ r_736313 = quote__93_93_93;}
++;
++closureN_type c_7320887;
++object e_7322700 [51];
++c_7320887.hdr.mark = gc_color_red;
++ c_7320887.hdr.grayed = 0;
++c_7320887.tag = closureN_tag;
++ c_7320887.fn = (function_type)__lambda_850;
++c_7320887.num_args = 1;
++c_7320887.num_elements = 51;
++c_7320887.elements = (object *)e_7322700;
++c_7320887.elements[0] = ((closureN)self_7312584)->elements[0];
++c_7320887.elements[1] = ((closureN)self_7312584)->elements[1];
++c_7320887.elements[2] = ((closureN)self_7312584)->elements[2];
++c_7320887.elements[3] = ((closureN)self_7312584)->elements[3];
++c_7320887.elements[4] = ((closureN)self_7312584)->elements[4];
++c_7320887.elements[5] = ((closureN)self_7312584)->elements[5];
++c_7320887.elements[6] = ((closureN)self_7312584)->elements[6];
++c_7320887.elements[7] = ((closureN)self_7312584)->elements[7];
++c_7320887.elements[8] = ((closureN)self_7312584)->elements[8];
++c_7320887.elements[9] = ((closureN)self_7312584)->elements[9];
++c_7320887.elements[10] = ((closureN)self_7312584)->elements[10];
++c_7320887.elements[11] = ((closureN)self_7312584)->elements[11];
++c_7320887.elements[12] = ((closureN)self_7312584)->elements[12];
++c_7320887.elements[13] = ((closureN)self_7312584)->elements[13];
++c_7320887.elements[14] = ((closureN)self_7312584)->elements[14];
++c_7320887.elements[15] = ((closureN)self_7312584)->elements[15];
++c_7320887.elements[16] = ((closureN)self_7312584)->elements[16];
++c_7320887.elements[17] = ((closureN)self_7312584)->elements[17];
++c_7320887.elements[18] = ((closureN)self_7312584)->elements[18];
++c_7320887.elements[19] = ((closureN)self_7312584)->elements[19];
++c_7320887.elements[20] = ((closureN)self_7312584)->elements[20];
++c_7320887.elements[21] = ((closureN)self_7312584)->elements[21];
++c_7320887.elements[22] = ((closureN)self_7312584)->elements[22];
++c_7320887.elements[23] = ((closureN)self_7312584)->elements[23];
++c_7320887.elements[24] = ((closureN)self_7312584)->elements[24];
++c_7320887.elements[25] = ((closureN)self_7312584)->elements[25];
++c_7320887.elements[26] = ((closureN)self_7312584)->elements[26];
++c_7320887.elements[27] = ((closureN)self_7312584)->elements[27];
++c_7320887.elements[28] = ((closureN)self_7312584)->elements[28];
++c_7320887.elements[29] = ((closureN)self_7312584)->elements[29];
++c_7320887.elements[30] = ((closureN)self_7312584)->elements[30];
++c_7320887.elements[31] = ((closureN)self_7312584)->elements[31];
++c_7320887.elements[32] = ((closureN)self_7312584)->elements[32];
++c_7320887.elements[33] = ((closureN)self_7312584)->elements[33];
++c_7320887.elements[34] = ((closureN)self_7312584)->elements[34];
++c_7320887.elements[35] = ((closureN)self_7312584)->elements[35];
++c_7320887.elements[36] = ((closureN)self_7312584)->elements[36];
++c_7320887.elements[37] = ((closureN)self_7312584)->elements[37];
++c_7320887.elements[38] = ((closureN)self_7312584)->elements[38];
++c_7320887.elements[39] = ((closureN)self_7312584)->elements[39];
++c_7320887.elements[40] = ((closureN)self_7312584)->elements[40];
++c_7320887.elements[41] = ((closureN)self_7312584)->elements[41];
++c_7320887.elements[42] = ((closureN)self_7312584)->elements[42];
++c_7320887.elements[43] = expand_91template_733267;
++c_7320887.elements[44] = ((closureN)self_7312584)->elements[43];
++c_7320887.elements[45] = ((closureN)self_7312584)->elements[44];
++c_7320887.elements[46] = ((closureN)self_7312584)->elements[45];
++c_7320887.elements[47] = ((closureN)self_7312584)->elements[46];
++c_7320887.elements[48] = ((closureN)self_7312584)->elements[47];
++c_7320887.elements[49] = ((closureN)self_7312584)->elements[48];
++c_7320887.elements[50] = ((closureN)self_7312584)->elements[49];
++
++return_closcall2(data, ((closureN)self_7312584)->elements[49], &c_7320887, r_736313);;
++}
++
++static void __lambda_850(void *data, object self_7312585, int argc, object *args) /* object self_7312585, object r_736312 */
++ {
++ object r_736312 = args[0];
++
++closureN_type c_7320889;
++object e_7322696 [51];
++c_7320889.hdr.mark = gc_color_red;
++ c_7320889.hdr.grayed = 0;
++c_7320889.tag = closureN_tag;
++ c_7320889.fn = (function_type)__lambda_851;
++c_7320889.num_args = 1;
++c_7320889.num_elements = 51;
++c_7320889.elements = (object *)e_7322696;
++c_7320889.elements[0] = ((closureN)self_7312585)->elements[0];
++c_7320889.elements[1] = ((closureN)self_7312585)->elements[1];
++c_7320889.elements[2] = ((closureN)self_7312585)->elements[2];
++c_7320889.elements[3] = ((closureN)self_7312585)->elements[3];
++c_7320889.elements[4] = ((closureN)self_7312585)->elements[4];
++c_7320889.elements[5] = ((closureN)self_7312585)->elements[5];
++c_7320889.elements[6] = ((closureN)self_7312585)->elements[6];
++c_7320889.elements[7] = ((closureN)self_7312585)->elements[7];
++c_7320889.elements[8] = ((closureN)self_7312585)->elements[8];
++c_7320889.elements[9] = ((closureN)self_7312585)->elements[9];
++c_7320889.elements[10] = ((closureN)self_7312585)->elements[10];
++c_7320889.elements[11] = ((closureN)self_7312585)->elements[11];
++c_7320889.elements[12] = ((closureN)self_7312585)->elements[12];
++c_7320889.elements[13] = ((closureN)self_7312585)->elements[13];
++c_7320889.elements[14] = ((closureN)self_7312585)->elements[14];
++c_7320889.elements[15] = ((closureN)self_7312585)->elements[15];
++c_7320889.elements[16] = ((closureN)self_7312585)->elements[16];
++c_7320889.elements[17] = ((closureN)self_7312585)->elements[17];
++c_7320889.elements[18] = ((closureN)self_7312585)->elements[18];
++c_7320889.elements[19] = ((closureN)self_7312585)->elements[19];
++c_7320889.elements[20] = ((closureN)self_7312585)->elements[20];
++c_7320889.elements[21] = ((closureN)self_7312585)->elements[21];
++c_7320889.elements[22] = ((closureN)self_7312585)->elements[22];
++c_7320889.elements[23] = ((closureN)self_7312585)->elements[23];
++c_7320889.elements[24] = ((closureN)self_7312585)->elements[24];
++c_7320889.elements[25] = ((closureN)self_7312585)->elements[25];
++c_7320889.elements[26] = ((closureN)self_7312585)->elements[26];
++c_7320889.elements[27] = ((closureN)self_7312585)->elements[27];
++c_7320889.elements[28] = ((closureN)self_7312585)->elements[28];
++c_7320889.elements[29] = ((closureN)self_7312585)->elements[29];
++c_7320889.elements[30] = ((closureN)self_7312585)->elements[30];
++c_7320889.elements[31] = ((closureN)self_7312585)->elements[31];
++c_7320889.elements[32] = ((closureN)self_7312585)->elements[32];
++c_7320889.elements[33] = ((closureN)self_7312585)->elements[33];
++c_7320889.elements[34] = ((closureN)self_7312585)->elements[34];
++c_7320889.elements[35] = ((closureN)self_7312585)->elements[35];
++c_7320889.elements[36] = ((closureN)self_7312585)->elements[36];
++c_7320889.elements[37] = ((closureN)self_7312585)->elements[37];
++c_7320889.elements[38] = ((closureN)self_7312585)->elements[38];
++c_7320889.elements[39] = ((closureN)self_7312585)->elements[39];
++c_7320889.elements[40] = ((closureN)self_7312585)->elements[40];
++c_7320889.elements[41] = ((closureN)self_7312585)->elements[41];
++c_7320889.elements[42] = ((closureN)self_7312585)->elements[42];
++c_7320889.elements[43] = ((closureN)self_7312585)->elements[43];
++c_7320889.elements[44] = ((closureN)self_7312585)->elements[44];
++c_7320889.elements[45] = ((closureN)self_7312585)->elements[45];
++c_7320889.elements[46] = ((closureN)self_7312585)->elements[46];
++c_7320889.elements[47] = ((closureN)self_7312585)->elements[47];
++c_7320889.elements[48] = ((closureN)self_7312585)->elements[48];
++c_7320889.elements[49] = ((closureN)self_7312585)->elements[49];
++c_7320889.elements[50] = ((closureN)self_7312585)->elements[50];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320889,__lambda_851, Cyc_set_cell(data, ((closureN)self_7312585)->elements[36], r_736312));;
++}
++
++static void __lambda_851(void *data, object self_7312586, int argc, object *args) /* object self_7312586, object r_735932 */
++ {
++
++
++closureN_type c_7320891;
++object e_7320903 [2];
++c_7320891.hdr.mark = gc_color_red;
++ c_7320891.hdr.grayed = 0;
++c_7320891.tag = closureN_tag;
++ c_7320891.fn = (function_type)__lambda_852;
++c_7320891.num_args = 0;
++c_7320891.num_elements = 2;
++c_7320891.elements = (object *)e_7320903;
++c_7320891.elements[0] = ((closureN)self_7312586)->elements[39];
++c_7320891.elements[1] = ((closureN)self_7312586)->elements[44];
++
++
++closureN_type c_7320904;
++object e_7322695 [51];
++c_7320904.hdr.mark = gc_color_red;
++ c_7320904.hdr.grayed = 0;
++c_7320904.tag = closureN_tag;
++ c_7320904.fn = (function_type)__lambda_853;
++c_7320904.num_args = 1;
++c_7320904.num_elements = 51;
++c_7320904.elements = (object *)e_7322695;
++c_7320904.elements[0] = ((closureN)self_7312586)->elements[0];
++c_7320904.elements[1] = ((closureN)self_7312586)->elements[1];
++c_7320904.elements[2] = ((closureN)self_7312586)->elements[2];
++c_7320904.elements[3] = ((closureN)self_7312586)->elements[3];
++c_7320904.elements[4] = ((closureN)self_7312586)->elements[4];
++c_7320904.elements[5] = ((closureN)self_7312586)->elements[5];
++c_7320904.elements[6] = ((closureN)self_7312586)->elements[6];
++c_7320904.elements[7] = ((closureN)self_7312586)->elements[7];
++c_7320904.elements[8] = ((closureN)self_7312586)->elements[8];
++c_7320904.elements[9] = ((closureN)self_7312586)->elements[9];
++c_7320904.elements[10] = ((closureN)self_7312586)->elements[10];
++c_7320904.elements[11] = ((closureN)self_7312586)->elements[11];
++c_7320904.elements[12] = ((closureN)self_7312586)->elements[12];
++c_7320904.elements[13] = ((closureN)self_7312586)->elements[13];
++c_7320904.elements[14] = ((closureN)self_7312586)->elements[14];
++c_7320904.elements[15] = ((closureN)self_7312586)->elements[15];
++c_7320904.elements[16] = ((closureN)self_7312586)->elements[16];
++c_7320904.elements[17] = ((closureN)self_7312586)->elements[17];
++c_7320904.elements[18] = ((closureN)self_7312586)->elements[18];
++c_7320904.elements[19] = ((closureN)self_7312586)->elements[19];
++c_7320904.elements[20] = ((closureN)self_7312586)->elements[20];
++c_7320904.elements[21] = ((closureN)self_7312586)->elements[21];
++c_7320904.elements[22] = ((closureN)self_7312586)->elements[22];
++c_7320904.elements[23] = ((closureN)self_7312586)->elements[23];
++c_7320904.elements[24] = ((closureN)self_7312586)->elements[24];
++c_7320904.elements[25] = ((closureN)self_7312586)->elements[25];
++c_7320904.elements[26] = ((closureN)self_7312586)->elements[26];
++c_7320904.elements[27] = ((closureN)self_7312586)->elements[27];
++c_7320904.elements[28] = ((closureN)self_7312586)->elements[28];
++c_7320904.elements[29] = ((closureN)self_7312586)->elements[29];
++c_7320904.elements[30] = ((closureN)self_7312586)->elements[30];
++c_7320904.elements[31] = ((closureN)self_7312586)->elements[31];
++c_7320904.elements[32] = ((closureN)self_7312586)->elements[32];
++c_7320904.elements[33] = ((closureN)self_7312586)->elements[33];
++c_7320904.elements[34] = ((closureN)self_7312586)->elements[34];
++c_7320904.elements[35] = ((closureN)self_7312586)->elements[35];
++c_7320904.elements[36] = ((closureN)self_7312586)->elements[36];
++c_7320904.elements[37] = ((closureN)self_7312586)->elements[37];
++c_7320904.elements[38] = ((closureN)self_7312586)->elements[38];
++c_7320904.elements[39] = ((closureN)self_7312586)->elements[39];
++c_7320904.elements[40] = ((closureN)self_7312586)->elements[40];
++c_7320904.elements[41] = ((closureN)self_7312586)->elements[41];
++c_7320904.elements[42] = ((closureN)self_7312586)->elements[42];
++c_7320904.elements[43] = ((closureN)self_7312586)->elements[43];
++c_7320904.elements[44] = ((closureN)self_7312586)->elements[44];
++c_7320904.elements[45] = ((closureN)self_7312586)->elements[45];
++c_7320904.elements[46] = ((closureN)self_7312586)->elements[46];
++c_7320904.elements[47] = ((closureN)self_7312586)->elements[47];
++c_7320904.elements[48] = ((closureN)self_7312586)->elements[48];
++c_7320904.elements[49] = ((closureN)self_7312586)->elements[49];
++c_7320904.elements[50] = ((closureN)self_7312586)->elements[50];
++
++return_direct_with_clo1(data,(closure)&c_7320891,__lambda_852, &c_7320904);;
++}
++
++static void __lambda_853(void *data, object self_7312587, int argc, object *args) /* object self_7312587, object r_736309 */
++ {
++ object r_736309 = args[0];
++
++closureN_type c_7320906;
++object e_7322691 [51];
++c_7320906.hdr.mark = gc_color_red;
++ c_7320906.hdr.grayed = 0;
++c_7320906.tag = closureN_tag;
++ c_7320906.fn = (function_type)__lambda_854;
++c_7320906.num_args = 1;
++c_7320906.num_elements = 51;
++c_7320906.elements = (object *)e_7322691;
++c_7320906.elements[0] = ((closureN)self_7312587)->elements[0];
++c_7320906.elements[1] = ((closureN)self_7312587)->elements[1];
++c_7320906.elements[2] = ((closureN)self_7312587)->elements[2];
++c_7320906.elements[3] = ((closureN)self_7312587)->elements[3];
++c_7320906.elements[4] = ((closureN)self_7312587)->elements[4];
++c_7320906.elements[5] = ((closureN)self_7312587)->elements[5];
++c_7320906.elements[6] = ((closureN)self_7312587)->elements[6];
++c_7320906.elements[7] = ((closureN)self_7312587)->elements[7];
++c_7320906.elements[8] = ((closureN)self_7312587)->elements[8];
++c_7320906.elements[9] = ((closureN)self_7312587)->elements[9];
++c_7320906.elements[10] = ((closureN)self_7312587)->elements[10];
++c_7320906.elements[11] = ((closureN)self_7312587)->elements[11];
++c_7320906.elements[12] = ((closureN)self_7312587)->elements[12];
++c_7320906.elements[13] = ((closureN)self_7312587)->elements[13];
++c_7320906.elements[14] = ((closureN)self_7312587)->elements[14];
++c_7320906.elements[15] = ((closureN)self_7312587)->elements[15];
++c_7320906.elements[16] = ((closureN)self_7312587)->elements[16];
++c_7320906.elements[17] = ((closureN)self_7312587)->elements[17];
++c_7320906.elements[18] = ((closureN)self_7312587)->elements[18];
++c_7320906.elements[19] = ((closureN)self_7312587)->elements[19];
++c_7320906.elements[20] = ((closureN)self_7312587)->elements[20];
++c_7320906.elements[21] = ((closureN)self_7312587)->elements[21];
++c_7320906.elements[22] = ((closureN)self_7312587)->elements[22];
++c_7320906.elements[23] = ((closureN)self_7312587)->elements[23];
++c_7320906.elements[24] = ((closureN)self_7312587)->elements[24];
++c_7320906.elements[25] = ((closureN)self_7312587)->elements[25];
++c_7320906.elements[26] = ((closureN)self_7312587)->elements[26];
++c_7320906.elements[27] = ((closureN)self_7312587)->elements[27];
++c_7320906.elements[28] = ((closureN)self_7312587)->elements[28];
++c_7320906.elements[29] = ((closureN)self_7312587)->elements[29];
++c_7320906.elements[30] = ((closureN)self_7312587)->elements[30];
++c_7320906.elements[31] = ((closureN)self_7312587)->elements[31];
++c_7320906.elements[32] = ((closureN)self_7312587)->elements[32];
++c_7320906.elements[33] = ((closureN)self_7312587)->elements[33];
++c_7320906.elements[34] = ((closureN)self_7312587)->elements[34];
++c_7320906.elements[35] = ((closureN)self_7312587)->elements[35];
++c_7320906.elements[36] = ((closureN)self_7312587)->elements[36];
++c_7320906.elements[37] = ((closureN)self_7312587)->elements[37];
++c_7320906.elements[38] = ((closureN)self_7312587)->elements[38];
++c_7320906.elements[39] = ((closureN)self_7312587)->elements[39];
++c_7320906.elements[40] = ((closureN)self_7312587)->elements[40];
++c_7320906.elements[41] = ((closureN)self_7312587)->elements[41];
++c_7320906.elements[42] = ((closureN)self_7312587)->elements[42];
++c_7320906.elements[43] = ((closureN)self_7312587)->elements[43];
++c_7320906.elements[44] = ((closureN)self_7312587)->elements[44];
++c_7320906.elements[45] = ((closureN)self_7312587)->elements[45];
++c_7320906.elements[46] = ((closureN)self_7312587)->elements[46];
++c_7320906.elements[47] = ((closureN)self_7312587)->elements[47];
++c_7320906.elements[48] = ((closureN)self_7312587)->elements[48];
++c_7320906.elements[49] = ((closureN)self_7312587)->elements[49];
++c_7320906.elements[50] = ((closureN)self_7312587)->elements[50];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320906,__lambda_854, Cyc_set_cell(data, ((closureN)self_7312587)->elements[48], r_736309));;
++}
++
++static void __lambda_854(void *data, object self_7312588, int argc, object *args) /* object self_7312588, object r_735933 */
++ {
++
++
++closureN_type c_7320908;
++object e_7320920 [2];
++c_7320908.hdr.mark = gc_color_red;
++ c_7320908.hdr.grayed = 0;
++c_7320908.tag = closureN_tag;
++ c_7320908.fn = (function_type)__lambda_855;
++c_7320908.num_args = 0;
++c_7320908.num_elements = 2;
++c_7320908.elements = (object *)e_7320920;
++c_7320908.elements[0] = ((closureN)self_7312588)->elements[39];
++c_7320908.elements[1] = ((closureN)self_7312588)->elements[44];
++
++
++closureN_type c_7320921;
++object e_7322690 [50];
++c_7320921.hdr.mark = gc_color_red;
++ c_7320921.hdr.grayed = 0;
++c_7320921.tag = closureN_tag;
++ c_7320921.fn = (function_type)__lambda_856;
++c_7320921.num_args = 1;
++c_7320921.num_elements = 50;
++c_7320921.elements = (object *)e_7322690;
++c_7320921.elements[0] = ((closureN)self_7312588)->elements[0];
++c_7320921.elements[1] = ((closureN)self_7312588)->elements[1];
++c_7320921.elements[2] = ((closureN)self_7312588)->elements[2];
++c_7320921.elements[3] = ((closureN)self_7312588)->elements[3];
++c_7320921.elements[4] = ((closureN)self_7312588)->elements[4];
++c_7320921.elements[5] = ((closureN)self_7312588)->elements[5];
++c_7320921.elements[6] = ((closureN)self_7312588)->elements[6];
++c_7320921.elements[7] = ((closureN)self_7312588)->elements[7];
++c_7320921.elements[8] = ((closureN)self_7312588)->elements[8];
++c_7320921.elements[9] = ((closureN)self_7312588)->elements[9];
++c_7320921.elements[10] = ((closureN)self_7312588)->elements[10];
++c_7320921.elements[11] = ((closureN)self_7312588)->elements[11];
++c_7320921.elements[12] = ((closureN)self_7312588)->elements[12];
++c_7320921.elements[13] = ((closureN)self_7312588)->elements[13];
++c_7320921.elements[14] = ((closureN)self_7312588)->elements[14];
++c_7320921.elements[15] = ((closureN)self_7312588)->elements[15];
++c_7320921.elements[16] = ((closureN)self_7312588)->elements[16];
++c_7320921.elements[17] = ((closureN)self_7312588)->elements[17];
++c_7320921.elements[18] = ((closureN)self_7312588)->elements[18];
++c_7320921.elements[19] = ((closureN)self_7312588)->elements[19];
++c_7320921.elements[20] = ((closureN)self_7312588)->elements[20];
++c_7320921.elements[21] = ((closureN)self_7312588)->elements[21];
++c_7320921.elements[22] = ((closureN)self_7312588)->elements[22];
++c_7320921.elements[23] = ((closureN)self_7312588)->elements[23];
++c_7320921.elements[24] = ((closureN)self_7312588)->elements[24];
++c_7320921.elements[25] = ((closureN)self_7312588)->elements[25];
++c_7320921.elements[26] = ((closureN)self_7312588)->elements[26];
++c_7320921.elements[27] = ((closureN)self_7312588)->elements[27];
++c_7320921.elements[28] = ((closureN)self_7312588)->elements[28];
++c_7320921.elements[29] = ((closureN)self_7312588)->elements[29];
++c_7320921.elements[30] = ((closureN)self_7312588)->elements[30];
++c_7320921.elements[31] = ((closureN)self_7312588)->elements[31];
++c_7320921.elements[32] = ((closureN)self_7312588)->elements[32];
++c_7320921.elements[33] = ((closureN)self_7312588)->elements[33];
++c_7320921.elements[34] = ((closureN)self_7312588)->elements[34];
++c_7320921.elements[35] = ((closureN)self_7312588)->elements[35];
++c_7320921.elements[36] = ((closureN)self_7312588)->elements[36];
++c_7320921.elements[37] = ((closureN)self_7312588)->elements[37];
++c_7320921.elements[38] = ((closureN)self_7312588)->elements[38];
++c_7320921.elements[39] = ((closureN)self_7312588)->elements[40];
++c_7320921.elements[40] = ((closureN)self_7312588)->elements[41];
++c_7320921.elements[41] = ((closureN)self_7312588)->elements[42];
++c_7320921.elements[42] = ((closureN)self_7312588)->elements[43];
++c_7320921.elements[43] = ((closureN)self_7312588)->elements[44];
++c_7320921.elements[44] = ((closureN)self_7312588)->elements[45];
++c_7320921.elements[45] = ((closureN)self_7312588)->elements[46];
++c_7320921.elements[46] = ((closureN)self_7312588)->elements[47];
++c_7320921.elements[47] = ((closureN)self_7312588)->elements[48];
++c_7320921.elements[48] = ((closureN)self_7312588)->elements[49];
++c_7320921.elements[49] = ((closureN)self_7312588)->elements[50];
++
++return_direct_with_clo1(data,(closure)&c_7320908,__lambda_855, &c_7320921);;
++}
++
++static void __lambda_856(void *data, object self_7312589, int argc, object *args) /* object self_7312589, object r_736306 */
++ {
++ object r_736306 = args[0];
++
++closureN_type c_7320923;
++object e_7322686 [50];
++c_7320923.hdr.mark = gc_color_red;
++ c_7320923.hdr.grayed = 0;
++c_7320923.tag = closureN_tag;
++ c_7320923.fn = (function_type)__lambda_857;
++c_7320923.num_args = 1;
++c_7320923.num_elements = 50;
++c_7320923.elements = (object *)e_7322686;
++c_7320923.elements[0] = ((closureN)self_7312589)->elements[0];
++c_7320923.elements[1] = ((closureN)self_7312589)->elements[1];
++c_7320923.elements[2] = ((closureN)self_7312589)->elements[2];
++c_7320923.elements[3] = ((closureN)self_7312589)->elements[3];
++c_7320923.elements[4] = ((closureN)self_7312589)->elements[4];
++c_7320923.elements[5] = ((closureN)self_7312589)->elements[5];
++c_7320923.elements[6] = ((closureN)self_7312589)->elements[6];
++c_7320923.elements[7] = ((closureN)self_7312589)->elements[7];
++c_7320923.elements[8] = ((closureN)self_7312589)->elements[8];
++c_7320923.elements[9] = ((closureN)self_7312589)->elements[9];
++c_7320923.elements[10] = ((closureN)self_7312589)->elements[10];
++c_7320923.elements[11] = ((closureN)self_7312589)->elements[11];
++c_7320923.elements[12] = ((closureN)self_7312589)->elements[12];
++c_7320923.elements[13] = ((closureN)self_7312589)->elements[13];
++c_7320923.elements[14] = ((closureN)self_7312589)->elements[14];
++c_7320923.elements[15] = ((closureN)self_7312589)->elements[15];
++c_7320923.elements[16] = ((closureN)self_7312589)->elements[16];
++c_7320923.elements[17] = ((closureN)self_7312589)->elements[17];
++c_7320923.elements[18] = ((closureN)self_7312589)->elements[18];
++c_7320923.elements[19] = ((closureN)self_7312589)->elements[19];
++c_7320923.elements[20] = ((closureN)self_7312589)->elements[20];
++c_7320923.elements[21] = ((closureN)self_7312589)->elements[21];
++c_7320923.elements[22] = ((closureN)self_7312589)->elements[22];
++c_7320923.elements[23] = ((closureN)self_7312589)->elements[23];
++c_7320923.elements[24] = ((closureN)self_7312589)->elements[24];
++c_7320923.elements[25] = ((closureN)self_7312589)->elements[25];
++c_7320923.elements[26] = ((closureN)self_7312589)->elements[26];
++c_7320923.elements[27] = ((closureN)self_7312589)->elements[27];
++c_7320923.elements[28] = ((closureN)self_7312589)->elements[28];
++c_7320923.elements[29] = ((closureN)self_7312589)->elements[29];
++c_7320923.elements[30] = ((closureN)self_7312589)->elements[30];
++c_7320923.elements[31] = ((closureN)self_7312589)->elements[31];
++c_7320923.elements[32] = ((closureN)self_7312589)->elements[32];
++c_7320923.elements[33] = ((closureN)self_7312589)->elements[33];
++c_7320923.elements[34] = ((closureN)self_7312589)->elements[34];
++c_7320923.elements[35] = ((closureN)self_7312589)->elements[35];
++c_7320923.elements[36] = ((closureN)self_7312589)->elements[36];
++c_7320923.elements[37] = ((closureN)self_7312589)->elements[37];
++c_7320923.elements[38] = ((closureN)self_7312589)->elements[38];
++c_7320923.elements[39] = ((closureN)self_7312589)->elements[39];
++c_7320923.elements[40] = ((closureN)self_7312589)->elements[40];
++c_7320923.elements[41] = ((closureN)self_7312589)->elements[41];
++c_7320923.elements[42] = ((closureN)self_7312589)->elements[42];
++c_7320923.elements[43] = ((closureN)self_7312589)->elements[43];
++c_7320923.elements[44] = ((closureN)self_7312589)->elements[44];
++c_7320923.elements[45] = ((closureN)self_7312589)->elements[45];
++c_7320923.elements[46] = ((closureN)self_7312589)->elements[46];
++c_7320923.elements[47] = ((closureN)self_7312589)->elements[47];
++c_7320923.elements[48] = ((closureN)self_7312589)->elements[48];
++c_7320923.elements[49] = ((closureN)self_7312589)->elements[49];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320923,__lambda_857, Cyc_set_cell(data, ((closureN)self_7312589)->elements[44], r_736306));;
++}
++
++static void __lambda_857(void *data, object self_7312590, int argc, object *args) /* object self_7312590, object r_735934 */
++ {
++
++
++closureN_type c_7320925;
++object e_7322647 [48];
++c_7320925.hdr.mark = gc_color_red;
++ c_7320925.hdr.grayed = 0;
++c_7320925.tag = closureN_tag;
++ c_7320925.fn = (function_type)__lambda_858;
++c_7320925.num_args = 1;
++c_7320925.num_elements = 48;
++c_7320925.elements = (object *)e_7322647;
++c_7320925.elements[0] = ((closureN)self_7312590)->elements[0];
++c_7320925.elements[1] = ((closureN)self_7312590)->elements[1];
++c_7320925.elements[2] = ((closureN)self_7312590)->elements[2];
++c_7320925.elements[3] = ((closureN)self_7312590)->elements[3];
++c_7320925.elements[4] = ((closureN)self_7312590)->elements[4];
++c_7320925.elements[5] = ((closureN)self_7312590)->elements[5];
++c_7320925.elements[6] = ((closureN)self_7312590)->elements[6];
++c_7320925.elements[7] = ((closureN)self_7312590)->elements[7];
++c_7320925.elements[8] = ((closureN)self_7312590)->elements[8];
++c_7320925.elements[9] = ((closureN)self_7312590)->elements[9];
++c_7320925.elements[10] = ((closureN)self_7312590)->elements[10];
++c_7320925.elements[11] = ((closureN)self_7312590)->elements[11];
++c_7320925.elements[12] = ((closureN)self_7312590)->elements[12];
++c_7320925.elements[13] = ((closureN)self_7312590)->elements[13];
++c_7320925.elements[14] = ((closureN)self_7312590)->elements[14];
++c_7320925.elements[15] = ((closureN)self_7312590)->elements[15];
++c_7320925.elements[16] = ((closureN)self_7312590)->elements[16];
++c_7320925.elements[17] = ((closureN)self_7312590)->elements[17];
++c_7320925.elements[18] = ((closureN)self_7312590)->elements[18];
++c_7320925.elements[19] = ((closureN)self_7312590)->elements[19];
++c_7320925.elements[20] = ((closureN)self_7312590)->elements[20];
++c_7320925.elements[21] = ((closureN)self_7312590)->elements[21];
++c_7320925.elements[22] = ((closureN)self_7312590)->elements[22];
++c_7320925.elements[23] = ((closureN)self_7312590)->elements[23];
++c_7320925.elements[24] = ((closureN)self_7312590)->elements[24];
++c_7320925.elements[25] = ((closureN)self_7312590)->elements[25];
++c_7320925.elements[26] = ((closureN)self_7312590)->elements[26];
++c_7320925.elements[27] = ((closureN)self_7312590)->elements[27];
++c_7320925.elements[28] = ((closureN)self_7312590)->elements[28];
++c_7320925.elements[29] = ((closureN)self_7312590)->elements[29];
++c_7320925.elements[30] = ((closureN)self_7312590)->elements[30];
++c_7320925.elements[31] = ((closureN)self_7312590)->elements[31];
++c_7320925.elements[32] = ((closureN)self_7312590)->elements[32];
++c_7320925.elements[33] = ((closureN)self_7312590)->elements[33];
++c_7320925.elements[34] = ((closureN)self_7312590)->elements[34];
++c_7320925.elements[35] = ((closureN)self_7312590)->elements[36];
++c_7320925.elements[36] = ((closureN)self_7312590)->elements[37];
++c_7320925.elements[37] = ((closureN)self_7312590)->elements[38];
++c_7320925.elements[38] = ((closureN)self_7312590)->elements[39];
++c_7320925.elements[39] = ((closureN)self_7312590)->elements[40];
++c_7320925.elements[40] = ((closureN)self_7312590)->elements[41];
++c_7320925.elements[41] = ((closureN)self_7312590)->elements[42];
++c_7320925.elements[42] = ((closureN)self_7312590)->elements[43];
++c_7320925.elements[43] = ((closureN)self_7312590)->elements[44];
++c_7320925.elements[44] = ((closureN)self_7312590)->elements[45];
++c_7320925.elements[45] = ((closureN)self_7312590)->elements[46];
++c_7320925.elements[46] = ((closureN)self_7312590)->elements[47];
++c_7320925.elements[47] = ((closureN)self_7312590)->elements[48];
++
++
++closureN_type c_7322648;
++object e_7322685 [2];
++c_7322648.hdr.mark = gc_color_red;
++ c_7322648.hdr.grayed = 0;
++c_7322648.tag = closureN_tag;
++ c_7322648.fn = (function_type)__lambda_1020;
++c_7322648.num_args = 1;
++c_7322648.num_elements = 2;
++c_7322648.elements = (object *)e_7322685;
++c_7322648.elements[0] = ((closureN)self_7312590)->elements[35];
++c_7322648.elements[1] = ((closureN)self_7312590)->elements[49];
+
+-return_closcall2(data, ((closureN)self_7313792)->elements[8], &c_7322060, quote_and);;
++return_direct_with_clo1(data,(closure)&c_7320925,__lambda_858, &c_7322648);;
+ }
+
+-static void __lambda_818(void *data, object self_7313793, int argc, object *args) /* object self_7313793, object r_736354 */
++static void __lambda_1020(void *data, object self_7312591, int argc, object *args) /* object self_7312591, object k_736300, object s_731303_733268 */
+ {
+- object r_736354 = args[0];
++ object k_736300 = args[0]; object s_731303_733268 = args[1];
+
+-closureN_type c_7322063;
+-object e_7324129 [11];
+-c_7322063.hdr.mark = gc_color_red;
+- c_7322063.hdr.grayed = 0;
+-c_7322063.tag = closureN_tag;
+- c_7322063.fn = (function_type)__lambda_819;
+-c_7322063.num_args = 1;
+-c_7322063.num_elements = 11;
+-c_7322063.elements = (object *)e_7324129;
+-c_7322063.elements[0] = ((closureN)self_7313793)->elements[0];
+-c_7322063.elements[1] = ((closureN)self_7313793)->elements[1];
+-c_7322063.elements[2] = ((closureN)self_7313793)->elements[2];
+-c_7322063.elements[3] = ((closureN)self_7313793)->elements[3];
+-c_7322063.elements[4] = ((closureN)self_7313793)->elements[4];
+-c_7322063.elements[5] = ((closureN)self_7313793)->elements[5];
+-c_7322063.elements[6] = ((closureN)self_7313793)->elements[6];
+-c_7322063.elements[7] = ((closureN)self_7313793)->elements[7];
+-c_7322063.elements[8] = ((closureN)self_7313793)->elements[8];
+-c_7322063.elements[9] = r_736354;
+-c_7322063.elements[10] = ((closureN)self_7313793)->elements[9];
+-
+-return_closcall2(data, ((closureN)self_7313793)->elements[9], &c_7322063, quote_or);;
+-}
+-
+-static void __lambda_819(void *data, object self_7313794, int argc, object *args) /* object self_7313794, object r_736355 */
+- {
+- object r_736355 = args[0];
+-
+-closureN_type c_7322066;
+-object e_7324128 [12];
+-c_7322066.hdr.mark = gc_color_red;
+- c_7322066.hdr.grayed = 0;
+-c_7322066.tag = closureN_tag;
+- c_7322066.fn = (function_type)__lambda_820;
+-c_7322066.num_args = 1;
+-c_7322066.num_elements = 12;
+-c_7322066.elements = (object *)e_7324128;
+-c_7322066.elements[0] = ((closureN)self_7313794)->elements[0];
+-c_7322066.elements[1] = ((closureN)self_7313794)->elements[1];
+-c_7322066.elements[2] = ((closureN)self_7313794)->elements[2];
+-c_7322066.elements[3] = ((closureN)self_7313794)->elements[3];
+-c_7322066.elements[4] = ((closureN)self_7313794)->elements[4];
+-c_7322066.elements[5] = ((closureN)self_7313794)->elements[5];
+-c_7322066.elements[6] = ((closureN)self_7313794)->elements[6];
+-c_7322066.elements[7] = ((closureN)self_7313794)->elements[7];
+-c_7322066.elements[8] = ((closureN)self_7313794)->elements[8];
+-c_7322066.elements[9] = ((closureN)self_7313794)->elements[9];
+-c_7322066.elements[10] = r_736355;
+-c_7322066.elements[11] = ((closureN)self_7313794)->elements[10];
+-
+-return_closcall2(data, ((closureN)self_7313794)->elements[10], &c_7322066, quote_eq_127);;
+-}
+-
+-static void __lambda_820(void *data, object self_7313795, int argc, object *args) /* object self_7313795, object r_736356 */
+- {
+- object r_736356 = args[0];
+-
+-closureN_type c_7322069;
+-object e_7324127 [13];
+-c_7322069.hdr.mark = gc_color_red;
+- c_7322069.hdr.grayed = 0;
+-c_7322069.tag = closureN_tag;
+- c_7322069.fn = (function_type)__lambda_821;
+-c_7322069.num_args = 1;
+-c_7322069.num_elements = 13;
+-c_7322069.elements = (object *)e_7324127;
+-c_7322069.elements[0] = ((closureN)self_7313795)->elements[0];
+-c_7322069.elements[1] = ((closureN)self_7313795)->elements[1];
+-c_7322069.elements[2] = ((closureN)self_7313795)->elements[2];
+-c_7322069.elements[3] = ((closureN)self_7313795)->elements[3];
+-c_7322069.elements[4] = ((closureN)self_7313795)->elements[4];
+-c_7322069.elements[5] = ((closureN)self_7313795)->elements[5];
+-c_7322069.elements[6] = ((closureN)self_7313795)->elements[6];
+-c_7322069.elements[7] = ((closureN)self_7313795)->elements[7];
+-c_7322069.elements[8] = ((closureN)self_7313795)->elements[8];
+-c_7322069.elements[9] = ((closureN)self_7313795)->elements[9];
+-c_7322069.elements[10] = ((closureN)self_7313795)->elements[10];
+-c_7322069.elements[11] = r_736356;
+-c_7322069.elements[12] = ((closureN)self_7313795)->elements[11];
++closureN_type c_7322650;
++object e_7322678 [4];
++c_7322650.hdr.mark = gc_color_red;
++ c_7322650.hdr.grayed = 0;
++c_7322650.tag = closureN_tag;
++ c_7322650.fn = (function_type)__lambda_1021;
++c_7322650.num_args = 1;
++c_7322650.num_elements = 4;
++c_7322650.elements = (object *)e_7322678;
++c_7322650.elements[0] = ((closureN)self_7312591)->elements[0];
++c_7322650.elements[1] = k_736300;
++c_7322650.elements[2] = ((closureN)self_7312591)->elements[1];
++c_7322650.elements[3] = s_731303_733268;
++
++
++complex_num_type local_7322681;
+
+-return_closcall2(data, ((closureN)self_7313795)->elements[11], &c_7322069, quote_equal_127);;
++
++return_direct_with_clo1(data,(closure)&c_7322650,__lambda_1021, Cyc_fast_sum(data,&local_7322681, car(((closureN)self_7312591)->elements[0]), obj_int2obj(1)));;
+ }
+
+-static void __lambda_821(void *data, object self_7313796, int argc, object *args) /* object self_7313796, object r_736357 */
++static void __lambda_1021(void *data, object self_7312592, int argc, object *args) /* object self_7312592, object r_736305 */
+ {
+- object r_736357 = args[0];
++ object r_736305 = args[0];
+
+-closureN_type c_7322072;
+-object e_7324126 [14];
+-c_7322072.hdr.mark = gc_color_red;
+- c_7322072.hdr.grayed = 0;
+-c_7322072.tag = closureN_tag;
+- c_7322072.fn = (function_type)__lambda_822;
+-c_7322072.num_args = 1;
+-c_7322072.num_elements = 14;
+-c_7322072.elements = (object *)e_7324126;
+-c_7322072.elements[0] = ((closureN)self_7313796)->elements[0];
+-c_7322072.elements[1] = ((closureN)self_7313796)->elements[1];
+-c_7322072.elements[2] = ((closureN)self_7313796)->elements[2];
+-c_7322072.elements[3] = ((closureN)self_7313796)->elements[3];
+-c_7322072.elements[4] = ((closureN)self_7313796)->elements[4];
+-c_7322072.elements[5] = ((closureN)self_7313796)->elements[5];
+-c_7322072.elements[6] = ((closureN)self_7313796)->elements[6];
+-c_7322072.elements[7] = ((closureN)self_7313796)->elements[7];
+-c_7322072.elements[8] = ((closureN)self_7313796)->elements[8];
+-c_7322072.elements[9] = ((closureN)self_7313796)->elements[9];
+-c_7322072.elements[10] = ((closureN)self_7313796)->elements[10];
+-c_7322072.elements[11] = ((closureN)self_7313796)->elements[11];
+-c_7322072.elements[12] = r_736357;
+-c_7322072.elements[13] = ((closureN)self_7313796)->elements[12];
+-
+-return_closcall2(data, ((closureN)self_7313796)->elements[12], &c_7322072, quote_car);;
+-}
+-
+-static void __lambda_822(void *data, object self_7313797, int argc, object *args) /* object self_7313797, object r_736358 */
+- {
+- object r_736358 = args[0];
+-
+-closureN_type c_7322075;
+-object e_7324125 [15];
+-c_7322075.hdr.mark = gc_color_red;
+- c_7322075.hdr.grayed = 0;
+-c_7322075.tag = closureN_tag;
+- c_7322075.fn = (function_type)__lambda_823;
+-c_7322075.num_args = 1;
+-c_7322075.num_elements = 15;
+-c_7322075.elements = (object *)e_7324125;
+-c_7322075.elements[0] = ((closureN)self_7313797)->elements[0];
+-c_7322075.elements[1] = ((closureN)self_7313797)->elements[1];
+-c_7322075.elements[2] = ((closureN)self_7313797)->elements[2];
+-c_7322075.elements[3] = ((closureN)self_7313797)->elements[3];
+-c_7322075.elements[4] = ((closureN)self_7313797)->elements[4];
+-c_7322075.elements[5] = ((closureN)self_7313797)->elements[5];
+-c_7322075.elements[6] = ((closureN)self_7313797)->elements[6];
+-c_7322075.elements[7] = ((closureN)self_7313797)->elements[7];
+-c_7322075.elements[8] = ((closureN)self_7313797)->elements[8];
+-c_7322075.elements[9] = ((closureN)self_7313797)->elements[9];
+-c_7322075.elements[10] = ((closureN)self_7313797)->elements[10];
+-c_7322075.elements[11] = ((closureN)self_7313797)->elements[11];
+-c_7322075.elements[12] = ((closureN)self_7313797)->elements[12];
+-c_7322075.elements[13] = r_736358;
+-c_7322075.elements[14] = ((closureN)self_7313797)->elements[13];
+-
+-return_closcall2(data, ((closureN)self_7313797)->elements[13], &c_7322075, quote_cdr);;
+-}
+-
+-static void __lambda_823(void *data, object self_7313798, int argc, object *args) /* object self_7313798, object r_736359 */
+- {
+- object r_736359 = args[0];
+-
+-closureN_type c_7322078;
+-object e_7324124 [16];
+-c_7322078.hdr.mark = gc_color_red;
+- c_7322078.hdr.grayed = 0;
+-c_7322078.tag = closureN_tag;
+- c_7322078.fn = (function_type)__lambda_824;
+-c_7322078.num_args = 1;
+-c_7322078.num_elements = 16;
+-c_7322078.elements = (object *)e_7324124;
+-c_7322078.elements[0] = ((closureN)self_7313798)->elements[0];
+-c_7322078.elements[1] = ((closureN)self_7313798)->elements[1];
+-c_7322078.elements[2] = ((closureN)self_7313798)->elements[2];
+-c_7322078.elements[3] = ((closureN)self_7313798)->elements[3];
+-c_7322078.elements[4] = ((closureN)self_7313798)->elements[4];
+-c_7322078.elements[5] = ((closureN)self_7313798)->elements[5];
+-c_7322078.elements[6] = ((closureN)self_7313798)->elements[6];
+-c_7322078.elements[7] = ((closureN)self_7313798)->elements[7];
+-c_7322078.elements[8] = ((closureN)self_7313798)->elements[8];
+-c_7322078.elements[9] = ((closureN)self_7313798)->elements[9];
+-c_7322078.elements[10] = ((closureN)self_7313798)->elements[10];
+-c_7322078.elements[11] = ((closureN)self_7313798)->elements[11];
+-c_7322078.elements[12] = ((closureN)self_7313798)->elements[12];
+-c_7322078.elements[13] = ((closureN)self_7313798)->elements[13];
+-c_7322078.elements[14] = r_736359;
+-c_7322078.elements[15] = ((closureN)self_7313798)->elements[14];
++closureN_type c_7322652;
++object e_7322674 [4];
++c_7322652.hdr.mark = gc_color_red;
++ c_7322652.hdr.grayed = 0;
++c_7322652.tag = closureN_tag;
++ c_7322652.fn = (function_type)__lambda_1022;
++c_7322652.num_args = 1;
++c_7322652.num_elements = 4;
++c_7322652.elements = (object *)e_7322674;
++c_7322652.elements[0] = ((closureN)self_7312592)->elements[0];
++c_7322652.elements[1] = ((closureN)self_7312592)->elements[1];
++c_7322652.elements[2] = ((closureN)self_7312592)->elements[2];
++c_7322652.elements[3] = ((closureN)self_7312592)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313798)->elements[14], &c_7322078, quote_cons);;
++
++
++return_direct_with_clo1(data,(closure)&c_7322652,__lambda_1022, Cyc_set_cell(data, ((closureN)self_7312592)->elements[0], r_736305));;
+ }
+
+-static void __lambda_824(void *data, object self_7313799, int argc, object *args) /* object self_7313799, object r_736360 */
++static void __lambda_1022(void *data, object self_7312593, int argc, object *args) /* object self_7312593, object r_736301 */
+ {
+- object r_736360 = args[0];
++
+
+-closureN_type c_7322081;
+-object e_7324123 [17];
+-c_7322081.hdr.mark = gc_color_red;
+- c_7322081.hdr.grayed = 0;
+-c_7322081.tag = closureN_tag;
+- c_7322081.fn = (function_type)__lambda_825;
+-c_7322081.num_args = 1;
+-c_7322081.num_elements = 17;
+-c_7322081.elements = (object *)e_7324123;
+-c_7322081.elements[0] = ((closureN)self_7313799)->elements[0];
+-c_7322081.elements[1] = ((closureN)self_7313799)->elements[1];
+-c_7322081.elements[2] = ((closureN)self_7313799)->elements[2];
+-c_7322081.elements[3] = ((closureN)self_7313799)->elements[3];
+-c_7322081.elements[4] = ((closureN)self_7313799)->elements[4];
+-c_7322081.elements[5] = ((closureN)self_7313799)->elements[5];
+-c_7322081.elements[6] = ((closureN)self_7313799)->elements[6];
+-c_7322081.elements[7] = ((closureN)self_7313799)->elements[7];
+-c_7322081.elements[8] = ((closureN)self_7313799)->elements[8];
+-c_7322081.elements[9] = ((closureN)self_7313799)->elements[9];
+-c_7322081.elements[10] = ((closureN)self_7313799)->elements[10];
+-c_7322081.elements[11] = ((closureN)self_7313799)->elements[11];
+-c_7322081.elements[12] = ((closureN)self_7313799)->elements[12];
+-c_7322081.elements[13] = ((closureN)self_7313799)->elements[13];
+-c_7322081.elements[14] = ((closureN)self_7313799)->elements[14];
+-c_7322081.elements[15] = r_736360;
+-c_7322081.elements[16] = ((closureN)self_7313799)->elements[15];
+-
+-return_closcall2(data, ((closureN)self_7313799)->elements[15], &c_7322081, quote_pair_127);;
+-}
+-
+-static void __lambda_825(void *data, object self_7313800, int argc, object *args) /* object self_7313800, object r_736361 */
+- {
+- object r_736361 = args[0];
+-
+-closureN_type c_7322084;
+-object e_7324122 [18];
+-c_7322084.hdr.mark = gc_color_red;
+- c_7322084.hdr.grayed = 0;
+-c_7322084.tag = closureN_tag;
+- c_7322084.fn = (function_type)__lambda_826;
+-c_7322084.num_args = 1;
+-c_7322084.num_elements = 18;
+-c_7322084.elements = (object *)e_7324122;
+-c_7322084.elements[0] = ((closureN)self_7313800)->elements[0];
+-c_7322084.elements[1] = ((closureN)self_7313800)->elements[1];
+-c_7322084.elements[2] = ((closureN)self_7313800)->elements[2];
+-c_7322084.elements[3] = ((closureN)self_7313800)->elements[3];
+-c_7322084.elements[4] = ((closureN)self_7313800)->elements[4];
+-c_7322084.elements[5] = ((closureN)self_7313800)->elements[5];
+-c_7322084.elements[6] = ((closureN)self_7313800)->elements[6];
+-c_7322084.elements[7] = ((closureN)self_7313800)->elements[7];
+-c_7322084.elements[8] = ((closureN)self_7313800)->elements[8];
+-c_7322084.elements[9] = ((closureN)self_7313800)->elements[9];
+-c_7322084.elements[10] = ((closureN)self_7313800)->elements[10];
+-c_7322084.elements[11] = ((closureN)self_7313800)->elements[11];
+-c_7322084.elements[12] = ((closureN)self_7313800)->elements[12];
+-c_7322084.elements[13] = ((closureN)self_7313800)->elements[13];
+-c_7322084.elements[14] = ((closureN)self_7313800)->elements[14];
+-c_7322084.elements[15] = ((closureN)self_7313800)->elements[15];
+-c_7322084.elements[16] = r_736361;
+-c_7322084.elements[17] = ((closureN)self_7313800)->elements[16];
+-
+-return_closcall2(data, ((closureN)self_7313800)->elements[16], &c_7322084, quote_null_127);;
+-}
+-
+-static void __lambda_826(void *data, object self_7313801, int argc, object *args) /* object self_7313801, object r_736362 */
+- {
+- object r_736362 = args[0];
+-
+-closureN_type c_7322087;
+-object e_7324121 [19];
+-c_7322087.hdr.mark = gc_color_red;
+- c_7322087.hdr.grayed = 0;
+-c_7322087.tag = closureN_tag;
+- c_7322087.fn = (function_type)__lambda_827;
+-c_7322087.num_args = 1;
+-c_7322087.num_elements = 19;
+-c_7322087.elements = (object *)e_7324121;
+-c_7322087.elements[0] = ((closureN)self_7313801)->elements[0];
+-c_7322087.elements[1] = ((closureN)self_7313801)->elements[1];
+-c_7322087.elements[2] = ((closureN)self_7313801)->elements[2];
+-c_7322087.elements[3] = ((closureN)self_7313801)->elements[3];
+-c_7322087.elements[4] = ((closureN)self_7313801)->elements[4];
+-c_7322087.elements[5] = ((closureN)self_7313801)->elements[5];
+-c_7322087.elements[6] = ((closureN)self_7313801)->elements[6];
+-c_7322087.elements[7] = ((closureN)self_7313801)->elements[7];
+-c_7322087.elements[8] = ((closureN)self_7313801)->elements[8];
+-c_7322087.elements[9] = ((closureN)self_7313801)->elements[9];
+-c_7322087.elements[10] = ((closureN)self_7313801)->elements[10];
+-c_7322087.elements[11] = ((closureN)self_7313801)->elements[11];
+-c_7322087.elements[12] = ((closureN)self_7313801)->elements[12];
+-c_7322087.elements[13] = ((closureN)self_7313801)->elements[13];
+-c_7322087.elements[14] = ((closureN)self_7313801)->elements[14];
+-c_7322087.elements[15] = ((closureN)self_7313801)->elements[15];
+-c_7322087.elements[16] = ((closureN)self_7313801)->elements[16];
+-c_7322087.elements[17] = r_736362;
+-c_7322087.elements[18] = ((closureN)self_7313801)->elements[17];
+-
+-return_closcall2(data, ((closureN)self_7313801)->elements[17], &c_7322087, quote_expr);;
+-}
+-
+-static void __lambda_827(void *data, object self_7313802, int argc, object *args) /* object self_7313802, object r_736363 */
+- {
+- object r_736363 = args[0];
+-
+-closureN_type c_7322090;
+-object e_7324120 [20];
+-c_7322090.hdr.mark = gc_color_red;
+- c_7322090.hdr.grayed = 0;
+-c_7322090.tag = closureN_tag;
+- c_7322090.fn = (function_type)__lambda_828;
+-c_7322090.num_args = 1;
+-c_7322090.num_elements = 20;
+-c_7322090.elements = (object *)e_7324120;
+-c_7322090.elements[0] = ((closureN)self_7313802)->elements[0];
+-c_7322090.elements[1] = ((closureN)self_7313802)->elements[1];
+-c_7322090.elements[2] = ((closureN)self_7313802)->elements[2];
+-c_7322090.elements[3] = ((closureN)self_7313802)->elements[3];
+-c_7322090.elements[4] = ((closureN)self_7313802)->elements[4];
+-c_7322090.elements[5] = ((closureN)self_7313802)->elements[5];
+-c_7322090.elements[6] = ((closureN)self_7313802)->elements[6];
+-c_7322090.elements[7] = ((closureN)self_7313802)->elements[7];
+-c_7322090.elements[8] = ((closureN)self_7313802)->elements[8];
+-c_7322090.elements[9] = ((closureN)self_7313802)->elements[9];
+-c_7322090.elements[10] = ((closureN)self_7313802)->elements[10];
+-c_7322090.elements[11] = ((closureN)self_7313802)->elements[11];
+-c_7322090.elements[12] = ((closureN)self_7313802)->elements[12];
+-c_7322090.elements[13] = ((closureN)self_7313802)->elements[13];
+-c_7322090.elements[14] = ((closureN)self_7313802)->elements[14];
+-c_7322090.elements[15] = ((closureN)self_7313802)->elements[15];
+-c_7322090.elements[16] = ((closureN)self_7313802)->elements[16];
+-c_7322090.elements[17] = ((closureN)self_7313802)->elements[17];
+-c_7322090.elements[18] = r_736363;
+-c_7322090.elements[19] = ((closureN)self_7313802)->elements[18];
+-
+-return_closcall2(data, ((closureN)self_7313802)->elements[18], &c_7322090, quote_rename);;
+-}
+-
+-static void __lambda_828(void *data, object self_7313803, int argc, object *args) /* object self_7313803, object r_736364 */
+- {
+- object r_736364 = args[0];
+-
+-closureN_type c_7322093;
+-object e_7324119 [21];
+-c_7322093.hdr.mark = gc_color_red;
+- c_7322093.hdr.grayed = 0;
+-c_7322093.tag = closureN_tag;
+- c_7322093.fn = (function_type)__lambda_829;
+-c_7322093.num_args = 1;
+-c_7322093.num_elements = 21;
+-c_7322093.elements = (object *)e_7324119;
+-c_7322093.elements[0] = ((closureN)self_7313803)->elements[0];
+-c_7322093.elements[1] = ((closureN)self_7313803)->elements[1];
+-c_7322093.elements[2] = ((closureN)self_7313803)->elements[2];
+-c_7322093.elements[3] = ((closureN)self_7313803)->elements[3];
+-c_7322093.elements[4] = ((closureN)self_7313803)->elements[4];
+-c_7322093.elements[5] = ((closureN)self_7313803)->elements[5];
+-c_7322093.elements[6] = ((closureN)self_7313803)->elements[6];
+-c_7322093.elements[7] = ((closureN)self_7313803)->elements[7];
+-c_7322093.elements[8] = ((closureN)self_7313803)->elements[8];
+-c_7322093.elements[9] = ((closureN)self_7313803)->elements[9];
+-c_7322093.elements[10] = ((closureN)self_7313803)->elements[10];
+-c_7322093.elements[11] = ((closureN)self_7313803)->elements[11];
+-c_7322093.elements[12] = ((closureN)self_7313803)->elements[12];
+-c_7322093.elements[13] = ((closureN)self_7313803)->elements[13];
+-c_7322093.elements[14] = ((closureN)self_7313803)->elements[14];
+-c_7322093.elements[15] = ((closureN)self_7313803)->elements[15];
+-c_7322093.elements[16] = ((closureN)self_7313803)->elements[16];
+-c_7322093.elements[17] = ((closureN)self_7313803)->elements[17];
+-c_7322093.elements[18] = ((closureN)self_7313803)->elements[18];
+-c_7322093.elements[19] = r_736364;
+-c_7322093.elements[20] = ((closureN)self_7313803)->elements[19];
++closureN_type c_7322654;
++object e_7322667 [3];
++c_7322654.hdr.mark = gc_color_red;
++ c_7322654.hdr.grayed = 0;
++c_7322654.tag = closureN_tag;
++ c_7322654.fn = (function_type)__lambda_1023;
++c_7322654.num_args = 1;
++c_7322654.num_elements = 3;
++c_7322654.elements = (object *)e_7322667;
++c_7322654.elements[0] = ((closureN)self_7312593)->elements[1];
++c_7322654.elements[1] = ((closureN)self_7312593)->elements[2];
++c_7322654.elements[2] = ((closureN)self_7312593)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313803)->elements[19], &c_7322093, quote_compare);;
++
++
++
++object c_7322670 = Cyc_number2string2(data,(closure)&c_7322654,1,car(((closureN)self_7312593)->elements[0]));
++return_closcall1(data,(closure)&c_7322654, c_7322670);;
+ }
+
+-static void __lambda_829(void *data, object self_7313804, int argc, object *args) /* object self_7313804, object r_736365 */
++static void __lambda_1023(void *data, object self_7312594, int argc, object *args) /* object self_7312594, object r_736304 */
+ {
+- object r_736365 = args[0];
++ object r_736304 = args[0];
+
+-closureN_type c_7322096;
+-object e_7324118 [22];
+-c_7322096.hdr.mark = gc_color_red;
+- c_7322096.hdr.grayed = 0;
+-c_7322096.tag = closureN_tag;
+- c_7322096.fn = (function_type)__lambda_830;
+-c_7322096.num_args = 1;
+-c_7322096.num_elements = 22;
+-c_7322096.elements = (object *)e_7324118;
+-c_7322096.elements[0] = ((closureN)self_7313804)->elements[0];
+-c_7322096.elements[1] = ((closureN)self_7313804)->elements[1];
+-c_7322096.elements[2] = ((closureN)self_7313804)->elements[2];
+-c_7322096.elements[3] = ((closureN)self_7313804)->elements[3];
+-c_7322096.elements[4] = ((closureN)self_7313804)->elements[4];
+-c_7322096.elements[5] = ((closureN)self_7313804)->elements[5];
+-c_7322096.elements[6] = ((closureN)self_7313804)->elements[6];
+-c_7322096.elements[7] = ((closureN)self_7313804)->elements[7];
+-c_7322096.elements[8] = ((closureN)self_7313804)->elements[8];
+-c_7322096.elements[9] = ((closureN)self_7313804)->elements[9];
+-c_7322096.elements[10] = ((closureN)self_7313804)->elements[10];
+-c_7322096.elements[11] = ((closureN)self_7313804)->elements[11];
+-c_7322096.elements[12] = ((closureN)self_7313804)->elements[12];
+-c_7322096.elements[13] = ((closureN)self_7313804)->elements[13];
+-c_7322096.elements[14] = ((closureN)self_7313804)->elements[14];
+-c_7322096.elements[15] = ((closureN)self_7313804)->elements[15];
+-c_7322096.elements[16] = ((closureN)self_7313804)->elements[16];
+-c_7322096.elements[17] = ((closureN)self_7313804)->elements[17];
+-c_7322096.elements[18] = ((closureN)self_7313804)->elements[18];
+-c_7322096.elements[19] = ((closureN)self_7313804)->elements[19];
+-c_7322096.elements[20] = r_736365;
+-c_7322096.elements[21] = ((closureN)self_7313804)->elements[20];
+-
+-return_closcall2(data, ((closureN)self_7313804)->elements[20], &c_7322096, quote_quote);;
+-}
+-
+-static void __lambda_830(void *data, object self_7313805, int argc, object *args) /* object self_7313805, object r_736366 */
+- {
+- object r_736366 = args[0];
+-
+-closureN_type c_7322099;
+-object e_7324117 [23];
+-c_7322099.hdr.mark = gc_color_red;
+- c_7322099.hdr.grayed = 0;
+-c_7322099.tag = closureN_tag;
+- c_7322099.fn = (function_type)__lambda_831;
+-c_7322099.num_args = 1;
+-c_7322099.num_elements = 23;
+-c_7322099.elements = (object *)e_7324117;
+-c_7322099.elements[0] = ((closureN)self_7313805)->elements[0];
+-c_7322099.elements[1] = ((closureN)self_7313805)->elements[1];
+-c_7322099.elements[2] = ((closureN)self_7313805)->elements[2];
+-c_7322099.elements[3] = ((closureN)self_7313805)->elements[3];
+-c_7322099.elements[4] = ((closureN)self_7313805)->elements[4];
+-c_7322099.elements[5] = ((closureN)self_7313805)->elements[5];
+-c_7322099.elements[6] = ((closureN)self_7313805)->elements[6];
+-c_7322099.elements[7] = ((closureN)self_7313805)->elements[7];
+-c_7322099.elements[8] = ((closureN)self_7313805)->elements[8];
+-c_7322099.elements[9] = ((closureN)self_7313805)->elements[9];
+-c_7322099.elements[10] = ((closureN)self_7313805)->elements[10];
+-c_7322099.elements[11] = ((closureN)self_7313805)->elements[11];
+-c_7322099.elements[12] = ((closureN)self_7313805)->elements[12];
+-c_7322099.elements[13] = ((closureN)self_7313805)->elements[13];
+-c_7322099.elements[14] = ((closureN)self_7313805)->elements[14];
+-c_7322099.elements[15] = ((closureN)self_7313805)->elements[15];
+-c_7322099.elements[16] = ((closureN)self_7313805)->elements[16];
+-c_7322099.elements[17] = ((closureN)self_7313805)->elements[17];
+-c_7322099.elements[18] = ((closureN)self_7313805)->elements[18];
+-c_7322099.elements[19] = ((closureN)self_7313805)->elements[19];
+-c_7322099.elements[20] = ((closureN)self_7313805)->elements[20];
+-c_7322099.elements[21] = r_736366;
+-c_7322099.elements[22] = ((closureN)self_7313805)->elements[21];
+-
+-return_closcall2(data, ((closureN)self_7313805)->elements[21], &c_7322099, quote_apply);;
+-}
+-
+-static void __lambda_831(void *data, object self_7313806, int argc, object *args) /* object self_7313806, object r_736367 */
+- {
+- object r_736367 = args[0];
+-
+-closureN_type c_7322102;
+-object e_7324116 [24];
+-c_7322102.hdr.mark = gc_color_red;
+- c_7322102.hdr.grayed = 0;
+-c_7322102.tag = closureN_tag;
+- c_7322102.fn = (function_type)__lambda_832;
+-c_7322102.num_args = 1;
+-c_7322102.num_elements = 24;
+-c_7322102.elements = (object *)e_7324116;
+-c_7322102.elements[0] = ((closureN)self_7313806)->elements[0];
+-c_7322102.elements[1] = ((closureN)self_7313806)->elements[1];
+-c_7322102.elements[2] = ((closureN)self_7313806)->elements[2];
+-c_7322102.elements[3] = ((closureN)self_7313806)->elements[3];
+-c_7322102.elements[4] = ((closureN)self_7313806)->elements[4];
+-c_7322102.elements[5] = ((closureN)self_7313806)->elements[5];
+-c_7322102.elements[6] = ((closureN)self_7313806)->elements[6];
+-c_7322102.elements[7] = ((closureN)self_7313806)->elements[7];
+-c_7322102.elements[8] = ((closureN)self_7313806)->elements[8];
+-c_7322102.elements[9] = ((closureN)self_7313806)->elements[9];
+-c_7322102.elements[10] = ((closureN)self_7313806)->elements[10];
+-c_7322102.elements[11] = ((closureN)self_7313806)->elements[11];
+-c_7322102.elements[12] = ((closureN)self_7313806)->elements[12];
+-c_7322102.elements[13] = ((closureN)self_7313806)->elements[13];
+-c_7322102.elements[14] = ((closureN)self_7313806)->elements[14];
+-c_7322102.elements[15] = ((closureN)self_7313806)->elements[15];
+-c_7322102.elements[16] = ((closureN)self_7313806)->elements[16];
+-c_7322102.elements[17] = ((closureN)self_7313806)->elements[17];
+-c_7322102.elements[18] = ((closureN)self_7313806)->elements[18];
+-c_7322102.elements[19] = ((closureN)self_7313806)->elements[19];
+-c_7322102.elements[20] = ((closureN)self_7313806)->elements[20];
+-c_7322102.elements[21] = ((closureN)self_7313806)->elements[21];
+-c_7322102.elements[22] = r_736367;
+-c_7322102.elements[23] = ((closureN)self_7313806)->elements[22];
++closureN_type c_7322656;
++object e_7322662 [2];
++c_7322656.hdr.mark = gc_color_red;
++ c_7322656.hdr.grayed = 0;
++c_7322656.tag = closureN_tag;
++ c_7322656.fn = (function_type)__lambda_1024;
++c_7322656.num_args = 1;
++c_7322656.num_elements = 2;
++c_7322656.elements = (object *)e_7322662;
++c_7322656.elements[0] = ((closureN)self_7312594)->elements[0];
++c_7322656.elements[1] = ((closureN)self_7312594)->elements[1];
++
++
++object c_7322665 = Cyc_string_append(data,(closure)&c_7322656,2,((closureN)self_7312594)->elements[2], r_736304);
++return_closcall1(data,(closure)&c_7322656, c_7322665);;
++}
++
++static void __lambda_1024(void *data, object self_7312595, int argc, object *args) /* object self_7312595, object r_736303 */
++ {
++ object r_736303 = args[0];
++
++
++return_closcall2(data, ((closureN)self_7312595)->elements[1], ((closureN)self_7312595)->elements[0], Cyc_string2symbol(data, r_736303));;
++}
++
++static void __lambda_858(void *data, object self_7312596, int argc, object *args) /* object self_7312596, object r_736299 */
++ {
++ object r_736299 = args[0];
++
++closureN_type c_7320927;
++object e_7322643 [48];
++c_7320927.hdr.mark = gc_color_red;
++ c_7320927.hdr.grayed = 0;
++c_7320927.tag = closureN_tag;
++ c_7320927.fn = (function_type)__lambda_859;
++c_7320927.num_args = 1;
++c_7320927.num_elements = 48;
++c_7320927.elements = (object *)e_7322643;
++c_7320927.elements[0] = ((closureN)self_7312596)->elements[0];
++c_7320927.elements[1] = ((closureN)self_7312596)->elements[1];
++c_7320927.elements[2] = ((closureN)self_7312596)->elements[2];
++c_7320927.elements[3] = ((closureN)self_7312596)->elements[3];
++c_7320927.elements[4] = ((closureN)self_7312596)->elements[4];
++c_7320927.elements[5] = ((closureN)self_7312596)->elements[5];
++c_7320927.elements[6] = ((closureN)self_7312596)->elements[6];
++c_7320927.elements[7] = ((closureN)self_7312596)->elements[7];
++c_7320927.elements[8] = ((closureN)self_7312596)->elements[8];
++c_7320927.elements[9] = ((closureN)self_7312596)->elements[9];
++c_7320927.elements[10] = ((closureN)self_7312596)->elements[10];
++c_7320927.elements[11] = ((closureN)self_7312596)->elements[11];
++c_7320927.elements[12] = ((closureN)self_7312596)->elements[12];
++c_7320927.elements[13] = ((closureN)self_7312596)->elements[13];
++c_7320927.elements[14] = ((closureN)self_7312596)->elements[14];
++c_7320927.elements[15] = ((closureN)self_7312596)->elements[15];
++c_7320927.elements[16] = ((closureN)self_7312596)->elements[16];
++c_7320927.elements[17] = ((closureN)self_7312596)->elements[17];
++c_7320927.elements[18] = ((closureN)self_7312596)->elements[18];
++c_7320927.elements[19] = ((closureN)self_7312596)->elements[19];
++c_7320927.elements[20] = ((closureN)self_7312596)->elements[20];
++c_7320927.elements[21] = ((closureN)self_7312596)->elements[21];
++c_7320927.elements[22] = ((closureN)self_7312596)->elements[22];
++c_7320927.elements[23] = ((closureN)self_7312596)->elements[23];
++c_7320927.elements[24] = ((closureN)self_7312596)->elements[24];
++c_7320927.elements[25] = ((closureN)self_7312596)->elements[25];
++c_7320927.elements[26] = ((closureN)self_7312596)->elements[26];
++c_7320927.elements[27] = ((closureN)self_7312596)->elements[27];
++c_7320927.elements[28] = ((closureN)self_7312596)->elements[28];
++c_7320927.elements[29] = ((closureN)self_7312596)->elements[29];
++c_7320927.elements[30] = ((closureN)self_7312596)->elements[30];
++c_7320927.elements[31] = ((closureN)self_7312596)->elements[31];
++c_7320927.elements[32] = ((closureN)self_7312596)->elements[32];
++c_7320927.elements[33] = ((closureN)self_7312596)->elements[33];
++c_7320927.elements[34] = ((closureN)self_7312596)->elements[34];
++c_7320927.elements[35] = ((closureN)self_7312596)->elements[35];
++c_7320927.elements[36] = ((closureN)self_7312596)->elements[36];
++c_7320927.elements[37] = ((closureN)self_7312596)->elements[37];
++c_7320927.elements[38] = ((closureN)self_7312596)->elements[38];
++c_7320927.elements[39] = ((closureN)self_7312596)->elements[39];
++c_7320927.elements[40] = ((closureN)self_7312596)->elements[40];
++c_7320927.elements[41] = ((closureN)self_7312596)->elements[41];
++c_7320927.elements[42] = ((closureN)self_7312596)->elements[42];
++c_7320927.elements[43] = ((closureN)self_7312596)->elements[43];
++c_7320927.elements[44] = ((closureN)self_7312596)->elements[44];
++c_7320927.elements[45] = ((closureN)self_7312596)->elements[45];
++c_7320927.elements[46] = ((closureN)self_7312596)->elements[46];
++c_7320927.elements[47] = ((closureN)self_7312596)->elements[47];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320927,__lambda_859, Cyc_set_cell(data, ((closureN)self_7312596)->elements[47], r_736299));;
++}
++
++static void __lambda_859(void *data, object self_7312597, int argc, object *args) /* object self_7312597, object r_735935 */
++ {
++
++
++closureN_type c_7320929;
++object e_7321786 [29];
++c_7320929.hdr.mark = gc_color_red;
++ c_7320929.hdr.grayed = 0;
++c_7320929.tag = closureN_tag;
++ c_7320929.fn = (function_type)__lambda_860;
++c_7320929.num_args = 1;
++c_7320929.num_elements = 29;
++c_7320929.elements = (object *)e_7321786;
++c_7320929.elements[0] = ((closureN)self_7312597)->elements[3];
++c_7320929.elements[1] = ((closureN)self_7312597)->elements[4];
++c_7320929.elements[2] = ((closureN)self_7312597)->elements[5];
++c_7320929.elements[3] = ((closureN)self_7312597)->elements[7];
++c_7320929.elements[4] = ((closureN)self_7312597)->elements[8];
++c_7320929.elements[5] = ((closureN)self_7312597)->elements[9];
++c_7320929.elements[6] = ((closureN)self_7312597)->elements[11];
++c_7320929.elements[7] = ((closureN)self_7312597)->elements[12];
++c_7320929.elements[8] = ((closureN)self_7312597)->elements[13];
++c_7320929.elements[9] = ((closureN)self_7312597)->elements[16];
++c_7320929.elements[10] = ((closureN)self_7312597)->elements[20];
++c_7320929.elements[11] = ((closureN)self_7312597)->elements[23];
++c_7320929.elements[12] = ((closureN)self_7312597)->elements[25];
++c_7320929.elements[13] = ((closureN)self_7312597)->elements[27];
++c_7320929.elements[14] = ((closureN)self_7312597)->elements[28];
++c_7320929.elements[15] = ((closureN)self_7312597)->elements[33];
++c_7320929.elements[16] = ((closureN)self_7312597)->elements[34];
++c_7320929.elements[17] = ((closureN)self_7312597)->elements[35];
++c_7320929.elements[18] = ((closureN)self_7312597)->elements[36];
++c_7320929.elements[19] = ((closureN)self_7312597)->elements[37];
++c_7320929.elements[20] = ((closureN)self_7312597)->elements[38];
++c_7320929.elements[21] = ((closureN)self_7312597)->elements[39];
++c_7320929.elements[22] = ((closureN)self_7312597)->elements[40];
++c_7320929.elements[23] = ((closureN)self_7312597)->elements[41];
++c_7320929.elements[24] = ((closureN)self_7312597)->elements[42];
++c_7320929.elements[25] = ((closureN)self_7312597)->elements[43];
++c_7320929.elements[26] = ((closureN)self_7312597)->elements[44];
++c_7320929.elements[27] = ((closureN)self_7312597)->elements[45];
++c_7320929.elements[28] = ((closureN)self_7312597)->elements[46];
++
++
++closureN_type c_7321787;
++object e_7322642 [32];
++c_7321787.hdr.mark = gc_color_red;
++ c_7321787.hdr.grayed = 0;
++c_7321787.tag = closureN_tag;
++ c_7321787.fn = (function_type)__lambda_958;
++c_7321787.num_args = 2;
++c_7321787.num_elements = 32;
++c_7321787.elements = (object *)e_7322642;
++c_7321787.elements[0] = ((closureN)self_7312597)->elements[0];
++c_7321787.elements[1] = ((closureN)self_7312597)->elements[1];
++c_7321787.elements[2] = ((closureN)self_7312597)->elements[2];
++c_7321787.elements[3] = ((closureN)self_7312597)->elements[5];
++c_7321787.elements[4] = ((closureN)self_7312597)->elements[6];
++c_7321787.elements[5] = ((closureN)self_7312597)->elements[7];
++c_7321787.elements[6] = ((closureN)self_7312597)->elements[8];
++c_7321787.elements[7] = ((closureN)self_7312597)->elements[9];
++c_7321787.elements[8] = ((closureN)self_7312597)->elements[10];
++c_7321787.elements[9] = ((closureN)self_7312597)->elements[13];
++c_7321787.elements[10] = ((closureN)self_7312597)->elements[14];
++c_7321787.elements[11] = ((closureN)self_7312597)->elements[15];
++c_7321787.elements[12] = ((closureN)self_7312597)->elements[17];
++c_7321787.elements[13] = ((closureN)self_7312597)->elements[18];
++c_7321787.elements[14] = ((closureN)self_7312597)->elements[19];
++c_7321787.elements[15] = ((closureN)self_7312597)->elements[21];
++c_7321787.elements[16] = ((closureN)self_7312597)->elements[22];
++c_7321787.elements[17] = ((closureN)self_7312597)->elements[24];
++c_7321787.elements[18] = ((closureN)self_7312597)->elements[26];
++c_7321787.elements[19] = ((closureN)self_7312597)->elements[27];
++c_7321787.elements[20] = ((closureN)self_7312597)->elements[28];
++c_7321787.elements[21] = ((closureN)self_7312597)->elements[29];
++c_7321787.elements[22] = ((closureN)self_7312597)->elements[30];
++c_7321787.elements[23] = ((closureN)self_7312597)->elements[31];
++c_7321787.elements[24] = ((closureN)self_7312597)->elements[32];
++c_7321787.elements[25] = ((closureN)self_7312597)->elements[33];
++c_7321787.elements[26] = ((closureN)self_7312597)->elements[34];
++c_7321787.elements[27] = ((closureN)self_7312597)->elements[35];
++c_7321787.elements[28] = ((closureN)self_7312597)->elements[39];
++c_7321787.elements[29] = ((closureN)self_7312597)->elements[41];
++c_7321787.elements[30] = ((closureN)self_7312597)->elements[46];
++c_7321787.elements[31] = ((closureN)self_7312597)->elements[47];
++
++return_direct_with_clo1(data,(closure)&c_7320929,__lambda_860, &c_7321787);;
++}
++
++static void __lambda_958(void *data, object self_7312598, int argc, object *args) /* object self_7312598, object k_736084, object pat_731304_733269, object tmpl_731305_733270 */
++ {
++ object k_736084 = args[0]; object pat_731304_733269 = args[1]; object tmpl_731305_733270 = args[2];
++
++closureN_type c_7321789;
++object e_7322626 [33];
++c_7321789.hdr.mark = gc_color_red;
++ c_7321789.hdr.grayed = 0;
++c_7321789.tag = closureN_tag;
++ c_7321789.fn = (function_type)__lambda_959;
++c_7321789.num_args = 1;
++c_7321789.num_elements = 33;
++c_7321789.elements = (object *)e_7322626;
++c_7321789.elements[0] = ((closureN)self_7312598)->elements[0];
++c_7321789.elements[1] = ((closureN)self_7312598)->elements[1];
++c_7321789.elements[2] = ((closureN)self_7312598)->elements[2];
++c_7321789.elements[3] = ((closureN)self_7312598)->elements[3];
++c_7321789.elements[4] = ((closureN)self_7312598)->elements[4];
++c_7321789.elements[5] = ((closureN)self_7312598)->elements[5];
++c_7321789.elements[6] = ((closureN)self_7312598)->elements[6];
++c_7321789.elements[7] = ((closureN)self_7312598)->elements[7];
++c_7321789.elements[8] = ((closureN)self_7312598)->elements[8];
++c_7321789.elements[9] = ((closureN)self_7312598)->elements[9];
++c_7321789.elements[10] = ((closureN)self_7312598)->elements[10];
++c_7321789.elements[11] = ((closureN)self_7312598)->elements[11];
++c_7321789.elements[12] = ((closureN)self_7312598)->elements[12];
++c_7321789.elements[13] = ((closureN)self_7312598)->elements[13];
++c_7321789.elements[14] = ((closureN)self_7312598)->elements[14];
++c_7321789.elements[15] = ((closureN)self_7312598)->elements[15];
++c_7321789.elements[16] = ((closureN)self_7312598)->elements[16];
++c_7321789.elements[17] = ((closureN)self_7312598)->elements[17];
++c_7321789.elements[18] = ((closureN)self_7312598)->elements[18];
++c_7321789.elements[19] = ((closureN)self_7312598)->elements[19];
++c_7321789.elements[20] = ((closureN)self_7312598)->elements[20];
++c_7321789.elements[21] = ((closureN)self_7312598)->elements[21];
++c_7321789.elements[22] = ((closureN)self_7312598)->elements[22];
++c_7321789.elements[23] = ((closureN)self_7312598)->elements[23];
++c_7321789.elements[24] = ((closureN)self_7312598)->elements[24];
++c_7321789.elements[25] = ((closureN)self_7312598)->elements[25];
++c_7321789.elements[26] = ((closureN)self_7312598)->elements[26];
++c_7321789.elements[27] = ((closureN)self_7312598)->elements[27];
++c_7321789.elements[28] = ((closureN)self_7312598)->elements[28];
++c_7321789.elements[29] = k_736084;
++c_7321789.elements[30] = ((closureN)self_7312598)->elements[30];
++c_7321789.elements[31] = ((closureN)self_7312598)->elements[31];
++c_7321789.elements[32] = pat_731304_733269;
++
++
++closureN_type c_7322627;
++object e_7322641 [3];
++c_7322627.hdr.mark = gc_color_red;
++ c_7322627.hdr.grayed = 0;
++c_7322627.tag = closureN_tag;
++ c_7322627.fn = (function_type)__lambda_1018;
++c_7322627.num_args = 1;
++c_7322627.num_elements = 3;
++c_7322627.elements = (object *)e_7322641;
++c_7322627.elements[0] = ((closureN)self_7312598)->elements[6];
++c_7322627.elements[1] = ((closureN)self_7312598)->elements[29];
++c_7322627.elements[2] = tmpl_731305_733270;
++
++return_direct_with_clo1(data,(closure)&c_7321789,__lambda_959, &c_7322627);;
++}
++
++static void __lambda_1018(void *data, object self_7312599, int argc, object *args) /* object self_7312599, object k_736297, object vars_731384_733300 */
++ {
++ object k_736297 = args[0]; object vars_731384_733300 = args[1];
++
++
++
++closureN_type c_7322632;
++object e_7322639 [2];
++c_7322632.hdr.mark = gc_color_red;
++ c_7322632.hdr.grayed = 0;
++c_7322632.tag = closureN_tag;
++ c_7322632.fn = (function_type)__lambda_1019;
++c_7322632.num_args = 1;
++c_7322632.num_elements = 2;
++c_7322632.elements = (object *)e_7322639;
++c_7322632.elements[0] = ((closureN)self_7312599)->elements[0];
++c_7322632.elements[1] = k_736297;
++
++return_closcall3(data, car(((closureN)self_7312599)->elements[1]), &c_7322632, ((closureN)self_7312599)->elements[2], vars_731384_733300);;
++}
++
++static void __lambda_1019(void *data, object self_7312600, int argc, object *args) /* object self_7312600, object r_736298 */
++ {
++ object r_736298 = args[0];
++
++list_3_type local_7322637;
++return_direct_with_clo1(data, ((closureN)self_7312600)->elements[1], (((closure) ((closureN)self_7312600)->elements[1])->fn), Cyc_fast_list_3(&local_7322637, ((closureN)self_7312600)->elements[0], r_736298, boolean_f));;
++}
++
++static void __lambda_959(void *data, object self_7312601, int argc, object *args) /* object self_7312601, object r_736088 */
++ {
++ object r_736088 = args[0];
++
++closureN_type c_7321791;
++object e_7322617 [31];
++c_7321791.hdr.mark = gc_color_red;
++ c_7321791.hdr.grayed = 0;
++c_7321791.tag = closureN_tag;
++ c_7321791.fn = (function_type)__lambda_960;
++c_7321791.num_args = 4;
++c_7321791.num_elements = 31;
++c_7321791.elements = (object *)e_7322617;
++c_7321791.elements[0] = ((closureN)self_7312601)->elements[0];
++c_7321791.elements[1] = ((closureN)self_7312601)->elements[1];
++c_7321791.elements[2] = ((closureN)self_7312601)->elements[2];
++c_7321791.elements[3] = ((closureN)self_7312601)->elements[3];
++c_7321791.elements[4] = ((closureN)self_7312601)->elements[4];
++c_7321791.elements[5] = ((closureN)self_7312601)->elements[5];
++c_7321791.elements[6] = ((closureN)self_7312601)->elements[6];
++c_7321791.elements[7] = ((closureN)self_7312601)->elements[7];
++c_7321791.elements[8] = ((closureN)self_7312601)->elements[8];
++c_7321791.elements[9] = ((closureN)self_7312601)->elements[10];
++c_7321791.elements[10] = ((closureN)self_7312601)->elements[11];
++c_7321791.elements[11] = ((closureN)self_7312601)->elements[12];
++c_7321791.elements[12] = ((closureN)self_7312601)->elements[13];
++c_7321791.elements[13] = ((closureN)self_7312601)->elements[14];
++c_7321791.elements[14] = ((closureN)self_7312601)->elements[15];
++c_7321791.elements[15] = ((closureN)self_7312601)->elements[16];
++c_7321791.elements[16] = ((closureN)self_7312601)->elements[17];
++c_7321791.elements[17] = ((closureN)self_7312601)->elements[18];
++c_7321791.elements[18] = ((closureN)self_7312601)->elements[19];
++c_7321791.elements[19] = ((closureN)self_7312601)->elements[20];
++c_7321791.elements[20] = ((closureN)self_7312601)->elements[21];
++c_7321791.elements[21] = ((closureN)self_7312601)->elements[22];
++c_7321791.elements[22] = ((closureN)self_7312601)->elements[23];
++c_7321791.elements[23] = ((closureN)self_7312601)->elements[24];
++c_7321791.elements[24] = ((closureN)self_7312601)->elements[25];
++c_7321791.elements[25] = ((closureN)self_7312601)->elements[26];
++c_7321791.elements[26] = ((closureN)self_7312601)->elements[27];
++c_7321791.elements[27] = ((closureN)self_7312601)->elements[28];
++c_7321791.elements[28] = ((closureN)self_7312601)->elements[29];
++c_7321791.elements[29] = ((closureN)self_7312601)->elements[30];
++c_7321791.elements[30] = ((closureN)self_7312601)->elements[31];
++
++
++
++
++list_2_type local_7322623;
++return_direct_with_clo4(data,(closure)&c_7321791,__lambda_960, Cyc_cdr(data, ((closureN)self_7312601)->elements[32]), Cyc_fast_list_2(&local_7322623, ((closureN)self_7312601)->elements[4], ((closureN)self_7312601)->elements[9]), NULL, r_736088);;
++}
++
++static void __lambda_960(void *data, object self_7312602, int argc, object *args) /* object self_7312602, object p_731307_733271, object x_731308_733272, object vars_731310_733274, object k_731311_733275 */
++ {
++ object p_731307_733271 = args[0]; object x_731308_733272 = args[1]; object vars_731310_733274 = args[2]; object k_731311_733275 = args[3];
++
++closureN_type c_7321793;
++object e_7322616 [35];
++c_7321793.hdr.mark = gc_color_red;
++ c_7321793.hdr.grayed = 0;
++c_7321793.tag = closureN_tag;
++ c_7321793.fn = (function_type)__lambda_961;
++c_7321793.num_args = 1;
++c_7321793.num_elements = 35;
++c_7321793.elements = (object *)e_7322616;
++c_7321793.elements[0] = ((closureN)self_7312602)->elements[0];
++c_7321793.elements[1] = ((closureN)self_7312602)->elements[1];
++c_7321793.elements[2] = ((closureN)self_7312602)->elements[2];
++c_7321793.elements[3] = ((closureN)self_7312602)->elements[3];
++c_7321793.elements[4] = ((closureN)self_7312602)->elements[4];
++c_7321793.elements[5] = ((closureN)self_7312602)->elements[5];
++c_7321793.elements[6] = ((closureN)self_7312602)->elements[6];
++c_7321793.elements[7] = ((closureN)self_7312602)->elements[7];
++c_7321793.elements[8] = ((closureN)self_7312602)->elements[8];
++c_7321793.elements[9] = ((closureN)self_7312602)->elements[9];
++c_7321793.elements[10] = ((closureN)self_7312602)->elements[10];
++c_7321793.elements[11] = ((closureN)self_7312602)->elements[11];
++c_7321793.elements[12] = ((closureN)self_7312602)->elements[12];
++c_7321793.elements[13] = ((closureN)self_7312602)->elements[13];
++c_7321793.elements[14] = ((closureN)self_7312602)->elements[14];
++c_7321793.elements[15] = ((closureN)self_7312602)->elements[15];
++c_7321793.elements[16] = ((closureN)self_7312602)->elements[16];
++c_7321793.elements[17] = ((closureN)self_7312602)->elements[17];
++c_7321793.elements[18] = ((closureN)self_7312602)->elements[18];
++c_7321793.elements[19] = ((closureN)self_7312602)->elements[19];
++c_7321793.elements[20] = ((closureN)self_7312602)->elements[20];
++c_7321793.elements[21] = ((closureN)self_7312602)->elements[21];
++c_7321793.elements[22] = ((closureN)self_7312602)->elements[22];
++c_7321793.elements[23] = ((closureN)self_7312602)->elements[23];
++c_7321793.elements[24] = ((closureN)self_7312602)->elements[24];
++c_7321793.elements[25] = ((closureN)self_7312602)->elements[25];
++c_7321793.elements[26] = ((closureN)self_7312602)->elements[26];
++c_7321793.elements[27] = ((closureN)self_7312602)->elements[27];
++c_7321793.elements[28] = k_731311_733275;
++c_7321793.elements[29] = ((closureN)self_7312602)->elements[28];
++c_7321793.elements[30] = ((closureN)self_7312602)->elements[29];
++c_7321793.elements[31] = ((closureN)self_7312602)->elements[30];
++c_7321793.elements[32] = p_731307_733271;
++c_7321793.elements[33] = vars_731310_733274;
++c_7321793.elements[34] = x_731308_733272;
++
++return_direct_with_clo1(data,(closure)&c_7321793,__lambda_961, boolean_f);;
++}
++
++static void __lambda_961(void *data, object self_7312603, int argc, object *args) /* object self_7312603, object lp_731312_733276 */
++ {
++ object lp_731312_733276 = args[0];
++
++closureN_type c_7321795;
++object e_7322612 [35];
++c_7321795.hdr.mark = gc_color_red;
++ c_7321795.hdr.grayed = 0;
++c_7321795.tag = closureN_tag;
++ c_7321795.fn = (function_type)__lambda_1381;
++c_7321795.num_args = 1;
++c_7321795.num_elements = 35;
++c_7321795.elements = (object *)e_7322612;
++c_7321795.elements[0] = ((closureN)self_7312603)->elements[0];
++c_7321795.elements[1] = ((closureN)self_7312603)->elements[1];
++c_7321795.elements[2] = ((closureN)self_7312603)->elements[2];
++c_7321795.elements[3] = ((closureN)self_7312603)->elements[3];
++c_7321795.elements[4] = ((closureN)self_7312603)->elements[4];
++c_7321795.elements[5] = ((closureN)self_7312603)->elements[5];
++c_7321795.elements[6] = ((closureN)self_7312603)->elements[6];
++c_7321795.elements[7] = ((closureN)self_7312603)->elements[7];
++c_7321795.elements[8] = ((closureN)self_7312603)->elements[8];
++c_7321795.elements[9] = ((closureN)self_7312603)->elements[9];
++c_7321795.elements[10] = ((closureN)self_7312603)->elements[10];
++c_7321795.elements[11] = ((closureN)self_7312603)->elements[11];
++c_7321795.elements[12] = ((closureN)self_7312603)->elements[12];
++c_7321795.elements[13] = ((closureN)self_7312603)->elements[13];
++c_7321795.elements[14] = ((closureN)self_7312603)->elements[14];
++c_7321795.elements[15] = ((closureN)self_7312603)->elements[15];
++c_7321795.elements[16] = ((closureN)self_7312603)->elements[16];
++c_7321795.elements[17] = ((closureN)self_7312603)->elements[17];
++c_7321795.elements[18] = ((closureN)self_7312603)->elements[18];
++c_7321795.elements[19] = ((closureN)self_7312603)->elements[19];
++c_7321795.elements[20] = ((closureN)self_7312603)->elements[20];
++c_7321795.elements[21] = ((closureN)self_7312603)->elements[21];
++c_7321795.elements[22] = ((closureN)self_7312603)->elements[22];
++c_7321795.elements[23] = ((closureN)self_7312603)->elements[23];
++c_7321795.elements[24] = ((closureN)self_7312603)->elements[24];
++c_7321795.elements[25] = ((closureN)self_7312603)->elements[25];
++c_7321795.elements[26] = ((closureN)self_7312603)->elements[26];
++c_7321795.elements[27] = ((closureN)self_7312603)->elements[27];
++c_7321795.elements[28] = ((closureN)self_7312603)->elements[28];
++c_7321795.elements[29] = ((closureN)self_7312603)->elements[29];
++c_7321795.elements[30] = ((closureN)self_7312603)->elements[30];
++c_7321795.elements[31] = ((closureN)self_7312603)->elements[31];
++c_7321795.elements[32] = ((closureN)self_7312603)->elements[32];
++c_7321795.elements[33] = ((closureN)self_7312603)->elements[33];
++c_7321795.elements[34] = ((closureN)self_7312603)->elements[34];
++
++
++pair_type local_7322615;
++return_direct_with_clo1(data,(closure)&c_7321795,__lambda_1381, set_cell_as_expr(&local_7322615, lp_731312_733276));;
++}
++
++static void __lambda_1381(void *data, object self_7312604, int argc, object *args) /* object self_7312604, object lp_731312_733276 */
++ {
++ object lp_731312_733276 = args[0];
++
++closureN_type c_7321797;
++object e_7321813 [6];
++c_7321797.hdr.mark = gc_color_red;
++ c_7321797.hdr.grayed = 0;
++c_7321797.tag = closureN_tag;
++ c_7321797.fn = (function_type)__lambda_962;
++c_7321797.num_args = 1;
++c_7321797.num_elements = 6;
++c_7321797.elements = (object *)e_7321813;
++c_7321797.elements[0] = ((closureN)self_7312604)->elements[28];
++c_7321797.elements[1] = ((closureN)self_7312604)->elements[29];
++c_7321797.elements[2] = lp_731312_733276;
++c_7321797.elements[3] = ((closureN)self_7312604)->elements[32];
++c_7321797.elements[4] = ((closureN)self_7312604)->elements[33];
++c_7321797.elements[5] = ((closureN)self_7312604)->elements[34];
++
++
++closureN_type c_7321814;
++object e_7322611 [31];
++c_7321814.hdr.mark = gc_color_red;
++ c_7321814.hdr.grayed = 0;
++c_7321814.tag = closureN_tag;
++ c_7321814.fn = (function_type)__lambda_964;
++c_7321814.num_args = 5;
++c_7321814.num_elements = 31;
++c_7321814.elements = (object *)e_7322611;
++c_7321814.elements[0] = ((closureN)self_7312604)->elements[0];
++c_7321814.elements[1] = ((closureN)self_7312604)->elements[1];
++c_7321814.elements[2] = ((closureN)self_7312604)->elements[2];
++c_7321814.elements[3] = ((closureN)self_7312604)->elements[3];
++c_7321814.elements[4] = ((closureN)self_7312604)->elements[4];
++c_7321814.elements[5] = ((closureN)self_7312604)->elements[5];
++c_7321814.elements[6] = ((closureN)self_7312604)->elements[6];
++c_7321814.elements[7] = ((closureN)self_7312604)->elements[7];
++c_7321814.elements[8] = ((closureN)self_7312604)->elements[8];
++c_7321814.elements[9] = ((closureN)self_7312604)->elements[9];
++c_7321814.elements[10] = ((closureN)self_7312604)->elements[10];
++c_7321814.elements[11] = ((closureN)self_7312604)->elements[11];
++c_7321814.elements[12] = ((closureN)self_7312604)->elements[12];
++c_7321814.elements[13] = ((closureN)self_7312604)->elements[13];
++c_7321814.elements[14] = ((closureN)self_7312604)->elements[14];
++c_7321814.elements[15] = ((closureN)self_7312604)->elements[15];
++c_7321814.elements[16] = ((closureN)self_7312604)->elements[16];
++c_7321814.elements[17] = ((closureN)self_7312604)->elements[17];
++c_7321814.elements[18] = ((closureN)self_7312604)->elements[18];
++c_7321814.elements[19] = ((closureN)self_7312604)->elements[19];
++c_7321814.elements[20] = ((closureN)self_7312604)->elements[20];
++c_7321814.elements[21] = ((closureN)self_7312604)->elements[21];
++c_7321814.elements[22] = ((closureN)self_7312604)->elements[22];
++c_7321814.elements[23] = ((closureN)self_7312604)->elements[23];
++c_7321814.elements[24] = ((closureN)self_7312604)->elements[24];
++c_7321814.elements[25] = ((closureN)self_7312604)->elements[25];
++c_7321814.elements[26] = ((closureN)self_7312604)->elements[26];
++c_7321814.elements[27] = ((closureN)self_7312604)->elements[27];
++c_7321814.elements[28] = ((closureN)self_7312604)->elements[30];
++c_7321814.elements[29] = lp_731312_733276;
++c_7321814.elements[30] = ((closureN)self_7312604)->elements[31];
+
+-return_closcall2(data, ((closureN)self_7313806)->elements[22], &c_7322102, quote_append);;
++return_direct_with_clo1(data,(closure)&c_7321797,__lambda_962, &c_7321814);;
+ }
+
+-static void __lambda_832(void *data, object self_7313807, int argc, object *args) /* object self_7313807, object r_736368 */
++static void __lambda_964(void *data, object self_7312605, int argc, object *args) /* object self_7312605, object k_736091, object p_731313_733277, object x_731314_733278, object dim_731315_733279, object vars_731316_733280, object k_731317_733281 */
+ {
+- object r_736368 = args[0];
++ object k_736091 = args[0]; object p_731313_733277 = args[1]; object x_731314_733278 = args[2]; object dim_731315_733279 = args[3]; object vars_731316_733280 = args[4]; object k_731317_733281 = args[5];
+
+-closureN_type c_7322105;
+-object e_7324115 [25];
+-c_7322105.hdr.mark = gc_color_red;
+- c_7322105.hdr.grayed = 0;
+-c_7322105.tag = closureN_tag;
+- c_7322105.fn = (function_type)__lambda_833;
+-c_7322105.num_args = 1;
+-c_7322105.num_elements = 25;
+-c_7322105.elements = (object *)e_7324115;
+-c_7322105.elements[0] = ((closureN)self_7313807)->elements[0];
+-c_7322105.elements[1] = ((closureN)self_7313807)->elements[1];
+-c_7322105.elements[2] = ((closureN)self_7313807)->elements[2];
+-c_7322105.elements[3] = ((closureN)self_7313807)->elements[3];
+-c_7322105.elements[4] = ((closureN)self_7313807)->elements[4];
+-c_7322105.elements[5] = ((closureN)self_7313807)->elements[5];
+-c_7322105.elements[6] = ((closureN)self_7313807)->elements[6];
+-c_7322105.elements[7] = ((closureN)self_7313807)->elements[7];
+-c_7322105.elements[8] = ((closureN)self_7313807)->elements[8];
+-c_7322105.elements[9] = ((closureN)self_7313807)->elements[9];
+-c_7322105.elements[10] = ((closureN)self_7313807)->elements[10];
+-c_7322105.elements[11] = ((closureN)self_7313807)->elements[11];
+-c_7322105.elements[12] = ((closureN)self_7313807)->elements[12];
+-c_7322105.elements[13] = ((closureN)self_7313807)->elements[13];
+-c_7322105.elements[14] = ((closureN)self_7313807)->elements[14];
+-c_7322105.elements[15] = ((closureN)self_7313807)->elements[15];
+-c_7322105.elements[16] = ((closureN)self_7313807)->elements[16];
+-c_7322105.elements[17] = ((closureN)self_7313807)->elements[17];
+-c_7322105.elements[18] = ((closureN)self_7313807)->elements[18];
+-c_7322105.elements[19] = ((closureN)self_7313807)->elements[19];
+-c_7322105.elements[20] = ((closureN)self_7313807)->elements[20];
+-c_7322105.elements[21] = ((closureN)self_7313807)->elements[21];
+-c_7322105.elements[22] = ((closureN)self_7313807)->elements[22];
+-c_7322105.elements[23] = r_736368;
+-c_7322105.elements[24] = ((closureN)self_7313807)->elements[23];
+-
+-return_closcall2(data, ((closureN)self_7313807)->elements[23], &c_7322105, quote_map);;
+-}
+-
+-static void __lambda_833(void *data, object self_7313808, int argc, object *args) /* object self_7313808, object r_736369 */
+- {
+- object r_736369 = args[0];
+-
+-closureN_type c_7322108;
+-object e_7324114 [26];
+-c_7322108.hdr.mark = gc_color_red;
+- c_7322108.hdr.grayed = 0;
+-c_7322108.tag = closureN_tag;
+- c_7322108.fn = (function_type)__lambda_834;
+-c_7322108.num_args = 1;
+-c_7322108.num_elements = 26;
+-c_7322108.elements = (object *)e_7324114;
+-c_7322108.elements[0] = ((closureN)self_7313808)->elements[0];
+-c_7322108.elements[1] = ((closureN)self_7313808)->elements[1];
+-c_7322108.elements[2] = ((closureN)self_7313808)->elements[2];
+-c_7322108.elements[3] = ((closureN)self_7313808)->elements[3];
+-c_7322108.elements[4] = ((closureN)self_7313808)->elements[4];
+-c_7322108.elements[5] = ((closureN)self_7313808)->elements[5];
+-c_7322108.elements[6] = ((closureN)self_7313808)->elements[6];
+-c_7322108.elements[7] = ((closureN)self_7313808)->elements[7];
+-c_7322108.elements[8] = ((closureN)self_7313808)->elements[8];
+-c_7322108.elements[9] = ((closureN)self_7313808)->elements[9];
+-c_7322108.elements[10] = ((closureN)self_7313808)->elements[10];
+-c_7322108.elements[11] = ((closureN)self_7313808)->elements[11];
+-c_7322108.elements[12] = ((closureN)self_7313808)->elements[12];
+-c_7322108.elements[13] = ((closureN)self_7313808)->elements[13];
+-c_7322108.elements[14] = ((closureN)self_7313808)->elements[14];
+-c_7322108.elements[15] = ((closureN)self_7313808)->elements[15];
+-c_7322108.elements[16] = ((closureN)self_7313808)->elements[16];
+-c_7322108.elements[17] = ((closureN)self_7313808)->elements[17];
+-c_7322108.elements[18] = ((closureN)self_7313808)->elements[18];
+-c_7322108.elements[19] = ((closureN)self_7313808)->elements[19];
+-c_7322108.elements[20] = ((closureN)self_7313808)->elements[20];
+-c_7322108.elements[21] = ((closureN)self_7313808)->elements[21];
+-c_7322108.elements[22] = ((closureN)self_7313808)->elements[22];
+-c_7322108.elements[23] = ((closureN)self_7313808)->elements[23];
+-c_7322108.elements[24] = r_736369;
+-c_7322108.elements[25] = ((closureN)self_7313808)->elements[24];
+-
+-return_closcall2(data, ((closureN)self_7313808)->elements[24], &c_7322108, quote_vector_127);;
+-}
+-
+-static void __lambda_834(void *data, object self_7313809, int argc, object *args) /* object self_7313809, object r_736370 */
+- {
+- object r_736370 = args[0];
+-
+-closureN_type c_7322111;
+-object e_7324113 [27];
+-c_7322111.hdr.mark = gc_color_red;
+- c_7322111.hdr.grayed = 0;
+-c_7322111.tag = closureN_tag;
+- c_7322111.fn = (function_type)__lambda_835;
+-c_7322111.num_args = 1;
+-c_7322111.num_elements = 27;
+-c_7322111.elements = (object *)e_7324113;
+-c_7322111.elements[0] = ((closureN)self_7313809)->elements[0];
+-c_7322111.elements[1] = ((closureN)self_7313809)->elements[1];
+-c_7322111.elements[2] = ((closureN)self_7313809)->elements[2];
+-c_7322111.elements[3] = ((closureN)self_7313809)->elements[3];
+-c_7322111.elements[4] = ((closureN)self_7313809)->elements[4];
+-c_7322111.elements[5] = ((closureN)self_7313809)->elements[5];
+-c_7322111.elements[6] = ((closureN)self_7313809)->elements[6];
+-c_7322111.elements[7] = ((closureN)self_7313809)->elements[7];
+-c_7322111.elements[8] = ((closureN)self_7313809)->elements[8];
+-c_7322111.elements[9] = ((closureN)self_7313809)->elements[9];
+-c_7322111.elements[10] = ((closureN)self_7313809)->elements[10];
+-c_7322111.elements[11] = ((closureN)self_7313809)->elements[11];
+-c_7322111.elements[12] = ((closureN)self_7313809)->elements[12];
+-c_7322111.elements[13] = ((closureN)self_7313809)->elements[13];
+-c_7322111.elements[14] = ((closureN)self_7313809)->elements[14];
+-c_7322111.elements[15] = ((closureN)self_7313809)->elements[15];
+-c_7322111.elements[16] = ((closureN)self_7313809)->elements[16];
+-c_7322111.elements[17] = ((closureN)self_7313809)->elements[17];
+-c_7322111.elements[18] = ((closureN)self_7313809)->elements[18];
+-c_7322111.elements[19] = ((closureN)self_7313809)->elements[19];
+-c_7322111.elements[20] = ((closureN)self_7313809)->elements[20];
+-c_7322111.elements[21] = ((closureN)self_7313809)->elements[21];
+-c_7322111.elements[22] = ((closureN)self_7313809)->elements[22];
+-c_7322111.elements[23] = ((closureN)self_7313809)->elements[23];
+-c_7322111.elements[24] = ((closureN)self_7313809)->elements[24];
+-c_7322111.elements[25] = r_736370;
+-c_7322111.elements[26] = ((closureN)self_7313809)->elements[25];
+-
+-return_closcall2(data, ((closureN)self_7313809)->elements[25], &c_7322111, quote_list_127);;
+-}
+-
+-static void __lambda_835(void *data, object self_7313810, int argc, object *args) /* object self_7313810, object r_736371 */
+- {
+- object r_736371 = args[0];
+-
+-closureN_type c_7322114;
+-object e_7324112 [28];
+-c_7322114.hdr.mark = gc_color_red;
+- c_7322114.hdr.grayed = 0;
+-c_7322114.tag = closureN_tag;
+- c_7322114.fn = (function_type)__lambda_836;
+-c_7322114.num_args = 1;
+-c_7322114.num_elements = 28;
+-c_7322114.elements = (object *)e_7324112;
+-c_7322114.elements[0] = ((closureN)self_7313810)->elements[0];
+-c_7322114.elements[1] = ((closureN)self_7313810)->elements[1];
+-c_7322114.elements[2] = ((closureN)self_7313810)->elements[2];
+-c_7322114.elements[3] = ((closureN)self_7313810)->elements[3];
+-c_7322114.elements[4] = ((closureN)self_7313810)->elements[4];
+-c_7322114.elements[5] = ((closureN)self_7313810)->elements[5];
+-c_7322114.elements[6] = ((closureN)self_7313810)->elements[6];
+-c_7322114.elements[7] = ((closureN)self_7313810)->elements[7];
+-c_7322114.elements[8] = ((closureN)self_7313810)->elements[8];
+-c_7322114.elements[9] = ((closureN)self_7313810)->elements[9];
+-c_7322114.elements[10] = ((closureN)self_7313810)->elements[10];
+-c_7322114.elements[11] = ((closureN)self_7313810)->elements[11];
+-c_7322114.elements[12] = ((closureN)self_7313810)->elements[12];
+-c_7322114.elements[13] = ((closureN)self_7313810)->elements[13];
+-c_7322114.elements[14] = ((closureN)self_7313810)->elements[14];
+-c_7322114.elements[15] = ((closureN)self_7313810)->elements[15];
+-c_7322114.elements[16] = ((closureN)self_7313810)->elements[16];
+-c_7322114.elements[17] = ((closureN)self_7313810)->elements[17];
+-c_7322114.elements[18] = ((closureN)self_7313810)->elements[18];
+-c_7322114.elements[19] = ((closureN)self_7313810)->elements[19];
+-c_7322114.elements[20] = ((closureN)self_7313810)->elements[20];
+-c_7322114.elements[21] = ((closureN)self_7313810)->elements[21];
+-c_7322114.elements[22] = ((closureN)self_7313810)->elements[22];
+-c_7322114.elements[23] = ((closureN)self_7313810)->elements[23];
+-c_7322114.elements[24] = ((closureN)self_7313810)->elements[24];
+-c_7322114.elements[25] = ((closureN)self_7313810)->elements[25];
+-c_7322114.elements[26] = r_736371;
+-c_7322114.elements[27] = ((closureN)self_7313810)->elements[26];
+-
+-return_closcall2(data, ((closureN)self_7313810)->elements[26], &c_7322114, quote_len);;
+-}
+-
+-static void __lambda_836(void *data, object self_7313811, int argc, object *args) /* object self_7313811, object r_736372 */
+- {
+- object r_736372 = args[0];
+-
+-closureN_type c_7322117;
+-object e_7324111 [29];
+-c_7322117.hdr.mark = gc_color_red;
+- c_7322117.hdr.grayed = 0;
+-c_7322117.tag = closureN_tag;
+- c_7322117.fn = (function_type)__lambda_837;
+-c_7322117.num_args = 1;
+-c_7322117.num_elements = 29;
+-c_7322117.elements = (object *)e_7324111;
+-c_7322117.elements[0] = ((closureN)self_7313811)->elements[0];
+-c_7322117.elements[1] = ((closureN)self_7313811)->elements[1];
+-c_7322117.elements[2] = ((closureN)self_7313811)->elements[2];
+-c_7322117.elements[3] = ((closureN)self_7313811)->elements[3];
+-c_7322117.elements[4] = ((closureN)self_7313811)->elements[4];
+-c_7322117.elements[5] = ((closureN)self_7313811)->elements[5];
+-c_7322117.elements[6] = ((closureN)self_7313811)->elements[6];
+-c_7322117.elements[7] = ((closureN)self_7313811)->elements[7];
+-c_7322117.elements[8] = ((closureN)self_7313811)->elements[8];
+-c_7322117.elements[9] = ((closureN)self_7313811)->elements[9];
+-c_7322117.elements[10] = ((closureN)self_7313811)->elements[10];
+-c_7322117.elements[11] = ((closureN)self_7313811)->elements[11];
+-c_7322117.elements[12] = ((closureN)self_7313811)->elements[12];
+-c_7322117.elements[13] = ((closureN)self_7313811)->elements[13];
+-c_7322117.elements[14] = ((closureN)self_7313811)->elements[14];
+-c_7322117.elements[15] = ((closureN)self_7313811)->elements[15];
+-c_7322117.elements[16] = ((closureN)self_7313811)->elements[16];
+-c_7322117.elements[17] = ((closureN)self_7313811)->elements[17];
+-c_7322117.elements[18] = ((closureN)self_7313811)->elements[18];
+-c_7322117.elements[19] = ((closureN)self_7313811)->elements[19];
+-c_7322117.elements[20] = ((closureN)self_7313811)->elements[20];
+-c_7322117.elements[21] = ((closureN)self_7313811)->elements[21];
+-c_7322117.elements[22] = ((closureN)self_7313811)->elements[22];
+-c_7322117.elements[23] = ((closureN)self_7313811)->elements[23];
+-c_7322117.elements[24] = ((closureN)self_7313811)->elements[24];
+-c_7322117.elements[25] = ((closureN)self_7313811)->elements[25];
+-c_7322117.elements[26] = ((closureN)self_7313811)->elements[26];
+-c_7322117.elements[27] = r_736372;
+-c_7322117.elements[28] = ((closureN)self_7313811)->elements[27];
+
+-return_closcall2(data, ((closureN)self_7313811)->elements[27], &c_7322117, quote_length);;
++
++closureN_type c_7321819;
++object e_7322609 [37];
++c_7321819.hdr.mark = gc_color_red;
++ c_7321819.hdr.grayed = 0;
++c_7321819.tag = closureN_tag;
++ c_7321819.fn = (function_type)__lambda_965;
++c_7321819.num_args = 1;
++c_7321819.num_elements = 37;
++c_7321819.elements = (object *)e_7322609;
++c_7321819.elements[0] = ((closureN)self_7312605)->elements[0];
++c_7321819.elements[1] = ((closureN)self_7312605)->elements[1];
++c_7321819.elements[2] = ((closureN)self_7312605)->elements[2];
++c_7321819.elements[3] = ((closureN)self_7312605)->elements[3];
++c_7321819.elements[4] = ((closureN)self_7312605)->elements[4];
++c_7321819.elements[5] = ((closureN)self_7312605)->elements[5];
++c_7321819.elements[6] = ((closureN)self_7312605)->elements[6];
++c_7321819.elements[7] = ((closureN)self_7312605)->elements[7];
++c_7321819.elements[8] = ((closureN)self_7312605)->elements[8];
++c_7321819.elements[9] = ((closureN)self_7312605)->elements[9];
++c_7321819.elements[10] = ((closureN)self_7312605)->elements[10];
++c_7321819.elements[11] = ((closureN)self_7312605)->elements[11];
++c_7321819.elements[12] = ((closureN)self_7312605)->elements[12];
++c_7321819.elements[13] = ((closureN)self_7312605)->elements[13];
++c_7321819.elements[14] = ((closureN)self_7312605)->elements[14];
++c_7321819.elements[15] = ((closureN)self_7312605)->elements[15];
++c_7321819.elements[16] = ((closureN)self_7312605)->elements[16];
++c_7321819.elements[17] = ((closureN)self_7312605)->elements[17];
++c_7321819.elements[18] = ((closureN)self_7312605)->elements[18];
++c_7321819.elements[19] = ((closureN)self_7312605)->elements[19];
++c_7321819.elements[20] = ((closureN)self_7312605)->elements[20];
++c_7321819.elements[21] = ((closureN)self_7312605)->elements[21];
++c_7321819.elements[22] = ((closureN)self_7312605)->elements[22];
++c_7321819.elements[23] = ((closureN)self_7312605)->elements[23];
++c_7321819.elements[24] = ((closureN)self_7312605)->elements[24];
++c_7321819.elements[25] = ((closureN)self_7312605)->elements[25];
++c_7321819.elements[26] = dim_731315_733279;
++c_7321819.elements[27] = ((closureN)self_7312605)->elements[26];
++c_7321819.elements[28] = ((closureN)self_7312605)->elements[27];
++c_7321819.elements[29] = k_731317_733281;
++c_7321819.elements[30] = k_736091;
++c_7321819.elements[31] = ((closureN)self_7312605)->elements[28];
++c_7321819.elements[32] = ((closureN)self_7312605)->elements[29];
++c_7321819.elements[33] = ((closureN)self_7312605)->elements[30];
++c_7321819.elements[34] = p_731313_733277;
++c_7321819.elements[35] = vars_731316_733280;
++c_7321819.elements[36] = x_731314_733278;
++
++
++make_utf8_string_with_len(c_7322610, "v.", 2, 2);
++return_closcall2(data, car(((closureN)self_7312605)->elements[30]), &c_7321819, &c_7322610);;
++}
++
++static void __lambda_965(void *data, object self_7312606, int argc, object *args) /* object self_7312606, object v_731318_733282 */
++ {
++ object v_731318_733282 = args[0];
++
++closureN_type c_7321821;
++object e_7322592 [36];
++c_7321821.hdr.mark = gc_color_red;
++ c_7321821.hdr.grayed = 0;
++c_7321821.tag = closureN_tag;
++ c_7321821.fn = (function_type)__lambda_966;
++c_7321821.num_args = 0;
++c_7321821.num_elements = 36;
++c_7321821.elements = (object *)e_7322592;
++c_7321821.elements[0] = ((closureN)self_7312606)->elements[0];
++c_7321821.elements[1] = ((closureN)self_7312606)->elements[1];
++c_7321821.elements[2] = ((closureN)self_7312606)->elements[2];
++c_7321821.elements[3] = ((closureN)self_7312606)->elements[3];
++c_7321821.elements[4] = ((closureN)self_7312606)->elements[4];
++c_7321821.elements[5] = ((closureN)self_7312606)->elements[5];
++c_7321821.elements[6] = ((closureN)self_7312606)->elements[6];
++c_7321821.elements[7] = ((closureN)self_7312606)->elements[7];
++c_7321821.elements[8] = ((closureN)self_7312606)->elements[8];
++c_7321821.elements[9] = ((closureN)self_7312606)->elements[9];
++c_7321821.elements[10] = ((closureN)self_7312606)->elements[10];
++c_7321821.elements[11] = ((closureN)self_7312606)->elements[11];
++c_7321821.elements[12] = ((closureN)self_7312606)->elements[12];
++c_7321821.elements[13] = ((closureN)self_7312606)->elements[13];
++c_7321821.elements[14] = ((closureN)self_7312606)->elements[14];
++c_7321821.elements[15] = ((closureN)self_7312606)->elements[15];
++c_7321821.elements[16] = ((closureN)self_7312606)->elements[16];
++c_7321821.elements[17] = ((closureN)self_7312606)->elements[17];
++c_7321821.elements[18] = ((closureN)self_7312606)->elements[18];
++c_7321821.elements[19] = ((closureN)self_7312606)->elements[19];
++c_7321821.elements[20] = ((closureN)self_7312606)->elements[20];
++c_7321821.elements[21] = ((closureN)self_7312606)->elements[21];
++c_7321821.elements[22] = ((closureN)self_7312606)->elements[22];
++c_7321821.elements[23] = ((closureN)self_7312606)->elements[23];
++c_7321821.elements[24] = ((closureN)self_7312606)->elements[24];
++c_7321821.elements[25] = ((closureN)self_7312606)->elements[25];
++c_7321821.elements[26] = ((closureN)self_7312606)->elements[26];
++c_7321821.elements[27] = ((closureN)self_7312606)->elements[27];
++c_7321821.elements[28] = ((closureN)self_7312606)->elements[28];
++c_7321821.elements[29] = ((closureN)self_7312606)->elements[29];
++c_7321821.elements[30] = ((closureN)self_7312606)->elements[31];
++c_7321821.elements[31] = ((closureN)self_7312606)->elements[32];
++c_7321821.elements[32] = ((closureN)self_7312606)->elements[33];
++c_7321821.elements[33] = ((closureN)self_7312606)->elements[34];
++c_7321821.elements[34] = v_731318_733282;
++c_7321821.elements[35] = ((closureN)self_7312606)->elements[35];
++
++
++closureN_type c_7322593;
++object e_7322608 [4];
++c_7322593.hdr.mark = gc_color_red;
++ c_7322593.hdr.grayed = 0;
++c_7322593.tag = closureN_tag;
++ c_7322593.fn = (function_type)__lambda_1017;
++c_7322593.num_args = 1;
++c_7322593.num_elements = 4;
++c_7322593.elements = (object *)e_7322608;
++c_7322593.elements[0] = ((closureN)self_7312606)->elements[13];
++c_7322593.elements[1] = ((closureN)self_7312606)->elements[30];
++c_7322593.elements[2] = v_731318_733282;
++c_7322593.elements[3] = ((closureN)self_7312606)->elements[36];
++
++return_direct_with_clo1(data,(closure)&c_7321821,__lambda_966, &c_7322593);;
++}
++
++static void __lambda_1017(void *data, object self_7312607, int argc, object *args) /* object self_7312607, object r_736094 */
++ {
++ object r_736094 = args[0];
++
++list_3_type local_7322598;
++
++pair_type local_7322602;
++
++list_2_type local_7322605;
++return_direct_with_clo1(data, ((closureN)self_7312607)->elements[1], (((closure) ((closureN)self_7312607)->elements[1])->fn), Cyc_fast_list_3(&local_7322598, ((closureN)self_7312607)->elements[0], set_cell_as_expr(&local_7322602, Cyc_fast_list_2(&local_7322605, ((closureN)self_7312607)->elements[2], ((closureN)self_7312607)->elements[3])), r_736094));;
++}
++
++static void __lambda_966(void *data, object self_7312608, int argc, object *args) /* object self_7312608, object k_736095 */
++ {
++ object k_736095 = args[0];
++
++closureN_type c_7321823;
++object e_7322590 [37];
++c_7321823.hdr.mark = gc_color_red;
++ c_7321823.hdr.grayed = 0;
++c_7321823.tag = closureN_tag;
++ c_7321823.fn = (function_type)__lambda_967;
++c_7321823.num_args = 1;
++c_7321823.num_elements = 37;
++c_7321823.elements = (object *)e_7322590;
++c_7321823.elements[0] = ((closureN)self_7312608)->elements[0];
++c_7321823.elements[1] = ((closureN)self_7312608)->elements[1];
++c_7321823.elements[2] = ((closureN)self_7312608)->elements[2];
++c_7321823.elements[3] = ((closureN)self_7312608)->elements[3];
++c_7321823.elements[4] = ((closureN)self_7312608)->elements[4];
++c_7321823.elements[5] = ((closureN)self_7312608)->elements[5];
++c_7321823.elements[6] = ((closureN)self_7312608)->elements[6];
++c_7321823.elements[7] = ((closureN)self_7312608)->elements[7];
++c_7321823.elements[8] = ((closureN)self_7312608)->elements[8];
++c_7321823.elements[9] = ((closureN)self_7312608)->elements[9];
++c_7321823.elements[10] = ((closureN)self_7312608)->elements[10];
++c_7321823.elements[11] = ((closureN)self_7312608)->elements[11];
++c_7321823.elements[12] = ((closureN)self_7312608)->elements[12];
++c_7321823.elements[13] = ((closureN)self_7312608)->elements[13];
++c_7321823.elements[14] = ((closureN)self_7312608)->elements[14];
++c_7321823.elements[15] = ((closureN)self_7312608)->elements[15];
++c_7321823.elements[16] = ((closureN)self_7312608)->elements[16];
++c_7321823.elements[17] = ((closureN)self_7312608)->elements[17];
++c_7321823.elements[18] = ((closureN)self_7312608)->elements[18];
++c_7321823.elements[19] = ((closureN)self_7312608)->elements[19];
++c_7321823.elements[20] = ((closureN)self_7312608)->elements[20];
++c_7321823.elements[21] = ((closureN)self_7312608)->elements[21];
++c_7321823.elements[22] = ((closureN)self_7312608)->elements[22];
++c_7321823.elements[23] = ((closureN)self_7312608)->elements[23];
++c_7321823.elements[24] = ((closureN)self_7312608)->elements[24];
++c_7321823.elements[25] = ((closureN)self_7312608)->elements[25];
++c_7321823.elements[26] = ((closureN)self_7312608)->elements[26];
++c_7321823.elements[27] = ((closureN)self_7312608)->elements[27];
++c_7321823.elements[28] = ((closureN)self_7312608)->elements[28];
++c_7321823.elements[29] = ((closureN)self_7312608)->elements[29];
++c_7321823.elements[30] = k_736095;
++c_7321823.elements[31] = ((closureN)self_7312608)->elements[30];
++c_7321823.elements[32] = ((closureN)self_7312608)->elements[31];
++c_7321823.elements[33] = ((closureN)self_7312608)->elements[32];
++c_7321823.elements[34] = ((closureN)self_7312608)->elements[33];
++c_7321823.elements[35] = ((closureN)self_7312608)->elements[34];
++c_7321823.elements[36] = ((closureN)self_7312608)->elements[35];
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7321823, ((closureN)self_7312608)->elements[33]);;
++}
++
++static void __lambda_967(void *data, object self_7312609, int argc, object *args) /* object self_7312609, object r_736096 */
++ {
++ object r_736096 = args[0];
++ if( (boolean_f != r_736096) ){
++
++closureN_type c_7321825;
++object e_7321888 [12];
++c_7321825.hdr.mark = gc_color_red;
++ c_7321825.hdr.grayed = 0;
++c_7321825.tag = closureN_tag;
++ c_7321825.fn = (function_type)__lambda_968;
++c_7321825.num_args = 1;
++c_7321825.num_elements = 12;
++c_7321825.elements = (object *)e_7321888;
++c_7321825.elements[0] = ((closureN)self_7312609)->elements[2];
++c_7321825.elements[1] = ((closureN)self_7312609)->elements[5];
++c_7321825.elements[2] = ((closureN)self_7312609)->elements[13];
++c_7321825.elements[3] = ((closureN)self_7312609)->elements[18];
++c_7321825.elements[4] = ((closureN)self_7312609)->elements[19];
++c_7321825.elements[5] = ((closureN)self_7312609)->elements[26];
++c_7321825.elements[6] = ((closureN)self_7312609)->elements[29];
++c_7321825.elements[7] = ((closureN)self_7312609)->elements[30];
++c_7321825.elements[8] = ((closureN)self_7312609)->elements[31];
++c_7321825.elements[9] = ((closureN)self_7312609)->elements[34];
++c_7321825.elements[10] = ((closureN)self_7312609)->elements[35];
++c_7321825.elements[11] = ((closureN)self_7312609)->elements[36];
++
++
++closureN_type c_7321889;
++object e_7321893 [2];
++c_7321889.hdr.mark = gc_color_red;
++ c_7321889.hdr.grayed = 0;
++c_7321889.tag = closureN_tag;
++ c_7321889.fn = (function_type)__lambda_973;
++c_7321889.num_args = 1;
++c_7321889.num_elements = 2;
++c_7321889.elements = (object *)e_7321893;
++c_7321889.elements[0] = ((closureN)self_7312609)->elements[25];
++c_7321889.elements[1] = ((closureN)self_7312609)->elements[34];
++
++return_direct_with_clo1(data,(closure)&c_7321825,__lambda_968, &c_7321889);
++} else {
++
++
++
++closureN_type c_7321898;
++object e_7322588 [33];
++c_7321898.hdr.mark = gc_color_red;
++ c_7321898.hdr.grayed = 0;
++c_7321898.tag = closureN_tag;
++ c_7321898.fn = (function_type)__lambda_974;
++c_7321898.num_args = 1;
++c_7321898.num_elements = 33;
++c_7321898.elements = (object *)e_7322588;
++c_7321898.elements[0] = ((closureN)self_7312609)->elements[0];
++c_7321898.elements[1] = ((closureN)self_7312609)->elements[1];
++c_7321898.elements[2] = ((closureN)self_7312609)->elements[2];
++c_7321898.elements[3] = ((closureN)self_7312609)->elements[3];
++c_7321898.elements[4] = ((closureN)self_7312609)->elements[4];
++c_7321898.elements[5] = ((closureN)self_7312609)->elements[6];
++c_7321898.elements[6] = ((closureN)self_7312609)->elements[7];
++c_7321898.elements[7] = ((closureN)self_7312609)->elements[8];
++c_7321898.elements[8] = ((closureN)self_7312609)->elements[9];
++c_7321898.elements[9] = ((closureN)self_7312609)->elements[10];
++c_7321898.elements[10] = ((closureN)self_7312609)->elements[11];
++c_7321898.elements[11] = ((closureN)self_7312609)->elements[12];
++c_7321898.elements[12] = ((closureN)self_7312609)->elements[13];
++c_7321898.elements[13] = ((closureN)self_7312609)->elements[14];
++c_7321898.elements[14] = ((closureN)self_7312609)->elements[15];
++c_7321898.elements[15] = ((closureN)self_7312609)->elements[16];
++c_7321898.elements[16] = ((closureN)self_7312609)->elements[17];
++c_7321898.elements[17] = ((closureN)self_7312609)->elements[18];
++c_7321898.elements[18] = ((closureN)self_7312609)->elements[20];
++c_7321898.elements[19] = ((closureN)self_7312609)->elements[21];
++c_7321898.elements[20] = ((closureN)self_7312609)->elements[22];
++c_7321898.elements[21] = ((closureN)self_7312609)->elements[23];
++c_7321898.elements[22] = ((closureN)self_7312609)->elements[24];
++c_7321898.elements[23] = ((closureN)self_7312609)->elements[25];
++c_7321898.elements[24] = ((closureN)self_7312609)->elements[26];
++c_7321898.elements[25] = ((closureN)self_7312609)->elements[27];
++c_7321898.elements[26] = ((closureN)self_7312609)->elements[29];
++c_7321898.elements[27] = ((closureN)self_7312609)->elements[30];
++c_7321898.elements[28] = ((closureN)self_7312609)->elements[32];
++c_7321898.elements[29] = ((closureN)self_7312609)->elements[33];
++c_7321898.elements[30] = ((closureN)self_7312609)->elements[34];
++c_7321898.elements[31] = ((closureN)self_7312609)->elements[35];
++c_7321898.elements[32] = ((closureN)self_7312609)->elements[36];
++
++return_closcall2(data, car(((closureN)self_7312609)->elements[28]), &c_7321898, ((closureN)self_7312609)->elements[34]);}
++;;
++}
++
++static void __lambda_974(void *data, object self_7312616, int argc, object *args) /* object self_7312616, object r_736109 */
++ {
++ object r_736109 = args[0];
++ if( (boolean_f != r_736109) ){
++
++closureN_type c_7321900;
++object e_7322467 [30];
++c_7321900.hdr.mark = gc_color_red;
++ c_7321900.hdr.grayed = 0;
++c_7321900.tag = closureN_tag;
++ c_7321900.fn = (function_type)__lambda_975;
++c_7321900.num_args = 1;
++c_7321900.num_elements = 30;
++c_7321900.elements = (object *)e_7322467;
++c_7321900.elements[0] = ((closureN)self_7312616)->elements[0];
++c_7321900.elements[1] = ((closureN)self_7312616)->elements[1];
++c_7321900.elements[2] = ((closureN)self_7312616)->elements[2];
++c_7321900.elements[3] = ((closureN)self_7312616)->elements[3];
++c_7321900.elements[4] = ((closureN)self_7312616)->elements[4];
++c_7321900.elements[5] = ((closureN)self_7312616)->elements[5];
++c_7321900.elements[6] = ((closureN)self_7312616)->elements[6];
++c_7321900.elements[7] = ((closureN)self_7312616)->elements[8];
++c_7321900.elements[8] = ((closureN)self_7312616)->elements[9];
++c_7321900.elements[9] = ((closureN)self_7312616)->elements[10];
++c_7321900.elements[10] = ((closureN)self_7312616)->elements[11];
++c_7321900.elements[11] = ((closureN)self_7312616)->elements[12];
++c_7321900.elements[12] = ((closureN)self_7312616)->elements[13];
++c_7321900.elements[13] = ((closureN)self_7312616)->elements[14];
++c_7321900.elements[14] = ((closureN)self_7312616)->elements[15];
++c_7321900.elements[15] = ((closureN)self_7312616)->elements[16];
++c_7321900.elements[16] = ((closureN)self_7312616)->elements[17];
++c_7321900.elements[17] = ((closureN)self_7312616)->elements[18];
++c_7321900.elements[18] = ((closureN)self_7312616)->elements[19];
++c_7321900.elements[19] = ((closureN)self_7312616)->elements[22];
++c_7321900.elements[20] = ((closureN)self_7312616)->elements[23];
++c_7321900.elements[21] = ((closureN)self_7312616)->elements[24];
++c_7321900.elements[22] = ((closureN)self_7312616)->elements[25];
++c_7321900.elements[23] = ((closureN)self_7312616)->elements[26];
++c_7321900.elements[24] = ((closureN)self_7312616)->elements[27];
++c_7321900.elements[25] = ((closureN)self_7312616)->elements[28];
++c_7321900.elements[26] = ((closureN)self_7312616)->elements[29];
++c_7321900.elements[27] = ((closureN)self_7312616)->elements[30];
++c_7321900.elements[28] = ((closureN)self_7312616)->elements[31];
++c_7321900.elements[29] = ((closureN)self_7312616)->elements[32];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321900,__lambda_975, Cyc_cdr(data, ((closureN)self_7312616)->elements[30]));
++} else {
++
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312616)->elements[30])) ){
++
++closureN_type c_7322475;
++object e_7322503 [9];
++c_7322475.hdr.mark = gc_color_red;
++ c_7322475.hdr.grayed = 0;
++c_7322475.tag = closureN_tag;
++ c_7322475.fn = (function_type)__lambda_1010;
++c_7322475.num_args = 1;
++c_7322475.num_elements = 9;
++c_7322475.elements = (object *)e_7322503;
++c_7322475.elements[0] = ((closureN)self_7312616)->elements[2];
++c_7322475.elements[1] = ((closureN)self_7312616)->elements[3];
++c_7322475.elements[2] = ((closureN)self_7312616)->elements[16];
++c_7322475.elements[3] = ((closureN)self_7312616)->elements[24];
++c_7322475.elements[4] = ((closureN)self_7312616)->elements[27];
++c_7322475.elements[5] = ((closureN)self_7312616)->elements[28];
++c_7322475.elements[6] = ((closureN)self_7312616)->elements[30];
++c_7322475.elements[7] = ((closureN)self_7312616)->elements[31];
++c_7322475.elements[8] = ((closureN)self_7312616)->elements[32];
++
++
++closureN_type c_7322504;
++object e_7322519 [6];
++c_7322504.hdr.mark = gc_color_red;
++ c_7322504.hdr.grayed = 0;
++c_7322504.tag = closureN_tag;
++ c_7322504.fn = (function_type)__lambda_1012;
++c_7322504.num_args = 1;
++c_7322504.num_elements = 6;
++c_7322504.elements = (object *)e_7322519;
++c_7322504.elements[0] = ((closureN)self_7312616)->elements[4];
++c_7322504.elements[1] = ((closureN)self_7312616)->elements[24];
++c_7322504.elements[2] = ((closureN)self_7312616)->elements[26];
++c_7322504.elements[3] = ((closureN)self_7312616)->elements[28];
++c_7322504.elements[4] = ((closureN)self_7312616)->elements[30];
++c_7322504.elements[5] = ((closureN)self_7312616)->elements[31];
++
++return_direct_with_clo1(data,(closure)&c_7322475,__lambda_1010, &c_7322504);
++} else {
++
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312616)->elements[30])) ){
++
++closureN_type c_7322524;
++object e_7322550 [9];
++c_7322524.hdr.mark = gc_color_red;
++ c_7322524.hdr.grayed = 0;
++c_7322524.tag = closureN_tag;
++ c_7322524.fn = (function_type)__lambda_1013;
++c_7322524.num_args = 1;
++c_7322524.num_elements = 9;
++c_7322524.elements = (object *)e_7322550;
++c_7322524.elements[0] = ((closureN)self_7312616)->elements[2];
++c_7322524.elements[1] = ((closureN)self_7312616)->elements[20];
++c_7322524.elements[2] = ((closureN)self_7312616)->elements[21];
++c_7322524.elements[3] = ((closureN)self_7312616)->elements[24];
++c_7322524.elements[4] = ((closureN)self_7312616)->elements[26];
++c_7322524.elements[5] = ((closureN)self_7312616)->elements[27];
++c_7322524.elements[6] = ((closureN)self_7312616)->elements[28];
++c_7322524.elements[7] = ((closureN)self_7312616)->elements[31];
++c_7322524.elements[8] = ((closureN)self_7312616)->elements[32];
++
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7322524, ((closureN)self_7312616)->elements[30]);
++} else {
++
++if( (boolean_f != Cyc_is_null(((closureN)self_7312616)->elements[30])) ){
++
++closureN_type c_7322557;
++object e_7322569 [4];
++c_7322557.hdr.mark = gc_color_red;
++ c_7322557.hdr.grayed = 0;
++c_7322557.tag = closureN_tag;
++ c_7322557.fn = (function_type)__lambda_1015;
++c_7322557.num_args = 1;
++c_7322557.num_elements = 4;
++c_7322557.elements = (object *)e_7322569;
++c_7322557.elements[0] = ((closureN)self_7312616)->elements[2];
++c_7322557.elements[1] = ((closureN)self_7312616)->elements[15];
++c_7322557.elements[2] = ((closureN)self_7312616)->elements[27];
++c_7322557.elements[3] = ((closureN)self_7312616)->elements[31];
++
++return_closcall2(data, ((closureN)self_7312616)->elements[26], &c_7322557, ((closureN)self_7312616)->elements[32]);
++} else {
++
++closureN_type c_7322573;
++object e_7322586 [5];
++c_7322573.hdr.mark = gc_color_red;
++ c_7322573.hdr.grayed = 0;
++c_7322573.tag = closureN_tag;
++ c_7322573.fn = (function_type)__lambda_1016;
++c_7322573.num_args = 1;
++c_7322573.num_elements = 5;
++c_7322573.elements = (object *)e_7322586;
++c_7322573.elements[0] = ((closureN)self_7312616)->elements[2];
++c_7322573.elements[1] = ((closureN)self_7312616)->elements[7];
++c_7322573.elements[2] = ((closureN)self_7312616)->elements[27];
++c_7322573.elements[3] = ((closureN)self_7312616)->elements[30];
++c_7322573.elements[4] = ((closureN)self_7312616)->elements[31];
++
++return_closcall2(data, ((closureN)self_7312616)->elements[26], &c_7322573, ((closureN)self_7312616)->elements[32]);}
++;}
++;}
++;}
++;;
++}
++
++static void __lambda_1016(void *data, object self_7312658, int argc, object *args) /* object self_7312658, object r_736295 */
++ {
++ object r_736295 = args[0];
++
++list_3_type local_7322578;
++
++list_3_type local_7322582;
++return_direct_with_clo1(data, ((closureN)self_7312658)->elements[2], (((closure) ((closureN)self_7312658)->elements[2])->fn), Cyc_fast_list_3(&local_7322578, ((closureN)self_7312658)->elements[0], Cyc_fast_list_3(&local_7322582, ((closureN)self_7312658)->elements[1], ((closureN)self_7312658)->elements[4], ((closureN)self_7312658)->elements[3]), r_736295));;
+ }
+
+-static void __lambda_837(void *data, object self_7313812, int argc, object *args) /* object self_7313812, object r_736373 */
++static void __lambda_1015(void *data, object self_7312657, int argc, object *args) /* object self_7312657, object r_736293 */
+ {
+- object r_736373 = args[0];
++ object r_736293 = args[0];
+
+-closureN_type c_7322120;
+-object e_7324110 [30];
+-c_7322120.hdr.mark = gc_color_red;
+- c_7322120.hdr.grayed = 0;
+-c_7322120.tag = closureN_tag;
+- c_7322120.fn = (function_type)__lambda_838;
+-c_7322120.num_args = 1;
+-c_7322120.num_elements = 30;
+-c_7322120.elements = (object *)e_7324110;
+-c_7322120.elements[0] = ((closureN)self_7313812)->elements[0];
+-c_7322120.elements[1] = ((closureN)self_7313812)->elements[1];
+-c_7322120.elements[2] = ((closureN)self_7313812)->elements[2];
+-c_7322120.elements[3] = ((closureN)self_7313812)->elements[3];
+-c_7322120.elements[4] = ((closureN)self_7313812)->elements[4];
+-c_7322120.elements[5] = ((closureN)self_7313812)->elements[5];
+-c_7322120.elements[6] = ((closureN)self_7313812)->elements[6];
+-c_7322120.elements[7] = ((closureN)self_7313812)->elements[7];
+-c_7322120.elements[8] = ((closureN)self_7313812)->elements[8];
+-c_7322120.elements[9] = ((closureN)self_7313812)->elements[9];
+-c_7322120.elements[10] = ((closureN)self_7313812)->elements[10];
+-c_7322120.elements[11] = ((closureN)self_7313812)->elements[11];
+-c_7322120.elements[12] = ((closureN)self_7313812)->elements[12];
+-c_7322120.elements[13] = ((closureN)self_7313812)->elements[13];
+-c_7322120.elements[14] = ((closureN)self_7313812)->elements[14];
+-c_7322120.elements[15] = ((closureN)self_7313812)->elements[15];
+-c_7322120.elements[16] = ((closureN)self_7313812)->elements[16];
+-c_7322120.elements[17] = ((closureN)self_7313812)->elements[17];
+-c_7322120.elements[18] = ((closureN)self_7313812)->elements[18];
+-c_7322120.elements[19] = ((closureN)self_7313812)->elements[19];
+-c_7322120.elements[20] = ((closureN)self_7313812)->elements[20];
+-c_7322120.elements[21] = ((closureN)self_7313812)->elements[21];
+-c_7322120.elements[22] = ((closureN)self_7313812)->elements[22];
+-c_7322120.elements[23] = ((closureN)self_7313812)->elements[23];
+-c_7322120.elements[24] = ((closureN)self_7313812)->elements[24];
+-c_7322120.elements[25] = ((closureN)self_7313812)->elements[25];
+-c_7322120.elements[26] = ((closureN)self_7313812)->elements[26];
+-c_7322120.elements[27] = ((closureN)self_7313812)->elements[27];
+-c_7322120.elements[28] = r_736373;
+-c_7322120.elements[29] = ((closureN)self_7313812)->elements[28];
+-
+-return_closcall2(data, ((closureN)self_7313812)->elements[28], &c_7322120, quote__91);;
+-}
+-
+-static void __lambda_838(void *data, object self_7313813, int argc, object *args) /* object self_7313813, object r_736374 */
+- {
+- object r_736374 = args[0];
+-
+-closureN_type c_7322123;
+-object e_7324109 [31];
+-c_7322123.hdr.mark = gc_color_red;
+- c_7322123.hdr.grayed = 0;
+-c_7322123.tag = closureN_tag;
+- c_7322123.fn = (function_type)__lambda_839;
+-c_7322123.num_args = 1;
+-c_7322123.num_elements = 31;
+-c_7322123.elements = (object *)e_7324109;
+-c_7322123.elements[0] = ((closureN)self_7313813)->elements[0];
+-c_7322123.elements[1] = ((closureN)self_7313813)->elements[1];
+-c_7322123.elements[2] = ((closureN)self_7313813)->elements[2];
+-c_7322123.elements[3] = ((closureN)self_7313813)->elements[3];
+-c_7322123.elements[4] = ((closureN)self_7313813)->elements[4];
+-c_7322123.elements[5] = ((closureN)self_7313813)->elements[5];
+-c_7322123.elements[6] = ((closureN)self_7313813)->elements[6];
+-c_7322123.elements[7] = ((closureN)self_7313813)->elements[7];
+-c_7322123.elements[8] = ((closureN)self_7313813)->elements[8];
+-c_7322123.elements[9] = ((closureN)self_7313813)->elements[9];
+-c_7322123.elements[10] = ((closureN)self_7313813)->elements[10];
+-c_7322123.elements[11] = ((closureN)self_7313813)->elements[11];
+-c_7322123.elements[12] = ((closureN)self_7313813)->elements[12];
+-c_7322123.elements[13] = ((closureN)self_7313813)->elements[13];
+-c_7322123.elements[14] = ((closureN)self_7313813)->elements[14];
+-c_7322123.elements[15] = ((closureN)self_7313813)->elements[15];
+-c_7322123.elements[16] = ((closureN)self_7313813)->elements[16];
+-c_7322123.elements[17] = ((closureN)self_7313813)->elements[17];
+-c_7322123.elements[18] = ((closureN)self_7313813)->elements[18];
+-c_7322123.elements[19] = ((closureN)self_7313813)->elements[19];
+-c_7322123.elements[20] = ((closureN)self_7313813)->elements[20];
+-c_7322123.elements[21] = ((closureN)self_7313813)->elements[21];
+-c_7322123.elements[22] = ((closureN)self_7313813)->elements[22];
+-c_7322123.elements[23] = ((closureN)self_7313813)->elements[23];
+-c_7322123.elements[24] = ((closureN)self_7313813)->elements[24];
+-c_7322123.elements[25] = ((closureN)self_7313813)->elements[25];
+-c_7322123.elements[26] = ((closureN)self_7313813)->elements[26];
+-c_7322123.elements[27] = ((closureN)self_7313813)->elements[27];
+-c_7322123.elements[28] = ((closureN)self_7313813)->elements[28];
+-c_7322123.elements[29] = r_736374;
+-c_7322123.elements[30] = ((closureN)self_7313813)->elements[29];
+-
+-return_closcall2(data, ((closureN)self_7313813)->elements[29], &c_7322123, quote__125_123);;
+-}
+-
+-static void __lambda_839(void *data, object self_7313814, int argc, object *args) /* object self_7313814, object r_736375 */
+- {
+- object r_736375 = args[0];
+-
+-closureN_type c_7322126;
+-object e_7324108 [32];
+-c_7322126.hdr.mark = gc_color_red;
+- c_7322126.hdr.grayed = 0;
+-c_7322126.tag = closureN_tag;
+- c_7322126.fn = (function_type)__lambda_840;
+-c_7322126.num_args = 1;
+-c_7322126.num_elements = 32;
+-c_7322126.elements = (object *)e_7324108;
+-c_7322126.elements[0] = ((closureN)self_7313814)->elements[0];
+-c_7322126.elements[1] = ((closureN)self_7313814)->elements[1];
+-c_7322126.elements[2] = ((closureN)self_7313814)->elements[2];
+-c_7322126.elements[3] = ((closureN)self_7313814)->elements[3];
+-c_7322126.elements[4] = ((closureN)self_7313814)->elements[4];
+-c_7322126.elements[5] = ((closureN)self_7313814)->elements[5];
+-c_7322126.elements[6] = ((closureN)self_7313814)->elements[6];
+-c_7322126.elements[7] = ((closureN)self_7313814)->elements[7];
+-c_7322126.elements[8] = ((closureN)self_7313814)->elements[8];
+-c_7322126.elements[9] = ((closureN)self_7313814)->elements[9];
+-c_7322126.elements[10] = ((closureN)self_7313814)->elements[10];
+-c_7322126.elements[11] = ((closureN)self_7313814)->elements[11];
+-c_7322126.elements[12] = ((closureN)self_7313814)->elements[12];
+-c_7322126.elements[13] = ((closureN)self_7313814)->elements[13];
+-c_7322126.elements[14] = ((closureN)self_7313814)->elements[14];
+-c_7322126.elements[15] = ((closureN)self_7313814)->elements[15];
+-c_7322126.elements[16] = ((closureN)self_7313814)->elements[16];
+-c_7322126.elements[17] = ((closureN)self_7313814)->elements[17];
+-c_7322126.elements[18] = ((closureN)self_7313814)->elements[18];
+-c_7322126.elements[19] = ((closureN)self_7313814)->elements[19];
+-c_7322126.elements[20] = ((closureN)self_7313814)->elements[20];
+-c_7322126.elements[21] = ((closureN)self_7313814)->elements[21];
+-c_7322126.elements[22] = ((closureN)self_7313814)->elements[22];
+-c_7322126.elements[23] = ((closureN)self_7313814)->elements[23];
+-c_7322126.elements[24] = ((closureN)self_7313814)->elements[24];
+-c_7322126.elements[25] = ((closureN)self_7313814)->elements[25];
+-c_7322126.elements[26] = ((closureN)self_7313814)->elements[26];
+-c_7322126.elements[27] = ((closureN)self_7313814)->elements[27];
+-c_7322126.elements[28] = ((closureN)self_7313814)->elements[28];
+-c_7322126.elements[29] = ((closureN)self_7313814)->elements[29];
+-c_7322126.elements[30] = r_736375;
+-c_7322126.elements[31] = ((closureN)self_7313814)->elements[30];
+-
+-return_closcall2(data, ((closureN)self_7313814)->elements[30], &c_7322126, quote_error_95loc);;
+-}
+-
+-static void __lambda_840(void *data, object self_7313815, int argc, object *args) /* object self_7313815, object r_736376 */
+- {
+- object r_736376 = args[0];
+-
+-closureN_type c_7322129;
+-object e_7324107 [33];
+-c_7322129.hdr.mark = gc_color_red;
+- c_7322129.hdr.grayed = 0;
+-c_7322129.tag = closureN_tag;
+- c_7322129.fn = (function_type)__lambda_841;
+-c_7322129.num_args = 1;
+-c_7322129.num_elements = 33;
+-c_7322129.elements = (object *)e_7324107;
+-c_7322129.elements[0] = ((closureN)self_7313815)->elements[0];
+-c_7322129.elements[1] = ((closureN)self_7313815)->elements[1];
+-c_7322129.elements[2] = ((closureN)self_7313815)->elements[2];
+-c_7322129.elements[3] = ((closureN)self_7313815)->elements[3];
+-c_7322129.elements[4] = ((closureN)self_7313815)->elements[4];
+-c_7322129.elements[5] = ((closureN)self_7313815)->elements[5];
+-c_7322129.elements[6] = ((closureN)self_7313815)->elements[6];
+-c_7322129.elements[7] = ((closureN)self_7313815)->elements[7];
+-c_7322129.elements[8] = ((closureN)self_7313815)->elements[8];
+-c_7322129.elements[9] = ((closureN)self_7313815)->elements[9];
+-c_7322129.elements[10] = ((closureN)self_7313815)->elements[10];
+-c_7322129.elements[11] = ((closureN)self_7313815)->elements[11];
+-c_7322129.elements[12] = ((closureN)self_7313815)->elements[12];
+-c_7322129.elements[13] = ((closureN)self_7313815)->elements[13];
+-c_7322129.elements[14] = ((closureN)self_7313815)->elements[14];
+-c_7322129.elements[15] = ((closureN)self_7313815)->elements[15];
+-c_7322129.elements[16] = ((closureN)self_7313815)->elements[16];
+-c_7322129.elements[17] = ((closureN)self_7313815)->elements[17];
+-c_7322129.elements[18] = ((closureN)self_7313815)->elements[18];
+-c_7322129.elements[19] = ((closureN)self_7313815)->elements[19];
+-c_7322129.elements[20] = ((closureN)self_7313815)->elements[20];
+-c_7322129.elements[21] = ((closureN)self_7313815)->elements[21];
+-c_7322129.elements[22] = ((closureN)self_7313815)->elements[22];
+-c_7322129.elements[23] = ((closureN)self_7313815)->elements[23];
+-c_7322129.elements[24] = ((closureN)self_7313815)->elements[24];
+-c_7322129.elements[25] = ((closureN)self_7313815)->elements[25];
+-c_7322129.elements[26] = ((closureN)self_7313815)->elements[26];
+-c_7322129.elements[27] = ((closureN)self_7313815)->elements[27];
+-c_7322129.elements[28] = ((closureN)self_7313815)->elements[28];
+-c_7322129.elements[29] = ((closureN)self_7313815)->elements[29];
+-c_7322129.elements[30] = ((closureN)self_7313815)->elements[30];
+-c_7322129.elements[31] = r_736376;
+-c_7322129.elements[32] = ((closureN)self_7313815)->elements[31];
+-
+-return_closcall2(data, ((closureN)self_7313815)->elements[31], &c_7322129, quote_ls);;
+-}
+-
+-static void __lambda_841(void *data, object self_7313816, int argc, object *args) /* object self_7313816, object r_736377 */
+- {
+- object r_736377 = args[0];
+-
+-closureN_type c_7322132;
+-object e_7324106 [34];
+-c_7322132.hdr.mark = gc_color_red;
+- c_7322132.hdr.grayed = 0;
+-c_7322132.tag = closureN_tag;
+- c_7322132.fn = (function_type)__lambda_842;
+-c_7322132.num_args = 1;
+-c_7322132.num_elements = 34;
+-c_7322132.elements = (object *)e_7324106;
+-c_7322132.elements[0] = ((closureN)self_7313816)->elements[0];
+-c_7322132.elements[1] = ((closureN)self_7313816)->elements[1];
+-c_7322132.elements[2] = ((closureN)self_7313816)->elements[2];
+-c_7322132.elements[3] = ((closureN)self_7313816)->elements[3];
+-c_7322132.elements[4] = ((closureN)self_7313816)->elements[4];
+-c_7322132.elements[5] = ((closureN)self_7313816)->elements[5];
+-c_7322132.elements[6] = ((closureN)self_7313816)->elements[6];
+-c_7322132.elements[7] = ((closureN)self_7313816)->elements[7];
+-c_7322132.elements[8] = ((closureN)self_7313816)->elements[8];
+-c_7322132.elements[9] = ((closureN)self_7313816)->elements[9];
+-c_7322132.elements[10] = ((closureN)self_7313816)->elements[10];
+-c_7322132.elements[11] = ((closureN)self_7313816)->elements[11];
+-c_7322132.elements[12] = ((closureN)self_7313816)->elements[12];
+-c_7322132.elements[13] = ((closureN)self_7313816)->elements[13];
+-c_7322132.elements[14] = ((closureN)self_7313816)->elements[14];
+-c_7322132.elements[15] = ((closureN)self_7313816)->elements[15];
+-c_7322132.elements[16] = ((closureN)self_7313816)->elements[16];
+-c_7322132.elements[17] = ((closureN)self_7313816)->elements[17];
+-c_7322132.elements[18] = ((closureN)self_7313816)->elements[18];
+-c_7322132.elements[19] = ((closureN)self_7313816)->elements[19];
+-c_7322132.elements[20] = ((closureN)self_7313816)->elements[20];
+-c_7322132.elements[21] = ((closureN)self_7313816)->elements[21];
+-c_7322132.elements[22] = ((closureN)self_7313816)->elements[22];
+-c_7322132.elements[23] = ((closureN)self_7313816)->elements[23];
+-c_7322132.elements[24] = ((closureN)self_7313816)->elements[24];
+-c_7322132.elements[25] = ((closureN)self_7313816)->elements[25];
+-c_7322132.elements[26] = ((closureN)self_7313816)->elements[26];
+-c_7322132.elements[27] = ((closureN)self_7313816)->elements[27];
+-c_7322132.elements[28] = ((closureN)self_7313816)->elements[28];
+-c_7322132.elements[29] = ((closureN)self_7313816)->elements[29];
+-c_7322132.elements[30] = ((closureN)self_7313816)->elements[30];
+-c_7322132.elements[31] = ((closureN)self_7313816)->elements[31];
+-c_7322132.elements[32] = r_736377;
+-c_7322132.elements[33] = ((closureN)self_7313816)->elements[32];
+-
+-return_closcall2(data, ((closureN)self_7313816)->elements[32], &c_7322132, quote_res);;
+-}
+-
+-static void __lambda_842(void *data, object self_7313817, int argc, object *args) /* object self_7313817, object r_736378 */
+- {
+- object r_736378 = args[0];
+-
+-closureN_type c_7322135;
+-object e_7324105 [35];
+-c_7322135.hdr.mark = gc_color_red;
+- c_7322135.hdr.grayed = 0;
+-c_7322135.tag = closureN_tag;
+- c_7322135.fn = (function_type)__lambda_843;
+-c_7322135.num_args = 1;
+-c_7322135.num_elements = 35;
+-c_7322135.elements = (object *)e_7324105;
+-c_7322135.elements[0] = ((closureN)self_7313817)->elements[0];
+-c_7322135.elements[1] = ((closureN)self_7313817)->elements[1];
+-c_7322135.elements[2] = ((closureN)self_7313817)->elements[2];
+-c_7322135.elements[3] = ((closureN)self_7313817)->elements[3];
+-c_7322135.elements[4] = ((closureN)self_7313817)->elements[4];
+-c_7322135.elements[5] = ((closureN)self_7313817)->elements[5];
+-c_7322135.elements[6] = ((closureN)self_7313817)->elements[6];
+-c_7322135.elements[7] = ((closureN)self_7313817)->elements[7];
+-c_7322135.elements[8] = ((closureN)self_7313817)->elements[8];
+-c_7322135.elements[9] = ((closureN)self_7313817)->elements[9];
+-c_7322135.elements[10] = ((closureN)self_7313817)->elements[10];
+-c_7322135.elements[11] = ((closureN)self_7313817)->elements[11];
+-c_7322135.elements[12] = ((closureN)self_7313817)->elements[12];
+-c_7322135.elements[13] = ((closureN)self_7313817)->elements[13];
+-c_7322135.elements[14] = ((closureN)self_7313817)->elements[14];
+-c_7322135.elements[15] = ((closureN)self_7313817)->elements[15];
+-c_7322135.elements[16] = ((closureN)self_7313817)->elements[16];
+-c_7322135.elements[17] = ((closureN)self_7313817)->elements[17];
+-c_7322135.elements[18] = ((closureN)self_7313817)->elements[18];
+-c_7322135.elements[19] = ((closureN)self_7313817)->elements[19];
+-c_7322135.elements[20] = ((closureN)self_7313817)->elements[20];
+-c_7322135.elements[21] = ((closureN)self_7313817)->elements[21];
+-c_7322135.elements[22] = ((closureN)self_7313817)->elements[22];
+-c_7322135.elements[23] = ((closureN)self_7313817)->elements[23];
+-c_7322135.elements[24] = ((closureN)self_7313817)->elements[24];
+-c_7322135.elements[25] = ((closureN)self_7313817)->elements[25];
+-c_7322135.elements[26] = ((closureN)self_7313817)->elements[26];
+-c_7322135.elements[27] = ((closureN)self_7313817)->elements[27];
+-c_7322135.elements[28] = ((closureN)self_7313817)->elements[28];
+-c_7322135.elements[29] = ((closureN)self_7313817)->elements[29];
+-c_7322135.elements[30] = ((closureN)self_7313817)->elements[30];
+-c_7322135.elements[31] = ((closureN)self_7313817)->elements[31];
+-c_7322135.elements[32] = ((closureN)self_7313817)->elements[32];
+-c_7322135.elements[33] = r_736378;
+-c_7322135.elements[34] = ((closureN)self_7313817)->elements[33];
+-
+-return_closcall2(data, ((closureN)self_7313817)->elements[33], &c_7322135, quote_i);;
+-}
+-
+-static void __lambda_843(void *data, object self_7313818, int argc, object *args) /* object self_7313818, object r_736379 */
+- {
+- object r_736379 = args[0];
+-
+-closureN_type c_7322138;
+-object e_7324104 [36];
+-c_7322138.hdr.mark = gc_color_red;
+- c_7322138.hdr.grayed = 0;
+-c_7322138.tag = closureN_tag;
+- c_7322138.fn = (function_type)__lambda_844;
+-c_7322138.num_args = 1;
+-c_7322138.num_elements = 36;
+-c_7322138.elements = (object *)e_7324104;
+-c_7322138.elements[0] = ((closureN)self_7313818)->elements[0];
+-c_7322138.elements[1] = ((closureN)self_7313818)->elements[1];
+-c_7322138.elements[2] = ((closureN)self_7313818)->elements[2];
+-c_7322138.elements[3] = ((closureN)self_7313818)->elements[3];
+-c_7322138.elements[4] = ((closureN)self_7313818)->elements[4];
+-c_7322138.elements[5] = ((closureN)self_7313818)->elements[5];
+-c_7322138.elements[6] = ((closureN)self_7313818)->elements[6];
+-c_7322138.elements[7] = ((closureN)self_7313818)->elements[7];
+-c_7322138.elements[8] = ((closureN)self_7313818)->elements[8];
+-c_7322138.elements[9] = ((closureN)self_7313818)->elements[9];
+-c_7322138.elements[10] = ((closureN)self_7313818)->elements[10];
+-c_7322138.elements[11] = ((closureN)self_7313818)->elements[11];
+-c_7322138.elements[12] = ((closureN)self_7313818)->elements[12];
+-c_7322138.elements[13] = ((closureN)self_7313818)->elements[13];
+-c_7322138.elements[14] = ((closureN)self_7313818)->elements[14];
+-c_7322138.elements[15] = ((closureN)self_7313818)->elements[15];
+-c_7322138.elements[16] = ((closureN)self_7313818)->elements[16];
+-c_7322138.elements[17] = ((closureN)self_7313818)->elements[17];
+-c_7322138.elements[18] = ((closureN)self_7313818)->elements[18];
+-c_7322138.elements[19] = ((closureN)self_7313818)->elements[19];
+-c_7322138.elements[20] = ((closureN)self_7313818)->elements[20];
+-c_7322138.elements[21] = ((closureN)self_7313818)->elements[21];
+-c_7322138.elements[22] = ((closureN)self_7313818)->elements[22];
+-c_7322138.elements[23] = ((closureN)self_7313818)->elements[23];
+-c_7322138.elements[24] = ((closureN)self_7313818)->elements[24];
+-c_7322138.elements[25] = ((closureN)self_7313818)->elements[25];
+-c_7322138.elements[26] = ((closureN)self_7313818)->elements[26];
+-c_7322138.elements[27] = ((closureN)self_7313818)->elements[27];
+-c_7322138.elements[28] = ((closureN)self_7313818)->elements[28];
+-c_7322138.elements[29] = ((closureN)self_7313818)->elements[29];
+-c_7322138.elements[30] = ((closureN)self_7313818)->elements[30];
+-c_7322138.elements[31] = ((closureN)self_7313818)->elements[31];
+-c_7322138.elements[32] = ((closureN)self_7313818)->elements[32];
+-c_7322138.elements[33] = ((closureN)self_7313818)->elements[33];
+-c_7322138.elements[34] = r_736379;
+-c_7322138.elements[35] = ((closureN)self_7313818)->elements[34];
+-
+-return_closcall2(data, ((closureN)self_7313818)->elements[34], &c_7322138, quote_reverse);;
+-}
+-
+-static void __lambda_844(void *data, object self_7313819, int argc, object *args) /* object self_7313819, object r_736380 */
+- {
+- object r_736380 = args[0];
+-
+-closureN_type c_7322141;
+-object e_7324103 [37];
+-c_7322141.hdr.mark = gc_color_red;
+- c_7322141.hdr.grayed = 0;
+-c_7322141.tag = closureN_tag;
+- c_7322141.fn = (function_type)__lambda_845;
+-c_7322141.num_args = 1;
+-c_7322141.num_elements = 37;
+-c_7322141.elements = (object *)e_7324103;
+-c_7322141.elements[0] = ((closureN)self_7313819)->elements[0];
+-c_7322141.elements[1] = ((closureN)self_7313819)->elements[1];
+-c_7322141.elements[2] = ((closureN)self_7313819)->elements[2];
+-c_7322141.elements[3] = ((closureN)self_7313819)->elements[3];
+-c_7322141.elements[4] = ((closureN)self_7313819)->elements[4];
+-c_7322141.elements[5] = ((closureN)self_7313819)->elements[5];
+-c_7322141.elements[6] = ((closureN)self_7313819)->elements[6];
+-c_7322141.elements[7] = ((closureN)self_7313819)->elements[7];
+-c_7322141.elements[8] = ((closureN)self_7313819)->elements[8];
+-c_7322141.elements[9] = ((closureN)self_7313819)->elements[9];
+-c_7322141.elements[10] = ((closureN)self_7313819)->elements[10];
+-c_7322141.elements[11] = ((closureN)self_7313819)->elements[11];
+-c_7322141.elements[12] = ((closureN)self_7313819)->elements[12];
+-c_7322141.elements[13] = ((closureN)self_7313819)->elements[13];
+-c_7322141.elements[14] = ((closureN)self_7313819)->elements[14];
+-c_7322141.elements[15] = ((closureN)self_7313819)->elements[15];
+-c_7322141.elements[16] = ((closureN)self_7313819)->elements[16];
+-c_7322141.elements[17] = ((closureN)self_7313819)->elements[17];
+-c_7322141.elements[18] = ((closureN)self_7313819)->elements[18];
+-c_7322141.elements[19] = ((closureN)self_7313819)->elements[19];
+-c_7322141.elements[20] = ((closureN)self_7313819)->elements[20];
+-c_7322141.elements[21] = ((closureN)self_7313819)->elements[21];
+-c_7322141.elements[22] = ((closureN)self_7313819)->elements[22];
+-c_7322141.elements[23] = ((closureN)self_7313819)->elements[23];
+-c_7322141.elements[24] = ((closureN)self_7313819)->elements[24];
+-c_7322141.elements[25] = ((closureN)self_7313819)->elements[25];
+-c_7322141.elements[26] = ((closureN)self_7313819)->elements[26];
+-c_7322141.elements[27] = ((closureN)self_7313819)->elements[27];
+-c_7322141.elements[28] = ((closureN)self_7313819)->elements[28];
+-c_7322141.elements[29] = ((closureN)self_7313819)->elements[29];
+-c_7322141.elements[30] = ((closureN)self_7313819)->elements[30];
+-c_7322141.elements[31] = ((closureN)self_7313819)->elements[31];
+-c_7322141.elements[32] = ((closureN)self_7313819)->elements[32];
+-c_7322141.elements[33] = ((closureN)self_7313819)->elements[33];
+-c_7322141.elements[34] = ((closureN)self_7313819)->elements[34];
+-c_7322141.elements[35] = r_736380;
+-c_7322141.elements[36] = ((closureN)self_7313819)->elements[35];
+-
+-return_closcall2(data, ((closureN)self_7313819)->elements[35], &c_7322141, quote_vector_91_125list);;
+-}
+-
+-static void __lambda_845(void *data, object self_7313820, int argc, object *args) /* object self_7313820, object r_736381 */
+- {
+- object r_736381 = args[0];
+-
+-closureN_type c_7322144;
+-object e_7324102 [38];
+-c_7322144.hdr.mark = gc_color_red;
+- c_7322144.hdr.grayed = 0;
+-c_7322144.tag = closureN_tag;
+- c_7322144.fn = (function_type)__lambda_846;
+-c_7322144.num_args = 1;
+-c_7322144.num_elements = 38;
+-c_7322144.elements = (object *)e_7324102;
+-c_7322144.elements[0] = ((closureN)self_7313820)->elements[0];
+-c_7322144.elements[1] = ((closureN)self_7313820)->elements[1];
+-c_7322144.elements[2] = ((closureN)self_7313820)->elements[2];
+-c_7322144.elements[3] = ((closureN)self_7313820)->elements[3];
+-c_7322144.elements[4] = ((closureN)self_7313820)->elements[4];
+-c_7322144.elements[5] = ((closureN)self_7313820)->elements[5];
+-c_7322144.elements[6] = ((closureN)self_7313820)->elements[6];
+-c_7322144.elements[7] = ((closureN)self_7313820)->elements[7];
+-c_7322144.elements[8] = ((closureN)self_7313820)->elements[8];
+-c_7322144.elements[9] = ((closureN)self_7313820)->elements[9];
+-c_7322144.elements[10] = ((closureN)self_7313820)->elements[10];
+-c_7322144.elements[11] = ((closureN)self_7313820)->elements[11];
+-c_7322144.elements[12] = ((closureN)self_7313820)->elements[12];
+-c_7322144.elements[13] = ((closureN)self_7313820)->elements[13];
+-c_7322144.elements[14] = ((closureN)self_7313820)->elements[14];
+-c_7322144.elements[15] = ((closureN)self_7313820)->elements[15];
+-c_7322144.elements[16] = ((closureN)self_7313820)->elements[16];
+-c_7322144.elements[17] = ((closureN)self_7313820)->elements[17];
+-c_7322144.elements[18] = ((closureN)self_7313820)->elements[18];
+-c_7322144.elements[19] = ((closureN)self_7313820)->elements[19];
+-c_7322144.elements[20] = ((closureN)self_7313820)->elements[20];
+-c_7322144.elements[21] = ((closureN)self_7313820)->elements[21];
+-c_7322144.elements[22] = ((closureN)self_7313820)->elements[22];
+-c_7322144.elements[23] = ((closureN)self_7313820)->elements[23];
+-c_7322144.elements[24] = ((closureN)self_7313820)->elements[24];
+-c_7322144.elements[25] = ((closureN)self_7313820)->elements[25];
+-c_7322144.elements[26] = ((closureN)self_7313820)->elements[26];
+-c_7322144.elements[27] = ((closureN)self_7313820)->elements[27];
+-c_7322144.elements[28] = ((closureN)self_7313820)->elements[28];
+-c_7322144.elements[29] = ((closureN)self_7313820)->elements[29];
+-c_7322144.elements[30] = ((closureN)self_7313820)->elements[30];
+-c_7322144.elements[31] = ((closureN)self_7313820)->elements[31];
+-c_7322144.elements[32] = ((closureN)self_7313820)->elements[32];
+-c_7322144.elements[33] = ((closureN)self_7313820)->elements[33];
+-c_7322144.elements[34] = ((closureN)self_7313820)->elements[34];
+-c_7322144.elements[35] = ((closureN)self_7313820)->elements[35];
+-c_7322144.elements[36] = r_736381;
+-c_7322144.elements[37] = ((closureN)self_7313820)->elements[36];
+-
+-return_closcall2(data, ((closureN)self_7313820)->elements[36], &c_7322144, quote_list_91_125vector);;
+-}
+-
+-static void __lambda_846(void *data, object self_7313821, int argc, object *args) /* object self_7313821, object r_736382 */
+- {
+- object r_736382 = args[0];
+-
+-closureN_type c_7322147;
+-object e_7324101 [39];
+-c_7322147.hdr.mark = gc_color_red;
+- c_7322147.hdr.grayed = 0;
+-c_7322147.tag = closureN_tag;
+- c_7322147.fn = (function_type)__lambda_847;
+-c_7322147.num_args = 1;
+-c_7322147.num_elements = 39;
+-c_7322147.elements = (object *)e_7324101;
+-c_7322147.elements[0] = ((closureN)self_7313821)->elements[0];
+-c_7322147.elements[1] = ((closureN)self_7313821)->elements[1];
+-c_7322147.elements[2] = ((closureN)self_7313821)->elements[2];
+-c_7322147.elements[3] = ((closureN)self_7313821)->elements[3];
+-c_7322147.elements[4] = ((closureN)self_7313821)->elements[4];
+-c_7322147.elements[5] = ((closureN)self_7313821)->elements[5];
+-c_7322147.elements[6] = ((closureN)self_7313821)->elements[6];
+-c_7322147.elements[7] = ((closureN)self_7313821)->elements[7];
+-c_7322147.elements[8] = ((closureN)self_7313821)->elements[8];
+-c_7322147.elements[9] = ((closureN)self_7313821)->elements[9];
+-c_7322147.elements[10] = ((closureN)self_7313821)->elements[10];
+-c_7322147.elements[11] = ((closureN)self_7313821)->elements[11];
+-c_7322147.elements[12] = ((closureN)self_7313821)->elements[12];
+-c_7322147.elements[13] = ((closureN)self_7313821)->elements[13];
+-c_7322147.elements[14] = ((closureN)self_7313821)->elements[14];
+-c_7322147.elements[15] = ((closureN)self_7313821)->elements[15];
+-c_7322147.elements[16] = ((closureN)self_7313821)->elements[16];
+-c_7322147.elements[17] = ((closureN)self_7313821)->elements[17];
+-c_7322147.elements[18] = ((closureN)self_7313821)->elements[18];
+-c_7322147.elements[19] = ((closureN)self_7313821)->elements[19];
+-c_7322147.elements[20] = ((closureN)self_7313821)->elements[20];
+-c_7322147.elements[21] = ((closureN)self_7313821)->elements[21];
+-c_7322147.elements[22] = ((closureN)self_7313821)->elements[22];
+-c_7322147.elements[23] = ((closureN)self_7313821)->elements[23];
+-c_7322147.elements[24] = ((closureN)self_7313821)->elements[24];
+-c_7322147.elements[25] = ((closureN)self_7313821)->elements[25];
+-c_7322147.elements[26] = ((closureN)self_7313821)->elements[26];
+-c_7322147.elements[27] = ((closureN)self_7313821)->elements[27];
+-c_7322147.elements[28] = ((closureN)self_7313821)->elements[28];
+-c_7322147.elements[29] = ((closureN)self_7313821)->elements[29];
+-c_7322147.elements[30] = ((closureN)self_7313821)->elements[30];
+-c_7322147.elements[31] = ((closureN)self_7313821)->elements[31];
+-c_7322147.elements[32] = ((closureN)self_7313821)->elements[32];
+-c_7322147.elements[33] = ((closureN)self_7313821)->elements[33];
+-c_7322147.elements[34] = ((closureN)self_7313821)->elements[34];
+-c_7322147.elements[35] = ((closureN)self_7313821)->elements[35];
+-c_7322147.elements[36] = ((closureN)self_7313821)->elements[36];
+-c_7322147.elements[37] = r_736382;
+-c_7322147.elements[38] = ((closureN)self_7313821)->elements[37];
+-
+-return_closcall2(data, ((closureN)self_7313821)->elements[37], &c_7322147, quote_cons_91source);;
+-}
+-
+-static void __lambda_847(void *data, object self_7313822, int argc, object *args) /* object self_7313822, object r_736383 */
+- {
+- object r_736383 = args[0];
+-
+-closureN_type c_7322149;
+-object e_7324065 [4];
+-c_7322149.hdr.mark = gc_color_red;
+- c_7322149.hdr.grayed = 0;
+-c_7322149.tag = closureN_tag;
+- c_7322149.fn = (function_type)__lambda_848;
+-c_7322149.num_args = 37;
+-c_7322149.num_elements = 4;
+-c_7322149.elements = (object *)e_7324065;
+-c_7322149.elements[0] = ((closureN)self_7313822)->elements[0];
+-c_7322149.elements[1] = ((closureN)self_7313822)->elements[1];
+-c_7322149.elements[2] = ((closureN)self_7313822)->elements[2];
+-c_7322149.elements[3] = ((closureN)self_7313822)->elements[38];
+-
+-return_direct_with_clo37(data,(closure)&c_7322149,__lambda_848, ((closureN)self_7313822)->elements[3], obj_int2obj(0), ((closureN)self_7313822)->elements[4], ((closureN)self_7313822)->elements[5], ((closureN)self_7313822)->elements[6], ((closureN)self_7313822)->elements[7], ((closureN)self_7313822)->elements[8], ((closureN)self_7313822)->elements[9], ((closureN)self_7313822)->elements[10], ((closureN)self_7313822)->elements[11], ((closureN)self_7313822)->elements[12], ((closureN)self_7313822)->elements[13], ((closureN)self_7313822)->elements[14], ((closureN)self_7313822)->elements[15], ((closureN)self_7313822)->elements[16], ((closureN)self_7313822)->elements[17], ((closureN)self_7313822)->elements[18], ((closureN)self_7313822)->elements[19], ((closureN)self_7313822)->elements[20], ((closureN)self_7313822)->elements[21], ((closureN)self_7313822)->elements[22], ((closureN)self_7313822)->elements[23], ((closureN)self_7313822)->elements[24], ((closureN)self_7313822)->elements
[25], ((closureN)self_7313822)->elements[26], ((closureN)self_7313822)->elements[27], ((closureN)self_7313822)->elements[28], ((closureN)self_7313822)->elements[29], ((closureN)self_7313822)->elements[30], ((closureN)self_7313822)->elements[31], ((closureN)self_7313822)->elements[32], ((closureN)self_7313822)->elements[33], ((closureN)self_7313822)->elements[34], ((closureN)self_7313822)->elements[35], ((closureN)self_7313822)->elements[36], ((closureN)self_7313822)->elements[37], r_736383);;
+-}
+-
+-static void __lambda_848(void *data, object self_7313823, int argc, object *args) /* object self_7313823, object ellipsis_91specified_127_731266_733566, object count_731267_733567, object _191er_91macro_91transformer_731268_733568, object _191lambda_731269_733569, object _191let_731270_733570, object _191begin_731271_733571, object _191if_731272_733572, object _191and_731273_733573, object _191or_731274_733574, object _191eq_127_731275_733575, object _191equal_127_731276_733576, object _191car_731277_733577, object _191cdr_731278_733578, object _191cons_731279_733579, object _191pair_127_731280_733580, object _191null_127_731281_733581, object _191expr_731282_733582, object _191rename_731283_733583, object _191compare_731284_733584, object _191quote_731285_733585, object _191apply_731286_733586, object _191append_731287_733587, object _191map_731288_733588, object _191vector_127_731289_733589, object _191list_127_731290_733590, object _191len_731291_733591, object _191lengt
h_731292_733592, object _191_91_731293_733593, object _191_125_123_731294_733594, object _191error_731295_733595, object _191ls_731296_733596, object _191res_731297_733597, object _191i_731298_733598, object _191reverse_731299_733599, object _191vector_91_125list_731300_733600, object _191list_91_125vector_731301_733601, object _191cons3_731302_733602 */
+- {
+- object ellipsis_91specified_127_731266_733566 = args[0]; object count_731267_733567 = args[1]; object _191er_91macro_91transformer_731268_733568 = args[2]; object _191lambda_731269_733569 = args[3]; object _191let_731270_733570 = args[4]; object _191if_731272_733572 = args[6]; object _191and_731273_733573 = args[7]; object _191or_731274_733574 = args[8]; object _191equal_127_731276_733576 = args[10]; object _191car_731277_733577 = args[11]; object _191cdr_731278_733578 = args[12]; object _191cons_731279_733579 = args[13]; object _191pair_127_731280_733580 = args[14]; object _191null_127_731281_733581 = args[15]; object _191expr_731282_733582 = args[16]; object _191rename_731283_733583 = args[17]; object _191compare_731284_733584 = args[18]; object _191quote_731285_733585 = args[19]; object _191apply_731286_733586 = args[20]; object _191append_731287_733587 = args[21]; object _191map_731288_733588 = args[22]; object _191vector_127_731289_733589 = args[23]; object _191list_1
27_731290_733590 = args[24]; object _191len_731291_733591 = args[25]; object _191length_731292_733592 = args[26]; object _191_91_731293_733593 = args[27]; object _191_125_123_731294_733594 = args[28]; object _191error_731295_733595 = args[29]; object _191ls_731296_733596 = args[30]; object _191res_731297_733597 = args[31]; object _191i_731298_733598 = args[32]; object _191reverse_731299_733599 = args[33]; object _191vector_91_125list_731300_733600 = args[34]; object _191list_91_125vector_731301_733601 = args[35]; object _191cons3_731302_733602 = args[36];
+-
+-closureN_type c_7322151;
+-object e_7324061 [38];
+-c_7322151.hdr.mark = gc_color_red;
+- c_7322151.hdr.grayed = 0;
+-c_7322151.tag = closureN_tag;
+- c_7322151.fn = (function_type)__lambda_1441;
+-c_7322151.num_args = 1;
+-c_7322151.num_elements = 38;
+-c_7322151.elements = (object *)e_7324061;
+-c_7322151.elements[0] = _191_91_731293_733593;
+-c_7322151.elements[1] = _191_125_123_731294_733594;
+-c_7322151.elements[2] = _191and_731273_733573;
+-c_7322151.elements[3] = _191append_731287_733587;
+-c_7322151.elements[4] = _191apply_731286_733586;
+-c_7322151.elements[5] = _191car_731277_733577;
+-c_7322151.elements[6] = _191cdr_731278_733578;
+-c_7322151.elements[7] = _191compare_731284_733584;
+-c_7322151.elements[8] = _191cons_731279_733579;
+-c_7322151.elements[9] = _191cons3_731302_733602;
+-c_7322151.elements[10] = _191equal_127_731276_733576;
+-c_7322151.elements[11] = _191er_91macro_91transformer_731268_733568;
+-c_7322151.elements[12] = _191error_731295_733595;
+-c_7322151.elements[13] = _191expr_731282_733582;
+-c_7322151.elements[14] = _191i_731298_733598;
+-c_7322151.elements[15] = _191if_731272_733572;
+-c_7322151.elements[16] = _191lambda_731269_733569;
+-c_7322151.elements[17] = _191len_731291_733591;
+-c_7322151.elements[18] = _191length_731292_733592;
+-c_7322151.elements[19] = _191let_731270_733570;
+-c_7322151.elements[20] = _191list_91_125vector_731301_733601;
+-c_7322151.elements[21] = _191list_127_731290_733590;
+-c_7322151.elements[22] = _191ls_731296_733596;
+-c_7322151.elements[23] = _191map_731288_733588;
+-c_7322151.elements[24] = _191null_127_731281_733581;
+-c_7322151.elements[25] = _191or_731274_733574;
+-c_7322151.elements[26] = _191pair_127_731280_733580;
+-c_7322151.elements[27] = _191quote_731285_733585;
+-c_7322151.elements[28] = _191rename_731283_733583;
+-c_7322151.elements[29] = _191res_731297_733597;
+-c_7322151.elements[30] = _191reverse_731299_733599;
+-c_7322151.elements[31] = _191vector_91_125list_731300_733600;
+-c_7322151.elements[32] = _191vector_127_731289_733589;
+-c_7322151.elements[33] = ((closureN)self_7313823)->elements[0];
+-c_7322151.elements[34] = ellipsis_91specified_127_731266_733566;
+-c_7322151.elements[35] = ((closureN)self_7313823)->elements[1];
+-c_7322151.elements[36] = ((closureN)self_7313823)->elements[2];
+-c_7322151.elements[37] = ((closureN)self_7313823)->elements[3];
+-
+-
+-pair_type local_7324064;
+-return_direct_with_clo1(data,(closure)&c_7322151,__lambda_1441, set_cell_as_expr(&local_7324064, count_731267_733567));;
+-}
+-
+-static void __lambda_1441(void *data, object self_7313824, int argc, object *args) /* object self_7313824, object count_731267_733567 */
+- {
+- object count_731267_733567 = args[0];
+-
+-closureN_type c_7322153;
+-object e_7324060 [39];
+-c_7322153.hdr.mark = gc_color_red;
+- c_7322153.hdr.grayed = 0;
+-c_7322153.tag = closureN_tag;
+- c_7322153.fn = (function_type)__lambda_849;
+-c_7322153.num_args = 12;
+-c_7322153.num_elements = 39;
+-c_7322153.elements = (object *)e_7324060;
+-c_7322153.elements[0] = ((closureN)self_7313824)->elements[0];
+-c_7322153.elements[1] = ((closureN)self_7313824)->elements[1];
+-c_7322153.elements[2] = ((closureN)self_7313824)->elements[2];
+-c_7322153.elements[3] = ((closureN)self_7313824)->elements[3];
+-c_7322153.elements[4] = ((closureN)self_7313824)->elements[4];
+-c_7322153.elements[5] = ((closureN)self_7313824)->elements[5];
+-c_7322153.elements[6] = ((closureN)self_7313824)->elements[6];
+-c_7322153.elements[7] = ((closureN)self_7313824)->elements[7];
+-c_7322153.elements[8] = ((closureN)self_7313824)->elements[8];
+-c_7322153.elements[9] = ((closureN)self_7313824)->elements[9];
+-c_7322153.elements[10] = ((closureN)self_7313824)->elements[10];
+-c_7322153.elements[11] = ((closureN)self_7313824)->elements[11];
+-c_7322153.elements[12] = ((closureN)self_7313824)->elements[12];
+-c_7322153.elements[13] = ((closureN)self_7313824)->elements[13];
+-c_7322153.elements[14] = ((closureN)self_7313824)->elements[14];
+-c_7322153.elements[15] = ((closureN)self_7313824)->elements[15];
+-c_7322153.elements[16] = ((closureN)self_7313824)->elements[16];
+-c_7322153.elements[17] = ((closureN)self_7313824)->elements[17];
+-c_7322153.elements[18] = ((closureN)self_7313824)->elements[18];
+-c_7322153.elements[19] = ((closureN)self_7313824)->elements[19];
+-c_7322153.elements[20] = ((closureN)self_7313824)->elements[20];
+-c_7322153.elements[21] = ((closureN)self_7313824)->elements[21];
+-c_7322153.elements[22] = ((closureN)self_7313824)->elements[22];
+-c_7322153.elements[23] = ((closureN)self_7313824)->elements[23];
+-c_7322153.elements[24] = ((closureN)self_7313824)->elements[24];
+-c_7322153.elements[25] = ((closureN)self_7313824)->elements[25];
+-c_7322153.elements[26] = ((closureN)self_7313824)->elements[26];
+-c_7322153.elements[27] = ((closureN)self_7313824)->elements[27];
+-c_7322153.elements[28] = ((closureN)self_7313824)->elements[28];
+-c_7322153.elements[29] = ((closureN)self_7313824)->elements[29];
+-c_7322153.elements[30] = ((closureN)self_7313824)->elements[30];
+-c_7322153.elements[31] = ((closureN)self_7313824)->elements[31];
+-c_7322153.elements[32] = ((closureN)self_7313824)->elements[32];
+-c_7322153.elements[33] = ((closureN)self_7313824)->elements[33];
+-c_7322153.elements[34] = count_731267_733567;
+-c_7322153.elements[35] = ((closureN)self_7313824)->elements[34];
+-c_7322153.elements[36] = ((closureN)self_7313824)->elements[35];
+-c_7322153.elements[37] = ((closureN)self_7313824)->elements[36];
+-c_7322153.elements[38] = ((closureN)self_7313824)->elements[37];
+-
+-return_direct_with_clo12(data,(closure)&c_7322153,__lambda_849, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_849(void *data, object self_7313825, int argc, object *args) /* object self_7313825, object ellipsis_733603, object lits_733604, object forms_733605, object next_91symbol_733606, object expand_91pattern_733607, object ellipsis_91escape_127_733608, object ellipsis_127_733609, object ellipsis_91depth_733610, object ellipsis_91tail_733611, object all_91vars_733612, object free_91vars_733613, object expand_91template_733614 */
+- {
+- object ellipsis_733603 = args[0]; object lits_733604 = args[1]; object forms_733605 = args[2]; object next_91symbol_733606 = args[3]; object expand_91pattern_733607 = args[4]; object ellipsis_91escape_127_733608 = args[5]; object ellipsis_127_733609 = args[6]; object ellipsis_91depth_733610 = args[7]; object ellipsis_91tail_733611 = args[8]; object all_91vars_733612 = args[9]; object free_91vars_733613 = args[10]; object expand_91template_733614 = args[11];
+-
+-closureN_type c_7322155;
+-object e_7324056 [50];
+-c_7322155.hdr.mark = gc_color_red;
+- c_7322155.hdr.grayed = 0;
+-c_7322155.tag = closureN_tag;
+- c_7322155.fn = (function_type)__lambda_1440;
+-c_7322155.num_args = 1;
+-c_7322155.num_elements = 50;
+-c_7322155.elements = (object *)e_7324056;
+-c_7322155.elements[0] = ((closureN)self_7313825)->elements[0];
+-c_7322155.elements[1] = ((closureN)self_7313825)->elements[1];
+-c_7322155.elements[2] = ((closureN)self_7313825)->elements[2];
+-c_7322155.elements[3] = ((closureN)self_7313825)->elements[3];
+-c_7322155.elements[4] = ((closureN)self_7313825)->elements[4];
+-c_7322155.elements[5] = ((closureN)self_7313825)->elements[5];
+-c_7322155.elements[6] = ((closureN)self_7313825)->elements[6];
+-c_7322155.elements[7] = ((closureN)self_7313825)->elements[7];
+-c_7322155.elements[8] = ((closureN)self_7313825)->elements[8];
+-c_7322155.elements[9] = ((closureN)self_7313825)->elements[9];
+-c_7322155.elements[10] = ((closureN)self_7313825)->elements[10];
+-c_7322155.elements[11] = ((closureN)self_7313825)->elements[11];
+-c_7322155.elements[12] = ((closureN)self_7313825)->elements[12];
+-c_7322155.elements[13] = ((closureN)self_7313825)->elements[13];
+-c_7322155.elements[14] = ((closureN)self_7313825)->elements[14];
+-c_7322155.elements[15] = ((closureN)self_7313825)->elements[15];
+-c_7322155.elements[16] = ((closureN)self_7313825)->elements[16];
+-c_7322155.elements[17] = ((closureN)self_7313825)->elements[17];
+-c_7322155.elements[18] = ((closureN)self_7313825)->elements[18];
+-c_7322155.elements[19] = ((closureN)self_7313825)->elements[19];
+-c_7322155.elements[20] = ((closureN)self_7313825)->elements[20];
+-c_7322155.elements[21] = ((closureN)self_7313825)->elements[21];
+-c_7322155.elements[22] = ((closureN)self_7313825)->elements[22];
+-c_7322155.elements[23] = ((closureN)self_7313825)->elements[23];
+-c_7322155.elements[24] = ((closureN)self_7313825)->elements[24];
+-c_7322155.elements[25] = ((closureN)self_7313825)->elements[25];
+-c_7322155.elements[26] = ((closureN)self_7313825)->elements[26];
+-c_7322155.elements[27] = ((closureN)self_7313825)->elements[27];
+-c_7322155.elements[28] = ((closureN)self_7313825)->elements[28];
+-c_7322155.elements[29] = ((closureN)self_7313825)->elements[29];
+-c_7322155.elements[30] = ((closureN)self_7313825)->elements[30];
+-c_7322155.elements[31] = ((closureN)self_7313825)->elements[31];
+-c_7322155.elements[32] = ((closureN)self_7313825)->elements[32];
+-c_7322155.elements[33] = all_91vars_733612;
+-c_7322155.elements[34] = ((closureN)self_7313825)->elements[33];
+-c_7322155.elements[35] = ((closureN)self_7313825)->elements[34];
+-c_7322155.elements[36] = ellipsis_91depth_733610;
+-c_7322155.elements[37] = ellipsis_91escape_127_733608;
+-c_7322155.elements[38] = ((closureN)self_7313825)->elements[35];
+-c_7322155.elements[39] = ellipsis_91tail_733611;
+-c_7322155.elements[40] = ellipsis_127_733609;
+-c_7322155.elements[41] = expand_91pattern_733607;
+-c_7322155.elements[42] = expand_91template_733614;
+-c_7322155.elements[43] = ((closureN)self_7313825)->elements[36];
+-c_7322155.elements[44] = forms_733605;
+-c_7322155.elements[45] = free_91vars_733613;
+-c_7322155.elements[46] = ((closureN)self_7313825)->elements[37];
+-c_7322155.elements[47] = lits_733604;
+-c_7322155.elements[48] = next_91symbol_733606;
+-c_7322155.elements[49] = ((closureN)self_7313825)->elements[38];
++list_3_type local_7322562;
+
++list_2_type local_7322566;
++return_direct_with_clo1(data, ((closureN)self_7312657)->elements[2], (((closure) ((closureN)self_7312657)->elements[2])->fn), Cyc_fast_list_3(&local_7322562, ((closureN)self_7312657)->elements[0], Cyc_fast_list_2(&local_7322566, ((closureN)self_7312657)->elements[1], ((closureN)self_7312657)->elements[3]), r_736293));;
++}
+
+-pair_type local_7324059;
+-return_direct_with_clo1(data,(closure)&c_7322155,__lambda_1440, set_cell_as_expr(&local_7324059, ellipsis_733603));;
++static void __lambda_1013(void *data, object self_7312655, int argc, object *args) /* object self_7312655, object r_736289 */
++ {
++ object r_736289 = args[0];
++
++
++
++closureN_type c_7322529;
++object e_7322541 [4];
++c_7322529.hdr.mark = gc_color_red;
++ c_7322529.hdr.grayed = 0;
++c_7322529.tag = closureN_tag;
++ c_7322529.fn = (function_type)__lambda_1014;
++c_7322529.num_args = 1;
++c_7322529.num_elements = 4;
++c_7322529.elements = (object *)e_7322541;
++c_7322529.elements[0] = ((closureN)self_7312655)->elements[0];
++c_7322529.elements[1] = ((closureN)self_7312655)->elements[2];
++c_7322529.elements[2] = ((closureN)self_7312655)->elements[5];
++c_7322529.elements[3] = ((closureN)self_7312655)->elements[7];
++
++
++list_2_type local_7322544;
++return_closcall6(data, car(((closureN)self_7312655)->elements[6]), &c_7322529, r_736289, Cyc_fast_list_2(&local_7322544, ((closureN)self_7312655)->elements[1], ((closureN)self_7312655)->elements[7]), ((closureN)self_7312655)->elements[3], ((closureN)self_7312655)->elements[8], ((closureN)self_7312655)->elements[4]);;
++}
++
++static void __lambda_1014(void *data, object self_7312656, int argc, object *args) /* object self_7312656, object r_736288 */
++ {
++ object r_736288 = args[0];
++
++list_3_type local_7322534;
++
++list_2_type local_7322538;
++return_direct_with_clo1(data, ((closureN)self_7312656)->elements[2], (((closure) ((closureN)self_7312656)->elements[2])->fn), Cyc_fast_list_3(&local_7322534, ((closureN)self_7312656)->elements[0], Cyc_fast_list_2(&local_7322538, ((closureN)self_7312656)->elements[1], ((closureN)self_7312656)->elements[3]), r_736288));;
++}
++
++static void __lambda_1012(void *data, object self_7312652, int argc, object *args) /* object self_7312652, object k_736283, object vars_731376_733299 */
++ {
++ object k_736283 = args[0]; object vars_731376_733299 = args[1];
++
++
++
++
++
++list_2_type local_7322514;
++return_closcall6(data, car(((closureN)self_7312652)->elements[3]), k_736283, Cyc_cdr(data, ((closureN)self_7312652)->elements[4]), Cyc_fast_list_2(&local_7322514, ((closureN)self_7312652)->elements[0], ((closureN)self_7312652)->elements[5]), ((closureN)self_7312652)->elements[1], vars_731376_733299, ((closureN)self_7312652)->elements[2]);;
++}
++
++static void __lambda_1010(void *data, object self_7312653, int argc, object *args) /* object self_7312653, object r_736282 */
++ {
++ object r_736282 = args[0];
++
++
++
++closureN_type c_7322480;
++object e_7322492 [4];
++c_7322480.hdr.mark = gc_color_red;
++ c_7322480.hdr.grayed = 0;
++c_7322480.tag = closureN_tag;
++ c_7322480.fn = (function_type)__lambda_1011;
++c_7322480.num_args = 1;
++c_7322480.num_elements = 4;
++c_7322480.elements = (object *)e_7322492;
++c_7322480.elements[0] = ((closureN)self_7312653)->elements[0];
++c_7322480.elements[1] = ((closureN)self_7312653)->elements[2];
++c_7322480.elements[2] = ((closureN)self_7312653)->elements[4];
++c_7322480.elements[3] = ((closureN)self_7312653)->elements[7];
++
++
++
++
++list_2_type local_7322498;
++return_closcall6(data, car(((closureN)self_7312653)->elements[5]), &c_7322480, Cyc_car(data, ((closureN)self_7312653)->elements[6]), Cyc_fast_list_2(&local_7322498, ((closureN)self_7312653)->elements[1], ((closureN)self_7312653)->elements[7]), ((closureN)self_7312653)->elements[3], ((closureN)self_7312653)->elements[8], r_736282);;
++}
++
++static void __lambda_1011(void *data, object self_7312654, int argc, object *args) /* object self_7312654, object r_736279 */
++ {
++ object r_736279 = args[0];
++
++list_3_type local_7322485;
++
++list_2_type local_7322489;
++return_direct_with_clo1(data, ((closureN)self_7312654)->elements[2], (((closure) ((closureN)self_7312654)->elements[2])->fn), Cyc_fast_list_3(&local_7322485, ((closureN)self_7312654)->elements[0], Cyc_fast_list_2(&local_7322489, ((closureN)self_7312654)->elements[1], ((closureN)self_7312654)->elements[3]), r_736279));;
+ }
+
+-static void __lambda_1440(void *data, object self_7313826, int argc, object *args) /* object self_7313826, object ellipsis_733603 */
++static void __lambda_975(void *data, object self_7312617, int argc, object *args) /* object self_7312617, object r_736276 */
+ {
+- object ellipsis_733603 = args[0];
++ object r_736276 = args[0];
++
++
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, r_736276))) ){
++
++closureN_type c_7321906;
++object e_7322152 [20];
++c_7321906.hdr.mark = gc_color_red;
++ c_7321906.hdr.grayed = 0;
++c_7321906.tag = closureN_tag;
++ c_7321906.fn = (function_type)__lambda_976;
++c_7321906.num_args = 1;
++c_7321906.num_elements = 20;
++c_7321906.elements = (object *)e_7322152;
++c_7321906.elements[0] = ((closureN)self_7312617)->elements[2];
++c_7321906.elements[1] = ((closureN)self_7312617)->elements[3];
++c_7321906.elements[2] = ((closureN)self_7312617)->elements[4];
++c_7321906.elements[3] = ((closureN)self_7312617)->elements[5];
++c_7321906.elements[4] = ((closureN)self_7312617)->elements[8];
++c_7321906.elements[5] = ((closureN)self_7312617)->elements[11];
++c_7321906.elements[6] = ((closureN)self_7312617)->elements[12];
++c_7321906.elements[7] = ((closureN)self_7312617)->elements[14];
++c_7321906.elements[8] = ((closureN)self_7312617)->elements[15];
++c_7321906.elements[9] = ((closureN)self_7312617)->elements[16];
++c_7321906.elements[10] = ((closureN)self_7312617)->elements[18];
++c_7321906.elements[11] = ((closureN)self_7312617)->elements[19];
++c_7321906.elements[12] = ((closureN)self_7312617)->elements[21];
++c_7321906.elements[13] = ((closureN)self_7312617)->elements[23];
++c_7321906.elements[14] = ((closureN)self_7312617)->elements[24];
++c_7321906.elements[15] = ((closureN)self_7312617)->elements[25];
++c_7321906.elements[16] = ((closureN)self_7312617)->elements[26];
++c_7321906.elements[17] = ((closureN)self_7312617)->elements[27];
++c_7321906.elements[18] = ((closureN)self_7312617)->elements[28];
++c_7321906.elements[19] = ((closureN)self_7312617)->elements[29];
++
++
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7321906, Cyc_car(data, ((closureN)self_7312617)->elements[27]));
++} else {
+
+ closureN_type c_7322157;
+-object e_7324051 [50];
++object e_7322452 [24];
+ c_7322157.hdr.mark = gc_color_red;
+ c_7322157.hdr.grayed = 0;
+ c_7322157.tag = closureN_tag;
+- c_7322157.fn = (function_type)__lambda_1439;
++ c_7322157.fn = (function_type)__lambda_1002;
+ c_7322157.num_args = 1;
+-c_7322157.num_elements = 50;
+-c_7322157.elements = (object *)e_7324051;
+-c_7322157.elements[0] = ((closureN)self_7313826)->elements[0];
+-c_7322157.elements[1] = ((closureN)self_7313826)->elements[1];
+-c_7322157.elements[2] = ((closureN)self_7313826)->elements[2];
+-c_7322157.elements[3] = ((closureN)self_7313826)->elements[3];
+-c_7322157.elements[4] = ((closureN)self_7313826)->elements[4];
+-c_7322157.elements[5] = ((closureN)self_7313826)->elements[5];
+-c_7322157.elements[6] = ((closureN)self_7313826)->elements[6];
+-c_7322157.elements[7] = ((closureN)self_7313826)->elements[7];
+-c_7322157.elements[8] = ((closureN)self_7313826)->elements[8];
+-c_7322157.elements[9] = ((closureN)self_7313826)->elements[9];
+-c_7322157.elements[10] = ((closureN)self_7313826)->elements[10];
+-c_7322157.elements[11] = ((closureN)self_7313826)->elements[11];
+-c_7322157.elements[12] = ((closureN)self_7313826)->elements[12];
+-c_7322157.elements[13] = ((closureN)self_7313826)->elements[13];
+-c_7322157.elements[14] = ((closureN)self_7313826)->elements[14];
+-c_7322157.elements[15] = ((closureN)self_7313826)->elements[15];
+-c_7322157.elements[16] = ((closureN)self_7313826)->elements[16];
+-c_7322157.elements[17] = ((closureN)self_7313826)->elements[17];
+-c_7322157.elements[18] = ((closureN)self_7313826)->elements[18];
+-c_7322157.elements[19] = ((closureN)self_7313826)->elements[19];
+-c_7322157.elements[20] = ((closureN)self_7313826)->elements[20];
+-c_7322157.elements[21] = ((closureN)self_7313826)->elements[21];
+-c_7322157.elements[22] = ((closureN)self_7313826)->elements[22];
+-c_7322157.elements[23] = ((closureN)self_7313826)->elements[23];
+-c_7322157.elements[24] = ((closureN)self_7313826)->elements[24];
+-c_7322157.elements[25] = ((closureN)self_7313826)->elements[25];
+-c_7322157.elements[26] = ((closureN)self_7313826)->elements[26];
+-c_7322157.elements[27] = ((closureN)self_7313826)->elements[27];
+-c_7322157.elements[28] = ((closureN)self_7313826)->elements[28];
+-c_7322157.elements[29] = ((closureN)self_7313826)->elements[29];
+-c_7322157.elements[30] = ((closureN)self_7313826)->elements[30];
+-c_7322157.elements[31] = ((closureN)self_7313826)->elements[31];
+-c_7322157.elements[32] = ((closureN)self_7313826)->elements[32];
+-c_7322157.elements[33] = ((closureN)self_7313826)->elements[33];
+-c_7322157.elements[34] = ((closureN)self_7313826)->elements[34];
+-c_7322157.elements[35] = ((closureN)self_7313826)->elements[35];
+-c_7322157.elements[36] = ellipsis_733603;
+-c_7322157.elements[37] = ((closureN)self_7313826)->elements[36];
+-c_7322157.elements[38] = ((closureN)self_7313826)->elements[37];
+-c_7322157.elements[39] = ((closureN)self_7313826)->elements[38];
+-c_7322157.elements[40] = ((closureN)self_7313826)->elements[39];
+-c_7322157.elements[41] = ((closureN)self_7313826)->elements[40];
+-c_7322157.elements[42] = ((closureN)self_7313826)->elements[41];
+-c_7322157.elements[43] = ((closureN)self_7313826)->elements[42];
+-c_7322157.elements[44] = ((closureN)self_7313826)->elements[43];
+-c_7322157.elements[45] = ((closureN)self_7313826)->elements[44];
+-c_7322157.elements[46] = ((closureN)self_7313826)->elements[45];
+-c_7322157.elements[47] = ((closureN)self_7313826)->elements[46];
+-c_7322157.elements[48] = ((closureN)self_7313826)->elements[48];
+-c_7322157.elements[49] = ((closureN)self_7313826)->elements[49];
+-
+-
+-pair_type local_7324054;
+-return_direct_with_clo1(data,(closure)&c_7322157,__lambda_1439, set_cell_as_expr(&local_7324054, ((closureN)self_7313826)->elements[47]));;
++c_7322157.num_elements = 24;
++c_7322157.elements = (object *)e_7322452;
++c_7322157.elements[0] = ((closureN)self_7312617)->elements[0];
++c_7322157.elements[1] = ((closureN)self_7312617)->elements[1];
++c_7322157.elements[2] = ((closureN)self_7312617)->elements[2];
++c_7322157.elements[3] = ((closureN)self_7312617)->elements[3];
++c_7322157.elements[4] = ((closureN)self_7312617)->elements[4];
++c_7322157.elements[5] = ((closureN)self_7312617)->elements[5];
++c_7322157.elements[6] = ((closureN)self_7312617)->elements[6];
++c_7322157.elements[7] = ((closureN)self_7312617)->elements[7];
++c_7322157.elements[8] = ((closureN)self_7312617)->elements[8];
++c_7322157.elements[9] = ((closureN)self_7312617)->elements[9];
++c_7322157.elements[10] = ((closureN)self_7312617)->elements[10];
++c_7322157.elements[11] = ((closureN)self_7312617)->elements[11];
++c_7322157.elements[12] = ((closureN)self_7312617)->elements[13];
++c_7322157.elements[13] = ((closureN)self_7312617)->elements[16];
++c_7322157.elements[14] = ((closureN)self_7312617)->elements[17];
++c_7322157.elements[15] = ((closureN)self_7312617)->elements[18];
++c_7322157.elements[16] = ((closureN)self_7312617)->elements[21];
++c_7322157.elements[17] = ((closureN)self_7312617)->elements[23];
++c_7322157.elements[18] = ((closureN)self_7312617)->elements[24];
++c_7322157.elements[19] = ((closureN)self_7312617)->elements[25];
++c_7322157.elements[20] = ((closureN)self_7312617)->elements[26];
++c_7322157.elements[21] = ((closureN)self_7312617)->elements[27];
++c_7322157.elements[22] = ((closureN)self_7312617)->elements[28];
++c_7322157.elements[23] = ((closureN)self_7312617)->elements[29];
++
++
++closureN_type c_7322453;
++object e_7322466 [2];
++c_7322453.hdr.mark = gc_color_red;
++ c_7322453.hdr.grayed = 0;
++c_7322453.tag = closureN_tag;
++ c_7322453.fn = (function_type)__lambda_1008;
++c_7322453.num_args = 1;
++c_7322453.num_elements = 2;
++c_7322453.elements = (object *)e_7322466;
++c_7322453.elements[0] = ((closureN)self_7312617)->elements[20];
++c_7322453.elements[1] = ((closureN)self_7312617)->elements[22];
++
++return_direct_with_clo1(data,(closure)&c_7322157,__lambda_1002, &c_7322453);}
++;;
++}
++
++static void __lambda_1008(void *data, object self_7312644, int argc, object *args) /* object self_7312644, object k_736273, object x_731332_733284 */
++ {
++ object k_736273 = args[0]; object x_731332_733284 = args[1];
++
++closureN_type c_7322455;
++object e_7322465 [4];
++c_7322455.hdr.mark = gc_color_red;
++ c_7322455.hdr.grayed = 0;
++c_7322455.tag = closureN_tag;
++ c_7322455.fn = (function_type)__lambda_1009;
++c_7322455.num_args = 1;
++c_7322455.num_elements = 4;
++c_7322455.elements = (object *)e_7322465;
++c_7322455.elements[0] = ((closureN)self_7312644)->elements[0];
++c_7322455.elements[1] = ((closureN)self_7312644)->elements[1];
++c_7322455.elements[2] = k_736273;
++c_7322455.elements[3] = x_731332_733284;
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7322455, x_731332_733284);;
++}
++
++static void __lambda_1009(void *data, object self_7312645, int argc, object *args) /* object self_7312645, object r_736274 */
++ {
++ object r_736274 = args[0];
++ if( (boolean_f != r_736274) ){
++
++
++return_closcall3(data, ((closureN)self_7312645)->elements[0], ((closureN)self_7312645)->elements[2], ((closureN)self_7312645)->elements[3], car(((closureN)self_7312645)->elements[1]));
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312645)->elements[2], (((closure) ((closureN)self_7312645)->elements[2])->fn), boolean_f);}
++;;
+ }
+
+-static void __lambda_1439(void *data, object self_7313827, int argc, object *args) /* object self_7313827, object lits_733604 */
++static void __lambda_1002(void *data, object self_7312646, int argc, object *args) /* object self_7312646, object r_736271 */
+ {
+- object lits_733604 = args[0];
++ object r_736271 = args[0];
+
+ closureN_type c_7322159;
+-object e_7324046 [50];
++object e_7322448 [25];
+ c_7322159.hdr.mark = gc_color_red;
+ c_7322159.hdr.grayed = 0;
+ c_7322159.tag = closureN_tag;
+- c_7322159.fn = (function_type)__lambda_1438;
++ c_7322159.fn = (function_type)__lambda_1003;
+ c_7322159.num_args = 1;
+-c_7322159.num_elements = 50;
+-c_7322159.elements = (object *)e_7324046;
+-c_7322159.elements[0] = ((closureN)self_7313827)->elements[0];
+-c_7322159.elements[1] = ((closureN)self_7313827)->elements[1];
+-c_7322159.elements[2] = ((closureN)self_7313827)->elements[2];
+-c_7322159.elements[3] = ((closureN)self_7313827)->elements[3];
+-c_7322159.elements[4] = ((closureN)self_7313827)->elements[4];
+-c_7322159.elements[5] = ((closureN)self_7313827)->elements[5];
+-c_7322159.elements[6] = ((closureN)self_7313827)->elements[6];
+-c_7322159.elements[7] = ((closureN)self_7313827)->elements[7];
+-c_7322159.elements[8] = ((closureN)self_7313827)->elements[8];
+-c_7322159.elements[9] = ((closureN)self_7313827)->elements[9];
+-c_7322159.elements[10] = ((closureN)self_7313827)->elements[10];
+-c_7322159.elements[11] = ((closureN)self_7313827)->elements[11];
+-c_7322159.elements[12] = ((closureN)self_7313827)->elements[12];
+-c_7322159.elements[13] = ((closureN)self_7313827)->elements[13];
+-c_7322159.elements[14] = ((closureN)self_7313827)->elements[14];
+-c_7322159.elements[15] = ((closureN)self_7313827)->elements[15];
+-c_7322159.elements[16] = ((closureN)self_7313827)->elements[16];
+-c_7322159.elements[17] = ((closureN)self_7313827)->elements[17];
+-c_7322159.elements[18] = ((closureN)self_7313827)->elements[18];
+-c_7322159.elements[19] = ((closureN)self_7313827)->elements[19];
+-c_7322159.elements[20] = ((closureN)self_7313827)->elements[20];
+-c_7322159.elements[21] = ((closureN)self_7313827)->elements[21];
+-c_7322159.elements[22] = ((closureN)self_7313827)->elements[22];
+-c_7322159.elements[23] = ((closureN)self_7313827)->elements[23];
+-c_7322159.elements[24] = ((closureN)self_7313827)->elements[24];
+-c_7322159.elements[25] = ((closureN)self_7313827)->elements[25];
+-c_7322159.elements[26] = ((closureN)self_7313827)->elements[26];
+-c_7322159.elements[27] = ((closureN)self_7313827)->elements[27];
+-c_7322159.elements[28] = ((closureN)self_7313827)->elements[28];
+-c_7322159.elements[29] = ((closureN)self_7313827)->elements[29];
+-c_7322159.elements[30] = ((closureN)self_7313827)->elements[30];
+-c_7322159.elements[31] = ((closureN)self_7313827)->elements[31];
+-c_7322159.elements[32] = ((closureN)self_7313827)->elements[32];
+-c_7322159.elements[33] = ((closureN)self_7313827)->elements[33];
+-c_7322159.elements[34] = ((closureN)self_7313827)->elements[34];
+-c_7322159.elements[35] = ((closureN)self_7313827)->elements[35];
+-c_7322159.elements[36] = ((closureN)self_7313827)->elements[36];
+-c_7322159.elements[37] = ((closureN)self_7313827)->elements[37];
+-c_7322159.elements[38] = ((closureN)self_7313827)->elements[38];
+-c_7322159.elements[39] = ((closureN)self_7313827)->elements[39];
+-c_7322159.elements[40] = ((closureN)self_7313827)->elements[40];
+-c_7322159.elements[41] = ((closureN)self_7313827)->elements[41];
+-c_7322159.elements[42] = ((closureN)self_7313827)->elements[42];
+-c_7322159.elements[43] = ((closureN)self_7313827)->elements[43];
+-c_7322159.elements[44] = ((closureN)self_7313827)->elements[44];
+-c_7322159.elements[45] = ((closureN)self_7313827)->elements[46];
+-c_7322159.elements[46] = ((closureN)self_7313827)->elements[47];
+-c_7322159.elements[47] = lits_733604;
+-c_7322159.elements[48] = ((closureN)self_7313827)->elements[48];
+-c_7322159.elements[49] = ((closureN)self_7313827)->elements[49];
++c_7322159.num_elements = 25;
++c_7322159.elements = (object *)e_7322448;
++c_7322159.elements[0] = ((closureN)self_7312646)->elements[0];
++c_7322159.elements[1] = ((closureN)self_7312646)->elements[1];
++c_7322159.elements[2] = ((closureN)self_7312646)->elements[2];
++c_7322159.elements[3] = ((closureN)self_7312646)->elements[3];
++c_7322159.elements[4] = ((closureN)self_7312646)->elements[4];
++c_7322159.elements[5] = ((closureN)self_7312646)->elements[5];
++c_7322159.elements[6] = ((closureN)self_7312646)->elements[6];
++c_7322159.elements[7] = ((closureN)self_7312646)->elements[7];
++c_7322159.elements[8] = ((closureN)self_7312646)->elements[8];
++c_7322159.elements[9] = ((closureN)self_7312646)->elements[9];
++c_7322159.elements[10] = ((closureN)self_7312646)->elements[10];
++c_7322159.elements[11] = ((closureN)self_7312646)->elements[11];
++c_7322159.elements[12] = ((closureN)self_7312646)->elements[12];
++c_7322159.elements[13] = ((closureN)self_7312646)->elements[13];
++c_7322159.elements[14] = ((closureN)self_7312646)->elements[14];
++c_7322159.elements[15] = ((closureN)self_7312646)->elements[15];
++c_7322159.elements[16] = ((closureN)self_7312646)->elements[16];
++c_7322159.elements[17] = ((closureN)self_7312646)->elements[17];
++c_7322159.elements[18] = ((closureN)self_7312646)->elements[18];
++c_7322159.elements[19] = ((closureN)self_7312646)->elements[19];
++c_7322159.elements[20] = ((closureN)self_7312646)->elements[20];
++c_7322159.elements[21] = ((closureN)self_7312646)->elements[21];
++c_7322159.elements[22] = r_736271;
++c_7322159.elements[23] = ((closureN)self_7312646)->elements[22];
++c_7322159.elements[24] = ((closureN)self_7312646)->elements[23];
++
+
+
+-pair_type local_7324049;
+-return_direct_with_clo1(data,(closure)&c_7322159,__lambda_1438, set_cell_as_expr(&local_7324049, ((closureN)self_7313827)->elements[45]));;
++return_direct_with_clo1(data,(closure)&c_7322159,__lambda_1003, Cyc_cddr(data, ((closureN)self_7312646)->elements[21]));;
+ }
+
+-static void __lambda_1438(void *data, object self_7313828, int argc, object *args) /* object self_7313828, object forms_733605 */
++static void __lambda_1003(void *data, object self_7312647, int argc, object *args) /* object self_7312647, object r_736272 */
+ {
+- object forms_733605 = args[0];
++ object r_736272 = args[0];
+
+ closureN_type c_7322161;
+-object e_7324041 [50];
++object e_7322446 [24];
+ c_7322161.hdr.mark = gc_color_red;
+ c_7322161.hdr.grayed = 0;
+ c_7322161.tag = closureN_tag;
+- c_7322161.fn = (function_type)__lambda_1437;
++ c_7322161.fn = (function_type)__lambda_1004;
+ c_7322161.num_args = 1;
+-c_7322161.num_elements = 50;
+-c_7322161.elements = (object *)e_7324041;
+-c_7322161.elements[0] = ((closureN)self_7313828)->elements[0];
+-c_7322161.elements[1] = ((closureN)self_7313828)->elements[1];
+-c_7322161.elements[2] = ((closureN)self_7313828)->elements[2];
+-c_7322161.elements[3] = ((closureN)self_7313828)->elements[3];
+-c_7322161.elements[4] = ((closureN)self_7313828)->elements[4];
+-c_7322161.elements[5] = ((closureN)self_7313828)->elements[5];
+-c_7322161.elements[6] = ((closureN)self_7313828)->elements[6];
+-c_7322161.elements[7] = ((closureN)self_7313828)->elements[7];
+-c_7322161.elements[8] = ((closureN)self_7313828)->elements[8];
+-c_7322161.elements[9] = ((closureN)self_7313828)->elements[9];
+-c_7322161.elements[10] = ((closureN)self_7313828)->elements[10];
+-c_7322161.elements[11] = ((closureN)self_7313828)->elements[11];
+-c_7322161.elements[12] = ((closureN)self_7313828)->elements[12];
+-c_7322161.elements[13] = ((closureN)self_7313828)->elements[13];
+-c_7322161.elements[14] = ((closureN)self_7313828)->elements[14];
+-c_7322161.elements[15] = ((closureN)self_7313828)->elements[15];
+-c_7322161.elements[16] = ((closureN)self_7313828)->elements[16];
+-c_7322161.elements[17] = ((closureN)self_7313828)->elements[17];
+-c_7322161.elements[18] = ((closureN)self_7313828)->elements[18];
+-c_7322161.elements[19] = ((closureN)self_7313828)->elements[19];
+-c_7322161.elements[20] = ((closureN)self_7313828)->elements[20];
+-c_7322161.elements[21] = ((closureN)self_7313828)->elements[21];
+-c_7322161.elements[22] = ((closureN)self_7313828)->elements[22];
+-c_7322161.elements[23] = ((closureN)self_7313828)->elements[23];
+-c_7322161.elements[24] = ((closureN)self_7313828)->elements[24];
+-c_7322161.elements[25] = ((closureN)self_7313828)->elements[25];
+-c_7322161.elements[26] = ((closureN)self_7313828)->elements[26];
+-c_7322161.elements[27] = ((closureN)self_7313828)->elements[27];
+-c_7322161.elements[28] = ((closureN)self_7313828)->elements[28];
+-c_7322161.elements[29] = ((closureN)self_7313828)->elements[29];
+-c_7322161.elements[30] = ((closureN)self_7313828)->elements[30];
+-c_7322161.elements[31] = ((closureN)self_7313828)->elements[31];
+-c_7322161.elements[32] = ((closureN)self_7313828)->elements[32];
+-c_7322161.elements[33] = ((closureN)self_7313828)->elements[33];
+-c_7322161.elements[34] = ((closureN)self_7313828)->elements[34];
+-c_7322161.elements[35] = ((closureN)self_7313828)->elements[35];
+-c_7322161.elements[36] = ((closureN)self_7313828)->elements[36];
+-c_7322161.elements[37] = ((closureN)self_7313828)->elements[37];
+-c_7322161.elements[38] = ((closureN)self_7313828)->elements[38];
+-c_7322161.elements[39] = ((closureN)self_7313828)->elements[39];
+-c_7322161.elements[40] = ((closureN)self_7313828)->elements[40];
+-c_7322161.elements[41] = ((closureN)self_7313828)->elements[41];
+-c_7322161.elements[42] = ((closureN)self_7313828)->elements[42];
+-c_7322161.elements[43] = ((closureN)self_7313828)->elements[43];
+-c_7322161.elements[44] = ((closureN)self_7313828)->elements[44];
+-c_7322161.elements[45] = forms_733605;
+-c_7322161.elements[46] = ((closureN)self_7313828)->elements[45];
+-c_7322161.elements[47] = ((closureN)self_7313828)->elements[46];
+-c_7322161.elements[48] = ((closureN)self_7313828)->elements[47];
+-c_7322161.elements[49] = ((closureN)self_7313828)->elements[49];
+-
+-
+-pair_type local_7324044;
+-return_direct_with_clo1(data,(closure)&c_7322161,__lambda_1437, set_cell_as_expr(&local_7324044, ((closureN)self_7313828)->elements[48]));;
+-}
+-
+-static void __lambda_1437(void *data, object self_7313829, int argc, object *args) /* object self_7313829, object next_91symbol_733606 */
+- {
+- object next_91symbol_733606 = args[0];
+-
+-closureN_type c_7322163;
+-object e_7324036 [50];
+-c_7322163.hdr.mark = gc_color_red;
+- c_7322163.hdr.grayed = 0;
+-c_7322163.tag = closureN_tag;
+- c_7322163.fn = (function_type)__lambda_1436;
+-c_7322163.num_args = 1;
+-c_7322163.num_elements = 50;
+-c_7322163.elements = (object *)e_7324036;
+-c_7322163.elements[0] = ((closureN)self_7313829)->elements[0];
+-c_7322163.elements[1] = ((closureN)self_7313829)->elements[1];
+-c_7322163.elements[2] = ((closureN)self_7313829)->elements[2];
+-c_7322163.elements[3] = ((closureN)self_7313829)->elements[3];
+-c_7322163.elements[4] = ((closureN)self_7313829)->elements[4];
+-c_7322163.elements[5] = ((closureN)self_7313829)->elements[5];
+-c_7322163.elements[6] = ((closureN)self_7313829)->elements[6];
+-c_7322163.elements[7] = ((closureN)self_7313829)->elements[7];
+-c_7322163.elements[8] = ((closureN)self_7313829)->elements[8];
+-c_7322163.elements[9] = ((closureN)self_7313829)->elements[9];
+-c_7322163.elements[10] = ((closureN)self_7313829)->elements[10];
+-c_7322163.elements[11] = ((closureN)self_7313829)->elements[11];
+-c_7322163.elements[12] = ((closureN)self_7313829)->elements[12];
+-c_7322163.elements[13] = ((closureN)self_7313829)->elements[13];
+-c_7322163.elements[14] = ((closureN)self_7313829)->elements[14];
+-c_7322163.elements[15] = ((closureN)self_7313829)->elements[15];
+-c_7322163.elements[16] = ((closureN)self_7313829)->elements[16];
+-c_7322163.elements[17] = ((closureN)self_7313829)->elements[17];
+-c_7322163.elements[18] = ((closureN)self_7313829)->elements[18];
+-c_7322163.elements[19] = ((closureN)self_7313829)->elements[19];
+-c_7322163.elements[20] = ((closureN)self_7313829)->elements[20];
+-c_7322163.elements[21] = ((closureN)self_7313829)->elements[21];
+-c_7322163.elements[22] = ((closureN)self_7313829)->elements[22];
+-c_7322163.elements[23] = ((closureN)self_7313829)->elements[23];
+-c_7322163.elements[24] = ((closureN)self_7313829)->elements[24];
+-c_7322163.elements[25] = ((closureN)self_7313829)->elements[25];
+-c_7322163.elements[26] = ((closureN)self_7313829)->elements[26];
+-c_7322163.elements[27] = ((closureN)self_7313829)->elements[27];
+-c_7322163.elements[28] = ((closureN)self_7313829)->elements[28];
+-c_7322163.elements[29] = ((closureN)self_7313829)->elements[29];
+-c_7322163.elements[30] = ((closureN)self_7313829)->elements[30];
+-c_7322163.elements[31] = ((closureN)self_7313829)->elements[31];
+-c_7322163.elements[32] = ((closureN)self_7313829)->elements[32];
+-c_7322163.elements[33] = ((closureN)self_7313829)->elements[33];
+-c_7322163.elements[34] = ((closureN)self_7313829)->elements[34];
+-c_7322163.elements[35] = ((closureN)self_7313829)->elements[35];
+-c_7322163.elements[36] = ((closureN)self_7313829)->elements[36];
+-c_7322163.elements[37] = ((closureN)self_7313829)->elements[37];
+-c_7322163.elements[38] = ((closureN)self_7313829)->elements[38];
+-c_7322163.elements[39] = ((closureN)self_7313829)->elements[39];
+-c_7322163.elements[40] = ((closureN)self_7313829)->elements[40];
+-c_7322163.elements[41] = ((closureN)self_7313829)->elements[41];
+-c_7322163.elements[42] = ((closureN)self_7313829)->elements[43];
+-c_7322163.elements[43] = ((closureN)self_7313829)->elements[44];
+-c_7322163.elements[44] = ((closureN)self_7313829)->elements[45];
+-c_7322163.elements[45] = ((closureN)self_7313829)->elements[46];
+-c_7322163.elements[46] = ((closureN)self_7313829)->elements[47];
+-c_7322163.elements[47] = ((closureN)self_7313829)->elements[48];
+-c_7322163.elements[48] = next_91symbol_733606;
+-c_7322163.elements[49] = ((closureN)self_7313829)->elements[49];
++c_7322161.num_elements = 24;
++c_7322161.elements = (object *)e_7322446;
++c_7322161.elements[0] = ((closureN)self_7312647)->elements[0];
++c_7322161.elements[1] = ((closureN)self_7312647)->elements[1];
++c_7322161.elements[2] = ((closureN)self_7312647)->elements[2];
++c_7322161.elements[3] = ((closureN)self_7312647)->elements[3];
++c_7322161.elements[4] = ((closureN)self_7312647)->elements[4];
++c_7322161.elements[5] = ((closureN)self_7312647)->elements[5];
++c_7322161.elements[6] = ((closureN)self_7312647)->elements[6];
++c_7322161.elements[7] = ((closureN)self_7312647)->elements[7];
++c_7322161.elements[8] = ((closureN)self_7312647)->elements[8];
++c_7322161.elements[9] = ((closureN)self_7312647)->elements[9];
++c_7322161.elements[10] = ((closureN)self_7312647)->elements[10];
++c_7322161.elements[11] = ((closureN)self_7312647)->elements[11];
++c_7322161.elements[12] = ((closureN)self_7312647)->elements[12];
++c_7322161.elements[13] = ((closureN)self_7312647)->elements[13];
++c_7322161.elements[14] = ((closureN)self_7312647)->elements[14];
++c_7322161.elements[15] = ((closureN)self_7312647)->elements[15];
++c_7322161.elements[16] = ((closureN)self_7312647)->elements[16];
++c_7322161.elements[17] = ((closureN)self_7312647)->elements[17];
++c_7322161.elements[18] = ((closureN)self_7312647)->elements[18];
++c_7322161.elements[19] = ((closureN)self_7312647)->elements[19];
++c_7322161.elements[20] = ((closureN)self_7312647)->elements[20];
++c_7322161.elements[21] = ((closureN)self_7312647)->elements[21];
++c_7322161.elements[22] = ((closureN)self_7312647)->elements[23];
++c_7322161.elements[23] = ((closureN)self_7312647)->elements[24];
++
++return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), &c_7322161, ((closureN)self_7312647)->elements[22], r_736272);;
++}
++
++static void __lambda_1004(void *data, object self_7312648, int argc, object *args) /* object self_7312648, object r_736166 */
++ {
++ object r_736166 = args[0];
++ if( (boolean_f != r_736166) ){
++
++make_utf8_string_with_len(c_7322164, "multiple ellipses", 17, 17);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7312648)->elements[18], &c_7322164, ((closureN)self_7312648)->elements[21]);
++} else {
++
++
++
++closureN_type c_7322170;
++object e_7322444 [23];
++c_7322170.hdr.mark = gc_color_red;
++ c_7322170.hdr.grayed = 0;
++c_7322170.tag = closureN_tag;
++ c_7322170.fn = (function_type)__lambda_1005;
++c_7322170.num_args = 1;
++c_7322170.num_elements = 23;
++c_7322170.elements = (object *)e_7322444;
++c_7322170.elements[0] = ((closureN)self_7312648)->elements[0];
++c_7322170.elements[1] = ((closureN)self_7312648)->elements[1];
++c_7322170.elements[2] = ((closureN)self_7312648)->elements[2];
++c_7322170.elements[3] = ((closureN)self_7312648)->elements[3];
++c_7322170.elements[4] = ((closureN)self_7312648)->elements[4];
++c_7322170.elements[5] = ((closureN)self_7312648)->elements[5];
++c_7322170.elements[6] = ((closureN)self_7312648)->elements[6];
++c_7322170.elements[7] = ((closureN)self_7312648)->elements[7];
++c_7322170.elements[8] = ((closureN)self_7312648)->elements[8];
++c_7322170.elements[9] = ((closureN)self_7312648)->elements[9];
++c_7322170.elements[10] = ((closureN)self_7312648)->elements[10];
++c_7322170.elements[11] = ((closureN)self_7312648)->elements[11];
++c_7322170.elements[12] = ((closureN)self_7312648)->elements[12];
++c_7322170.elements[13] = ((closureN)self_7312648)->elements[13];
++c_7322170.elements[14] = ((closureN)self_7312648)->elements[14];
++c_7322170.elements[15] = ((closureN)self_7312648)->elements[15];
++c_7322170.elements[16] = ((closureN)self_7312648)->elements[16];
++c_7322170.elements[17] = ((closureN)self_7312648)->elements[17];
++c_7322170.elements[18] = ((closureN)self_7312648)->elements[18];
++c_7322170.elements[19] = ((closureN)self_7312648)->elements[19];
++c_7322170.elements[20] = ((closureN)self_7312648)->elements[21];
++c_7322170.elements[21] = ((closureN)self_7312648)->elements[22];
++c_7322170.elements[22] = ((closureN)self_7312648)->elements[23];
++
++
++make_utf8_string_with_len(c_7322445, "lp.", 3, 3);
++return_closcall2(data, car(((closureN)self_7312648)->elements[20]), &c_7322170, &c_7322445);}
++;;
++}
++
++static void __lambda_1005(void *data, object self_7312649, int argc, object *args) /* object self_7312649, object r_736168 */
++ {
++ object r_736168 = args[0];
++
++closureN_type c_7322172;
++object e_7322436 [23];
++c_7322172.hdr.mark = gc_color_red;
++ c_7322172.hdr.grayed = 0;
++c_7322172.tag = closureN_tag;
++ c_7322172.fn = (function_type)__lambda_1006;
++c_7322172.num_args = 2;
++c_7322172.num_elements = 23;
++c_7322172.elements = (object *)e_7322436;
++c_7322172.elements[0] = ((closureN)self_7312649)->elements[0];
++c_7322172.elements[1] = ((closureN)self_7312649)->elements[1];
++c_7322172.elements[2] = ((closureN)self_7312649)->elements[2];
++c_7322172.elements[3] = ((closureN)self_7312649)->elements[3];
++c_7322172.elements[4] = ((closureN)self_7312649)->elements[4];
++c_7322172.elements[5] = ((closureN)self_7312649)->elements[5];
++c_7322172.elements[6] = ((closureN)self_7312649)->elements[6];
++c_7322172.elements[7] = ((closureN)self_7312649)->elements[7];
++c_7322172.elements[8] = ((closureN)self_7312649)->elements[8];
++c_7322172.elements[9] = ((closureN)self_7312649)->elements[9];
++c_7322172.elements[10] = ((closureN)self_7312649)->elements[10];
++c_7322172.elements[11] = ((closureN)self_7312649)->elements[11];
++c_7322172.elements[12] = ((closureN)self_7312649)->elements[12];
++c_7322172.elements[13] = ((closureN)self_7312649)->elements[13];
++c_7322172.elements[14] = ((closureN)self_7312649)->elements[14];
++c_7322172.elements[15] = ((closureN)self_7312649)->elements[15];
++c_7322172.elements[16] = ((closureN)self_7312649)->elements[16];
++c_7322172.elements[17] = ((closureN)self_7312649)->elements[17];
++c_7322172.elements[18] = ((closureN)self_7312649)->elements[18];
++c_7322172.elements[19] = ((closureN)self_7312649)->elements[19];
++c_7322172.elements[20] = ((closureN)self_7312649)->elements[20];
++c_7322172.elements[21] = ((closureN)self_7312649)->elements[21];
++c_7322172.elements[22] = ((closureN)self_7312649)->elements[22];
+
+
+-pair_type local_7324039;
+-return_direct_with_clo1(data,(closure)&c_7322163,__lambda_1436, set_cell_as_expr(&local_7324039, ((closureN)self_7313829)->elements[42]));;
+-}
+-
+-static void __lambda_1436(void *data, object self_7313830, int argc, object *args) /* object self_7313830, object expand_91pattern_733607 */
+- {
+- object expand_91pattern_733607 = args[0];
+-
+-closureN_type c_7322165;
+-object e_7324031 [50];
+-c_7322165.hdr.mark = gc_color_red;
+- c_7322165.hdr.grayed = 0;
+-c_7322165.tag = closureN_tag;
+- c_7322165.fn = (function_type)__lambda_1435;
+-c_7322165.num_args = 1;
+-c_7322165.num_elements = 50;
+-c_7322165.elements = (object *)e_7324031;
+-c_7322165.elements[0] = ((closureN)self_7313830)->elements[0];
+-c_7322165.elements[1] = ((closureN)self_7313830)->elements[1];
+-c_7322165.elements[2] = ((closureN)self_7313830)->elements[2];
+-c_7322165.elements[3] = ((closureN)self_7313830)->elements[3];
+-c_7322165.elements[4] = ((closureN)self_7313830)->elements[4];
+-c_7322165.elements[5] = ((closureN)self_7313830)->elements[5];
+-c_7322165.elements[6] = ((closureN)self_7313830)->elements[6];
+-c_7322165.elements[7] = ((closureN)self_7313830)->elements[7];
+-c_7322165.elements[8] = ((closureN)self_7313830)->elements[8];
+-c_7322165.elements[9] = ((closureN)self_7313830)->elements[9];
+-c_7322165.elements[10] = ((closureN)self_7313830)->elements[10];
+-c_7322165.elements[11] = ((closureN)self_7313830)->elements[11];
+-c_7322165.elements[12] = ((closureN)self_7313830)->elements[12];
+-c_7322165.elements[13] = ((closureN)self_7313830)->elements[13];
+-c_7322165.elements[14] = ((closureN)self_7313830)->elements[14];
+-c_7322165.elements[15] = ((closureN)self_7313830)->elements[15];
+-c_7322165.elements[16] = ((closureN)self_7313830)->elements[16];
+-c_7322165.elements[17] = ((closureN)self_7313830)->elements[17];
+-c_7322165.elements[18] = ((closureN)self_7313830)->elements[18];
+-c_7322165.elements[19] = ((closureN)self_7313830)->elements[19];
+-c_7322165.elements[20] = ((closureN)self_7313830)->elements[20];
+-c_7322165.elements[21] = ((closureN)self_7313830)->elements[21];
+-c_7322165.elements[22] = ((closureN)self_7313830)->elements[22];
+-c_7322165.elements[23] = ((closureN)self_7313830)->elements[23];
+-c_7322165.elements[24] = ((closureN)self_7313830)->elements[24];
+-c_7322165.elements[25] = ((closureN)self_7313830)->elements[25];
+-c_7322165.elements[26] = ((closureN)self_7313830)->elements[26];
+-c_7322165.elements[27] = ((closureN)self_7313830)->elements[27];
+-c_7322165.elements[28] = ((closureN)self_7313830)->elements[28];
+-c_7322165.elements[29] = ((closureN)self_7313830)->elements[29];
+-c_7322165.elements[30] = ((closureN)self_7313830)->elements[30];
+-c_7322165.elements[31] = ((closureN)self_7313830)->elements[31];
+-c_7322165.elements[32] = ((closureN)self_7313830)->elements[32];
+-c_7322165.elements[33] = ((closureN)self_7313830)->elements[33];
+-c_7322165.elements[34] = ((closureN)self_7313830)->elements[34];
+-c_7322165.elements[35] = ((closureN)self_7313830)->elements[35];
+-c_7322165.elements[36] = ((closureN)self_7313830)->elements[36];
+-c_7322165.elements[37] = ((closureN)self_7313830)->elements[37];
+-c_7322165.elements[38] = ((closureN)self_7313830)->elements[39];
+-c_7322165.elements[39] = ((closureN)self_7313830)->elements[40];
+-c_7322165.elements[40] = ((closureN)self_7313830)->elements[41];
+-c_7322165.elements[41] = expand_91pattern_733607;
+-c_7322165.elements[42] = ((closureN)self_7313830)->elements[42];
+-c_7322165.elements[43] = ((closureN)self_7313830)->elements[43];
+-c_7322165.elements[44] = ((closureN)self_7313830)->elements[44];
+-c_7322165.elements[45] = ((closureN)self_7313830)->elements[45];
+-c_7322165.elements[46] = ((closureN)self_7313830)->elements[46];
+-c_7322165.elements[47] = ((closureN)self_7313830)->elements[47];
+-c_7322165.elements[48] = ((closureN)self_7313830)->elements[48];
+-c_7322165.elements[49] = ((closureN)self_7313830)->elements[49];
+-
+-
+-pair_type local_7324034;
+-return_direct_with_clo1(data,(closure)&c_7322165,__lambda_1435, set_cell_as_expr(&local_7324034, ((closureN)self_7313830)->elements[38]));;
+-}
+-
+-static void __lambda_1435(void *data, object self_7313831, int argc, object *args) /* object self_7313831, object ellipsis_91escape_127_733608 */
+- {
+- object ellipsis_91escape_127_733608 = args[0];
+-
+-closureN_type c_7322167;
+-object e_7324026 [50];
+-c_7322167.hdr.mark = gc_color_red;
+- c_7322167.hdr.grayed = 0;
+-c_7322167.tag = closureN_tag;
+- c_7322167.fn = (function_type)__lambda_1434;
+-c_7322167.num_args = 1;
+-c_7322167.num_elements = 50;
+-c_7322167.elements = (object *)e_7324026;
+-c_7322167.elements[0] = ((closureN)self_7313831)->elements[0];
+-c_7322167.elements[1] = ((closureN)self_7313831)->elements[1];
+-c_7322167.elements[2] = ((closureN)self_7313831)->elements[2];
+-c_7322167.elements[3] = ((closureN)self_7313831)->elements[3];
+-c_7322167.elements[4] = ((closureN)self_7313831)->elements[4];
+-c_7322167.elements[5] = ((closureN)self_7313831)->elements[5];
+-c_7322167.elements[6] = ((closureN)self_7313831)->elements[6];
+-c_7322167.elements[7] = ((closureN)self_7313831)->elements[7];
+-c_7322167.elements[8] = ((closureN)self_7313831)->elements[8];
+-c_7322167.elements[9] = ((closureN)self_7313831)->elements[9];
+-c_7322167.elements[10] = ((closureN)self_7313831)->elements[10];
+-c_7322167.elements[11] = ((closureN)self_7313831)->elements[11];
+-c_7322167.elements[12] = ((closureN)self_7313831)->elements[12];
+-c_7322167.elements[13] = ((closureN)self_7313831)->elements[13];
+-c_7322167.elements[14] = ((closureN)self_7313831)->elements[14];
+-c_7322167.elements[15] = ((closureN)self_7313831)->elements[15];
+-c_7322167.elements[16] = ((closureN)self_7313831)->elements[16];
+-c_7322167.elements[17] = ((closureN)self_7313831)->elements[17];
+-c_7322167.elements[18] = ((closureN)self_7313831)->elements[18];
+-c_7322167.elements[19] = ((closureN)self_7313831)->elements[19];
+-c_7322167.elements[20] = ((closureN)self_7313831)->elements[20];
+-c_7322167.elements[21] = ((closureN)self_7313831)->elements[21];
+-c_7322167.elements[22] = ((closureN)self_7313831)->elements[22];
+-c_7322167.elements[23] = ((closureN)self_7313831)->elements[23];
+-c_7322167.elements[24] = ((closureN)self_7313831)->elements[24];
+-c_7322167.elements[25] = ((closureN)self_7313831)->elements[25];
+-c_7322167.elements[26] = ((closureN)self_7313831)->elements[26];
+-c_7322167.elements[27] = ((closureN)self_7313831)->elements[27];
+-c_7322167.elements[28] = ((closureN)self_7313831)->elements[28];
+-c_7322167.elements[29] = ((closureN)self_7313831)->elements[29];
+-c_7322167.elements[30] = ((closureN)self_7313831)->elements[30];
+-c_7322167.elements[31] = ((closureN)self_7313831)->elements[31];
+-c_7322167.elements[32] = ((closureN)self_7313831)->elements[32];
+-c_7322167.elements[33] = ((closureN)self_7313831)->elements[33];
+-c_7322167.elements[34] = ((closureN)self_7313831)->elements[34];
+-c_7322167.elements[35] = ((closureN)self_7313831)->elements[35];
+-c_7322167.elements[36] = ((closureN)self_7313831)->elements[36];
+-c_7322167.elements[37] = ((closureN)self_7313831)->elements[37];
+-c_7322167.elements[38] = ellipsis_91escape_127_733608;
+-c_7322167.elements[39] = ((closureN)self_7313831)->elements[38];
+-c_7322167.elements[40] = ((closureN)self_7313831)->elements[39];
+-c_7322167.elements[41] = ((closureN)self_7313831)->elements[41];
+-c_7322167.elements[42] = ((closureN)self_7313831)->elements[42];
+-c_7322167.elements[43] = ((closureN)self_7313831)->elements[43];
+-c_7322167.elements[44] = ((closureN)self_7313831)->elements[44];
+-c_7322167.elements[45] = ((closureN)self_7313831)->elements[45];
+-c_7322167.elements[46] = ((closureN)self_7313831)->elements[46];
+-c_7322167.elements[47] = ((closureN)self_7313831)->elements[47];
+-c_7322167.elements[48] = ((closureN)self_7313831)->elements[48];
+-c_7322167.elements[49] = ((closureN)self_7313831)->elements[49];
+
+
+-pair_type local_7324029;
+-return_direct_with_clo1(data,(closure)&c_7322167,__lambda_1434, set_cell_as_expr(&local_7324029, ((closureN)self_7313831)->elements[40]));;
+-}
+
+-static void __lambda_1434(void *data, object self_7313832, int argc, object *args) /* object self_7313832, object ellipsis_127_733609 */
+- {
+- object ellipsis_127_733609 = args[0];
+-
+-closureN_type c_7322169;
+-object e_7324021 [50];
+-c_7322169.hdr.mark = gc_color_red;
+- c_7322169.hdr.grayed = 0;
+-c_7322169.tag = closureN_tag;
+- c_7322169.fn = (function_type)__lambda_1433;
+-c_7322169.num_args = 1;
+-c_7322169.num_elements = 50;
+-c_7322169.elements = (object *)e_7324021;
+-c_7322169.elements[0] = ((closureN)self_7313832)->elements[0];
+-c_7322169.elements[1] = ((closureN)self_7313832)->elements[1];
+-c_7322169.elements[2] = ((closureN)self_7313832)->elements[2];
+-c_7322169.elements[3] = ((closureN)self_7313832)->elements[3];
+-c_7322169.elements[4] = ((closureN)self_7313832)->elements[4];
+-c_7322169.elements[5] = ((closureN)self_7313832)->elements[5];
+-c_7322169.elements[6] = ((closureN)self_7313832)->elements[6];
+-c_7322169.elements[7] = ((closureN)self_7313832)->elements[7];
+-c_7322169.elements[8] = ((closureN)self_7313832)->elements[8];
+-c_7322169.elements[9] = ((closureN)self_7313832)->elements[9];
+-c_7322169.elements[10] = ((closureN)self_7313832)->elements[10];
+-c_7322169.elements[11] = ((closureN)self_7313832)->elements[11];
+-c_7322169.elements[12] = ((closureN)self_7313832)->elements[12];
+-c_7322169.elements[13] = ((closureN)self_7313832)->elements[13];
+-c_7322169.elements[14] = ((closureN)self_7313832)->elements[14];
+-c_7322169.elements[15] = ((closureN)self_7313832)->elements[15];
+-c_7322169.elements[16] = ((closureN)self_7313832)->elements[16];
+-c_7322169.elements[17] = ((closureN)self_7313832)->elements[17];
+-c_7322169.elements[18] = ((closureN)self_7313832)->elements[18];
+-c_7322169.elements[19] = ((closureN)self_7313832)->elements[19];
+-c_7322169.elements[20] = ((closureN)self_7313832)->elements[20];
+-c_7322169.elements[21] = ((closureN)self_7313832)->elements[21];
+-c_7322169.elements[22] = ((closureN)self_7313832)->elements[22];
+-c_7322169.elements[23] = ((closureN)self_7313832)->elements[23];
+-c_7322169.elements[24] = ((closureN)self_7313832)->elements[24];
+-c_7322169.elements[25] = ((closureN)self_7313832)->elements[25];
+-c_7322169.elements[26] = ((closureN)self_7313832)->elements[26];
+-c_7322169.elements[27] = ((closureN)self_7313832)->elements[27];
+-c_7322169.elements[28] = ((closureN)self_7313832)->elements[28];
+-c_7322169.elements[29] = ((closureN)self_7313832)->elements[29];
+-c_7322169.elements[30] = ((closureN)self_7313832)->elements[30];
+-c_7322169.elements[31] = ((closureN)self_7313832)->elements[31];
+-c_7322169.elements[32] = ((closureN)self_7313832)->elements[32];
+-c_7322169.elements[33] = ((closureN)self_7313832)->elements[33];
+-c_7322169.elements[34] = ((closureN)self_7313832)->elements[34];
+-c_7322169.elements[35] = ((closureN)self_7313832)->elements[35];
+-c_7322169.elements[36] = ((closureN)self_7313832)->elements[36];
+-c_7322169.elements[37] = ((closureN)self_7313832)->elements[38];
+-c_7322169.elements[38] = ((closureN)self_7313832)->elements[39];
+-c_7322169.elements[39] = ((closureN)self_7313832)->elements[40];
+-c_7322169.elements[40] = ellipsis_127_733609;
+-c_7322169.elements[41] = ((closureN)self_7313832)->elements[41];
+-c_7322169.elements[42] = ((closureN)self_7313832)->elements[42];
+-c_7322169.elements[43] = ((closureN)self_7313832)->elements[43];
+-c_7322169.elements[44] = ((closureN)self_7313832)->elements[44];
+-c_7322169.elements[45] = ((closureN)self_7313832)->elements[45];
+-c_7322169.elements[46] = ((closureN)self_7313832)->elements[46];
+-c_7322169.elements[47] = ((closureN)self_7313832)->elements[47];
+-c_7322169.elements[48] = ((closureN)self_7313832)->elements[48];
+-c_7322169.elements[49] = ((closureN)self_7313832)->elements[49];
+-
+-
+-pair_type local_7324024;
+-return_direct_with_clo1(data,(closure)&c_7322169,__lambda_1433, set_cell_as_expr(&local_7324024, ((closureN)self_7313832)->elements[37]));;
+-}
+-
+-static void __lambda_1433(void *data, object self_7313833, int argc, object *args) /* object self_7313833, object ellipsis_91depth_733610 */
+- {
+- object ellipsis_91depth_733610 = args[0];
+-
+-closureN_type c_7322171;
+-object e_7324016 [50];
+-c_7322171.hdr.mark = gc_color_red;
+- c_7322171.hdr.grayed = 0;
+-c_7322171.tag = closureN_tag;
+- c_7322171.fn = (function_type)__lambda_1432;
+-c_7322171.num_args = 1;
+-c_7322171.num_elements = 50;
+-c_7322171.elements = (object *)e_7324016;
+-c_7322171.elements[0] = ((closureN)self_7313833)->elements[0];
+-c_7322171.elements[1] = ((closureN)self_7313833)->elements[1];
+-c_7322171.elements[2] = ((closureN)self_7313833)->elements[2];
+-c_7322171.elements[3] = ((closureN)self_7313833)->elements[3];
+-c_7322171.elements[4] = ((closureN)self_7313833)->elements[4];
+-c_7322171.elements[5] = ((closureN)self_7313833)->elements[5];
+-c_7322171.elements[6] = ((closureN)self_7313833)->elements[6];
+-c_7322171.elements[7] = ((closureN)self_7313833)->elements[7];
+-c_7322171.elements[8] = ((closureN)self_7313833)->elements[8];
+-c_7322171.elements[9] = ((closureN)self_7313833)->elements[9];
+-c_7322171.elements[10] = ((closureN)self_7313833)->elements[10];
+-c_7322171.elements[11] = ((closureN)self_7313833)->elements[11];
+-c_7322171.elements[12] = ((closureN)self_7313833)->elements[12];
+-c_7322171.elements[13] = ((closureN)self_7313833)->elements[13];
+-c_7322171.elements[14] = ((closureN)self_7313833)->elements[14];
+-c_7322171.elements[15] = ((closureN)self_7313833)->elements[15];
+-c_7322171.elements[16] = ((closureN)self_7313833)->elements[16];
+-c_7322171.elements[17] = ((closureN)self_7313833)->elements[17];
+-c_7322171.elements[18] = ((closureN)self_7313833)->elements[18];
+-c_7322171.elements[19] = ((closureN)self_7313833)->elements[19];
+-c_7322171.elements[20] = ((closureN)self_7313833)->elements[20];
+-c_7322171.elements[21] = ((closureN)self_7313833)->elements[21];
+-c_7322171.elements[22] = ((closureN)self_7313833)->elements[22];
+-c_7322171.elements[23] = ((closureN)self_7313833)->elements[23];
+-c_7322171.elements[24] = ((closureN)self_7313833)->elements[24];
+-c_7322171.elements[25] = ((closureN)self_7313833)->elements[25];
+-c_7322171.elements[26] = ((closureN)self_7313833)->elements[26];
+-c_7322171.elements[27] = ((closureN)self_7313833)->elements[27];
+-c_7322171.elements[28] = ((closureN)self_7313833)->elements[28];
+-c_7322171.elements[29] = ((closureN)self_7313833)->elements[29];
+-c_7322171.elements[30] = ((closureN)self_7313833)->elements[30];
+-c_7322171.elements[31] = ((closureN)self_7313833)->elements[31];
+-c_7322171.elements[32] = ((closureN)self_7313833)->elements[32];
+-c_7322171.elements[33] = ((closureN)self_7313833)->elements[33];
+-c_7322171.elements[34] = ((closureN)self_7313833)->elements[34];
+-c_7322171.elements[35] = ((closureN)self_7313833)->elements[35];
+-c_7322171.elements[36] = ((closureN)self_7313833)->elements[36];
+-c_7322171.elements[37] = ellipsis_91depth_733610;
+-c_7322171.elements[38] = ((closureN)self_7313833)->elements[37];
+-c_7322171.elements[39] = ((closureN)self_7313833)->elements[38];
+-c_7322171.elements[40] = ((closureN)self_7313833)->elements[40];
+-c_7322171.elements[41] = ((closureN)self_7313833)->elements[41];
+-c_7322171.elements[42] = ((closureN)self_7313833)->elements[42];
+-c_7322171.elements[43] = ((closureN)self_7313833)->elements[43];
+-c_7322171.elements[44] = ((closureN)self_7313833)->elements[44];
+-c_7322171.elements[45] = ((closureN)self_7313833)->elements[45];
+-c_7322171.elements[46] = ((closureN)self_7313833)->elements[46];
+-c_7322171.elements[47] = ((closureN)self_7313833)->elements[47];
+-c_7322171.elements[48] = ((closureN)self_7313833)->elements[48];
+-c_7322171.elements[49] = ((closureN)self_7313833)->elements[49];
+-
+-
+-pair_type local_7324019;
+-return_direct_with_clo1(data,(closure)&c_7322171,__lambda_1432, set_cell_as_expr(&local_7324019, ((closureN)self_7313833)->elements[39]));;
+-}
+-
+-static void __lambda_1432(void *data, object self_7313834, int argc, object *args) /* object self_7313834, object ellipsis_91tail_733611 */
+- {
+- object ellipsis_91tail_733611 = args[0];
+-
+-closureN_type c_7322173;
+-object e_7324011 [50];
+-c_7322173.hdr.mark = gc_color_red;
+- c_7322173.hdr.grayed = 0;
+-c_7322173.tag = closureN_tag;
+- c_7322173.fn = (function_type)__lambda_1431;
+-c_7322173.num_args = 1;
+-c_7322173.num_elements = 50;
+-c_7322173.elements = (object *)e_7324011;
+-c_7322173.elements[0] = ((closureN)self_7313834)->elements[0];
+-c_7322173.elements[1] = ((closureN)self_7313834)->elements[1];
+-c_7322173.elements[2] = ((closureN)self_7313834)->elements[2];
+-c_7322173.elements[3] = ((closureN)self_7313834)->elements[3];
+-c_7322173.elements[4] = ((closureN)self_7313834)->elements[4];
+-c_7322173.elements[5] = ((closureN)self_7313834)->elements[5];
+-c_7322173.elements[6] = ((closureN)self_7313834)->elements[6];
+-c_7322173.elements[7] = ((closureN)self_7313834)->elements[7];
+-c_7322173.elements[8] = ((closureN)self_7313834)->elements[8];
+-c_7322173.elements[9] = ((closureN)self_7313834)->elements[9];
+-c_7322173.elements[10] = ((closureN)self_7313834)->elements[10];
+-c_7322173.elements[11] = ((closureN)self_7313834)->elements[11];
+-c_7322173.elements[12] = ((closureN)self_7313834)->elements[12];
+-c_7322173.elements[13] = ((closureN)self_7313834)->elements[13];
+-c_7322173.elements[14] = ((closureN)self_7313834)->elements[14];
+-c_7322173.elements[15] = ((closureN)self_7313834)->elements[15];
+-c_7322173.elements[16] = ((closureN)self_7313834)->elements[16];
+-c_7322173.elements[17] = ((closureN)self_7313834)->elements[17];
+-c_7322173.elements[18] = ((closureN)self_7313834)->elements[18];
+-c_7322173.elements[19] = ((closureN)self_7313834)->elements[19];
+-c_7322173.elements[20] = ((closureN)self_7313834)->elements[20];
+-c_7322173.elements[21] = ((closureN)self_7313834)->elements[21];
+-c_7322173.elements[22] = ((closureN)self_7313834)->elements[22];
+-c_7322173.elements[23] = ((closureN)self_7313834)->elements[23];
+-c_7322173.elements[24] = ((closureN)self_7313834)->elements[24];
+-c_7322173.elements[25] = ((closureN)self_7313834)->elements[25];
+-c_7322173.elements[26] = ((closureN)self_7313834)->elements[26];
+-c_7322173.elements[27] = ((closureN)self_7313834)->elements[27];
+-c_7322173.elements[28] = ((closureN)self_7313834)->elements[28];
+-c_7322173.elements[29] = ((closureN)self_7313834)->elements[29];
+-c_7322173.elements[30] = ((closureN)self_7313834)->elements[30];
+-c_7322173.elements[31] = ((closureN)self_7313834)->elements[31];
+-c_7322173.elements[32] = ((closureN)self_7313834)->elements[32];
+-c_7322173.elements[33] = ((closureN)self_7313834)->elements[34];
+-c_7322173.elements[34] = ((closureN)self_7313834)->elements[35];
+-c_7322173.elements[35] = ((closureN)self_7313834)->elements[36];
+-c_7322173.elements[36] = ((closureN)self_7313834)->elements[37];
+-c_7322173.elements[37] = ((closureN)self_7313834)->elements[38];
+-c_7322173.elements[38] = ((closureN)self_7313834)->elements[39];
+-c_7322173.elements[39] = ellipsis_91tail_733611;
+-c_7322173.elements[40] = ((closureN)self_7313834)->elements[40];
+-c_7322173.elements[41] = ((closureN)self_7313834)->elements[41];
+-c_7322173.elements[42] = ((closureN)self_7313834)->elements[42];
+-c_7322173.elements[43] = ((closureN)self_7313834)->elements[43];
+-c_7322173.elements[44] = ((closureN)self_7313834)->elements[44];
+-c_7322173.elements[45] = ((closureN)self_7313834)->elements[45];
+-c_7322173.elements[46] = ((closureN)self_7313834)->elements[46];
+-c_7322173.elements[47] = ((closureN)self_7313834)->elements[47];
+-c_7322173.elements[48] = ((closureN)self_7313834)->elements[48];
+-c_7322173.elements[49] = ((closureN)self_7313834)->elements[49];
+-
+-
+-pair_type local_7324014;
+-return_direct_with_clo1(data,(closure)&c_7322173,__lambda_1431, set_cell_as_expr(&local_7324014, ((closureN)self_7313834)->elements[33]));;
+-}
+-
+-static void __lambda_1431(void *data, object self_7313835, int argc, object *args) /* object self_7313835, object all_91vars_733612 */
+- {
+- object all_91vars_733612 = args[0];
+-
+-closureN_type c_7322175;
+-object e_7324006 [50];
+-c_7322175.hdr.mark = gc_color_red;
+- c_7322175.hdr.grayed = 0;
+-c_7322175.tag = closureN_tag;
+- c_7322175.fn = (function_type)__lambda_1430;
+-c_7322175.num_args = 1;
+-c_7322175.num_elements = 50;
+-c_7322175.elements = (object *)e_7324006;
+-c_7322175.elements[0] = ((closureN)self_7313835)->elements[0];
+-c_7322175.elements[1] = ((closureN)self_7313835)->elements[1];
+-c_7322175.elements[2] = ((closureN)self_7313835)->elements[2];
+-c_7322175.elements[3] = ((closureN)self_7313835)->elements[3];
+-c_7322175.elements[4] = ((closureN)self_7313835)->elements[4];
+-c_7322175.elements[5] = ((closureN)self_7313835)->elements[5];
+-c_7322175.elements[6] = ((closureN)self_7313835)->elements[6];
+-c_7322175.elements[7] = ((closureN)self_7313835)->elements[7];
+-c_7322175.elements[8] = ((closureN)self_7313835)->elements[8];
+-c_7322175.elements[9] = ((closureN)self_7313835)->elements[9];
+-c_7322175.elements[10] = ((closureN)self_7313835)->elements[10];
+-c_7322175.elements[11] = ((closureN)self_7313835)->elements[11];
+-c_7322175.elements[12] = ((closureN)self_7313835)->elements[12];
+-c_7322175.elements[13] = ((closureN)self_7313835)->elements[13];
+-c_7322175.elements[14] = ((closureN)self_7313835)->elements[14];
+-c_7322175.elements[15] = ((closureN)self_7313835)->elements[15];
+-c_7322175.elements[16] = ((closureN)self_7313835)->elements[16];
+-c_7322175.elements[17] = ((closureN)self_7313835)->elements[17];
+-c_7322175.elements[18] = ((closureN)self_7313835)->elements[18];
+-c_7322175.elements[19] = ((closureN)self_7313835)->elements[19];
+-c_7322175.elements[20] = ((closureN)self_7313835)->elements[20];
+-c_7322175.elements[21] = ((closureN)self_7313835)->elements[21];
+-c_7322175.elements[22] = ((closureN)self_7313835)->elements[22];
+-c_7322175.elements[23] = ((closureN)self_7313835)->elements[23];
+-c_7322175.elements[24] = ((closureN)self_7313835)->elements[24];
+-c_7322175.elements[25] = ((closureN)self_7313835)->elements[25];
+-c_7322175.elements[26] = ((closureN)self_7313835)->elements[26];
+-c_7322175.elements[27] = ((closureN)self_7313835)->elements[27];
+-c_7322175.elements[28] = ((closureN)self_7313835)->elements[28];
+-c_7322175.elements[29] = ((closureN)self_7313835)->elements[29];
+-c_7322175.elements[30] = ((closureN)self_7313835)->elements[30];
+-c_7322175.elements[31] = ((closureN)self_7313835)->elements[31];
+-c_7322175.elements[32] = ((closureN)self_7313835)->elements[32];
+-c_7322175.elements[33] = all_91vars_733612;
+-c_7322175.elements[34] = ((closureN)self_7313835)->elements[33];
+-c_7322175.elements[35] = ((closureN)self_7313835)->elements[34];
+-c_7322175.elements[36] = ((closureN)self_7313835)->elements[35];
+-c_7322175.elements[37] = ((closureN)self_7313835)->elements[36];
+-c_7322175.elements[38] = ((closureN)self_7313835)->elements[37];
+-c_7322175.elements[39] = ((closureN)self_7313835)->elements[38];
+-c_7322175.elements[40] = ((closureN)self_7313835)->elements[39];
+-c_7322175.elements[41] = ((closureN)self_7313835)->elements[40];
+-c_7322175.elements[42] = ((closureN)self_7313835)->elements[41];
+-c_7322175.elements[43] = ((closureN)self_7313835)->elements[42];
+-c_7322175.elements[44] = ((closureN)self_7313835)->elements[43];
+-c_7322175.elements[45] = ((closureN)self_7313835)->elements[44];
+-c_7322175.elements[46] = ((closureN)self_7313835)->elements[46];
+-c_7322175.elements[47] = ((closureN)self_7313835)->elements[47];
+-c_7322175.elements[48] = ((closureN)self_7313835)->elements[48];
+-c_7322175.elements[49] = ((closureN)self_7313835)->elements[49];
+
+
+-pair_type local_7324009;
+-return_direct_with_clo1(data,(closure)&c_7322175,__lambda_1430, set_cell_as_expr(&local_7324009, ((closureN)self_7313835)->elements[45]));;
++return_direct_with_clo2(data,(closure)&c_7322172,__lambda_1006, Cyc_length(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312649)->elements[20]))), r_736168);;
+ }
+
+-static void __lambda_1430(void *data, object self_7313836, int argc, object *args) /* object self_7313836, object free_91vars_733613 */
++static void __lambda_1006(void *data, object self_7312650, int argc, object *args) /* object self_7312650, object len_731335_733285, object _191lp_731336_733286 */
+ {
+- object free_91vars_733613 = args[0];
++ object len_731335_733285 = args[0]; object _191lp_731336_733286 = args[1];
+
++
++
+ closureN_type c_7322177;
+-object e_7324001 [50];
++object e_7322373 [18];
+ c_7322177.hdr.mark = gc_color_red;
+ c_7322177.hdr.grayed = 0;
+ c_7322177.tag = closureN_tag;
+- c_7322177.fn = (function_type)__lambda_1429;
++ c_7322177.fn = (function_type)__lambda_1007;
+ c_7322177.num_args = 1;
+-c_7322177.num_elements = 50;
+-c_7322177.elements = (object *)e_7324001;
+-c_7322177.elements[0] = ((closureN)self_7313836)->elements[0];
+-c_7322177.elements[1] = ((closureN)self_7313836)->elements[1];
+-c_7322177.elements[2] = ((closureN)self_7313836)->elements[2];
+-c_7322177.elements[3] = ((closureN)self_7313836)->elements[3];
+-c_7322177.elements[4] = ((closureN)self_7313836)->elements[4];
+-c_7322177.elements[5] = ((closureN)self_7313836)->elements[5];
+-c_7322177.elements[6] = ((closureN)self_7313836)->elements[6];
+-c_7322177.elements[7] = ((closureN)self_7313836)->elements[7];
+-c_7322177.elements[8] = ((closureN)self_7313836)->elements[8];
+-c_7322177.elements[9] = ((closureN)self_7313836)->elements[9];
+-c_7322177.elements[10] = ((closureN)self_7313836)->elements[10];
+-c_7322177.elements[11] = ((closureN)self_7313836)->elements[11];
+-c_7322177.elements[12] = ((closureN)self_7313836)->elements[12];
+-c_7322177.elements[13] = ((closureN)self_7313836)->elements[13];
+-c_7322177.elements[14] = ((closureN)self_7313836)->elements[14];
+-c_7322177.elements[15] = ((closureN)self_7313836)->elements[15];
+-c_7322177.elements[16] = ((closureN)self_7313836)->elements[16];
+-c_7322177.elements[17] = ((closureN)self_7313836)->elements[17];
+-c_7322177.elements[18] = ((closureN)self_7313836)->elements[18];
+-c_7322177.elements[19] = ((closureN)self_7313836)->elements[19];
+-c_7322177.elements[20] = ((closureN)self_7313836)->elements[20];
+-c_7322177.elements[21] = ((closureN)self_7313836)->elements[21];
+-c_7322177.elements[22] = ((closureN)self_7313836)->elements[22];
+-c_7322177.elements[23] = ((closureN)self_7313836)->elements[23];
+-c_7322177.elements[24] = ((closureN)self_7313836)->elements[24];
+-c_7322177.elements[25] = ((closureN)self_7313836)->elements[25];
+-c_7322177.elements[26] = ((closureN)self_7313836)->elements[26];
+-c_7322177.elements[27] = ((closureN)self_7313836)->elements[27];
+-c_7322177.elements[28] = ((closureN)self_7313836)->elements[28];
+-c_7322177.elements[29] = ((closureN)self_7313836)->elements[29];
+-c_7322177.elements[30] = ((closureN)self_7313836)->elements[30];
+-c_7322177.elements[31] = ((closureN)self_7313836)->elements[31];
+-c_7322177.elements[32] = ((closureN)self_7313836)->elements[32];
+-c_7322177.elements[33] = ((closureN)self_7313836)->elements[33];
+-c_7322177.elements[34] = ((closureN)self_7313836)->elements[34];
+-c_7322177.elements[35] = ((closureN)self_7313836)->elements[35];
+-c_7322177.elements[36] = ((closureN)self_7313836)->elements[36];
+-c_7322177.elements[37] = ((closureN)self_7313836)->elements[37];
+-c_7322177.elements[38] = ((closureN)self_7313836)->elements[38];
+-c_7322177.elements[39] = ((closureN)self_7313836)->elements[39];
+-c_7322177.elements[40] = ((closureN)self_7313836)->elements[40];
+-c_7322177.elements[41] = ((closureN)self_7313836)->elements[41];
+-c_7322177.elements[42] = ((closureN)self_7313836)->elements[42];
+-c_7322177.elements[43] = ((closureN)self_7313836)->elements[44];
+-c_7322177.elements[44] = ((closureN)self_7313836)->elements[45];
+-c_7322177.elements[45] = free_91vars_733613;
+-c_7322177.elements[46] = ((closureN)self_7313836)->elements[46];
+-c_7322177.elements[47] = ((closureN)self_7313836)->elements[47];
+-c_7322177.elements[48] = ((closureN)self_7313836)->elements[48];
+-c_7322177.elements[49] = ((closureN)self_7313836)->elements[49];
+-
+-
+-pair_type local_7324004;
+-return_direct_with_clo1(data,(closure)&c_7322177,__lambda_1429, set_cell_as_expr(&local_7324004, ((closureN)self_7313836)->elements[43]));;
+-}
+-
+-static void __lambda_1429(void *data, object self_7313837, int argc, object *args) /* object self_7313837, object expand_91template_733614 */
+- {
+- object expand_91template_733614 = args[0];
+- object r_736765;
+- if( (boolean_f != ((closureN)self_7313837)->elements[39]) ){
+-
+- r_736765 = Cyc_cadr(data, ((closureN)self_7313837)->elements[43]);
+-} else {
+- r_736765 = quote__93_93_93;}
+-;
+-closureN_type c_7322187;
+-object e_7324000 [51];
+-c_7322187.hdr.mark = gc_color_red;
+- c_7322187.hdr.grayed = 0;
+-c_7322187.tag = closureN_tag;
+- c_7322187.fn = (function_type)__lambda_850;
+-c_7322187.num_args = 1;
+-c_7322187.num_elements = 51;
+-c_7322187.elements = (object *)e_7324000;
+-c_7322187.elements[0] = ((closureN)self_7313837)->elements[0];
+-c_7322187.elements[1] = ((closureN)self_7313837)->elements[1];
+-c_7322187.elements[2] = ((closureN)self_7313837)->elements[2];
+-c_7322187.elements[3] = ((closureN)self_7313837)->elements[3];
+-c_7322187.elements[4] = ((closureN)self_7313837)->elements[4];
+-c_7322187.elements[5] = ((closureN)self_7313837)->elements[5];
+-c_7322187.elements[6] = ((closureN)self_7313837)->elements[6];
+-c_7322187.elements[7] = ((closureN)self_7313837)->elements[7];
+-c_7322187.elements[8] = ((closureN)self_7313837)->elements[8];
+-c_7322187.elements[9] = ((closureN)self_7313837)->elements[9];
+-c_7322187.elements[10] = ((closureN)self_7313837)->elements[10];
+-c_7322187.elements[11] = ((closureN)self_7313837)->elements[11];
+-c_7322187.elements[12] = ((closureN)self_7313837)->elements[12];
+-c_7322187.elements[13] = ((closureN)self_7313837)->elements[13];
+-c_7322187.elements[14] = ((closureN)self_7313837)->elements[14];
+-c_7322187.elements[15] = ((closureN)self_7313837)->elements[15];
+-c_7322187.elements[16] = ((closureN)self_7313837)->elements[16];
+-c_7322187.elements[17] = ((closureN)self_7313837)->elements[17];
+-c_7322187.elements[18] = ((closureN)self_7313837)->elements[18];
+-c_7322187.elements[19] = ((closureN)self_7313837)->elements[19];
+-c_7322187.elements[20] = ((closureN)self_7313837)->elements[20];
+-c_7322187.elements[21] = ((closureN)self_7313837)->elements[21];
+-c_7322187.elements[22] = ((closureN)self_7313837)->elements[22];
+-c_7322187.elements[23] = ((closureN)self_7313837)->elements[23];
+-c_7322187.elements[24] = ((closureN)self_7313837)->elements[24];
+-c_7322187.elements[25] = ((closureN)self_7313837)->elements[25];
+-c_7322187.elements[26] = ((closureN)self_7313837)->elements[26];
+-c_7322187.elements[27] = ((closureN)self_7313837)->elements[27];
+-c_7322187.elements[28] = ((closureN)self_7313837)->elements[28];
+-c_7322187.elements[29] = ((closureN)self_7313837)->elements[29];
+-c_7322187.elements[30] = ((closureN)self_7313837)->elements[30];
+-c_7322187.elements[31] = ((closureN)self_7313837)->elements[31];
+-c_7322187.elements[32] = ((closureN)self_7313837)->elements[32];
+-c_7322187.elements[33] = ((closureN)self_7313837)->elements[33];
+-c_7322187.elements[34] = ((closureN)self_7313837)->elements[34];
+-c_7322187.elements[35] = ((closureN)self_7313837)->elements[35];
+-c_7322187.elements[36] = ((closureN)self_7313837)->elements[36];
+-c_7322187.elements[37] = ((closureN)self_7313837)->elements[37];
+-c_7322187.elements[38] = ((closureN)self_7313837)->elements[38];
+-c_7322187.elements[39] = ((closureN)self_7313837)->elements[39];
+-c_7322187.elements[40] = ((closureN)self_7313837)->elements[40];
+-c_7322187.elements[41] = ((closureN)self_7313837)->elements[41];
+-c_7322187.elements[42] = ((closureN)self_7313837)->elements[42];
+-c_7322187.elements[43] = expand_91template_733614;
+-c_7322187.elements[44] = ((closureN)self_7313837)->elements[43];
+-c_7322187.elements[45] = ((closureN)self_7313837)->elements[44];
+-c_7322187.elements[46] = ((closureN)self_7313837)->elements[45];
+-c_7322187.elements[47] = ((closureN)self_7313837)->elements[46];
+-c_7322187.elements[48] = ((closureN)self_7313837)->elements[47];
+-c_7322187.elements[49] = ((closureN)self_7313837)->elements[48];
+-c_7322187.elements[50] = ((closureN)self_7313837)->elements[49];
+-
+-return_closcall2(data, ((closureN)self_7313837)->elements[49], &c_7322187, r_736765);;
+-}
+-
+-static void __lambda_850(void *data, object self_7313838, int argc, object *args) /* object self_7313838, object r_736764 */
+- {
+- object r_736764 = args[0];
+-
+-closureN_type c_7322189;
+-object e_7323996 [51];
+-c_7322189.hdr.mark = gc_color_red;
+- c_7322189.hdr.grayed = 0;
+-c_7322189.tag = closureN_tag;
+- c_7322189.fn = (function_type)__lambda_851;
+-c_7322189.num_args = 1;
+-c_7322189.num_elements = 51;
+-c_7322189.elements = (object *)e_7323996;
+-c_7322189.elements[0] = ((closureN)self_7313838)->elements[0];
+-c_7322189.elements[1] = ((closureN)self_7313838)->elements[1];
+-c_7322189.elements[2] = ((closureN)self_7313838)->elements[2];
+-c_7322189.elements[3] = ((closureN)self_7313838)->elements[3];
+-c_7322189.elements[4] = ((closureN)self_7313838)->elements[4];
+-c_7322189.elements[5] = ((closureN)self_7313838)->elements[5];
+-c_7322189.elements[6] = ((closureN)self_7313838)->elements[6];
+-c_7322189.elements[7] = ((closureN)self_7313838)->elements[7];
+-c_7322189.elements[8] = ((closureN)self_7313838)->elements[8];
+-c_7322189.elements[9] = ((closureN)self_7313838)->elements[9];
+-c_7322189.elements[10] = ((closureN)self_7313838)->elements[10];
+-c_7322189.elements[11] = ((closureN)self_7313838)->elements[11];
+-c_7322189.elements[12] = ((closureN)self_7313838)->elements[12];
+-c_7322189.elements[13] = ((closureN)self_7313838)->elements[13];
+-c_7322189.elements[14] = ((closureN)self_7313838)->elements[14];
+-c_7322189.elements[15] = ((closureN)self_7313838)->elements[15];
+-c_7322189.elements[16] = ((closureN)self_7313838)->elements[16];
+-c_7322189.elements[17] = ((closureN)self_7313838)->elements[17];
+-c_7322189.elements[18] = ((closureN)self_7313838)->elements[18];
+-c_7322189.elements[19] = ((closureN)self_7313838)->elements[19];
+-c_7322189.elements[20] = ((closureN)self_7313838)->elements[20];
+-c_7322189.elements[21] = ((closureN)self_7313838)->elements[21];
+-c_7322189.elements[22] = ((closureN)self_7313838)->elements[22];
+-c_7322189.elements[23] = ((closureN)self_7313838)->elements[23];
+-c_7322189.elements[24] = ((closureN)self_7313838)->elements[24];
+-c_7322189.elements[25] = ((closureN)self_7313838)->elements[25];
+-c_7322189.elements[26] = ((closureN)self_7313838)->elements[26];
+-c_7322189.elements[27] = ((closureN)self_7313838)->elements[27];
+-c_7322189.elements[28] = ((closureN)self_7313838)->elements[28];
+-c_7322189.elements[29] = ((closureN)self_7313838)->elements[29];
+-c_7322189.elements[30] = ((closureN)self_7313838)->elements[30];
+-c_7322189.elements[31] = ((closureN)self_7313838)->elements[31];
+-c_7322189.elements[32] = ((closureN)self_7313838)->elements[32];
+-c_7322189.elements[33] = ((closureN)self_7313838)->elements[33];
+-c_7322189.elements[34] = ((closureN)self_7313838)->elements[34];
+-c_7322189.elements[35] = ((closureN)self_7313838)->elements[35];
+-c_7322189.elements[36] = ((closureN)self_7313838)->elements[36];
+-c_7322189.elements[37] = ((closureN)self_7313838)->elements[37];
+-c_7322189.elements[38] = ((closureN)self_7313838)->elements[38];
+-c_7322189.elements[39] = ((closureN)self_7313838)->elements[39];
+-c_7322189.elements[40] = ((closureN)self_7313838)->elements[40];
+-c_7322189.elements[41] = ((closureN)self_7313838)->elements[41];
+-c_7322189.elements[42] = ((closureN)self_7313838)->elements[42];
+-c_7322189.elements[43] = ((closureN)self_7313838)->elements[43];
+-c_7322189.elements[44] = ((closureN)self_7313838)->elements[44];
+-c_7322189.elements[45] = ((closureN)self_7313838)->elements[45];
+-c_7322189.elements[46] = ((closureN)self_7313838)->elements[46];
+-c_7322189.elements[47] = ((closureN)self_7313838)->elements[47];
+-c_7322189.elements[48] = ((closureN)self_7313838)->elements[48];
+-c_7322189.elements[49] = ((closureN)self_7313838)->elements[49];
+-c_7322189.elements[50] = ((closureN)self_7313838)->elements[50];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322189,__lambda_851, Cyc_set_cell(data, ((closureN)self_7313838)->elements[36], r_736764));;
+-}
+-
+-static void __lambda_851(void *data, object self_7313839, int argc, object *args) /* object self_7313839, object r_736384 */
+- {
+-
+-
+-closureN_type c_7322191;
+-object e_7322203 [2];
+-c_7322191.hdr.mark = gc_color_red;
+- c_7322191.hdr.grayed = 0;
+-c_7322191.tag = closureN_tag;
+- c_7322191.fn = (function_type)__lambda_852;
+-c_7322191.num_args = 0;
+-c_7322191.num_elements = 2;
+-c_7322191.elements = (object *)e_7322203;
+-c_7322191.elements[0] = ((closureN)self_7313839)->elements[39];
+-c_7322191.elements[1] = ((closureN)self_7313839)->elements[44];
+-
+-
+-closureN_type c_7322204;
+-object e_7323995 [51];
+-c_7322204.hdr.mark = gc_color_red;
+- c_7322204.hdr.grayed = 0;
+-c_7322204.tag = closureN_tag;
+- c_7322204.fn = (function_type)__lambda_853;
+-c_7322204.num_args = 1;
+-c_7322204.num_elements = 51;
+-c_7322204.elements = (object *)e_7323995;
+-c_7322204.elements[0] = ((closureN)self_7313839)->elements[0];
+-c_7322204.elements[1] = ((closureN)self_7313839)->elements[1];
+-c_7322204.elements[2] = ((closureN)self_7313839)->elements[2];
+-c_7322204.elements[3] = ((closureN)self_7313839)->elements[3];
+-c_7322204.elements[4] = ((closureN)self_7313839)->elements[4];
+-c_7322204.elements[5] = ((closureN)self_7313839)->elements[5];
+-c_7322204.elements[6] = ((closureN)self_7313839)->elements[6];
+-c_7322204.elements[7] = ((closureN)self_7313839)->elements[7];
+-c_7322204.elements[8] = ((closureN)self_7313839)->elements[8];
+-c_7322204.elements[9] = ((closureN)self_7313839)->elements[9];
+-c_7322204.elements[10] = ((closureN)self_7313839)->elements[10];
+-c_7322204.elements[11] = ((closureN)self_7313839)->elements[11];
+-c_7322204.elements[12] = ((closureN)self_7313839)->elements[12];
+-c_7322204.elements[13] = ((closureN)self_7313839)->elements[13];
+-c_7322204.elements[14] = ((closureN)self_7313839)->elements[14];
+-c_7322204.elements[15] = ((closureN)self_7313839)->elements[15];
+-c_7322204.elements[16] = ((closureN)self_7313839)->elements[16];
+-c_7322204.elements[17] = ((closureN)self_7313839)->elements[17];
+-c_7322204.elements[18] = ((closureN)self_7313839)->elements[18];
+-c_7322204.elements[19] = ((closureN)self_7313839)->elements[19];
+-c_7322204.elements[20] = ((closureN)self_7313839)->elements[20];
+-c_7322204.elements[21] = ((closureN)self_7313839)->elements[21];
+-c_7322204.elements[22] = ((closureN)self_7313839)->elements[22];
+-c_7322204.elements[23] = ((closureN)self_7313839)->elements[23];
+-c_7322204.elements[24] = ((closureN)self_7313839)->elements[24];
+-c_7322204.elements[25] = ((closureN)self_7313839)->elements[25];
+-c_7322204.elements[26] = ((closureN)self_7313839)->elements[26];
+-c_7322204.elements[27] = ((closureN)self_7313839)->elements[27];
+-c_7322204.elements[28] = ((closureN)self_7313839)->elements[28];
+-c_7322204.elements[29] = ((closureN)self_7313839)->elements[29];
+-c_7322204.elements[30] = ((closureN)self_7313839)->elements[30];
+-c_7322204.elements[31] = ((closureN)self_7313839)->elements[31];
+-c_7322204.elements[32] = ((closureN)self_7313839)->elements[32];
+-c_7322204.elements[33] = ((closureN)self_7313839)->elements[33];
+-c_7322204.elements[34] = ((closureN)self_7313839)->elements[34];
+-c_7322204.elements[35] = ((closureN)self_7313839)->elements[35];
+-c_7322204.elements[36] = ((closureN)self_7313839)->elements[36];
+-c_7322204.elements[37] = ((closureN)self_7313839)->elements[37];
+-c_7322204.elements[38] = ((closureN)self_7313839)->elements[38];
+-c_7322204.elements[39] = ((closureN)self_7313839)->elements[39];
+-c_7322204.elements[40] = ((closureN)self_7313839)->elements[40];
+-c_7322204.elements[41] = ((closureN)self_7313839)->elements[41];
+-c_7322204.elements[42] = ((closureN)self_7313839)->elements[42];
+-c_7322204.elements[43] = ((closureN)self_7313839)->elements[43];
+-c_7322204.elements[44] = ((closureN)self_7313839)->elements[44];
+-c_7322204.elements[45] = ((closureN)self_7313839)->elements[45];
+-c_7322204.elements[46] = ((closureN)self_7313839)->elements[46];
+-c_7322204.elements[47] = ((closureN)self_7313839)->elements[47];
+-c_7322204.elements[48] = ((closureN)self_7313839)->elements[48];
+-c_7322204.elements[49] = ((closureN)self_7313839)->elements[49];
+-c_7322204.elements[50] = ((closureN)self_7313839)->elements[50];
+-
+-return_direct_with_clo1(data,(closure)&c_7322191,__lambda_852, &c_7322204);;
+-}
+-
+-static void __lambda_853(void *data, object self_7313840, int argc, object *args) /* object self_7313840, object r_736761 */
+- {
+- object r_736761 = args[0];
+-
+-closureN_type c_7322206;
+-object e_7323991 [51];
+-c_7322206.hdr.mark = gc_color_red;
+- c_7322206.hdr.grayed = 0;
+-c_7322206.tag = closureN_tag;
+- c_7322206.fn = (function_type)__lambda_854;
+-c_7322206.num_args = 1;
+-c_7322206.num_elements = 51;
+-c_7322206.elements = (object *)e_7323991;
+-c_7322206.elements[0] = ((closureN)self_7313840)->elements[0];
+-c_7322206.elements[1] = ((closureN)self_7313840)->elements[1];
+-c_7322206.elements[2] = ((closureN)self_7313840)->elements[2];
+-c_7322206.elements[3] = ((closureN)self_7313840)->elements[3];
+-c_7322206.elements[4] = ((closureN)self_7313840)->elements[4];
+-c_7322206.elements[5] = ((closureN)self_7313840)->elements[5];
+-c_7322206.elements[6] = ((closureN)self_7313840)->elements[6];
+-c_7322206.elements[7] = ((closureN)self_7313840)->elements[7];
+-c_7322206.elements[8] = ((closureN)self_7313840)->elements[8];
+-c_7322206.elements[9] = ((closureN)self_7313840)->elements[9];
+-c_7322206.elements[10] = ((closureN)self_7313840)->elements[10];
+-c_7322206.elements[11] = ((closureN)self_7313840)->elements[11];
+-c_7322206.elements[12] = ((closureN)self_7313840)->elements[12];
+-c_7322206.elements[13] = ((closureN)self_7313840)->elements[13];
+-c_7322206.elements[14] = ((closureN)self_7313840)->elements[14];
+-c_7322206.elements[15] = ((closureN)self_7313840)->elements[15];
+-c_7322206.elements[16] = ((closureN)self_7313840)->elements[16];
+-c_7322206.elements[17] = ((closureN)self_7313840)->elements[17];
+-c_7322206.elements[18] = ((closureN)self_7313840)->elements[18];
+-c_7322206.elements[19] = ((closureN)self_7313840)->elements[19];
+-c_7322206.elements[20] = ((closureN)self_7313840)->elements[20];
+-c_7322206.elements[21] = ((closureN)self_7313840)->elements[21];
+-c_7322206.elements[22] = ((closureN)self_7313840)->elements[22];
+-c_7322206.elements[23] = ((closureN)self_7313840)->elements[23];
+-c_7322206.elements[24] = ((closureN)self_7313840)->elements[24];
+-c_7322206.elements[25] = ((closureN)self_7313840)->elements[25];
+-c_7322206.elements[26] = ((closureN)self_7313840)->elements[26];
+-c_7322206.elements[27] = ((closureN)self_7313840)->elements[27];
+-c_7322206.elements[28] = ((closureN)self_7313840)->elements[28];
+-c_7322206.elements[29] = ((closureN)self_7313840)->elements[29];
+-c_7322206.elements[30] = ((closureN)self_7313840)->elements[30];
+-c_7322206.elements[31] = ((closureN)self_7313840)->elements[31];
+-c_7322206.elements[32] = ((closureN)self_7313840)->elements[32];
+-c_7322206.elements[33] = ((closureN)self_7313840)->elements[33];
+-c_7322206.elements[34] = ((closureN)self_7313840)->elements[34];
+-c_7322206.elements[35] = ((closureN)self_7313840)->elements[35];
+-c_7322206.elements[36] = ((closureN)self_7313840)->elements[36];
+-c_7322206.elements[37] = ((closureN)self_7313840)->elements[37];
+-c_7322206.elements[38] = ((closureN)self_7313840)->elements[38];
+-c_7322206.elements[39] = ((closureN)self_7313840)->elements[39];
+-c_7322206.elements[40] = ((closureN)self_7313840)->elements[40];
+-c_7322206.elements[41] = ((closureN)self_7313840)->elements[41];
+-c_7322206.elements[42] = ((closureN)self_7313840)->elements[42];
+-c_7322206.elements[43] = ((closureN)self_7313840)->elements[43];
+-c_7322206.elements[44] = ((closureN)self_7313840)->elements[44];
+-c_7322206.elements[45] = ((closureN)self_7313840)->elements[45];
+-c_7322206.elements[46] = ((closureN)self_7313840)->elements[46];
+-c_7322206.elements[47] = ((closureN)self_7313840)->elements[47];
+-c_7322206.elements[48] = ((closureN)self_7313840)->elements[48];
+-c_7322206.elements[49] = ((closureN)self_7313840)->elements[49];
+-c_7322206.elements[50] = ((closureN)self_7313840)->elements[50];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322206,__lambda_854, Cyc_set_cell(data, ((closureN)self_7313840)->elements[48], r_736761));;
+-}
+-
+-static void __lambda_854(void *data, object self_7313841, int argc, object *args) /* object self_7313841, object r_736385 */
+- {
+-
+-
+-closureN_type c_7322208;
+-object e_7322220 [2];
+-c_7322208.hdr.mark = gc_color_red;
+- c_7322208.hdr.grayed = 0;
+-c_7322208.tag = closureN_tag;
+- c_7322208.fn = (function_type)__lambda_855;
+-c_7322208.num_args = 0;
+-c_7322208.num_elements = 2;
+-c_7322208.elements = (object *)e_7322220;
+-c_7322208.elements[0] = ((closureN)self_7313841)->elements[39];
+-c_7322208.elements[1] = ((closureN)self_7313841)->elements[44];
+-
+-
+-closureN_type c_7322221;
+-object e_7323990 [50];
+-c_7322221.hdr.mark = gc_color_red;
+- c_7322221.hdr.grayed = 0;
+-c_7322221.tag = closureN_tag;
+- c_7322221.fn = (function_type)__lambda_856;
+-c_7322221.num_args = 1;
+-c_7322221.num_elements = 50;
+-c_7322221.elements = (object *)e_7323990;
+-c_7322221.elements[0] = ((closureN)self_7313841)->elements[0];
+-c_7322221.elements[1] = ((closureN)self_7313841)->elements[1];
+-c_7322221.elements[2] = ((closureN)self_7313841)->elements[2];
+-c_7322221.elements[3] = ((closureN)self_7313841)->elements[3];
+-c_7322221.elements[4] = ((closureN)self_7313841)->elements[4];
+-c_7322221.elements[5] = ((closureN)self_7313841)->elements[5];
+-c_7322221.elements[6] = ((closureN)self_7313841)->elements[6];
+-c_7322221.elements[7] = ((closureN)self_7313841)->elements[7];
+-c_7322221.elements[8] = ((closureN)self_7313841)->elements[8];
+-c_7322221.elements[9] = ((closureN)self_7313841)->elements[9];
+-c_7322221.elements[10] = ((closureN)self_7313841)->elements[10];
+-c_7322221.elements[11] = ((closureN)self_7313841)->elements[11];
+-c_7322221.elements[12] = ((closureN)self_7313841)->elements[12];
+-c_7322221.elements[13] = ((closureN)self_7313841)->elements[13];
+-c_7322221.elements[14] = ((closureN)self_7313841)->elements[14];
+-c_7322221.elements[15] = ((closureN)self_7313841)->elements[15];
+-c_7322221.elements[16] = ((closureN)self_7313841)->elements[16];
+-c_7322221.elements[17] = ((closureN)self_7313841)->elements[17];
+-c_7322221.elements[18] = ((closureN)self_7313841)->elements[18];
+-c_7322221.elements[19] = ((closureN)self_7313841)->elements[19];
+-c_7322221.elements[20] = ((closureN)self_7313841)->elements[20];
+-c_7322221.elements[21] = ((closureN)self_7313841)->elements[21];
+-c_7322221.elements[22] = ((closureN)self_7313841)->elements[22];
+-c_7322221.elements[23] = ((closureN)self_7313841)->elements[23];
+-c_7322221.elements[24] = ((closureN)self_7313841)->elements[24];
+-c_7322221.elements[25] = ((closureN)self_7313841)->elements[25];
+-c_7322221.elements[26] = ((closureN)self_7313841)->elements[26];
+-c_7322221.elements[27] = ((closureN)self_7313841)->elements[27];
+-c_7322221.elements[28] = ((closureN)self_7313841)->elements[28];
+-c_7322221.elements[29] = ((closureN)self_7313841)->elements[29];
+-c_7322221.elements[30] = ((closureN)self_7313841)->elements[30];
+-c_7322221.elements[31] = ((closureN)self_7313841)->elements[31];
+-c_7322221.elements[32] = ((closureN)self_7313841)->elements[32];
+-c_7322221.elements[33] = ((closureN)self_7313841)->elements[33];
+-c_7322221.elements[34] = ((closureN)self_7313841)->elements[34];
+-c_7322221.elements[35] = ((closureN)self_7313841)->elements[35];
+-c_7322221.elements[36] = ((closureN)self_7313841)->elements[36];
+-c_7322221.elements[37] = ((closureN)self_7313841)->elements[37];
+-c_7322221.elements[38] = ((closureN)self_7313841)->elements[38];
+-c_7322221.elements[39] = ((closureN)self_7313841)->elements[40];
+-c_7322221.elements[40] = ((closureN)self_7313841)->elements[41];
+-c_7322221.elements[41] = ((closureN)self_7313841)->elements[42];
+-c_7322221.elements[42] = ((closureN)self_7313841)->elements[43];
+-c_7322221.elements[43] = ((closureN)self_7313841)->elements[44];
+-c_7322221.elements[44] = ((closureN)self_7313841)->elements[45];
+-c_7322221.elements[45] = ((closureN)self_7313841)->elements[46];
+-c_7322221.elements[46] = ((closureN)self_7313841)->elements[47];
+-c_7322221.elements[47] = ((closureN)self_7313841)->elements[48];
+-c_7322221.elements[48] = ((closureN)self_7313841)->elements[49];
+-c_7322221.elements[49] = ((closureN)self_7313841)->elements[50];
+-
+-return_direct_with_clo1(data,(closure)&c_7322208,__lambda_855, &c_7322221);;
+-}
+-
+-static void __lambda_856(void *data, object self_7313842, int argc, object *args) /* object self_7313842, object r_736758 */
+- {
+- object r_736758 = args[0];
+-
+-closureN_type c_7322223;
+-object e_7323986 [50];
+-c_7322223.hdr.mark = gc_color_red;
+- c_7322223.hdr.grayed = 0;
+-c_7322223.tag = closureN_tag;
+- c_7322223.fn = (function_type)__lambda_857;
+-c_7322223.num_args = 1;
+-c_7322223.num_elements = 50;
+-c_7322223.elements = (object *)e_7323986;
+-c_7322223.elements[0] = ((closureN)self_7313842)->elements[0];
+-c_7322223.elements[1] = ((closureN)self_7313842)->elements[1];
+-c_7322223.elements[2] = ((closureN)self_7313842)->elements[2];
+-c_7322223.elements[3] = ((closureN)self_7313842)->elements[3];
+-c_7322223.elements[4] = ((closureN)self_7313842)->elements[4];
+-c_7322223.elements[5] = ((closureN)self_7313842)->elements[5];
+-c_7322223.elements[6] = ((closureN)self_7313842)->elements[6];
+-c_7322223.elements[7] = ((closureN)self_7313842)->elements[7];
+-c_7322223.elements[8] = ((closureN)self_7313842)->elements[8];
+-c_7322223.elements[9] = ((closureN)self_7313842)->elements[9];
+-c_7322223.elements[10] = ((closureN)self_7313842)->elements[10];
+-c_7322223.elements[11] = ((closureN)self_7313842)->elements[11];
+-c_7322223.elements[12] = ((closureN)self_7313842)->elements[12];
+-c_7322223.elements[13] = ((closureN)self_7313842)->elements[13];
+-c_7322223.elements[14] = ((closureN)self_7313842)->elements[14];
+-c_7322223.elements[15] = ((closureN)self_7313842)->elements[15];
+-c_7322223.elements[16] = ((closureN)self_7313842)->elements[16];
+-c_7322223.elements[17] = ((closureN)self_7313842)->elements[17];
+-c_7322223.elements[18] = ((closureN)self_7313842)->elements[18];
+-c_7322223.elements[19] = ((closureN)self_7313842)->elements[19];
+-c_7322223.elements[20] = ((closureN)self_7313842)->elements[20];
+-c_7322223.elements[21] = ((closureN)self_7313842)->elements[21];
+-c_7322223.elements[22] = ((closureN)self_7313842)->elements[22];
+-c_7322223.elements[23] = ((closureN)self_7313842)->elements[23];
+-c_7322223.elements[24] = ((closureN)self_7313842)->elements[24];
+-c_7322223.elements[25] = ((closureN)self_7313842)->elements[25];
+-c_7322223.elements[26] = ((closureN)self_7313842)->elements[26];
+-c_7322223.elements[27] = ((closureN)self_7313842)->elements[27];
+-c_7322223.elements[28] = ((closureN)self_7313842)->elements[28];
+-c_7322223.elements[29] = ((closureN)self_7313842)->elements[29];
+-c_7322223.elements[30] = ((closureN)self_7313842)->elements[30];
+-c_7322223.elements[31] = ((closureN)self_7313842)->elements[31];
+-c_7322223.elements[32] = ((closureN)self_7313842)->elements[32];
+-c_7322223.elements[33] = ((closureN)self_7313842)->elements[33];
+-c_7322223.elements[34] = ((closureN)self_7313842)->elements[34];
+-c_7322223.elements[35] = ((closureN)self_7313842)->elements[35];
+-c_7322223.elements[36] = ((closureN)self_7313842)->elements[36];
+-c_7322223.elements[37] = ((closureN)self_7313842)->elements[37];
+-c_7322223.elements[38] = ((closureN)self_7313842)->elements[38];
+-c_7322223.elements[39] = ((closureN)self_7313842)->elements[39];
+-c_7322223.elements[40] = ((closureN)self_7313842)->elements[40];
+-c_7322223.elements[41] = ((closureN)self_7313842)->elements[41];
+-c_7322223.elements[42] = ((closureN)self_7313842)->elements[42];
+-c_7322223.elements[43] = ((closureN)self_7313842)->elements[43];
+-c_7322223.elements[44] = ((closureN)self_7313842)->elements[44];
+-c_7322223.elements[45] = ((closureN)self_7313842)->elements[45];
+-c_7322223.elements[46] = ((closureN)self_7313842)->elements[46];
+-c_7322223.elements[47] = ((closureN)self_7313842)->elements[47];
+-c_7322223.elements[48] = ((closureN)self_7313842)->elements[48];
+-c_7322223.elements[49] = ((closureN)self_7313842)->elements[49];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322223,__lambda_857, Cyc_set_cell(data, ((closureN)self_7313842)->elements[44], r_736758));;
+-}
+-
+-static void __lambda_857(void *data, object self_7313843, int argc, object *args) /* object self_7313843, object r_736386 */
+- {
+-
+-
+-closureN_type c_7322225;
+-object e_7323947 [48];
+-c_7322225.hdr.mark = gc_color_red;
+- c_7322225.hdr.grayed = 0;
+-c_7322225.tag = closureN_tag;
+- c_7322225.fn = (function_type)__lambda_858;
+-c_7322225.num_args = 1;
+-c_7322225.num_elements = 48;
+-c_7322225.elements = (object *)e_7323947;
+-c_7322225.elements[0] = ((closureN)self_7313843)->elements[0];
+-c_7322225.elements[1] = ((closureN)self_7313843)->elements[1];
+-c_7322225.elements[2] = ((closureN)self_7313843)->elements[2];
+-c_7322225.elements[3] = ((closureN)self_7313843)->elements[3];
+-c_7322225.elements[4] = ((closureN)self_7313843)->elements[4];
+-c_7322225.elements[5] = ((closureN)self_7313843)->elements[5];
+-c_7322225.elements[6] = ((closureN)self_7313843)->elements[6];
+-c_7322225.elements[7] = ((closureN)self_7313843)->elements[7];
+-c_7322225.elements[8] = ((closureN)self_7313843)->elements[8];
+-c_7322225.elements[9] = ((closureN)self_7313843)->elements[9];
+-c_7322225.elements[10] = ((closureN)self_7313843)->elements[10];
+-c_7322225.elements[11] = ((closureN)self_7313843)->elements[11];
+-c_7322225.elements[12] = ((closureN)self_7313843)->elements[12];
+-c_7322225.elements[13] = ((closureN)self_7313843)->elements[13];
+-c_7322225.elements[14] = ((closureN)self_7313843)->elements[14];
+-c_7322225.elements[15] = ((closureN)self_7313843)->elements[15];
+-c_7322225.elements[16] = ((closureN)self_7313843)->elements[16];
+-c_7322225.elements[17] = ((closureN)self_7313843)->elements[17];
+-c_7322225.elements[18] = ((closureN)self_7313843)->elements[18];
+-c_7322225.elements[19] = ((closureN)self_7313843)->elements[19];
+-c_7322225.elements[20] = ((closureN)self_7313843)->elements[20];
+-c_7322225.elements[21] = ((closureN)self_7313843)->elements[21];
+-c_7322225.elements[22] = ((closureN)self_7313843)->elements[22];
+-c_7322225.elements[23] = ((closureN)self_7313843)->elements[23];
+-c_7322225.elements[24] = ((closureN)self_7313843)->elements[24];
+-c_7322225.elements[25] = ((closureN)self_7313843)->elements[25];
+-c_7322225.elements[26] = ((closureN)self_7313843)->elements[26];
+-c_7322225.elements[27] = ((closureN)self_7313843)->elements[27];
+-c_7322225.elements[28] = ((closureN)self_7313843)->elements[28];
+-c_7322225.elements[29] = ((closureN)self_7313843)->elements[29];
+-c_7322225.elements[30] = ((closureN)self_7313843)->elements[30];
+-c_7322225.elements[31] = ((closureN)self_7313843)->elements[31];
+-c_7322225.elements[32] = ((closureN)self_7313843)->elements[32];
+-c_7322225.elements[33] = ((closureN)self_7313843)->elements[33];
+-c_7322225.elements[34] = ((closureN)self_7313843)->elements[34];
+-c_7322225.elements[35] = ((closureN)self_7313843)->elements[36];
+-c_7322225.elements[36] = ((closureN)self_7313843)->elements[37];
+-c_7322225.elements[37] = ((closureN)self_7313843)->elements[38];
+-c_7322225.elements[38] = ((closureN)self_7313843)->elements[39];
+-c_7322225.elements[39] = ((closureN)self_7313843)->elements[40];
+-c_7322225.elements[40] = ((closureN)self_7313843)->elements[41];
+-c_7322225.elements[41] = ((closureN)self_7313843)->elements[42];
+-c_7322225.elements[42] = ((closureN)self_7313843)->elements[43];
+-c_7322225.elements[43] = ((closureN)self_7313843)->elements[44];
+-c_7322225.elements[44] = ((closureN)self_7313843)->elements[45];
+-c_7322225.elements[45] = ((closureN)self_7313843)->elements[46];
+-c_7322225.elements[46] = ((closureN)self_7313843)->elements[47];
+-c_7322225.elements[47] = ((closureN)self_7313843)->elements[48];
++c_7322177.num_elements = 18;
++c_7322177.elements = (object *)e_7322373;
++c_7322177.elements[0] = ((closureN)self_7312650)->elements[0];
++c_7322177.elements[1] = ((closureN)self_7312650)->elements[1];
++c_7322177.elements[2] = ((closureN)self_7312650)->elements[2];
++c_7322177.elements[3] = ((closureN)self_7312650)->elements[3];
++c_7322177.elements[4] = ((closureN)self_7312650)->elements[4];
++c_7322177.elements[5] = ((closureN)self_7312650)->elements[6];
++c_7322177.elements[6] = ((closureN)self_7312650)->elements[7];
++c_7322177.elements[7] = ((closureN)self_7312650)->elements[8];
++c_7322177.elements[8] = ((closureN)self_7312650)->elements[9];
++c_7322177.elements[9] = ((closureN)self_7312650)->elements[10];
++c_7322177.elements[10] = ((closureN)self_7312650)->elements[11];
++c_7322177.elements[11] = _191lp_731336_733286;
++c_7322177.elements[12] = ((closureN)self_7312650)->elements[12];
++c_7322177.elements[13] = ((closureN)self_7312650)->elements[13];
++c_7322177.elements[14] = ((closureN)self_7312650)->elements[14];
++c_7322177.elements[15] = ((closureN)self_7312650)->elements[18];
++c_7322177.elements[16] = len_731335_733285;
++c_7322177.elements[17] = ((closureN)self_7312650)->elements[21];
+
+
+-closureN_type c_7323948;
+-object e_7323985 [2];
+-c_7323948.hdr.mark = gc_color_red;
+- c_7323948.hdr.grayed = 0;
+-c_7323948.tag = closureN_tag;
+- c_7323948.fn = (function_type)__lambda_1020;
+-c_7323948.num_args = 1;
+-c_7323948.num_elements = 2;
+-c_7323948.elements = (object *)e_7323985;
+-c_7323948.elements[0] = ((closureN)self_7313843)->elements[35];
+-c_7323948.elements[1] = ((closureN)self_7313843)->elements[49];
+-
+-return_direct_with_clo1(data,(closure)&c_7322225,__lambda_858, &c_7323948);;
+-}
+-
+-static void __lambda_1020(void *data, object self_7313844, int argc, object *args) /* object self_7313844, object k_736752, object s_731303_733615 */
+- {
+- object k_736752 = args[0]; object s_731303_733615 = args[1];
+-
+-closureN_type c_7323950;
+-object e_7323978 [4];
+-c_7323950.hdr.mark = gc_color_red;
+- c_7323950.hdr.grayed = 0;
+-c_7323950.tag = closureN_tag;
+- c_7323950.fn = (function_type)__lambda_1021;
+-c_7323950.num_args = 1;
+-c_7323950.num_elements = 4;
+-c_7323950.elements = (object *)e_7323978;
+-c_7323950.elements[0] = ((closureN)self_7313844)->elements[0];
+-c_7323950.elements[1] = k_736752;
+-c_7323950.elements[2] = ((closureN)self_7313844)->elements[1];
+-c_7323950.elements[3] = s_731303_733615;
+-
+-
+-complex_num_type local_7323981;
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7323950,__lambda_1021, Cyc_fast_sum(data,&local_7323981, car(((closureN)self_7313844)->elements[0]), obj_int2obj(1)));;
+-}
+-
+-static void __lambda_1021(void *data, object self_7313845, int argc, object *args) /* object self_7313845, object r_736757 */
+- {
+- object r_736757 = args[0];
+-
+-closureN_type c_7323952;
+-object e_7323974 [4];
+-c_7323952.hdr.mark = gc_color_red;
+- c_7323952.hdr.grayed = 0;
+-c_7323952.tag = closureN_tag;
+- c_7323952.fn = (function_type)__lambda_1022;
+-c_7323952.num_args = 1;
+-c_7323952.num_elements = 4;
+-c_7323952.elements = (object *)e_7323974;
+-c_7323952.elements[0] = ((closureN)self_7313845)->elements[0];
+-c_7323952.elements[1] = ((closureN)self_7313845)->elements[1];
+-c_7323952.elements[2] = ((closureN)self_7313845)->elements[2];
+-c_7323952.elements[3] = ((closureN)self_7313845)->elements[3];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7323952,__lambda_1022, Cyc_set_cell(data, ((closureN)self_7313845)->elements[0], r_736757));;
+-}
+-
+-static void __lambda_1022(void *data, object self_7313846, int argc, object *args) /* object self_7313846, object r_736753 */
+- {
+-
+-
+-closureN_type c_7323954;
+-object e_7323967 [3];
+-c_7323954.hdr.mark = gc_color_red;
+- c_7323954.hdr.grayed = 0;
+-c_7323954.tag = closureN_tag;
+- c_7323954.fn = (function_type)__lambda_1023;
+-c_7323954.num_args = 1;
+-c_7323954.num_elements = 3;
+-c_7323954.elements = (object *)e_7323967;
+-c_7323954.elements[0] = ((closureN)self_7313846)->elements[1];
+-c_7323954.elements[1] = ((closureN)self_7313846)->elements[2];
+-c_7323954.elements[2] = ((closureN)self_7313846)->elements[3];
+-
+-
+-
+-
+-object c_7323970 = Cyc_number2string2(data,(closure)&c_7323954,1,car(((closureN)self_7313846)->elements[0]));
+-return_closcall1(data,(closure)&c_7323954, c_7323970);;
+-}
+-
+-static void __lambda_1023(void *data, object self_7313847, int argc, object *args) /* object self_7313847, object r_736756 */
+- {
+- object r_736756 = args[0];
+-
+-closureN_type c_7323956;
+-object e_7323962 [2];
+-c_7323956.hdr.mark = gc_color_red;
+- c_7323956.hdr.grayed = 0;
+-c_7323956.tag = closureN_tag;
+- c_7323956.fn = (function_type)__lambda_1024;
+-c_7323956.num_args = 1;
+-c_7323956.num_elements = 2;
+-c_7323956.elements = (object *)e_7323962;
+-c_7323956.elements[0] = ((closureN)self_7313847)->elements[0];
+-c_7323956.elements[1] = ((closureN)self_7313847)->elements[1];
+-
+-
+-object c_7323965 = Cyc_string_append(data,(closure)&c_7323956,2,((closureN)self_7313847)->elements[2], r_736756);
+-return_closcall1(data,(closure)&c_7323956, c_7323965);;
+-}
+-
+-static void __lambda_1024(void *data, object self_7313848, int argc, object *args) /* object self_7313848, object r_736755 */
+- {
+- object r_736755 = args[0];
+-
+-
+-return_closcall2(data, ((closureN)self_7313848)->elements[1], ((closureN)self_7313848)->elements[0], Cyc_string2symbol(data, r_736755));;
+-}
+-
+-static void __lambda_858(void *data, object self_7313849, int argc, object *args) /* object self_7313849, object r_736751 */
+- {
+- object r_736751 = args[0];
+-
+-closureN_type c_7322227;
+-object e_7323943 [48];
+-c_7322227.hdr.mark = gc_color_red;
+- c_7322227.hdr.grayed = 0;
+-c_7322227.tag = closureN_tag;
+- c_7322227.fn = (function_type)__lambda_859;
+-c_7322227.num_args = 1;
+-c_7322227.num_elements = 48;
+-c_7322227.elements = (object *)e_7323943;
+-c_7322227.elements[0] = ((closureN)self_7313849)->elements[0];
+-c_7322227.elements[1] = ((closureN)self_7313849)->elements[1];
+-c_7322227.elements[2] = ((closureN)self_7313849)->elements[2];
+-c_7322227.elements[3] = ((closureN)self_7313849)->elements[3];
+-c_7322227.elements[4] = ((closureN)self_7313849)->elements[4];
+-c_7322227.elements[5] = ((closureN)self_7313849)->elements[5];
+-c_7322227.elements[6] = ((closureN)self_7313849)->elements[6];
+-c_7322227.elements[7] = ((closureN)self_7313849)->elements[7];
+-c_7322227.elements[8] = ((closureN)self_7313849)->elements[8];
+-c_7322227.elements[9] = ((closureN)self_7313849)->elements[9];
+-c_7322227.elements[10] = ((closureN)self_7313849)->elements[10];
+-c_7322227.elements[11] = ((closureN)self_7313849)->elements[11];
+-c_7322227.elements[12] = ((closureN)self_7313849)->elements[12];
+-c_7322227.elements[13] = ((closureN)self_7313849)->elements[13];
+-c_7322227.elements[14] = ((closureN)self_7313849)->elements[14];
+-c_7322227.elements[15] = ((closureN)self_7313849)->elements[15];
+-c_7322227.elements[16] = ((closureN)self_7313849)->elements[16];
+-c_7322227.elements[17] = ((closureN)self_7313849)->elements[17];
+-c_7322227.elements[18] = ((closureN)self_7313849)->elements[18];
+-c_7322227.elements[19] = ((closureN)self_7313849)->elements[19];
+-c_7322227.elements[20] = ((closureN)self_7313849)->elements[20];
+-c_7322227.elements[21] = ((closureN)self_7313849)->elements[21];
+-c_7322227.elements[22] = ((closureN)self_7313849)->elements[22];
+-c_7322227.elements[23] = ((closureN)self_7313849)->elements[23];
+-c_7322227.elements[24] = ((closureN)self_7313849)->elements[24];
+-c_7322227.elements[25] = ((closureN)self_7313849)->elements[25];
+-c_7322227.elements[26] = ((closureN)self_7313849)->elements[26];
+-c_7322227.elements[27] = ((closureN)self_7313849)->elements[27];
+-c_7322227.elements[28] = ((closureN)self_7313849)->elements[28];
+-c_7322227.elements[29] = ((closureN)self_7313849)->elements[29];
+-c_7322227.elements[30] = ((closureN)self_7313849)->elements[30];
+-c_7322227.elements[31] = ((closureN)self_7313849)->elements[31];
+-c_7322227.elements[32] = ((closureN)self_7313849)->elements[32];
+-c_7322227.elements[33] = ((closureN)self_7313849)->elements[33];
+-c_7322227.elements[34] = ((closureN)self_7313849)->elements[34];
+-c_7322227.elements[35] = ((closureN)self_7313849)->elements[35];
+-c_7322227.elements[36] = ((closureN)self_7313849)->elements[36];
+-c_7322227.elements[37] = ((closureN)self_7313849)->elements[37];
+-c_7322227.elements[38] = ((closureN)self_7313849)->elements[38];
+-c_7322227.elements[39] = ((closureN)self_7313849)->elements[39];
+-c_7322227.elements[40] = ((closureN)self_7313849)->elements[40];
+-c_7322227.elements[41] = ((closureN)self_7313849)->elements[41];
+-c_7322227.elements[42] = ((closureN)self_7313849)->elements[42];
+-c_7322227.elements[43] = ((closureN)self_7313849)->elements[43];
+-c_7322227.elements[44] = ((closureN)self_7313849)->elements[44];
+-c_7322227.elements[45] = ((closureN)self_7313849)->elements[45];
+-c_7322227.elements[46] = ((closureN)self_7313849)->elements[46];
+-c_7322227.elements[47] = ((closureN)self_7313849)->elements[47];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322227,__lambda_859, Cyc_set_cell(data, ((closureN)self_7313849)->elements[47], r_736751));;
+-}
+-
+-static void __lambda_859(void *data, object self_7313850, int argc, object *args) /* object self_7313850, object r_736387 */
+- {
+-
+-
+-closureN_type c_7322229;
+-object e_7323086 [29];
+-c_7322229.hdr.mark = gc_color_red;
+- c_7322229.hdr.grayed = 0;
+-c_7322229.tag = closureN_tag;
+- c_7322229.fn = (function_type)__lambda_860;
+-c_7322229.num_args = 1;
+-c_7322229.num_elements = 29;
+-c_7322229.elements = (object *)e_7323086;
+-c_7322229.elements[0] = ((closureN)self_7313850)->elements[3];
+-c_7322229.elements[1] = ((closureN)self_7313850)->elements[4];
+-c_7322229.elements[2] = ((closureN)self_7313850)->elements[5];
+-c_7322229.elements[3] = ((closureN)self_7313850)->elements[7];
+-c_7322229.elements[4] = ((closureN)self_7313850)->elements[8];
+-c_7322229.elements[5] = ((closureN)self_7313850)->elements[9];
+-c_7322229.elements[6] = ((closureN)self_7313850)->elements[11];
+-c_7322229.elements[7] = ((closureN)self_7313850)->elements[12];
+-c_7322229.elements[8] = ((closureN)self_7313850)->elements[13];
+-c_7322229.elements[9] = ((closureN)self_7313850)->elements[16];
+-c_7322229.elements[10] = ((closureN)self_7313850)->elements[20];
+-c_7322229.elements[11] = ((closureN)self_7313850)->elements[23];
+-c_7322229.elements[12] = ((closureN)self_7313850)->elements[25];
+-c_7322229.elements[13] = ((closureN)self_7313850)->elements[27];
+-c_7322229.elements[14] = ((closureN)self_7313850)->elements[28];
+-c_7322229.elements[15] = ((closureN)self_7313850)->elements[33];
+-c_7322229.elements[16] = ((closureN)self_7313850)->elements[34];
+-c_7322229.elements[17] = ((closureN)self_7313850)->elements[35];
+-c_7322229.elements[18] = ((closureN)self_7313850)->elements[36];
+-c_7322229.elements[19] = ((closureN)self_7313850)->elements[37];
+-c_7322229.elements[20] = ((closureN)self_7313850)->elements[38];
+-c_7322229.elements[21] = ((closureN)self_7313850)->elements[39];
+-c_7322229.elements[22] = ((closureN)self_7313850)->elements[40];
+-c_7322229.elements[23] = ((closureN)self_7313850)->elements[41];
+-c_7322229.elements[24] = ((closureN)self_7313850)->elements[42];
+-c_7322229.elements[25] = ((closureN)self_7313850)->elements[43];
+-c_7322229.elements[26] = ((closureN)self_7313850)->elements[44];
+-c_7322229.elements[27] = ((closureN)self_7313850)->elements[45];
+-c_7322229.elements[28] = ((closureN)self_7313850)->elements[46];
+-
+-
+-closureN_type c_7323087;
+-object e_7323942 [32];
+-c_7323087.hdr.mark = gc_color_red;
+- c_7323087.hdr.grayed = 0;
+-c_7323087.tag = closureN_tag;
+- c_7323087.fn = (function_type)__lambda_958;
+-c_7323087.num_args = 2;
+-c_7323087.num_elements = 32;
+-c_7323087.elements = (object *)e_7323942;
+-c_7323087.elements[0] = ((closureN)self_7313850)->elements[0];
+-c_7323087.elements[1] = ((closureN)self_7313850)->elements[1];
+-c_7323087.elements[2] = ((closureN)self_7313850)->elements[2];
+-c_7323087.elements[3] = ((closureN)self_7313850)->elements[5];
+-c_7323087.elements[4] = ((closureN)self_7313850)->elements[6];
+-c_7323087.elements[5] = ((closureN)self_7313850)->elements[7];
+-c_7323087.elements[6] = ((closureN)self_7313850)->elements[8];
+-c_7323087.elements[7] = ((closureN)self_7313850)->elements[9];
+-c_7323087.elements[8] = ((closureN)self_7313850)->elements[10];
+-c_7323087.elements[9] = ((closureN)self_7313850)->elements[13];
+-c_7323087.elements[10] = ((closureN)self_7313850)->elements[14];
+-c_7323087.elements[11] = ((closureN)self_7313850)->elements[15];
+-c_7323087.elements[12] = ((closureN)self_7313850)->elements[17];
+-c_7323087.elements[13] = ((closureN)self_7313850)->elements[18];
+-c_7323087.elements[14] = ((closureN)self_7313850)->elements[19];
+-c_7323087.elements[15] = ((closureN)self_7313850)->elements[21];
+-c_7323087.elements[16] = ((closureN)self_7313850)->elements[22];
+-c_7323087.elements[17] = ((closureN)self_7313850)->elements[24];
+-c_7323087.elements[18] = ((closureN)self_7313850)->elements[26];
+-c_7323087.elements[19] = ((closureN)self_7313850)->elements[27];
+-c_7323087.elements[20] = ((closureN)self_7313850)->elements[28];
+-c_7323087.elements[21] = ((closureN)self_7313850)->elements[29];
+-c_7323087.elements[22] = ((closureN)self_7313850)->elements[30];
+-c_7323087.elements[23] = ((closureN)self_7313850)->elements[31];
+-c_7323087.elements[24] = ((closureN)self_7313850)->elements[32];
+-c_7323087.elements[25] = ((closureN)self_7313850)->elements[33];
+-c_7323087.elements[26] = ((closureN)self_7313850)->elements[34];
+-c_7323087.elements[27] = ((closureN)self_7313850)->elements[35];
+-c_7323087.elements[28] = ((closureN)self_7313850)->elements[39];
+-c_7323087.elements[29] = ((closureN)self_7313850)->elements[41];
+-c_7323087.elements[30] = ((closureN)self_7313850)->elements[46];
+-c_7323087.elements[31] = ((closureN)self_7313850)->elements[47];
+-
+-return_direct_with_clo1(data,(closure)&c_7322229,__lambda_860, &c_7323087);;
+-}
+-
+-static void __lambda_958(void *data, object self_7313851, int argc, object *args) /* object self_7313851, object k_736536, object pat_731304_733616, object tmpl_731305_733617 */
+- {
+- object k_736536 = args[0]; object pat_731304_733616 = args[1]; object tmpl_731305_733617 = args[2];
+-
+-closureN_type c_7323089;
+-object e_7323926 [33];
+-c_7323089.hdr.mark = gc_color_red;
+- c_7323089.hdr.grayed = 0;
+-c_7323089.tag = closureN_tag;
+- c_7323089.fn = (function_type)__lambda_959;
+-c_7323089.num_args = 1;
+-c_7323089.num_elements = 33;
+-c_7323089.elements = (object *)e_7323926;
+-c_7323089.elements[0] = ((closureN)self_7313851)->elements[0];
+-c_7323089.elements[1] = ((closureN)self_7313851)->elements[1];
+-c_7323089.elements[2] = ((closureN)self_7313851)->elements[2];
+-c_7323089.elements[3] = ((closureN)self_7313851)->elements[3];
+-c_7323089.elements[4] = ((closureN)self_7313851)->elements[4];
+-c_7323089.elements[5] = ((closureN)self_7313851)->elements[5];
+-c_7323089.elements[6] = ((closureN)self_7313851)->elements[6];
+-c_7323089.elements[7] = ((closureN)self_7313851)->elements[7];
+-c_7323089.elements[8] = ((closureN)self_7313851)->elements[8];
+-c_7323089.elements[9] = ((closureN)self_7313851)->elements[9];
+-c_7323089.elements[10] = ((closureN)self_7313851)->elements[10];
+-c_7323089.elements[11] = ((closureN)self_7313851)->elements[11];
+-c_7323089.elements[12] = ((closureN)self_7313851)->elements[12];
+-c_7323089.elements[13] = ((closureN)self_7313851)->elements[13];
+-c_7323089.elements[14] = ((closureN)self_7313851)->elements[14];
+-c_7323089.elements[15] = ((closureN)self_7313851)->elements[15];
+-c_7323089.elements[16] = ((closureN)self_7313851)->elements[16];
+-c_7323089.elements[17] = ((closureN)self_7313851)->elements[17];
+-c_7323089.elements[18] = ((closureN)self_7313851)->elements[18];
+-c_7323089.elements[19] = ((closureN)self_7313851)->elements[19];
+-c_7323089.elements[20] = ((closureN)self_7313851)->elements[20];
+-c_7323089.elements[21] = ((closureN)self_7313851)->elements[21];
+-c_7323089.elements[22] = ((closureN)self_7313851)->elements[22];
+-c_7323089.elements[23] = ((closureN)self_7313851)->elements[23];
+-c_7323089.elements[24] = ((closureN)self_7313851)->elements[24];
+-c_7323089.elements[25] = ((closureN)self_7313851)->elements[25];
+-c_7323089.elements[26] = ((closureN)self_7313851)->elements[26];
+-c_7323089.elements[27] = ((closureN)self_7313851)->elements[27];
+-c_7323089.elements[28] = ((closureN)self_7313851)->elements[28];
+-c_7323089.elements[29] = k_736536;
+-c_7323089.elements[30] = ((closureN)self_7313851)->elements[30];
+-c_7323089.elements[31] = ((closureN)self_7313851)->elements[31];
+-c_7323089.elements[32] = pat_731304_733616;
+-
+-
+-closureN_type c_7323927;
+-object e_7323941 [3];
+-c_7323927.hdr.mark = gc_color_red;
+- c_7323927.hdr.grayed = 0;
+-c_7323927.tag = closureN_tag;
+- c_7323927.fn = (function_type)__lambda_1018;
+-c_7323927.num_args = 1;
+-c_7323927.num_elements = 3;
+-c_7323927.elements = (object *)e_7323941;
+-c_7323927.elements[0] = ((closureN)self_7313851)->elements[6];
+-c_7323927.elements[1] = ((closureN)self_7313851)->elements[29];
+-c_7323927.elements[2] = tmpl_731305_733617;
+-
+-return_direct_with_clo1(data,(closure)&c_7323089,__lambda_959, &c_7323927);;
+-}
+-
+-static void __lambda_1018(void *data, object self_7313852, int argc, object *args) /* object self_7313852, object k_736749, object vars_731384_733647 */
+- {
+- object k_736749 = args[0]; object vars_731384_733647 = args[1];
+-
+-
+-
+-closureN_type c_7323932;
+-object e_7323939 [2];
+-c_7323932.hdr.mark = gc_color_red;
+- c_7323932.hdr.grayed = 0;
+-c_7323932.tag = closureN_tag;
+- c_7323932.fn = (function_type)__lambda_1019;
+-c_7323932.num_args = 1;
+-c_7323932.num_elements = 2;
+-c_7323932.elements = (object *)e_7323939;
+-c_7323932.elements[0] = ((closureN)self_7313852)->elements[0];
+-c_7323932.elements[1] = k_736749;
+-
+-return_closcall3(data, car(((closureN)self_7313852)->elements[1]), &c_7323932, ((closureN)self_7313852)->elements[2], vars_731384_733647);;
+-}
+-
+-static void __lambda_1019(void *data, object self_7313853, int argc, object *args) /* object self_7313853, object r_736750 */
+- {
+- object r_736750 = args[0];
+-
+-list_3_type local_7323937;
+-return_direct_with_clo1(data, ((closureN)self_7313853)->elements[1], (((closure) ((closureN)self_7313853)->elements[1])->fn), Cyc_fast_list_3(&local_7323937, ((closureN)self_7313853)->elements[0], r_736750, boolean_f));;
+-}
++pair_type local_7322376;
+
+-static void __lambda_959(void *data, object self_7313854, int argc, object *args) /* object self_7313854, object r_736540 */
+- {
+- object r_736540 = args[0];
+-
+-closureN_type c_7323091;
+-object e_7323917 [31];
+-c_7323091.hdr.mark = gc_color_red;
+- c_7323091.hdr.grayed = 0;
+-c_7323091.tag = closureN_tag;
+- c_7323091.fn = (function_type)__lambda_960;
+-c_7323091.num_args = 4;
+-c_7323091.num_elements = 31;
+-c_7323091.elements = (object *)e_7323917;
+-c_7323091.elements[0] = ((closureN)self_7313854)->elements[0];
+-c_7323091.elements[1] = ((closureN)self_7313854)->elements[1];
+-c_7323091.elements[2] = ((closureN)self_7313854)->elements[2];
+-c_7323091.elements[3] = ((closureN)self_7313854)->elements[3];
+-c_7323091.elements[4] = ((closureN)self_7313854)->elements[4];
+-c_7323091.elements[5] = ((closureN)self_7313854)->elements[5];
+-c_7323091.elements[6] = ((closureN)self_7313854)->elements[6];
+-c_7323091.elements[7] = ((closureN)self_7313854)->elements[7];
+-c_7323091.elements[8] = ((closureN)self_7313854)->elements[8];
+-c_7323091.elements[9] = ((closureN)self_7313854)->elements[10];
+-c_7323091.elements[10] = ((closureN)self_7313854)->elements[11];
+-c_7323091.elements[11] = ((closureN)self_7313854)->elements[12];
+-c_7323091.elements[12] = ((closureN)self_7313854)->elements[13];
+-c_7323091.elements[13] = ((closureN)self_7313854)->elements[14];
+-c_7323091.elements[14] = ((closureN)self_7313854)->elements[15];
+-c_7323091.elements[15] = ((closureN)self_7313854)->elements[16];
+-c_7323091.elements[16] = ((closureN)self_7313854)->elements[17];
+-c_7323091.elements[17] = ((closureN)self_7313854)->elements[18];
+-c_7323091.elements[18] = ((closureN)self_7313854)->elements[19];
+-c_7323091.elements[19] = ((closureN)self_7313854)->elements[20];
+-c_7323091.elements[20] = ((closureN)self_7313854)->elements[21];
+-c_7323091.elements[21] = ((closureN)self_7313854)->elements[22];
+-c_7323091.elements[22] = ((closureN)self_7313854)->elements[23];
+-c_7323091.elements[23] = ((closureN)self_7313854)->elements[24];
+-c_7323091.elements[24] = ((closureN)self_7313854)->elements[25];
+-c_7323091.elements[25] = ((closureN)self_7313854)->elements[26];
+-c_7323091.elements[26] = ((closureN)self_7313854)->elements[27];
+-c_7323091.elements[27] = ((closureN)self_7313854)->elements[28];
+-c_7323091.elements[28] = ((closureN)self_7313854)->elements[29];
+-c_7323091.elements[29] = ((closureN)self_7313854)->elements[30];
+-c_7323091.elements[30] = ((closureN)self_7313854)->elements[31];
+-
+-
+-
+-
+-list_2_type local_7323923;
+-return_direct_with_clo4(data,(closure)&c_7323091,__lambda_960, Cyc_cdr(data, ((closureN)self_7313854)->elements[32]), Cyc_fast_list_2(&local_7323923, ((closureN)self_7313854)->elements[4], ((closureN)self_7313854)->elements[9]), NULL, r_736540);;
+-}
+-
+-static void __lambda_960(void *data, object self_7313855, int argc, object *args) /* object self_7313855, object p_731307_733618, object x_731308_733619, object vars_731310_733621, object k_731311_733622 */
+- {
+- object p_731307_733618 = args[0]; object x_731308_733619 = args[1]; object vars_731310_733621 = args[2]; object k_731311_733622 = args[3];
+-
+-closureN_type c_7323093;
+-object e_7323916 [35];
+-c_7323093.hdr.mark = gc_color_red;
+- c_7323093.hdr.grayed = 0;
+-c_7323093.tag = closureN_tag;
+- c_7323093.fn = (function_type)__lambda_961;
+-c_7323093.num_args = 1;
+-c_7323093.num_elements = 35;
+-c_7323093.elements = (object *)e_7323916;
+-c_7323093.elements[0] = ((closureN)self_7313855)->elements[0];
+-c_7323093.elements[1] = ((closureN)self_7313855)->elements[1];
+-c_7323093.elements[2] = ((closureN)self_7313855)->elements[2];
+-c_7323093.elements[3] = ((closureN)self_7313855)->elements[3];
+-c_7323093.elements[4] = ((closureN)self_7313855)->elements[4];
+-c_7323093.elements[5] = ((closureN)self_7313855)->elements[5];
+-c_7323093.elements[6] = ((closureN)self_7313855)->elements[6];
+-c_7323093.elements[7] = ((closureN)self_7313855)->elements[7];
+-c_7323093.elements[8] = ((closureN)self_7313855)->elements[8];
+-c_7323093.elements[9] = ((closureN)self_7313855)->elements[9];
+-c_7323093.elements[10] = ((closureN)self_7313855)->elements[10];
+-c_7323093.elements[11] = ((closureN)self_7313855)->elements[11];
+-c_7323093.elements[12] = ((closureN)self_7313855)->elements[12];
+-c_7323093.elements[13] = ((closureN)self_7313855)->elements[13];
+-c_7323093.elements[14] = ((closureN)self_7313855)->elements[14];
+-c_7323093.elements[15] = ((closureN)self_7313855)->elements[15];
+-c_7323093.elements[16] = ((closureN)self_7313855)->elements[16];
+-c_7323093.elements[17] = ((closureN)self_7313855)->elements[17];
+-c_7323093.elements[18] = ((closureN)self_7313855)->elements[18];
+-c_7323093.elements[19] = ((closureN)self_7313855)->elements[19];
+-c_7323093.elements[20] = ((closureN)self_7313855)->elements[20];
+-c_7323093.elements[21] = ((closureN)self_7313855)->elements[21];
+-c_7323093.elements[22] = ((closureN)self_7313855)->elements[22];
+-c_7323093.elements[23] = ((closureN)self_7313855)->elements[23];
+-c_7323093.elements[24] = ((closureN)self_7313855)->elements[24];
+-c_7323093.elements[25] = ((closureN)self_7313855)->elements[25];
+-c_7323093.elements[26] = ((closureN)self_7313855)->elements[26];
+-c_7323093.elements[27] = ((closureN)self_7313855)->elements[27];
+-c_7323093.elements[28] = k_731311_733622;
+-c_7323093.elements[29] = ((closureN)self_7313855)->elements[28];
+-c_7323093.elements[30] = ((closureN)self_7313855)->elements[29];
+-c_7323093.elements[31] = ((closureN)self_7313855)->elements[30];
+-c_7323093.elements[32] = p_731307_733618;
+-c_7323093.elements[33] = vars_731310_733621;
+-c_7323093.elements[34] = x_731308_733619;
+-
+-return_direct_with_clo1(data,(closure)&c_7323093,__lambda_961, boolean_f);;
+-}
+-
+-static void __lambda_961(void *data, object self_7313856, int argc, object *args) /* object self_7313856, object lp_731312_733623 */
+- {
+- object lp_731312_733623 = args[0];
+-
+-closureN_type c_7323095;
+-object e_7323912 [35];
+-c_7323095.hdr.mark = gc_color_red;
+- c_7323095.hdr.grayed = 0;
+-c_7323095.tag = closureN_tag;
+- c_7323095.fn = (function_type)__lambda_1428;
+-c_7323095.num_args = 1;
+-c_7323095.num_elements = 35;
+-c_7323095.elements = (object *)e_7323912;
+-c_7323095.elements[0] = ((closureN)self_7313856)->elements[0];
+-c_7323095.elements[1] = ((closureN)self_7313856)->elements[1];
+-c_7323095.elements[2] = ((closureN)self_7313856)->elements[2];
+-c_7323095.elements[3] = ((closureN)self_7313856)->elements[3];
+-c_7323095.elements[4] = ((closureN)self_7313856)->elements[4];
+-c_7323095.elements[5] = ((closureN)self_7313856)->elements[5];
+-c_7323095.elements[6] = ((closureN)self_7313856)->elements[6];
+-c_7323095.elements[7] = ((closureN)self_7313856)->elements[7];
+-c_7323095.elements[8] = ((closureN)self_7313856)->elements[8];
+-c_7323095.elements[9] = ((closureN)self_7313856)->elements[9];
+-c_7323095.elements[10] = ((closureN)self_7313856)->elements[10];
+-c_7323095.elements[11] = ((closureN)self_7313856)->elements[11];
+-c_7323095.elements[12] = ((closureN)self_7313856)->elements[12];
+-c_7323095.elements[13] = ((closureN)self_7313856)->elements[13];
+-c_7323095.elements[14] = ((closureN)self_7313856)->elements[14];
+-c_7323095.elements[15] = ((closureN)self_7313856)->elements[15];
+-c_7323095.elements[16] = ((closureN)self_7313856)->elements[16];
+-c_7323095.elements[17] = ((closureN)self_7313856)->elements[17];
+-c_7323095.elements[18] = ((closureN)self_7313856)->elements[18];
+-c_7323095.elements[19] = ((closureN)self_7313856)->elements[19];
+-c_7323095.elements[20] = ((closureN)self_7313856)->elements[20];
+-c_7323095.elements[21] = ((closureN)self_7313856)->elements[21];
+-c_7323095.elements[22] = ((closureN)self_7313856)->elements[22];
+-c_7323095.elements[23] = ((closureN)self_7313856)->elements[23];
+-c_7323095.elements[24] = ((closureN)self_7313856)->elements[24];
+-c_7323095.elements[25] = ((closureN)self_7313856)->elements[25];
+-c_7323095.elements[26] = ((closureN)self_7313856)->elements[26];
+-c_7323095.elements[27] = ((closureN)self_7313856)->elements[27];
+-c_7323095.elements[28] = ((closureN)self_7313856)->elements[28];
+-c_7323095.elements[29] = ((closureN)self_7313856)->elements[29];
+-c_7323095.elements[30] = ((closureN)self_7313856)->elements[30];
+-c_7323095.elements[31] = ((closureN)self_7313856)->elements[31];
+-c_7323095.elements[32] = ((closureN)self_7313856)->elements[32];
+-c_7323095.elements[33] = ((closureN)self_7313856)->elements[33];
+-c_7323095.elements[34] = ((closureN)self_7313856)->elements[34];
+-
+-
+-pair_type local_7323915;
+-return_direct_with_clo1(data,(closure)&c_7323095,__lambda_1428, set_cell_as_expr(&local_7323915, lp_731312_733623));;
+-}
+-
+-static void __lambda_1428(void *data, object self_7313857, int argc, object *args) /* object self_7313857, object lp_731312_733623 */
+- {
+- object lp_731312_733623 = args[0];
+-
+-closureN_type c_7323097;
+-object e_7323113 [6];
+-c_7323097.hdr.mark = gc_color_red;
+- c_7323097.hdr.grayed = 0;
+-c_7323097.tag = closureN_tag;
+- c_7323097.fn = (function_type)__lambda_962;
+-c_7323097.num_args = 1;
+-c_7323097.num_elements = 6;
+-c_7323097.elements = (object *)e_7323113;
+-c_7323097.elements[0] = ((closureN)self_7313857)->elements[28];
+-c_7323097.elements[1] = ((closureN)self_7313857)->elements[29];
+-c_7323097.elements[2] = lp_731312_733623;
+-c_7323097.elements[3] = ((closureN)self_7313857)->elements[32];
+-c_7323097.elements[4] = ((closureN)self_7313857)->elements[33];
+-c_7323097.elements[5] = ((closureN)self_7313857)->elements[34];
+-
+-
+-closureN_type c_7323114;
+-object e_7323911 [31];
+-c_7323114.hdr.mark = gc_color_red;
+- c_7323114.hdr.grayed = 0;
+-c_7323114.tag = closureN_tag;
+- c_7323114.fn = (function_type)__lambda_964;
+-c_7323114.num_args = 5;
+-c_7323114.num_elements = 31;
+-c_7323114.elements = (object *)e_7323911;
+-c_7323114.elements[0] = ((closureN)self_7313857)->elements[0];
+-c_7323114.elements[1] = ((closureN)self_7313857)->elements[1];
+-c_7323114.elements[2] = ((closureN)self_7313857)->elements[2];
+-c_7323114.elements[3] = ((closureN)self_7313857)->elements[3];
+-c_7323114.elements[4] = ((closureN)self_7313857)->elements[4];
+-c_7323114.elements[5] = ((closureN)self_7313857)->elements[5];
+-c_7323114.elements[6] = ((closureN)self_7313857)->elements[6];
+-c_7323114.elements[7] = ((closureN)self_7313857)->elements[7];
+-c_7323114.elements[8] = ((closureN)self_7313857)->elements[8];
+-c_7323114.elements[9] = ((closureN)self_7313857)->elements[9];
+-c_7323114.elements[10] = ((closureN)self_7313857)->elements[10];
+-c_7323114.elements[11] = ((closureN)self_7313857)->elements[11];
+-c_7323114.elements[12] = ((closureN)self_7313857)->elements[12];
+-c_7323114.elements[13] = ((closureN)self_7313857)->elements[13];
+-c_7323114.elements[14] = ((closureN)self_7313857)->elements[14];
+-c_7323114.elements[15] = ((closureN)self_7313857)->elements[15];
+-c_7323114.elements[16] = ((closureN)self_7313857)->elements[16];
+-c_7323114.elements[17] = ((closureN)self_7313857)->elements[17];
+-c_7323114.elements[18] = ((closureN)self_7313857)->elements[18];
+-c_7323114.elements[19] = ((closureN)self_7313857)->elements[19];
+-c_7323114.elements[20] = ((closureN)self_7313857)->elements[20];
+-c_7323114.elements[21] = ((closureN)self_7313857)->elements[21];
+-c_7323114.elements[22] = ((closureN)self_7313857)->elements[22];
+-c_7323114.elements[23] = ((closureN)self_7313857)->elements[23];
+-c_7323114.elements[24] = ((closureN)self_7313857)->elements[24];
+-c_7323114.elements[25] = ((closureN)self_7313857)->elements[25];
+-c_7323114.elements[26] = ((closureN)self_7313857)->elements[26];
+-c_7323114.elements[27] = ((closureN)self_7313857)->elements[27];
+-c_7323114.elements[28] = ((closureN)self_7313857)->elements[30];
+-c_7323114.elements[29] = lp_731312_733623;
+-c_7323114.elements[30] = ((closureN)self_7313857)->elements[31];
+-
+-return_direct_with_clo1(data,(closure)&c_7323097,__lambda_962, &c_7323114);;
+-}
+-
+-static void __lambda_964(void *data, object self_7313858, int argc, object *args) /* object self_7313858, object k_736543, object p_731313_733624, object x_731314_733625, object dim_731315_733626, object vars_731316_733627, object k_731317_733628 */
+- {
+- object k_736543 = args[0]; object p_731313_733624 = args[1]; object x_731314_733625 = args[2]; object dim_731315_733626 = args[3]; object vars_731316_733627 = args[4]; object k_731317_733628 = args[5];
+-
+-
+-
+-closureN_type c_7323119;
+-object e_7323909 [37];
+-c_7323119.hdr.mark = gc_color_red;
+- c_7323119.hdr.grayed = 0;
+-c_7323119.tag = closureN_tag;
+- c_7323119.fn = (function_type)__lambda_965;
+-c_7323119.num_args = 1;
+-c_7323119.num_elements = 37;
+-c_7323119.elements = (object *)e_7323909;
+-c_7323119.elements[0] = ((closureN)self_7313858)->elements[0];
+-c_7323119.elements[1] = ((closureN)self_7313858)->elements[1];
+-c_7323119.elements[2] = ((closureN)self_7313858)->elements[2];
+-c_7323119.elements[3] = ((closureN)self_7313858)->elements[3];
+-c_7323119.elements[4] = ((closureN)self_7313858)->elements[4];
+-c_7323119.elements[5] = ((closureN)self_7313858)->elements[5];
+-c_7323119.elements[6] = ((closureN)self_7313858)->elements[6];
+-c_7323119.elements[7] = ((closureN)self_7313858)->elements[7];
+-c_7323119.elements[8] = ((closureN)self_7313858)->elements[8];
+-c_7323119.elements[9] = ((closureN)self_7313858)->elements[9];
+-c_7323119.elements[10] = ((closureN)self_7313858)->elements[10];
+-c_7323119.elements[11] = ((closureN)self_7313858)->elements[11];
+-c_7323119.elements[12] = ((closureN)self_7313858)->elements[12];
+-c_7323119.elements[13] = ((closureN)self_7313858)->elements[13];
+-c_7323119.elements[14] = ((closureN)self_7313858)->elements[14];
+-c_7323119.elements[15] = ((closureN)self_7313858)->elements[15];
+-c_7323119.elements[16] = ((closureN)self_7313858)->elements[16];
+-c_7323119.elements[17] = ((closureN)self_7313858)->elements[17];
+-c_7323119.elements[18] = ((closureN)self_7313858)->elements[18];
+-c_7323119.elements[19] = ((closureN)self_7313858)->elements[19];
+-c_7323119.elements[20] = ((closureN)self_7313858)->elements[20];
+-c_7323119.elements[21] = ((closureN)self_7313858)->elements[21];
+-c_7323119.elements[22] = ((closureN)self_7313858)->elements[22];
+-c_7323119.elements[23] = ((closureN)self_7313858)->elements[23];
+-c_7323119.elements[24] = ((closureN)self_7313858)->elements[24];
+-c_7323119.elements[25] = ((closureN)self_7313858)->elements[25];
+-c_7323119.elements[26] = dim_731315_733626;
+-c_7323119.elements[27] = ((closureN)self_7313858)->elements[26];
+-c_7323119.elements[28] = ((closureN)self_7313858)->elements[27];
+-c_7323119.elements[29] = k_731317_733628;
+-c_7323119.elements[30] = k_736543;
+-c_7323119.elements[31] = ((closureN)self_7313858)->elements[28];
+-c_7323119.elements[32] = ((closureN)self_7313858)->elements[29];
+-c_7323119.elements[33] = ((closureN)self_7313858)->elements[30];
+-c_7323119.elements[34] = p_731313_733624;
+-c_7323119.elements[35] = vars_731316_733627;
+-c_7323119.elements[36] = x_731314_733625;
+-
+-
+-make_utf8_string_with_len(c_7323910, "v.", 2, 2);
+-return_closcall2(data, car(((closureN)self_7313858)->elements[30]), &c_7323119, &c_7323910);;
+-}
+-
+-static void __lambda_965(void *data, object self_7313859, int argc, object *args) /* object self_7313859, object v_731318_733629 */
+- {
+- object v_731318_733629 = args[0];
+-
+-closureN_type c_7323121;
+-object e_7323892 [36];
+-c_7323121.hdr.mark = gc_color_red;
+- c_7323121.hdr.grayed = 0;
+-c_7323121.tag = closureN_tag;
+- c_7323121.fn = (function_type)__lambda_966;
+-c_7323121.num_args = 0;
+-c_7323121.num_elements = 36;
+-c_7323121.elements = (object *)e_7323892;
+-c_7323121.elements[0] = ((closureN)self_7313859)->elements[0];
+-c_7323121.elements[1] = ((closureN)self_7313859)->elements[1];
+-c_7323121.elements[2] = ((closureN)self_7313859)->elements[2];
+-c_7323121.elements[3] = ((closureN)self_7313859)->elements[3];
+-c_7323121.elements[4] = ((closureN)self_7313859)->elements[4];
+-c_7323121.elements[5] = ((closureN)self_7313859)->elements[5];
+-c_7323121.elements[6] = ((closureN)self_7313859)->elements[6];
+-c_7323121.elements[7] = ((closureN)self_7313859)->elements[7];
+-c_7323121.elements[8] = ((closureN)self_7313859)->elements[8];
+-c_7323121.elements[9] = ((closureN)self_7313859)->elements[9];
+-c_7323121.elements[10] = ((closureN)self_7313859)->elements[10];
+-c_7323121.elements[11] = ((closureN)self_7313859)->elements[11];
+-c_7323121.elements[12] = ((closureN)self_7313859)->elements[12];
+-c_7323121.elements[13] = ((closureN)self_7313859)->elements[13];
+-c_7323121.elements[14] = ((closureN)self_7313859)->elements[14];
+-c_7323121.elements[15] = ((closureN)self_7313859)->elements[15];
+-c_7323121.elements[16] = ((closureN)self_7313859)->elements[16];
+-c_7323121.elements[17] = ((closureN)self_7313859)->elements[17];
+-c_7323121.elements[18] = ((closureN)self_7313859)->elements[18];
+-c_7323121.elements[19] = ((closureN)self_7313859)->elements[19];
+-c_7323121.elements[20] = ((closureN)self_7313859)->elements[20];
+-c_7323121.elements[21] = ((closureN)self_7313859)->elements[21];
+-c_7323121.elements[22] = ((closureN)self_7313859)->elements[22];
+-c_7323121.elements[23] = ((closureN)self_7313859)->elements[23];
+-c_7323121.elements[24] = ((closureN)self_7313859)->elements[24];
+-c_7323121.elements[25] = ((closureN)self_7313859)->elements[25];
+-c_7323121.elements[26] = ((closureN)self_7313859)->elements[26];
+-c_7323121.elements[27] = ((closureN)self_7313859)->elements[27];
+-c_7323121.elements[28] = ((closureN)self_7313859)->elements[28];
+-c_7323121.elements[29] = ((closureN)self_7313859)->elements[29];
+-c_7323121.elements[30] = ((closureN)self_7313859)->elements[31];
+-c_7323121.elements[31] = ((closureN)self_7313859)->elements[32];
+-c_7323121.elements[32] = ((closureN)self_7313859)->elements[33];
+-c_7323121.elements[33] = ((closureN)self_7313859)->elements[34];
+-c_7323121.elements[34] = v_731318_733629;
+-c_7323121.elements[35] = ((closureN)self_7313859)->elements[35];
+-
+-
+-closureN_type c_7323893;
+-object e_7323908 [4];
+-c_7323893.hdr.mark = gc_color_red;
+- c_7323893.hdr.grayed = 0;
+-c_7323893.tag = closureN_tag;
+- c_7323893.fn = (function_type)__lambda_1017;
+-c_7323893.num_args = 1;
+-c_7323893.num_elements = 4;
+-c_7323893.elements = (object *)e_7323908;
+-c_7323893.elements[0] = ((closureN)self_7313859)->elements[13];
+-c_7323893.elements[1] = ((closureN)self_7313859)->elements[30];
+-c_7323893.elements[2] = v_731318_733629;
+-c_7323893.elements[3] = ((closureN)self_7313859)->elements[36];
+-
+-return_direct_with_clo1(data,(closure)&c_7323121,__lambda_966, &c_7323893);;
+-}
+-
+-static void __lambda_1017(void *data, object self_7313860, int argc, object *args) /* object self_7313860, object r_736546 */
+- {
+- object r_736546 = args[0];
+-
+-list_3_type local_7323898;
+-
+-pair_type local_7323902;
+-
+-list_2_type local_7323905;
+-return_direct_with_clo1(data, ((closureN)self_7313860)->elements[1], (((closure) ((closureN)self_7313860)->elements[1])->fn), Cyc_fast_list_3(&local_7323898, ((closureN)self_7313860)->elements[0], set_cell_as_expr(&local_7323902, Cyc_fast_list_2(&local_7323905, ((closureN)self_7313860)->elements[2], ((closureN)self_7313860)->elements[3])), r_736546));;
+-}
+-
+-static void __lambda_966(void *data, object self_7313861, int argc, object *args) /* object self_7313861, object k_736547 */
+- {
+- object k_736547 = args[0];
+-
+-closureN_type c_7323123;
+-object e_7323890 [37];
+-c_7323123.hdr.mark = gc_color_red;
+- c_7323123.hdr.grayed = 0;
+-c_7323123.tag = closureN_tag;
+- c_7323123.fn = (function_type)__lambda_967;
+-c_7323123.num_args = 1;
+-c_7323123.num_elements = 37;
+-c_7323123.elements = (object *)e_7323890;
+-c_7323123.elements[0] = ((closureN)self_7313861)->elements[0];
+-c_7323123.elements[1] = ((closureN)self_7313861)->elements[1];
+-c_7323123.elements[2] = ((closureN)self_7313861)->elements[2];
+-c_7323123.elements[3] = ((closureN)self_7313861)->elements[3];
+-c_7323123.elements[4] = ((closureN)self_7313861)->elements[4];
+-c_7323123.elements[5] = ((closureN)self_7313861)->elements[5];
+-c_7323123.elements[6] = ((closureN)self_7313861)->elements[6];
+-c_7323123.elements[7] = ((closureN)self_7313861)->elements[7];
+-c_7323123.elements[8] = ((closureN)self_7313861)->elements[8];
+-c_7323123.elements[9] = ((closureN)self_7313861)->elements[9];
+-c_7323123.elements[10] = ((closureN)self_7313861)->elements[10];
+-c_7323123.elements[11] = ((closureN)self_7313861)->elements[11];
+-c_7323123.elements[12] = ((closureN)self_7313861)->elements[12];
+-c_7323123.elements[13] = ((closureN)self_7313861)->elements[13];
+-c_7323123.elements[14] = ((closureN)self_7313861)->elements[14];
+-c_7323123.elements[15] = ((closureN)self_7313861)->elements[15];
+-c_7323123.elements[16] = ((closureN)self_7313861)->elements[16];
+-c_7323123.elements[17] = ((closureN)self_7313861)->elements[17];
+-c_7323123.elements[18] = ((closureN)self_7313861)->elements[18];
+-c_7323123.elements[19] = ((closureN)self_7313861)->elements[19];
+-c_7323123.elements[20] = ((closureN)self_7313861)->elements[20];
+-c_7323123.elements[21] = ((closureN)self_7313861)->elements[21];
+-c_7323123.elements[22] = ((closureN)self_7313861)->elements[22];
+-c_7323123.elements[23] = ((closureN)self_7313861)->elements[23];
+-c_7323123.elements[24] = ((closureN)self_7313861)->elements[24];
+-c_7323123.elements[25] = ((closureN)self_7313861)->elements[25];
+-c_7323123.elements[26] = ((closureN)self_7313861)->elements[26];
+-c_7323123.elements[27] = ((closureN)self_7313861)->elements[27];
+-c_7323123.elements[28] = ((closureN)self_7313861)->elements[28];
+-c_7323123.elements[29] = ((closureN)self_7313861)->elements[29];
+-c_7323123.elements[30] = k_736547;
+-c_7323123.elements[31] = ((closureN)self_7313861)->elements[30];
+-c_7323123.elements[32] = ((closureN)self_7313861)->elements[31];
+-c_7323123.elements[33] = ((closureN)self_7313861)->elements[32];
+-c_7323123.elements[34] = ((closureN)self_7313861)->elements[33];
+-c_7323123.elements[35] = ((closureN)self_7313861)->elements[34];
+-c_7323123.elements[36] = ((closureN)self_7313861)->elements[35];
+-
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7323123, ((closureN)self_7313861)->elements[33]);;
+-}
+-
+-static void __lambda_967(void *data, object self_7313862, int argc, object *args) /* object self_7313862, object r_736548 */
+- {
+- object r_736548 = args[0];
+- if( (boolean_f != r_736548) ){
+-
+-closureN_type c_7323125;
+-object e_7323188 [12];
+-c_7323125.hdr.mark = gc_color_red;
+- c_7323125.hdr.grayed = 0;
+-c_7323125.tag = closureN_tag;
+- c_7323125.fn = (function_type)__lambda_968;
+-c_7323125.num_args = 1;
+-c_7323125.num_elements = 12;
+-c_7323125.elements = (object *)e_7323188;
+-c_7323125.elements[0] = ((closureN)self_7313862)->elements[2];
+-c_7323125.elements[1] = ((closureN)self_7313862)->elements[5];
+-c_7323125.elements[2] = ((closureN)self_7313862)->elements[13];
+-c_7323125.elements[3] = ((closureN)self_7313862)->elements[18];
+-c_7323125.elements[4] = ((closureN)self_7313862)->elements[19];
+-c_7323125.elements[5] = ((closureN)self_7313862)->elements[26];
+-c_7323125.elements[6] = ((closureN)self_7313862)->elements[29];
+-c_7323125.elements[7] = ((closureN)self_7313862)->elements[30];
+-c_7323125.elements[8] = ((closureN)self_7313862)->elements[31];
+-c_7323125.elements[9] = ((closureN)self_7313862)->elements[34];
+-c_7323125.elements[10] = ((closureN)self_7313862)->elements[35];
+-c_7323125.elements[11] = ((closureN)self_7313862)->elements[36];
+-
+-
+-closureN_type c_7323189;
+-object e_7323193 [2];
+-c_7323189.hdr.mark = gc_color_red;
+- c_7323189.hdr.grayed = 0;
+-c_7323189.tag = closureN_tag;
+- c_7323189.fn = (function_type)__lambda_973;
+-c_7323189.num_args = 1;
+-c_7323189.num_elements = 2;
+-c_7323189.elements = (object *)e_7323193;
+-c_7323189.elements[0] = ((closureN)self_7313862)->elements[25];
+-c_7323189.elements[1] = ((closureN)self_7313862)->elements[34];
+-
+-return_direct_with_clo1(data,(closure)&c_7323125,__lambda_968, &c_7323189);
+-} else {
+-
+-
+-
+-closureN_type c_7323198;
+-object e_7323888 [33];
+-c_7323198.hdr.mark = gc_color_red;
+- c_7323198.hdr.grayed = 0;
+-c_7323198.tag = closureN_tag;
+- c_7323198.fn = (function_type)__lambda_974;
+-c_7323198.num_args = 1;
+-c_7323198.num_elements = 33;
+-c_7323198.elements = (object *)e_7323888;
+-c_7323198.elements[0] = ((closureN)self_7313862)->elements[0];
+-c_7323198.elements[1] = ((closureN)self_7313862)->elements[1];
+-c_7323198.elements[2] = ((closureN)self_7313862)->elements[2];
+-c_7323198.elements[3] = ((closureN)self_7313862)->elements[3];
+-c_7323198.elements[4] = ((closureN)self_7313862)->elements[4];
+-c_7323198.elements[5] = ((closureN)self_7313862)->elements[6];
+-c_7323198.elements[6] = ((closureN)self_7313862)->elements[7];
+-c_7323198.elements[7] = ((closureN)self_7313862)->elements[8];
+-c_7323198.elements[8] = ((closureN)self_7313862)->elements[9];
+-c_7323198.elements[9] = ((closureN)self_7313862)->elements[10];
+-c_7323198.elements[10] = ((closureN)self_7313862)->elements[11];
+-c_7323198.elements[11] = ((closureN)self_7313862)->elements[12];
+-c_7323198.elements[12] = ((closureN)self_7313862)->elements[13];
+-c_7323198.elements[13] = ((closureN)self_7313862)->elements[14];
+-c_7323198.elements[14] = ((closureN)self_7313862)->elements[15];
+-c_7323198.elements[15] = ((closureN)self_7313862)->elements[16];
+-c_7323198.elements[16] = ((closureN)self_7313862)->elements[17];
+-c_7323198.elements[17] = ((closureN)self_7313862)->elements[18];
+-c_7323198.elements[18] = ((closureN)self_7313862)->elements[20];
+-c_7323198.elements[19] = ((closureN)self_7313862)->elements[21];
+-c_7323198.elements[20] = ((closureN)self_7313862)->elements[22];
+-c_7323198.elements[21] = ((closureN)self_7313862)->elements[23];
+-c_7323198.elements[22] = ((closureN)self_7313862)->elements[24];
+-c_7323198.elements[23] = ((closureN)self_7313862)->elements[25];
+-c_7323198.elements[24] = ((closureN)self_7313862)->elements[26];
+-c_7323198.elements[25] = ((closureN)self_7313862)->elements[27];
+-c_7323198.elements[26] = ((closureN)self_7313862)->elements[29];
+-c_7323198.elements[27] = ((closureN)self_7313862)->elements[30];
+-c_7323198.elements[28] = ((closureN)self_7313862)->elements[32];
+-c_7323198.elements[29] = ((closureN)self_7313862)->elements[33];
+-c_7323198.elements[30] = ((closureN)self_7313862)->elements[34];
+-c_7323198.elements[31] = ((closureN)self_7313862)->elements[35];
+-c_7323198.elements[32] = ((closureN)self_7313862)->elements[36];
+
+-return_closcall2(data, car(((closureN)self_7313862)->elements[28]), &c_7323198, ((closureN)self_7313862)->elements[34]);}
+-;;
++
++pair_type local_7322382;
++
++pair_type local_7322385;
++
++
++
++pair_type local_7322391;
++
++
++
++
++
++pair_type local_7322399;
++
++pair_type local_7322403;
++
++pair_type local_7322407;
++
++pair_type local_7322410;
++
++pair_type local_7322414;
++
++pair_type local_7322417;
++
++pair_type local_7322421;
++
++pair_type local_7322425;
++
++pair_type local_7322428;
++
++pair_type local_7322432;
++return_closcall6(data, car(((closureN)self_7312650)->elements[19]), &c_7322177, set_pair_as_expr(&local_7322376, Cyc_cddr(data, ((closureN)self_7312650)->elements[20]), set_pair_as_expr(&local_7322382, set_pair_as_expr(&local_7322385, Cyc_car(data, ((closureN)self_7312650)->elements[20]), set_pair_as_expr(&local_7322391, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312650)->elements[20])), NULL)), NULL)), set_pair_as_expr(&local_7322399, ((closureN)self_7312650)->elements[5], set_pair_as_expr(&local_7322403, ((closureN)self_7312650)->elements[12], set_pair_as_expr(&local_7322407, set_pair_as_expr(&local_7322410, ((closureN)self_7312650)->elements[5], set_pair_as_expr(&local_7322414, set_pair_as_expr(&local_7322417, ((closureN)self_7312650)->elements[15], set_pair_as_expr(&local_7322421, ((closureN)self_7312650)->elements[14], NULL)), set_pair_as_expr(&local_7322425, set_pair_as_expr(&local_7322428, ((closureN)self_7312650)->elements[13], set_pair_as_expr(&local_7322432, N
ULL, NULL)), NULL))), NULL))), ((closureN)self_7312650)->elements[16], ((closureN)self_7312650)->elements[22], ((closureN)self_7312650)->elements[17]);;
+ }
+
+-static void __lambda_974(void *data, object self_7313869, int argc, object *args) /* object self_7313869, object r_736561 */
++static void __lambda_1007(void *data, object self_7312651, int argc, object *args) /* object self_7312651, object r_736188 */
+ {
+- object r_736561 = args[0];
+- if( (boolean_f != r_736561) ){
++ object r_736188 = args[0];
+
+-closureN_type c_7323200;
+-object e_7323767 [30];
+-c_7323200.hdr.mark = gc_color_red;
+- c_7323200.hdr.grayed = 0;
+-c_7323200.tag = closureN_tag;
+- c_7323200.fn = (function_type)__lambda_975;
+-c_7323200.num_args = 1;
+-c_7323200.num_elements = 30;
+-c_7323200.elements = (object *)e_7323767;
+-c_7323200.elements[0] = ((closureN)self_7313869)->elements[0];
+-c_7323200.elements[1] = ((closureN)self_7313869)->elements[1];
+-c_7323200.elements[2] = ((closureN)self_7313869)->elements[2];
+-c_7323200.elements[3] = ((closureN)self_7313869)->elements[3];
+-c_7323200.elements[4] = ((closureN)self_7313869)->elements[4];
+-c_7323200.elements[5] = ((closureN)self_7313869)->elements[5];
+-c_7323200.elements[6] = ((closureN)self_7313869)->elements[6];
+-c_7323200.elements[7] = ((closureN)self_7313869)->elements[8];
+-c_7323200.elements[8] = ((closureN)self_7313869)->elements[9];
+-c_7323200.elements[9] = ((closureN)self_7313869)->elements[10];
+-c_7323200.elements[10] = ((closureN)self_7313869)->elements[11];
+-c_7323200.elements[11] = ((closureN)self_7313869)->elements[12];
+-c_7323200.elements[12] = ((closureN)self_7313869)->elements[13];
+-c_7323200.elements[13] = ((closureN)self_7313869)->elements[14];
+-c_7323200.elements[14] = ((closureN)self_7313869)->elements[15];
+-c_7323200.elements[15] = ((closureN)self_7313869)->elements[16];
+-c_7323200.elements[16] = ((closureN)self_7313869)->elements[17];
+-c_7323200.elements[17] = ((closureN)self_7313869)->elements[18];
+-c_7323200.elements[18] = ((closureN)self_7313869)->elements[19];
+-c_7323200.elements[19] = ((closureN)self_7313869)->elements[22];
+-c_7323200.elements[20] = ((closureN)self_7313869)->elements[23];
+-c_7323200.elements[21] = ((closureN)self_7313869)->elements[24];
+-c_7323200.elements[22] = ((closureN)self_7313869)->elements[25];
+-c_7323200.elements[23] = ((closureN)self_7313869)->elements[26];
+-c_7323200.elements[24] = ((closureN)self_7313869)->elements[27];
+-c_7323200.elements[25] = ((closureN)self_7313869)->elements[28];
+-c_7323200.elements[26] = ((closureN)self_7313869)->elements[29];
+-c_7323200.elements[27] = ((closureN)self_7313869)->elements[30];
+-c_7323200.elements[28] = ((closureN)self_7313869)->elements[31];
+-c_7323200.elements[29] = ((closureN)self_7313869)->elements[32];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7323200,__lambda_975, Cyc_cdr(data, ((closureN)self_7313869)->elements[30]));
+-} else {
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313869)->elements[30])) ){
+-
+-closureN_type c_7323775;
+-object e_7323803 [9];
+-c_7323775.hdr.mark = gc_color_red;
+- c_7323775.hdr.grayed = 0;
+-c_7323775.tag = closureN_tag;
+- c_7323775.fn = (function_type)__lambda_1010;
+-c_7323775.num_args = 1;
+-c_7323775.num_elements = 9;
+-c_7323775.elements = (object *)e_7323803;
+-c_7323775.elements[0] = ((closureN)self_7313869)->elements[2];
+-c_7323775.elements[1] = ((closureN)self_7313869)->elements[3];
+-c_7323775.elements[2] = ((closureN)self_7313869)->elements[16];
+-c_7323775.elements[3] = ((closureN)self_7313869)->elements[24];
+-c_7323775.elements[4] = ((closureN)self_7313869)->elements[27];
+-c_7323775.elements[5] = ((closureN)self_7313869)->elements[28];
+-c_7323775.elements[6] = ((closureN)self_7313869)->elements[30];
+-c_7323775.elements[7] = ((closureN)self_7313869)->elements[31];
+-c_7323775.elements[8] = ((closureN)self_7313869)->elements[32];
+-
+-
+-closureN_type c_7323804;
+-object e_7323819 [6];
+-c_7323804.hdr.mark = gc_color_red;
+- c_7323804.hdr.grayed = 0;
+-c_7323804.tag = closureN_tag;
+- c_7323804.fn = (function_type)__lambda_1012;
+-c_7323804.num_args = 1;
+-c_7323804.num_elements = 6;
+-c_7323804.elements = (object *)e_7323819;
+-c_7323804.elements[0] = ((closureN)self_7313869)->elements[4];
+-c_7323804.elements[1] = ((closureN)self_7313869)->elements[24];
+-c_7323804.elements[2] = ((closureN)self_7313869)->elements[26];
+-c_7323804.elements[3] = ((closureN)self_7313869)->elements[28];
+-c_7323804.elements[4] = ((closureN)self_7313869)->elements[30];
+-c_7323804.elements[5] = ((closureN)self_7313869)->elements[31];
+-
+-return_direct_with_clo1(data,(closure)&c_7323775,__lambda_1010, &c_7323804);
+-} else {
+-
+-if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313869)->elements[30])) ){
+-
+-closureN_type c_7323824;
+-object e_7323850 [9];
+-c_7323824.hdr.mark = gc_color_red;
+- c_7323824.hdr.grayed = 0;
+-c_7323824.tag = closureN_tag;
+- c_7323824.fn = (function_type)__lambda_1013;
+-c_7323824.num_args = 1;
+-c_7323824.num_elements = 9;
+-c_7323824.elements = (object *)e_7323850;
+-c_7323824.elements[0] = ((closureN)self_7313869)->elements[2];
+-c_7323824.elements[1] = ((closureN)self_7313869)->elements[20];
+-c_7323824.elements[2] = ((closureN)self_7313869)->elements[21];
+-c_7323824.elements[3] = ((closureN)self_7313869)->elements[24];
+-c_7323824.elements[4] = ((closureN)self_7313869)->elements[26];
+-c_7323824.elements[5] = ((closureN)self_7313869)->elements[27];
+-c_7323824.elements[6] = ((closureN)self_7313869)->elements[28];
+-c_7323824.elements[7] = ((closureN)self_7313869)->elements[31];
+-c_7323824.elements[8] = ((closureN)self_7313869)->elements[32];
+-
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7323824, ((closureN)self_7313869)->elements[30]);
+-} else {
+-
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313869)->elements[30])) ){
+-
+-closureN_type c_7323857;
+-object e_7323869 [4];
+-c_7323857.hdr.mark = gc_color_red;
+- c_7323857.hdr.grayed = 0;
+-c_7323857.tag = closureN_tag;
+- c_7323857.fn = (function_type)__lambda_1015;
+-c_7323857.num_args = 1;
+-c_7323857.num_elements = 4;
+-c_7323857.elements = (object *)e_7323869;
+-c_7323857.elements[0] = ((closureN)self_7313869)->elements[2];
+-c_7323857.elements[1] = ((closureN)self_7313869)->elements[15];
+-c_7323857.elements[2] = ((closureN)self_7313869)->elements[27];
+-c_7323857.elements[3] = ((closureN)self_7313869)->elements[31];
+-
+-return_closcall2(data, ((closureN)self_7313869)->elements[26], &c_7323857, ((closureN)self_7313869)->elements[32]);
+-} else {
+-
+-closureN_type c_7323873;
+-object e_7323886 [5];
+-c_7323873.hdr.mark = gc_color_red;
+- c_7323873.hdr.grayed = 0;
+-c_7323873.tag = closureN_tag;
+- c_7323873.fn = (function_type)__lambda_1016;
+-c_7323873.num_args = 1;
+-c_7323873.num_elements = 5;
+-c_7323873.elements = (object *)e_7323886;
+-c_7323873.elements[0] = ((closureN)self_7313869)->elements[2];
+-c_7323873.elements[1] = ((closureN)self_7313869)->elements[7];
+-c_7323873.elements[2] = ((closureN)self_7313869)->elements[27];
+-c_7323873.elements[3] = ((closureN)self_7313869)->elements[30];
+-c_7323873.elements[4] = ((closureN)self_7313869)->elements[31];
++pair_type local_7322182;
+
+-return_closcall2(data, ((closureN)self_7313869)->elements[26], &c_7323873, ((closureN)self_7313869)->elements[32]);}
+-;}
+-;}
+-;}
+-;;
+-}
++pair_type local_7322186;
++
++pair_type local_7322189;
++
++pair_type local_7322192;
++
++pair_type local_7322196;
++
++pair_type local_7322199;
++
++pair_type local_7322203;
++
++pair_type local_7322207;
++
++pair_type local_7322210;
+
+-static void __lambda_1016(void *data, object self_7313911, int argc, object *args) /* object self_7313911, object r_736747 */
+- {
+- object r_736747 = args[0];
+-
+-list_3_type local_7323878;
++pair_type local_7322214;
+
+-list_3_type local_7323882;
+-return_direct_with_clo1(data, ((closureN)self_7313911)->elements[2], (((closure) ((closureN)self_7313911)->elements[2])->fn), Cyc_fast_list_3(&local_7323878, ((closureN)self_7313911)->elements[0], Cyc_fast_list_3(&local_7323882, ((closureN)self_7313911)->elements[1], ((closureN)self_7313911)->elements[4], ((closureN)self_7313911)->elements[3]), r_736747));;
+-}
++pair_type local_7322217;
+
+-static void __lambda_1015(void *data, object self_7313910, int argc, object *args) /* object self_7313910, object r_736745 */
+- {
+- object r_736745 = args[0];
+-
+-list_3_type local_7323862;
++pair_type local_7322221;
+
+-list_2_type local_7323866;
+-return_direct_with_clo1(data, ((closureN)self_7313910)->elements[2], (((closure) ((closureN)self_7313910)->elements[2])->fn), Cyc_fast_list_3(&local_7323862, ((closureN)self_7313910)->elements[0], Cyc_fast_list_2(&local_7323866, ((closureN)self_7313910)->elements[1], ((closureN)self_7313910)->elements[3]), r_736745));;
+-}
++pair_type local_7322225;
+
+-static void __lambda_1013(void *data, object self_7313908, int argc, object *args) /* object self_7313908, object r_736741 */
+- {
+- object r_736741 = args[0];
+-
++pair_type local_7322229;
+
++pair_type local_7322232;
+
+-closureN_type c_7323829;
+-object e_7323841 [4];
+-c_7323829.hdr.mark = gc_color_red;
+- c_7323829.hdr.grayed = 0;
+-c_7323829.tag = closureN_tag;
+- c_7323829.fn = (function_type)__lambda_1014;
+-c_7323829.num_args = 1;
+-c_7323829.num_elements = 4;
+-c_7323829.elements = (object *)e_7323841;
+-c_7323829.elements[0] = ((closureN)self_7313908)->elements[0];
+-c_7323829.elements[1] = ((closureN)self_7313908)->elements[2];
+-c_7323829.elements[2] = ((closureN)self_7313908)->elements[5];
+-c_7323829.elements[3] = ((closureN)self_7313908)->elements[7];
++pair_type local_7322236;
+
++pair_type local_7322240;
+
+-list_2_type local_7323844;
+-return_closcall6(data, car(((closureN)self_7313908)->elements[6]), &c_7323829, r_736741, Cyc_fast_list_2(&local_7323844, ((closureN)self_7313908)->elements[1], ((closureN)self_7313908)->elements[7]), ((closureN)self_7313908)->elements[3], ((closureN)self_7313908)->elements[8], ((closureN)self_7313908)->elements[4]);;
+-}
++pair_type local_7322243;
+
+-static void __lambda_1014(void *data, object self_7313909, int argc, object *args) /* object self_7313909, object r_736740 */
+- {
+- object r_736740 = args[0];
+-
+-list_3_type local_7323834;
++pair_type local_7322246;
+
+-list_2_type local_7323838;
+-return_direct_with_clo1(data, ((closureN)self_7313909)->elements[2], (((closure) ((closureN)self_7313909)->elements[2])->fn), Cyc_fast_list_3(&local_7323834, ((closureN)self_7313909)->elements[0], Cyc_fast_list_2(&local_7323838, ((closureN)self_7313909)->elements[1], ((closureN)self_7313909)->elements[3]), r_736740));;
+-}
++pair_type local_7322250;
+
+-static void __lambda_1012(void *data, object self_7313905, int argc, object *args) /* object self_7313905, object k_736735, object vars_731376_733646 */
+- {
+- object k_736735 = args[0]; object vars_731376_733646 = args[1];
+-
++pair_type local_7322254;
+
++pair_type local_7322257;
+
++pair_type local_7322261;
+
++pair_type local_7322264;
+
+-list_2_type local_7323814;
+-return_closcall6(data, car(((closureN)self_7313905)->elements[3]), k_736735, Cyc_cdr(data, ((closureN)self_7313905)->elements[4]), Cyc_fast_list_2(&local_7323814, ((closureN)self_7313905)->elements[0], ((closureN)self_7313905)->elements[5]), ((closureN)self_7313905)->elements[1], vars_731376_733646, ((closureN)self_7313905)->elements[2]);;
+-}
++pair_type local_7322268;
+
+-static void __lambda_1010(void *data, object self_7313906, int argc, object *args) /* object self_7313906, object r_736734 */
+- {
+- object r_736734 = args[0];
+-
++pair_type local_7322272;
+
++pair_type local_7322276;
+
+-closureN_type c_7323780;
+-object e_7323792 [4];
+-c_7323780.hdr.mark = gc_color_red;
+- c_7323780.hdr.grayed = 0;
+-c_7323780.tag = closureN_tag;
+- c_7323780.fn = (function_type)__lambda_1011;
+-c_7323780.num_args = 1;
+-c_7323780.num_elements = 4;
+-c_7323780.elements = (object *)e_7323792;
+-c_7323780.elements[0] = ((closureN)self_7313906)->elements[0];
+-c_7323780.elements[1] = ((closureN)self_7313906)->elements[2];
+-c_7323780.elements[2] = ((closureN)self_7313906)->elements[4];
+-c_7323780.elements[3] = ((closureN)self_7313906)->elements[7];
+-
+-
+-
+-
+-list_2_type local_7323798;
+-return_closcall6(data, car(((closureN)self_7313906)->elements[5]), &c_7323780, Cyc_car(data, ((closureN)self_7313906)->elements[6]), Cyc_fast_list_2(&local_7323798, ((closureN)self_7313906)->elements[1], ((closureN)self_7313906)->elements[7]), ((closureN)self_7313906)->elements[3], ((closureN)self_7313906)->elements[8], r_736734);;
+-}
+-
+-static void __lambda_1011(void *data, object self_7313907, int argc, object *args) /* object self_7313907, object r_736731 */
+- {
+- object r_736731 = args[0];
+-
+-list_3_type local_7323785;
+-
+-list_2_type local_7323789;
+-return_direct_with_clo1(data, ((closureN)self_7313907)->elements[2], (((closure) ((closureN)self_7313907)->elements[2])->fn), Cyc_fast_list_3(&local_7323785, ((closureN)self_7313907)->elements[0], Cyc_fast_list_2(&local_7323789, ((closureN)self_7313907)->elements[1], ((closureN)self_7313907)->elements[3]), r_736731));;
+-}
+-
+-static void __lambda_975(void *data, object self_7313870, int argc, object *args) /* object self_7313870, object r_736728 */
+- {
+- object r_736728 = args[0];
+-
+-
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, r_736728))) ){
+-
+-closureN_type c_7323206;
+-object e_7323452 [20];
+-c_7323206.hdr.mark = gc_color_red;
+- c_7323206.hdr.grayed = 0;
+-c_7323206.tag = closureN_tag;
+- c_7323206.fn = (function_type)__lambda_976;
+-c_7323206.num_args = 1;
+-c_7323206.num_elements = 20;
+-c_7323206.elements = (object *)e_7323452;
+-c_7323206.elements[0] = ((closureN)self_7313870)->elements[2];
+-c_7323206.elements[1] = ((closureN)self_7313870)->elements[3];
+-c_7323206.elements[2] = ((closureN)self_7313870)->elements[4];
+-c_7323206.elements[3] = ((closureN)self_7313870)->elements[5];
+-c_7323206.elements[4] = ((closureN)self_7313870)->elements[8];
+-c_7323206.elements[5] = ((closureN)self_7313870)->elements[11];
+-c_7323206.elements[6] = ((closureN)self_7313870)->elements[12];
+-c_7323206.elements[7] = ((closureN)self_7313870)->elements[14];
+-c_7323206.elements[8] = ((closureN)self_7313870)->elements[15];
+-c_7323206.elements[9] = ((closureN)self_7313870)->elements[16];
+-c_7323206.elements[10] = ((closureN)self_7313870)->elements[18];
+-c_7323206.elements[11] = ((closureN)self_7313870)->elements[19];
+-c_7323206.elements[12] = ((closureN)self_7313870)->elements[21];
+-c_7323206.elements[13] = ((closureN)self_7313870)->elements[23];
+-c_7323206.elements[14] = ((closureN)self_7313870)->elements[24];
+-c_7323206.elements[15] = ((closureN)self_7313870)->elements[25];
+-c_7323206.elements[16] = ((closureN)self_7313870)->elements[26];
+-c_7323206.elements[17] = ((closureN)self_7313870)->elements[27];
+-c_7323206.elements[18] = ((closureN)self_7313870)->elements[28];
+-c_7323206.elements[19] = ((closureN)self_7313870)->elements[29];
+-
+-
+-
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7323206, Cyc_car(data, ((closureN)self_7313870)->elements[27]));
+-} else {
+-
+-closureN_type c_7323457;
+-object e_7323752 [24];
+-c_7323457.hdr.mark = gc_color_red;
+- c_7323457.hdr.grayed = 0;
+-c_7323457.tag = closureN_tag;
+- c_7323457.fn = (function_type)__lambda_1002;
+-c_7323457.num_args = 1;
+-c_7323457.num_elements = 24;
+-c_7323457.elements = (object *)e_7323752;
+-c_7323457.elements[0] = ((closureN)self_7313870)->elements[0];
+-c_7323457.elements[1] = ((closureN)self_7313870)->elements[1];
+-c_7323457.elements[2] = ((closureN)self_7313870)->elements[2];
+-c_7323457.elements[3] = ((closureN)self_7313870)->elements[3];
+-c_7323457.elements[4] = ((closureN)self_7313870)->elements[4];
+-c_7323457.elements[5] = ((closureN)self_7313870)->elements[5];
+-c_7323457.elements[6] = ((closureN)self_7313870)->elements[6];
+-c_7323457.elements[7] = ((closureN)self_7313870)->elements[7];
+-c_7323457.elements[8] = ((closureN)self_7313870)->elements[8];
+-c_7323457.elements[9] = ((closureN)self_7313870)->elements[9];
+-c_7323457.elements[10] = ((closureN)self_7313870)->elements[10];
+-c_7323457.elements[11] = ((closureN)self_7313870)->elements[11];
+-c_7323457.elements[12] = ((closureN)self_7313870)->elements[13];
+-c_7323457.elements[13] = ((closureN)self_7313870)->elements[16];
+-c_7323457.elements[14] = ((closureN)self_7313870)->elements[17];
+-c_7323457.elements[15] = ((closureN)self_7313870)->elements[18];
+-c_7323457.elements[16] = ((closureN)self_7313870)->elements[21];
+-c_7323457.elements[17] = ((closureN)self_7313870)->elements[23];
+-c_7323457.elements[18] = ((closureN)self_7313870)->elements[24];
+-c_7323457.elements[19] = ((closureN)self_7313870)->elements[25];
+-c_7323457.elements[20] = ((closureN)self_7313870)->elements[26];
+-c_7323457.elements[21] = ((closureN)self_7313870)->elements[27];
+-c_7323457.elements[22] = ((closureN)self_7313870)->elements[28];
+-c_7323457.elements[23] = ((closureN)self_7313870)->elements[29];
+-
+-
+-closureN_type c_7323753;
+-object e_7323766 [2];
+-c_7323753.hdr.mark = gc_color_red;
+- c_7323753.hdr.grayed = 0;
+-c_7323753.tag = closureN_tag;
+- c_7323753.fn = (function_type)__lambda_1008;
+-c_7323753.num_args = 1;
+-c_7323753.num_elements = 2;
+-c_7323753.elements = (object *)e_7323766;
+-c_7323753.elements[0] = ((closureN)self_7313870)->elements[20];
+-c_7323753.elements[1] = ((closureN)self_7313870)->elements[22];
+-
+-return_direct_with_clo1(data,(closure)&c_7323457,__lambda_1002, &c_7323753);}
+-;;
+-}
+-
+-static void __lambda_1008(void *data, object self_7313897, int argc, object *args) /* object self_7313897, object k_736725, object x_731332_733631 */
+- {
+- object k_736725 = args[0]; object x_731332_733631 = args[1];
+-
+-closureN_type c_7323755;
+-object e_7323765 [4];
+-c_7323755.hdr.mark = gc_color_red;
+- c_7323755.hdr.grayed = 0;
+-c_7323755.tag = closureN_tag;
+- c_7323755.fn = (function_type)__lambda_1009;
+-c_7323755.num_args = 1;
+-c_7323755.num_elements = 4;
+-c_7323755.elements = (object *)e_7323765;
+-c_7323755.elements[0] = ((closureN)self_7313897)->elements[0];
+-c_7323755.elements[1] = ((closureN)self_7313897)->elements[1];
+-c_7323755.elements[2] = k_736725;
+-c_7323755.elements[3] = x_731332_733631;
+-
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7323755, x_731332_733631);;
+-}
+-
+-static void __lambda_1009(void *data, object self_7313898, int argc, object *args) /* object self_7313898, object r_736726 */
+- {
+- object r_736726 = args[0];
+- if( (boolean_f != r_736726) ){
+-
+-
+-return_closcall3(data, ((closureN)self_7313898)->elements[0], ((closureN)self_7313898)->elements[2], ((closureN)self_7313898)->elements[3], car(((closureN)self_7313898)->elements[1]));
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313898)->elements[2], (((closure) ((closureN)self_7313898)->elements[2])->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_1002(void *data, object self_7313899, int argc, object *args) /* object self_7313899, object r_736723 */
+- {
+- object r_736723 = args[0];
+-
+-closureN_type c_7323459;
+-object e_7323748 [25];
+-c_7323459.hdr.mark = gc_color_red;
+- c_7323459.hdr.grayed = 0;
+-c_7323459.tag = closureN_tag;
+- c_7323459.fn = (function_type)__lambda_1003;
+-c_7323459.num_args = 1;
+-c_7323459.num_elements = 25;
+-c_7323459.elements = (object *)e_7323748;
+-c_7323459.elements[0] = ((closureN)self_7313899)->elements[0];
+-c_7323459.elements[1] = ((closureN)self_7313899)->elements[1];
+-c_7323459.elements[2] = ((closureN)self_7313899)->elements[2];
+-c_7323459.elements[3] = ((closureN)self_7313899)->elements[3];
+-c_7323459.elements[4] = ((closureN)self_7313899)->elements[4];
+-c_7323459.elements[5] = ((closureN)self_7313899)->elements[5];
+-c_7323459.elements[6] = ((closureN)self_7313899)->elements[6];
+-c_7323459.elements[7] = ((closureN)self_7313899)->elements[7];
+-c_7323459.elements[8] = ((closureN)self_7313899)->elements[8];
+-c_7323459.elements[9] = ((closureN)self_7313899)->elements[9];
+-c_7323459.elements[10] = ((closureN)self_7313899)->elements[10];
+-c_7323459.elements[11] = ((closureN)self_7313899)->elements[11];
+-c_7323459.elements[12] = ((closureN)self_7313899)->elements[12];
+-c_7323459.elements[13] = ((closureN)self_7313899)->elements[13];
+-c_7323459.elements[14] = ((closureN)self_7313899)->elements[14];
+-c_7323459.elements[15] = ((closureN)self_7313899)->elements[15];
+-c_7323459.elements[16] = ((closureN)self_7313899)->elements[16];
+-c_7323459.elements[17] = ((closureN)self_7313899)->elements[17];
+-c_7323459.elements[18] = ((closureN)self_7313899)->elements[18];
+-c_7323459.elements[19] = ((closureN)self_7313899)->elements[19];
+-c_7323459.elements[20] = ((closureN)self_7313899)->elements[20];
+-c_7323459.elements[21] = ((closureN)self_7313899)->elements[21];
+-c_7323459.elements[22] = r_736723;
+-c_7323459.elements[23] = ((closureN)self_7313899)->elements[22];
+-c_7323459.elements[24] = ((closureN)self_7313899)->elements[23];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7323459,__lambda_1003, Cyc_cddr(data, ((closureN)self_7313899)->elements[21]));;
+-}
+-
+-static void __lambda_1003(void *data, object self_7313900, int argc, object *args) /* object self_7313900, object r_736724 */
+- {
+- object r_736724 = args[0];
+-
+-closureN_type c_7323461;
+-object e_7323746 [24];
+-c_7323461.hdr.mark = gc_color_red;
+- c_7323461.hdr.grayed = 0;
+-c_7323461.tag = closureN_tag;
+- c_7323461.fn = (function_type)__lambda_1004;
+-c_7323461.num_args = 1;
+-c_7323461.num_elements = 24;
+-c_7323461.elements = (object *)e_7323746;
+-c_7323461.elements[0] = ((closureN)self_7313900)->elements[0];
+-c_7323461.elements[1] = ((closureN)self_7313900)->elements[1];
+-c_7323461.elements[2] = ((closureN)self_7313900)->elements[2];
+-c_7323461.elements[3] = ((closureN)self_7313900)->elements[3];
+-c_7323461.elements[4] = ((closureN)self_7313900)->elements[4];
+-c_7323461.elements[5] = ((closureN)self_7313900)->elements[5];
+-c_7323461.elements[6] = ((closureN)self_7313900)->elements[6];
+-c_7323461.elements[7] = ((closureN)self_7313900)->elements[7];
+-c_7323461.elements[8] = ((closureN)self_7313900)->elements[8];
+-c_7323461.elements[9] = ((closureN)self_7313900)->elements[9];
+-c_7323461.elements[10] = ((closureN)self_7313900)->elements[10];
+-c_7323461.elements[11] = ((closureN)self_7313900)->elements[11];
+-c_7323461.elements[12] = ((closureN)self_7313900)->elements[12];
+-c_7323461.elements[13] = ((closureN)self_7313900)->elements[13];
+-c_7323461.elements[14] = ((closureN)self_7313900)->elements[14];
+-c_7323461.elements[15] = ((closureN)self_7313900)->elements[15];
+-c_7323461.elements[16] = ((closureN)self_7313900)->elements[16];
+-c_7323461.elements[17] = ((closureN)self_7313900)->elements[17];
+-c_7323461.elements[18] = ((closureN)self_7313900)->elements[18];
+-c_7323461.elements[19] = ((closureN)self_7313900)->elements[19];
+-c_7323461.elements[20] = ((closureN)self_7313900)->elements[20];
+-c_7323461.elements[21] = ((closureN)self_7313900)->elements[21];
+-c_7323461.elements[22] = ((closureN)self_7313900)->elements[23];
+-c_7323461.elements[23] = ((closureN)self_7313900)->elements[24];
+-
+-return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), &c_7323461, ((closureN)self_7313900)->elements[22], r_736724);;
+-}
+-
+-static void __lambda_1004(void *data, object self_7313901, int argc, object *args) /* object self_7313901, object r_736618 */
+- {
+- object r_736618 = args[0];
+- if( (boolean_f != r_736618) ){
+-
+-make_utf8_string_with_len(c_7323464, "multiple ellipses", 17, 17);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7313901)->elements[18], &c_7323464, ((closureN)self_7313901)->elements[21]);
+-} else {
+-
+-
+-
+-closureN_type c_7323470;
+-object e_7323744 [23];
+-c_7323470.hdr.mark = gc_color_red;
+- c_7323470.hdr.grayed = 0;
+-c_7323470.tag = closureN_tag;
+- c_7323470.fn = (function_type)__lambda_1005;
+-c_7323470.num_args = 1;
+-c_7323470.num_elements = 23;
+-c_7323470.elements = (object *)e_7323744;
+-c_7323470.elements[0] = ((closureN)self_7313901)->elements[0];
+-c_7323470.elements[1] = ((closureN)self_7313901)->elements[1];
+-c_7323470.elements[2] = ((closureN)self_7313901)->elements[2];
+-c_7323470.elements[3] = ((closureN)self_7313901)->elements[3];
+-c_7323470.elements[4] = ((closureN)self_7313901)->elements[4];
+-c_7323470.elements[5] = ((closureN)self_7313901)->elements[5];
+-c_7323470.elements[6] = ((closureN)self_7313901)->elements[6];
+-c_7323470.elements[7] = ((closureN)self_7313901)->elements[7];
+-c_7323470.elements[8] = ((closureN)self_7313901)->elements[8];
+-c_7323470.elements[9] = ((closureN)self_7313901)->elements[9];
+-c_7323470.elements[10] = ((closureN)self_7313901)->elements[10];
+-c_7323470.elements[11] = ((closureN)self_7313901)->elements[11];
+-c_7323470.elements[12] = ((closureN)self_7313901)->elements[12];
+-c_7323470.elements[13] = ((closureN)self_7313901)->elements[13];
+-c_7323470.elements[14] = ((closureN)self_7313901)->elements[14];
+-c_7323470.elements[15] = ((closureN)self_7313901)->elements[15];
+-c_7323470.elements[16] = ((closureN)self_7313901)->elements[16];
+-c_7323470.elements[17] = ((closureN)self_7313901)->elements[17];
+-c_7323470.elements[18] = ((closureN)self_7313901)->elements[18];
+-c_7323470.elements[19] = ((closureN)self_7313901)->elements[19];
+-c_7323470.elements[20] = ((closureN)self_7313901)->elements[21];
+-c_7323470.elements[21] = ((closureN)self_7313901)->elements[22];
+-c_7323470.elements[22] = ((closureN)self_7313901)->elements[23];
+-
+-
+-make_utf8_string_with_len(c_7323745, "lp.", 3, 3);
+-return_closcall2(data, car(((closureN)self_7313901)->elements[20]), &c_7323470, &c_7323745);}
+-;;
+-}
+-
+-static void __lambda_1005(void *data, object self_7313902, int argc, object *args) /* object self_7313902, object r_736620 */
+- {
+- object r_736620 = args[0];
+-
+-closureN_type c_7323472;
+-object e_7323736 [23];
+-c_7323472.hdr.mark = gc_color_red;
+- c_7323472.hdr.grayed = 0;
+-c_7323472.tag = closureN_tag;
+- c_7323472.fn = (function_type)__lambda_1006;
+-c_7323472.num_args = 2;
+-c_7323472.num_elements = 23;
+-c_7323472.elements = (object *)e_7323736;
+-c_7323472.elements[0] = ((closureN)self_7313902)->elements[0];
+-c_7323472.elements[1] = ((closureN)self_7313902)->elements[1];
+-c_7323472.elements[2] = ((closureN)self_7313902)->elements[2];
+-c_7323472.elements[3] = ((closureN)self_7313902)->elements[3];
+-c_7323472.elements[4] = ((closureN)self_7313902)->elements[4];
+-c_7323472.elements[5] = ((closureN)self_7313902)->elements[5];
+-c_7323472.elements[6] = ((closureN)self_7313902)->elements[6];
+-c_7323472.elements[7] = ((closureN)self_7313902)->elements[7];
+-c_7323472.elements[8] = ((closureN)self_7313902)->elements[8];
+-c_7323472.elements[9] = ((closureN)self_7313902)->elements[9];
+-c_7323472.elements[10] = ((closureN)self_7313902)->elements[10];
+-c_7323472.elements[11] = ((closureN)self_7313902)->elements[11];
+-c_7323472.elements[12] = ((closureN)self_7313902)->elements[12];
+-c_7323472.elements[13] = ((closureN)self_7313902)->elements[13];
+-c_7323472.elements[14] = ((closureN)self_7313902)->elements[14];
+-c_7323472.elements[15] = ((closureN)self_7313902)->elements[15];
+-c_7323472.elements[16] = ((closureN)self_7313902)->elements[16];
+-c_7323472.elements[17] = ((closureN)self_7313902)->elements[17];
+-c_7323472.elements[18] = ((closureN)self_7313902)->elements[18];
+-c_7323472.elements[19] = ((closureN)self_7313902)->elements[19];
+-c_7323472.elements[20] = ((closureN)self_7313902)->elements[20];
+-c_7323472.elements[21] = ((closureN)self_7313902)->elements[21];
+-c_7323472.elements[22] = ((closureN)self_7313902)->elements[22];
+-
+-
+-
+-
+-
+-
+-
+-return_direct_with_clo2(data,(closure)&c_7323472,__lambda_1006, Cyc_length(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313902)->elements[20]))), r_736620);;
+-}
+-
+-static void __lambda_1006(void *data, object self_7313903, int argc, object *args) /* object self_7313903, object len_731335_733632, object _191lp_731336_733633 */
+- {
+- object len_731335_733632 = args[0]; object _191lp_731336_733633 = args[1];
+-
+-
+-
+-closureN_type c_7323477;
+-object e_7323673 [18];
+-c_7323477.hdr.mark = gc_color_red;
+- c_7323477.hdr.grayed = 0;
+-c_7323477.tag = closureN_tag;
+- c_7323477.fn = (function_type)__lambda_1007;
+-c_7323477.num_args = 1;
+-c_7323477.num_elements = 18;
+-c_7323477.elements = (object *)e_7323673;
+-c_7323477.elements[0] = ((closureN)self_7313903)->elements[0];
+-c_7323477.elements[1] = ((closureN)self_7313903)->elements[1];
+-c_7323477.elements[2] = ((closureN)self_7313903)->elements[2];
+-c_7323477.elements[3] = ((closureN)self_7313903)->elements[3];
+-c_7323477.elements[4] = ((closureN)self_7313903)->elements[4];
+-c_7323477.elements[5] = ((closureN)self_7313903)->elements[6];
+-c_7323477.elements[6] = ((closureN)self_7313903)->elements[7];
+-c_7323477.elements[7] = ((closureN)self_7313903)->elements[8];
+-c_7323477.elements[8] = ((closureN)self_7313903)->elements[9];
+-c_7323477.elements[9] = ((closureN)self_7313903)->elements[10];
+-c_7323477.elements[10] = ((closureN)self_7313903)->elements[11];
+-c_7323477.elements[11] = _191lp_731336_733633;
+-c_7323477.elements[12] = ((closureN)self_7313903)->elements[12];
+-c_7323477.elements[13] = ((closureN)self_7313903)->elements[13];
+-c_7323477.elements[14] = ((closureN)self_7313903)->elements[14];
+-c_7323477.elements[15] = ((closureN)self_7313903)->elements[18];
+-c_7323477.elements[16] = len_731335_733632;
+-c_7323477.elements[17] = ((closureN)self_7313903)->elements[21];
++pair_type local_7322279;
+
++pair_type local_7322283;
+
+-pair_type local_7323676;
++pair_type local_7322286;
+
++pair_type local_7322290;
+
++pair_type local_7322293;
+
+-pair_type local_7323682;
++pair_type local_7322296;
+
+-pair_type local_7323685;
++pair_type local_7322300;
+
++pair_type local_7322303;
+
++pair_type local_7322307;
+
+-pair_type local_7323691;
++pair_type local_7322310;
+
++pair_type local_7322314;
+
++pair_type local_7322317;
+
++pair_type local_7322320;
+
++pair_type local_7322324;
+
+-pair_type local_7323699;
++pair_type local_7322327;
+
+-pair_type local_7323703;
++pair_type local_7322331;
+
+-pair_type local_7323707;
++pair_type local_7322335;
+
+-pair_type local_7323710;
++pair_type local_7322338;
+
+-pair_type local_7323714;
++pair_type local_7322342;
+
+-pair_type local_7323717;
++pair_type local_7322346;
+
+-pair_type local_7323721;
++pair_type local_7322349;
+
+-pair_type local_7323725;
++pair_type local_7322352;
+
+-pair_type local_7323728;
++pair_type local_7322356;
+
+-pair_type local_7323732;
+-return_closcall6(data, car(((closureN)self_7313903)->elements[19]), &c_7323477, set_pair_as_expr(&local_7323676, Cyc_cddr(data, ((closureN)self_7313903)->elements[20]), set_pair_as_expr(&local_7323682, set_pair_as_expr(&local_7323685, Cyc_car(data, ((closureN)self_7313903)->elements[20]), set_pair_as_expr(&local_7323691, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313903)->elements[20])), NULL)), NULL)), set_pair_as_expr(&local_7323699, ((closureN)self_7313903)->elements[5], set_pair_as_expr(&local_7323703, ((closureN)self_7313903)->elements[12], set_pair_as_expr(&local_7323707, set_pair_as_expr(&local_7323710, ((closureN)self_7313903)->elements[5], set_pair_as_expr(&local_7323714, set_pair_as_expr(&local_7323717, ((closureN)self_7313903)->elements[15], set_pair_as_expr(&local_7323721, ((closureN)self_7313903)->elements[14], NULL)), set_pair_as_expr(&local_7323725, set_pair_as_expr(&local_7323728, ((closureN)self_7313903)->elements[13], set_pair_as_expr(&local_7323732, N
ULL, NULL)), NULL))), NULL))), ((closureN)self_7313903)->elements[16], ((closureN)self_7313903)->elements[22], ((closureN)self_7313903)->elements[17]);;
++pair_type local_7322359;
++
++pair_type local_7322363;
++
++pair_type local_7322367;
++
++pair_type local_7322371;
++return_direct_with_clo1(data, ((closureN)self_7312651)->elements[15], (((closure) ((closureN)self_7312651)->elements[15])->fn), set_pair_as_expr(&local_7322182, ((closureN)self_7312651)->elements[10], set_pair_as_expr(&local_7322186, set_pair_as_expr(&local_7322189, set_pair_as_expr(&local_7322192, ((closureN)self_7312651)->elements[8], set_pair_as_expr(&local_7322196, set_pair_as_expr(&local_7322199, ((closureN)self_7312651)->elements[9], set_pair_as_expr(&local_7322203, ((closureN)self_7312651)->elements[17], NULL)), NULL)), NULL), set_pair_as_expr(&local_7322207, set_pair_as_expr(&local_7322210, ((closureN)self_7312651)->elements[2], set_pair_as_expr(&local_7322214, set_pair_as_expr(&local_7322217, ((closureN)self_7312651)->elements[1], set_pair_as_expr(&local_7322221, ((closureN)self_7312651)->elements[8], set_pair_as_expr(&local_7322225, ((closureN)self_7312651)->elements[16], NULL))), set_pair_as_expr(&local_7322229, set_pair_as_expr(&local_7322232, ((closureN)self
_7312651)->elements[10], set_pair_as_expr(&local_7322236, ((closureN)self_7312651)->elements[11], set_pair_as_expr(&local_7322240, set_pair_as_expr(&local_7322243, set_pair_as_expr(&local_7322246, ((closureN)self_7312651)->elements[12], set_pair_as_expr(&local_7322250, ((closureN)self_7312651)->elements[17], NULL)), set_pair_as_expr(&local_7322254, set_pair_as_expr(&local_7322257, ((closureN)self_7312651)->elements[6], set_pair_as_expr(&local_7322261, set_pair_as_expr(&local_7322264, ((closureN)self_7312651)->elements[0], set_pair_as_expr(&local_7322268, ((closureN)self_7312651)->elements[8], set_pair_as_expr(&local_7322272, ((closureN)self_7312651)->elements[16], NULL))), NULL)), set_pair_as_expr(&local_7322276, set_pair_as_expr(&local_7322279, ((closureN)self_7312651)->elements[14], set_pair_as_expr(&local_7322283, set_pair_as_expr(&local_7322286, ((closureN)self_7312651)->elements[13], set_pair_as_expr(&local_7322290, NULL, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7322293,
set_pair_as_expr(&local_7322296, ((closureN)self_7312651)->elements[7], set_pair_as_expr(&local_7322300, set_pair_as_expr(&local_7322303, ((closureN)self_7312651)->elements[1], set_pair_as_expr(&local_7322307, obj_int2obj(0), set_pair_as_expr(&local_7322310, ((closureN)self_7312651)->elements[6], NULL))), set_pair_as_expr(&local_7322314, r_736188, set_pair_as_expr(&local_7322317, set_pair_as_expr(&local_7322320, ((closureN)self_7312651)->elements[11], set_pair_as_expr(&local_7322324, set_pair_as_expr(&local_7322327, ((closureN)self_7312651)->elements[4], set_pair_as_expr(&local_7322331, ((closureN)self_7312651)->elements[12], NULL)), set_pair_as_expr(&local_7322335, set_pair_as_expr(&local_7322338, ((closureN)self_7312651)->elements[0], set_pair_as_expr(&local_7322342, ((closureN)self_7312651)->elements[6], set_pair_as_expr(&local_7322346, obj_int2obj(1), NULL))), set_pair_as_expr(&local_7322349, set_pair_as_expr(&local_7322352, ((closureN)self_7312651)->elements[5], set_pair_as_ex
pr(&local_7322356, set_pair_as_expr(&local_7322359, ((closureN)self_7312651)->elements[3], set_pair_as_expr(&local_7322363, ((closureN)self_7312651)->elements[12], NULL)), set_pair_as_expr(&local_7322367, ((closureN)self_7312651)->elements[14], set_pair_as_expr(&local_7322371, ((closureN)self_7312651)->elements[12], NULL)))), NULL)))), NULL)))), NULL)))), NULL))), NULL))));;
+ }
+
+-static void __lambda_1007(void *data, object self_7313904, int argc, object *args) /* object self_7313904, object r_736640 */
++static void __lambda_976(void *data, object self_7312618, int argc, object *args) /* object self_7312618, object r_736111 */
+ {
+- object r_736640 = args[0];
++ object r_736111 = args[0];
++ if( (boolean_f != r_736111) ){
+
+-pair_type local_7323482;
++closureN_type c_7321909;
++object e_7321935 [6];
++c_7321909.hdr.mark = gc_color_red;
++ c_7321909.hdr.grayed = 0;
++c_7321909.tag = closureN_tag;
++ c_7321909.fn = (function_type)__lambda_977;
++c_7321909.num_args = 1;
++c_7321909.num_elements = 6;
++c_7321909.elements = (object *)e_7321935;
++c_7321909.elements[0] = ((closureN)self_7312618)->elements[0];
++c_7321909.elements[1] = ((closureN)self_7312618)->elements[5];
++c_7321909.elements[2] = ((closureN)self_7312618)->elements[6];
++c_7321909.elements[3] = ((closureN)self_7312618)->elements[14];
++c_7321909.elements[4] = ((closureN)self_7312618)->elements[17];
++c_7321909.elements[5] = ((closureN)self_7312618)->elements[18];
++
+
+-pair_type local_7323486;
++pair_type local_7321938;
+
+-pair_type local_7323489;
++pair_type local_7321941;
+
+-pair_type local_7323492;
+
+-pair_type local_7323496;
+
+-pair_type local_7323499;
++complex_num_type local_7321947;
++return_closcall2(data, ((closureN)self_7312618)->elements[13], &c_7321909, set_pair_as_expr(&local_7321938, set_pair_as_expr(&local_7321941, Cyc_car(data, ((closureN)self_7312618)->elements[17]), Cyc_fast_sum(data,&local_7321947, obj_int2obj(1), ((closureN)self_7312618)->elements[12])), ((closureN)self_7312618)->elements[19]));
++} else {
++
+
+-pair_type local_7323503;
+
+-pair_type local_7323507;
++closureN_type c_7321954;
++object e_7322150 [19];
++c_7321954.hdr.mark = gc_color_red;
++ c_7321954.hdr.grayed = 0;
++c_7321954.tag = closureN_tag;
++ c_7321954.fn = (function_type)__lambda_978;
++c_7321954.num_args = 1;
++c_7321954.num_elements = 19;
++c_7321954.elements = (object *)e_7322150;
++c_7321954.elements[0] = ((closureN)self_7312618)->elements[0];
++c_7321954.elements[1] = ((closureN)self_7312618)->elements[1];
++c_7321954.elements[2] = ((closureN)self_7312618)->elements[2];
++c_7321954.elements[3] = ((closureN)self_7312618)->elements[3];
++c_7321954.elements[4] = ((closureN)self_7312618)->elements[4];
++c_7321954.elements[5] = ((closureN)self_7312618)->elements[5];
++c_7321954.elements[6] = ((closureN)self_7312618)->elements[7];
++c_7321954.elements[7] = ((closureN)self_7312618)->elements[8];
++c_7321954.elements[8] = ((closureN)self_7312618)->elements[9];
++c_7321954.elements[9] = ((closureN)self_7312618)->elements[10];
++c_7321954.elements[10] = ((closureN)self_7312618)->elements[11];
++c_7321954.elements[11] = ((closureN)self_7312618)->elements[12];
++c_7321954.elements[12] = ((closureN)self_7312618)->elements[13];
++c_7321954.elements[13] = ((closureN)self_7312618)->elements[14];
++c_7321954.elements[14] = ((closureN)self_7312618)->elements[15];
++c_7321954.elements[15] = ((closureN)self_7312618)->elements[16];
++c_7321954.elements[16] = ((closureN)self_7312618)->elements[17];
++c_7321954.elements[17] = ((closureN)self_7312618)->elements[18];
++c_7321954.elements[18] = ((closureN)self_7312618)->elements[19];
+
+-pair_type local_7323510;
+
+-pair_type local_7323514;
++make_utf8_string_with_len(c_7322151, "w.", 2, 2);
++return_closcall2(data, car(((closureN)self_7312618)->elements[16]), &c_7321954, &c_7322151);}
++;;
++}
+
+-pair_type local_7323517;
++static void __lambda_978(void *data, object self_7312620, int argc, object *args) /* object self_7312620, object w_731352_733287 */
++ {
++ object w_731352_733287 = args[0];
++
+
+-pair_type local_7323521;
+
+-pair_type local_7323525;
++closureN_type c_7321959;
++object e_7322148 [20];
++c_7321959.hdr.mark = gc_color_red;
++ c_7321959.hdr.grayed = 0;
++c_7321959.tag = closureN_tag;
++ c_7321959.fn = (function_type)__lambda_979;
++c_7321959.num_args = 1;
++c_7321959.num_elements = 20;
++c_7321959.elements = (object *)e_7322148;
++c_7321959.elements[0] = ((closureN)self_7312620)->elements[0];
++c_7321959.elements[1] = ((closureN)self_7312620)->elements[1];
++c_7321959.elements[2] = ((closureN)self_7312620)->elements[2];
++c_7321959.elements[3] = ((closureN)self_7312620)->elements[3];
++c_7321959.elements[4] = ((closureN)self_7312620)->elements[4];
++c_7321959.elements[5] = ((closureN)self_7312620)->elements[5];
++c_7321959.elements[6] = ((closureN)self_7312620)->elements[6];
++c_7321959.elements[7] = ((closureN)self_7312620)->elements[7];
++c_7321959.elements[8] = ((closureN)self_7312620)->elements[8];
++c_7321959.elements[9] = ((closureN)self_7312620)->elements[9];
++c_7321959.elements[10] = ((closureN)self_7312620)->elements[10];
++c_7321959.elements[11] = ((closureN)self_7312620)->elements[11];
++c_7321959.elements[12] = ((closureN)self_7312620)->elements[12];
++c_7321959.elements[13] = ((closureN)self_7312620)->elements[13];
++c_7321959.elements[14] = ((closureN)self_7312620)->elements[14];
++c_7321959.elements[15] = ((closureN)self_7312620)->elements[15];
++c_7321959.elements[16] = ((closureN)self_7312620)->elements[16];
++c_7321959.elements[17] = ((closureN)self_7312620)->elements[17];
++c_7321959.elements[18] = ((closureN)self_7312620)->elements[18];
++c_7321959.elements[19] = w_731352_733287;
+
+-pair_type local_7323529;
+
+-pair_type local_7323532;
++make_utf8_string_with_len(c_7322149, "lp.", 3, 3);
++return_closcall2(data, car(((closureN)self_7312620)->elements[15]), &c_7321959, &c_7322149);;
++}
+
+-pair_type local_7323536;
++static void __lambda_979(void *data, object self_7312621, int argc, object *args) /* object self_7312621, object _191lp_731355_733288 */
++ {
++ object _191lp_731355_733288 = args[0];
++
+
+-pair_type local_7323540;
+
+-pair_type local_7323543;
++closureN_type c_7321964;
++object e_7322140 [20];
++c_7321964.hdr.mark = gc_color_red;
++ c_7321964.hdr.grayed = 0;
++c_7321964.tag = closureN_tag;
++ c_7321964.fn = (function_type)__lambda_980;
++c_7321964.num_args = 1;
++c_7321964.num_elements = 20;
++c_7321964.elements = (object *)e_7322140;
++c_7321964.elements[0] = ((closureN)self_7312621)->elements[0];
++c_7321964.elements[1] = ((closureN)self_7312621)->elements[1];
++c_7321964.elements[2] = ((closureN)self_7312621)->elements[2];
++c_7321964.elements[3] = ((closureN)self_7312621)->elements[3];
++c_7321964.elements[4] = ((closureN)self_7312621)->elements[4];
++c_7321964.elements[5] = ((closureN)self_7312621)->elements[5];
++c_7321964.elements[6] = _191lp_731355_733288;
++c_7321964.elements[7] = ((closureN)self_7312621)->elements[6];
++c_7321964.elements[8] = ((closureN)self_7312621)->elements[7];
++c_7321964.elements[9] = ((closureN)self_7312621)->elements[8];
++c_7321964.elements[10] = ((closureN)self_7312621)->elements[9];
++c_7321964.elements[11] = ((closureN)self_7312621)->elements[11];
++c_7321964.elements[12] = ((closureN)self_7312621)->elements[12];
++c_7321964.elements[13] = ((closureN)self_7312621)->elements[13];
++c_7321964.elements[14] = ((closureN)self_7312621)->elements[14];
++c_7321964.elements[15] = ((closureN)self_7312621)->elements[15];
++c_7321964.elements[16] = ((closureN)self_7312621)->elements[16];
++c_7321964.elements[17] = ((closureN)self_7312621)->elements[17];
++c_7321964.elements[18] = ((closureN)self_7312621)->elements[18];
++c_7321964.elements[19] = ((closureN)self_7312621)->elements[19];
+
+-pair_type local_7323546;
+
+-pair_type local_7323550;
+
+-pair_type local_7323554;
+
+-pair_type local_7323557;
++complex_num_type local_7322146;
++return_closcall3(data, car(((closureN)self_7312621)->elements[10]), &c_7321964, Cyc_car(data, ((closureN)self_7312621)->elements[16]), Cyc_fast_sum(data,&local_7322146, ((closureN)self_7312621)->elements[11], obj_int2obj(1)));;
++}
+
+-pair_type local_7323561;
++static void __lambda_980(void *data, object self_7312622, int argc, object *args) /* object self_7312622, object new_91vars_731358_733289 */
++ {
++ object new_91vars_731358_733289 = args[0];
++
++closureN_type c_7321966;
++object e_7322117 [20];
++c_7321966.hdr.mark = gc_color_red;
++ c_7321966.hdr.grayed = 0;
++c_7321966.tag = closureN_tag;
++ c_7321966.fn = (function_type)__lambda_981;
++c_7321966.num_args = 1;
++c_7321966.num_elements = 20;
++c_7321966.elements = (object *)e_7322117;
++c_7321966.elements[0] = ((closureN)self_7312622)->elements[0];
++c_7321966.elements[1] = ((closureN)self_7312622)->elements[1];
++c_7321966.elements[2] = ((closureN)self_7312622)->elements[2];
++c_7321966.elements[3] = ((closureN)self_7312622)->elements[3];
++c_7321966.elements[4] = ((closureN)self_7312622)->elements[4];
++c_7321966.elements[5] = ((closureN)self_7312622)->elements[5];
++c_7321966.elements[6] = ((closureN)self_7312622)->elements[6];
++c_7321966.elements[7] = ((closureN)self_7312622)->elements[7];
++c_7321966.elements[8] = ((closureN)self_7312622)->elements[8];
++c_7321966.elements[9] = ((closureN)self_7312622)->elements[9];
++c_7321966.elements[10] = ((closureN)self_7312622)->elements[10];
++c_7321966.elements[11] = ((closureN)self_7312622)->elements[11];
++c_7321966.elements[12] = ((closureN)self_7312622)->elements[12];
++c_7321966.elements[13] = ((closureN)self_7312622)->elements[13];
++c_7321966.elements[14] = ((closureN)self_7312622)->elements[14];
++c_7321966.elements[15] = new_91vars_731358_733289;
++c_7321966.elements[16] = ((closureN)self_7312622)->elements[16];
++c_7321966.elements[17] = ((closureN)self_7312622)->elements[17];
++c_7321966.elements[18] = ((closureN)self_7312622)->elements[18];
++c_7321966.elements[19] = ((closureN)self_7312622)->elements[19];
+
+-pair_type local_7323564;
+
+-pair_type local_7323568;
++closureN_type c_7322118;
++object e_7322139 [1];
++c_7322118.hdr.mark = gc_color_red;
++ c_7322118.hdr.grayed = 0;
++c_7322118.tag = closureN_tag;
++ c_7322118.fn = (function_type)__lambda_999;
++c_7322118.num_args = 1;
++c_7322118.num_elements = 1;
++c_7322118.elements = (object *)e_7322139;
++c_7322118.elements[0] = ((closureN)self_7312622)->elements[15];
+
+-pair_type local_7323572;
++return_direct_with_clo1(data,(closure)&c_7321966,__lambda_981, &c_7322118);;
++}
+
+-pair_type local_7323576;
++static void __lambda_999(void *data, object self_7312623, int argc, object *args) /* object self_7312623, object k_736159, object x_731372_733298 */
++ {
++ object k_736159 = args[0]; object x_731372_733298 = args[1];
++
++closureN_type c_7322120;
++object e_7322133 [2];
++c_7322120.hdr.mark = gc_color_red;
++ c_7322120.hdr.grayed = 0;
++c_7322120.tag = closureN_tag;
++ c_7322120.fn = (function_type)__lambda_1000;
++c_7322120.num_args = 1;
++c_7322120.num_elements = 2;
++c_7322120.elements = (object *)e_7322133;
++c_7322120.elements[0] = k_736159;
++c_7322120.elements[1] = ((closureN)self_7312623)->elements[0];
++
++
++
++
++object c_7322136 = Cyc_symbol2string(data,(closure)&c_7322120,Cyc_car(data, x_731372_733298));
++return_closcall1(data,(closure)&c_7322120, c_7322136);;
++}
++
++static void __lambda_1000(void *data, object self_7312624, int argc, object *args) /* object self_7312624, object r_736161 */
++ {
++ object r_736161 = args[0];
++
++closureN_type c_7322122;
++object e_7322128 [2];
++c_7322122.hdr.mark = gc_color_red;
++ c_7322122.hdr.grayed = 0;
++c_7322122.tag = closureN_tag;
++ c_7322122.fn = (function_type)__lambda_1001;
++c_7322122.num_args = 1;
++c_7322122.num_elements = 2;
++c_7322122.elements = (object *)e_7322128;
++c_7322122.elements[0] = ((closureN)self_7312624)->elements[0];
++c_7322122.elements[1] = ((closureN)self_7312624)->elements[1];
++
++
++make_utf8_string_with_len(c_7322132, "-ls", 3, 3);
++
++object c_7322131 = Cyc_string_append(data,(closure)&c_7322122,2,r_736161, &c_7322132);
++return_closcall1(data,(closure)&c_7322122, c_7322131);;
++}
++
++static void __lambda_1001(void *data, object self_7312625, int argc, object *args) /* object self_7312625, object r_736160 */
++ {
++ object r_736160 = args[0];
++
++
++return_closcall2(data, car(((closureN)self_7312625)->elements[1]), ((closureN)self_7312625)->elements[0], r_736160);;
++}
++
++static void __lambda_981(void *data, object self_7312626, int argc, object *args) /* object self_7312626, object r_736158 */
++ {
++ object r_736158 = args[0];
++
++closureN_type c_7321968;
++object e_7322115 [20];
++c_7321968.hdr.mark = gc_color_red;
++ c_7321968.hdr.grayed = 0;
++c_7321968.tag = closureN_tag;
++ c_7321968.fn = (function_type)__lambda_982;
++c_7321968.num_args = 1;
++c_7321968.num_elements = 20;
++c_7321968.elements = (object *)e_7322115;
++c_7321968.elements[0] = ((closureN)self_7312626)->elements[0];
++c_7321968.elements[1] = ((closureN)self_7312626)->elements[1];
++c_7321968.elements[2] = ((closureN)self_7312626)->elements[2];
++c_7321968.elements[3] = ((closureN)self_7312626)->elements[3];
++c_7321968.elements[4] = ((closureN)self_7312626)->elements[4];
++c_7321968.elements[5] = ((closureN)self_7312626)->elements[5];
++c_7321968.elements[6] = ((closureN)self_7312626)->elements[6];
++c_7321968.elements[7] = ((closureN)self_7312626)->elements[7];
++c_7321968.elements[8] = ((closureN)self_7312626)->elements[8];
++c_7321968.elements[9] = ((closureN)self_7312626)->elements[9];
++c_7321968.elements[10] = ((closureN)self_7312626)->elements[10];
++c_7321968.elements[11] = ((closureN)self_7312626)->elements[11];
++c_7321968.elements[12] = ((closureN)self_7312626)->elements[12];
++c_7321968.elements[13] = ((closureN)self_7312626)->elements[13];
++c_7321968.elements[14] = ((closureN)self_7312626)->elements[14];
++c_7321968.elements[15] = ((closureN)self_7312626)->elements[15];
++c_7321968.elements[16] = ((closureN)self_7312626)->elements[16];
++c_7321968.elements[17] = ((closureN)self_7312626)->elements[17];
++c_7321968.elements[18] = ((closureN)self_7312626)->elements[18];
++c_7321968.elements[19] = ((closureN)self_7312626)->elements[19];
++
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7321968, r_736158, ((closureN)self_7312626)->elements[15]);;
++}
++
++static void __lambda_982(void *data, object self_7312627, int argc, object *args) /* object self_7312627, object ls_91vars_731361_733290 */
++ {
++ object ls_91vars_731361_733290 = args[0];
++
++closureN_type c_7321970;
++object e_7322078 [19];
++c_7321970.hdr.mark = gc_color_red;
++ c_7321970.hdr.grayed = 0;
++c_7321970.tag = closureN_tag;
++ c_7321970.fn = (function_type)__lambda_983;
++c_7321970.num_args = 1;
++c_7321970.num_elements = 19;
++c_7321970.elements = (object *)e_7322078;
++c_7321970.elements[0] = ((closureN)self_7312627)->elements[0];
++c_7321970.elements[1] = ((closureN)self_7312627)->elements[1];
++c_7321970.elements[2] = ((closureN)self_7312627)->elements[4];
++c_7321970.elements[3] = ((closureN)self_7312627)->elements[5];
++c_7321970.elements[4] = ((closureN)self_7312627)->elements[6];
++c_7321970.elements[5] = ((closureN)self_7312627)->elements[7];
++c_7321970.elements[6] = ((closureN)self_7312627)->elements[8];
++c_7321970.elements[7] = ((closureN)self_7312627)->elements[9];
++c_7321970.elements[8] = ((closureN)self_7312627)->elements[10];
++c_7321970.elements[9] = ((closureN)self_7312627)->elements[11];
++c_7321970.elements[10] = ((closureN)self_7312627)->elements[12];
++c_7321970.elements[11] = ((closureN)self_7312627)->elements[13];
++c_7321970.elements[12] = ((closureN)self_7312627)->elements[14];
++c_7321970.elements[13] = ls_91vars_731361_733290;
++c_7321970.elements[14] = ((closureN)self_7312627)->elements[15];
++c_7321970.elements[15] = ((closureN)self_7312627)->elements[16];
++c_7321970.elements[16] = ((closureN)self_7312627)->elements[17];
++c_7321970.elements[17] = ((closureN)self_7312627)->elements[18];
++c_7321970.elements[18] = ((closureN)self_7312627)->elements[19];
++
++
++closureN_type c_7322079;
++object e_7322114 [6];
++c_7322079.hdr.mark = gc_color_red;
++ c_7322079.hdr.grayed = 0;
++c_7322079.tag = closureN_tag;
++ c_7322079.fn = (function_type)__lambda_994;
++c_7322079.num_args = 1;
++c_7322079.num_elements = 6;
++c_7322079.elements = (object *)e_7322114;
++c_7322079.elements[0] = ((closureN)self_7312627)->elements[2];
++c_7322079.elements[1] = ((closureN)self_7312627)->elements[3];
++c_7322079.elements[2] = ((closureN)self_7312627)->elements[6];
++c_7322079.elements[3] = ls_91vars_731361_733290;
++c_7322079.elements[4] = ((closureN)self_7312627)->elements[15];
++c_7322079.elements[5] = ((closureN)self_7312627)->elements[19];
+
+-pair_type local_7323579;
++return_direct_with_clo1(data,(closure)&c_7321970,__lambda_983, &c_7322079);;
++}
+
+-pair_type local_7323583;
++static void __lambda_994(void *data, object self_7312628, int argc, object *args) /* object self_7312628, object k_736151, object _191_731369_733295 */
++ {
++ object k_736151 = args[0];
++
++closureN_type c_7322081;
++object e_7322104 [6];
++c_7322081.hdr.mark = gc_color_red;
++ c_7322081.hdr.grayed = 0;
++c_7322081.tag = closureN_tag;
++ c_7322081.fn = (function_type)__lambda_995;
++c_7322081.num_args = 1;
++c_7322081.num_elements = 6;
++c_7322081.elements = (object *)e_7322104;
++c_7322081.elements[0] = ((closureN)self_7312628)->elements[0];
++c_7322081.elements[1] = ((closureN)self_7312628)->elements[2];
++c_7322081.elements[2] = k_736151;
++c_7322081.elements[3] = ((closureN)self_7312628)->elements[3];
++c_7322081.elements[4] = ((closureN)self_7312628)->elements[4];
++c_7322081.elements[5] = ((closureN)self_7312628)->elements[5];
+
+-pair_type local_7323586;
+
+-pair_type local_7323590;
++closureN_type c_7322105;
++object e_7322113 [1];
++c_7322105.hdr.mark = gc_color_red;
++ c_7322105.hdr.grayed = 0;
++c_7322105.tag = closureN_tag;
++ c_7322105.fn = (function_type)__lambda_998;
++c_7322105.num_args = 2;
++c_7322105.num_elements = 1;
++c_7322105.elements = (object *)e_7322113;
++c_7322105.elements[0] = ((closureN)self_7312628)->elements[1];
+
+-pair_type local_7323593;
++return_direct_with_clo1(data,(closure)&c_7322081,__lambda_995, &c_7322105);;
++}
+
+-pair_type local_7323596;
++static void __lambda_998(void *data, object self_7312629, int argc, object *args) /* object self_7312629, object k_736156, object x_731370_733296, object l_731371_733297 */
++ {
++ object k_736156 = args[0]; object x_731370_733296 = args[1]; object l_731371_733297 = args[2];
++
++list_3_type local_7322109;
+
+-pair_type local_7323600;
+
+-pair_type local_7323603;
++return_direct_with_clo1(data, k_736156, (((closure) k_736156)->fn), Cyc_fast_list_3(&local_7322109, ((closureN)self_7312629)->elements[0], Cyc_car(data, x_731370_733296), l_731371_733297));;
++}
+
+-pair_type local_7323607;
++static void __lambda_995(void *data, object self_7312630, int argc, object *args) /* object self_7312630, object r_736155 */
++ {
++ object r_736155 = args[0];
++
++closureN_type c_7322083;
++object e_7322101 [4];
++c_7322083.hdr.mark = gc_color_red;
++ c_7322083.hdr.grayed = 0;
++c_7322083.tag = closureN_tag;
++ c_7322083.fn = (function_type)__lambda_996;
++c_7322083.num_args = 1;
++c_7322083.num_elements = 4;
++c_7322083.elements = (object *)e_7322101;
++c_7322083.elements[0] = ((closureN)self_7312630)->elements[0];
++c_7322083.elements[1] = ((closureN)self_7312630)->elements[1];
++c_7322083.elements[2] = ((closureN)self_7312630)->elements[2];
++c_7322083.elements[3] = ((closureN)self_7312630)->elements[5];
+
+-pair_type local_7323610;
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7322083, r_736155, ((closureN)self_7312630)->elements[4], ((closureN)self_7312630)->elements[3]);;
++}
+
+-pair_type local_7323614;
++static void __lambda_996(void *data, object self_7312631, int argc, object *args) /* object self_7312631, object r_736154 */
++ {
++ object r_736154 = args[0];
++
++closureN_type c_7322085;
++object e_7322092 [2];
++c_7322085.hdr.mark = gc_color_red;
++ c_7322085.hdr.grayed = 0;
++c_7322085.tag = closureN_tag;
++ c_7322085.fn = (function_type)__lambda_997;
++c_7322085.num_args = 1;
++c_7322085.num_elements = 2;
++c_7322085.elements = (object *)e_7322092;
++c_7322085.elements[0] = ((closureN)self_7312631)->elements[1];
++c_7322085.elements[1] = ((closureN)self_7312631)->elements[2];
+
+-pair_type local_7323617;
+
+-pair_type local_7323620;
++pair_type local_7322095;
+
+-pair_type local_7323624;
++list_2_type local_7322098;
++return_direct_with_clo1(data,(closure)&c_7322085,__lambda_997, set_pair_as_expr(&local_7322095, Cyc_fast_list_2(&local_7322098, ((closureN)self_7312631)->elements[0], ((closureN)self_7312631)->elements[3]), r_736154));;
++}
+
+-pair_type local_7323627;
++static void __lambda_997(void *data, object self_7312632, int argc, object *args) /* object self_7312632, object r_736152 */
++ {
++ object r_736152 = args[0];
++
++pair_type local_7322090;
++return_direct_with_clo1(data, ((closureN)self_7312632)->elements[1], (((closure) ((closureN)self_7312632)->elements[1])->fn), set_pair_as_expr(&local_7322090, ((closureN)self_7312632)->elements[0], r_736152));;
++}
+
+-pair_type local_7323631;
++static void __lambda_983(void *data, object self_7312633, int argc, object *args) /* object self_7312633, object r_736150 */
++ {
++ object r_736150 = args[0];
++
+
+-pair_type local_7323635;
+
+-pair_type local_7323638;
++closureN_type c_7321975;
++object e_7322065 [15];
++c_7321975.hdr.mark = gc_color_red;
++ c_7321975.hdr.grayed = 0;
++c_7321975.tag = closureN_tag;
++ c_7321975.fn = (function_type)__lambda_984;
++c_7321975.num_args = 1;
++c_7321975.num_elements = 15;
++c_7321975.elements = (object *)e_7322065;
++c_7321975.elements[0] = ((closureN)self_7312633)->elements[0];
++c_7321975.elements[1] = ((closureN)self_7312633)->elements[2];
++c_7321975.elements[2] = ((closureN)self_7312633)->elements[3];
++c_7321975.elements[3] = ((closureN)self_7312633)->elements[4];
++c_7321975.elements[4] = ((closureN)self_7312633)->elements[5];
++c_7321975.elements[5] = ((closureN)self_7312633)->elements[6];
++c_7321975.elements[6] = ((closureN)self_7312633)->elements[7];
++c_7321975.elements[7] = ((closureN)self_7312633)->elements[8];
++c_7321975.elements[8] = ((closureN)self_7312633)->elements[10];
++c_7321975.elements[9] = ((closureN)self_7312633)->elements[11];
++c_7321975.elements[10] = ((closureN)self_7312633)->elements[13];
++c_7321975.elements[11] = ((closureN)self_7312633)->elements[14];
++c_7321975.elements[12] = ((closureN)self_7312633)->elements[16];
++c_7321975.elements[13] = ((closureN)self_7312633)->elements[17];
++c_7321975.elements[14] = ((closureN)self_7312633)->elements[18];
++
++
++
++
++list_2_type local_7322071;
++
++complex_num_type local_7322076;
++return_closcall6(data, car(((closureN)self_7312633)->elements[12]), &c_7321975, Cyc_car(data, ((closureN)self_7312633)->elements[15]), Cyc_fast_list_2(&local_7322071, ((closureN)self_7312633)->elements[1], ((closureN)self_7312633)->elements[18]), Cyc_fast_sum(data,&local_7322076, ((closureN)self_7312633)->elements[9], obj_int2obj(1)), NULL, r_736150);;
++}
++
++static void __lambda_984(void *data, object self_7312634, int argc, object *args) /* object self_7312634, object once_731364_733291 */
++ {
++ object once_731364_733291 = args[0];
++
++closureN_type c_7321977;
++object e_7322054 [15];
++c_7321977.hdr.mark = gc_color_red;
++ c_7321977.hdr.grayed = 0;
++c_7321977.tag = closureN_tag;
++ c_7321977.fn = (function_type)__lambda_985;
++c_7321977.num_args = 1;
++c_7321977.num_elements = 15;
++c_7321977.elements = (object *)e_7322054;
++c_7321977.elements[0] = ((closureN)self_7312634)->elements[0];
++c_7321977.elements[1] = ((closureN)self_7312634)->elements[1];
++c_7321977.elements[2] = ((closureN)self_7312634)->elements[2];
++c_7321977.elements[3] = ((closureN)self_7312634)->elements[3];
++c_7321977.elements[4] = ((closureN)self_7312634)->elements[4];
++c_7321977.elements[5] = ((closureN)self_7312634)->elements[5];
++c_7321977.elements[6] = ((closureN)self_7312634)->elements[7];
++c_7321977.elements[7] = ((closureN)self_7312634)->elements[8];
++c_7321977.elements[8] = ((closureN)self_7312634)->elements[9];
++c_7321977.elements[9] = ((closureN)self_7312634)->elements[10];
++c_7321977.elements[10] = ((closureN)self_7312634)->elements[11];
++c_7321977.elements[11] = once_731364_733291;
++c_7321977.elements[12] = ((closureN)self_7312634)->elements[12];
++c_7321977.elements[13] = ((closureN)self_7312634)->elements[13];
++c_7321977.elements[14] = ((closureN)self_7312634)->elements[14];
++
++
++closureN_type c_7322055;
++object e_7322064 [1];
++c_7322055.hdr.mark = gc_color_red;
++ c_7322055.hdr.grayed = 0;
++c_7322055.tag = closureN_tag;
++ c_7322055.fn = (function_type)__lambda_993;
++c_7322055.num_args = 1;
++c_7322055.num_elements = 1;
++c_7322055.elements = (object *)e_7322064;
++c_7322055.elements[0] = ((closureN)self_7312634)->elements[6];
++
++return_direct_with_clo1(data,(closure)&c_7321977,__lambda_985, &c_7322055);;
++}
++
++static void __lambda_993(void *data, object self_7312635, int argc, object *args) /* object self_7312635, object k_736143, object x_731366_733292 */
++ {
++ object k_736143 = args[0]; object x_731366_733292 = args[1];
++
++list_2_type local_7322059;
++
++list_2_type local_7322062;
++return_direct_with_clo1(data, k_736143, (((closure) k_736143)->fn), Cyc_fast_list_2(&local_7322059, x_731366_733292, Cyc_fast_list_2(&local_7322062, ((closureN)self_7312635)->elements[0], NULL)));;
++}
++
++static void __lambda_985(void *data, object self_7312636, int argc, object *args) /* object self_7312636, object r_736142 */
++ {
++ object r_736142 = args[0];
++
++closureN_type c_7321979;
++object e_7322052 [15];
++c_7321979.hdr.mark = gc_color_red;
++ c_7321979.hdr.grayed = 0;
++c_7321979.tag = closureN_tag;
++ c_7321979.fn = (function_type)__lambda_986;
++c_7321979.num_args = 1;
++c_7321979.num_elements = 15;
++c_7321979.elements = (object *)e_7322052;
++c_7321979.elements[0] = ((closureN)self_7312636)->elements[0];
++c_7321979.elements[1] = ((closureN)self_7312636)->elements[1];
++c_7321979.elements[2] = ((closureN)self_7312636)->elements[2];
++c_7321979.elements[3] = ((closureN)self_7312636)->elements[3];
++c_7321979.elements[4] = ((closureN)self_7312636)->elements[4];
++c_7321979.elements[5] = ((closureN)self_7312636)->elements[5];
++c_7321979.elements[6] = ((closureN)self_7312636)->elements[6];
++c_7321979.elements[7] = ((closureN)self_7312636)->elements[7];
++c_7321979.elements[8] = ((closureN)self_7312636)->elements[8];
++c_7321979.elements[9] = ((closureN)self_7312636)->elements[9];
++c_7321979.elements[10] = ((closureN)self_7312636)->elements[10];
++c_7321979.elements[11] = ((closureN)self_7312636)->elements[11];
++c_7321979.elements[12] = ((closureN)self_7312636)->elements[12];
++c_7321979.elements[13] = ((closureN)self_7312636)->elements[13];
++c_7321979.elements[14] = ((closureN)self_7312636)->elements[14];
++
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7321979, r_736142, ((closureN)self_7312636)->elements[9]);;
++}
++
++static void __lambda_986(void *data, object self_7312637, int argc, object *args) /* object self_7312637, object r_736141 */
++ {
++ object r_736141 = args[0];
++
++closureN_type c_7321981;
++object e_7322039 [15];
++c_7321981.hdr.mark = gc_color_red;
++ c_7321981.hdr.grayed = 0;
++c_7321981.tag = closureN_tag;
++ c_7321981.fn = (function_type)__lambda_987;
++c_7321981.num_args = 1;
++c_7321981.num_elements = 15;
++c_7321981.elements = (object *)e_7322039;
++c_7321981.elements[0] = ((closureN)self_7312637)->elements[0];
++c_7321981.elements[1] = ((closureN)self_7312637)->elements[1];
++c_7321981.elements[2] = ((closureN)self_7312637)->elements[2];
++c_7321981.elements[3] = ((closureN)self_7312637)->elements[3];
++c_7321981.elements[4] = ((closureN)self_7312637)->elements[4];
++c_7321981.elements[5] = ((closureN)self_7312637)->elements[5];
++c_7321981.elements[6] = ((closureN)self_7312637)->elements[7];
++c_7321981.elements[7] = ((closureN)self_7312637)->elements[8];
++c_7321981.elements[8] = ((closureN)self_7312637)->elements[9];
++c_7321981.elements[9] = ((closureN)self_7312637)->elements[10];
++c_7321981.elements[10] = ((closureN)self_7312637)->elements[11];
++c_7321981.elements[11] = r_736141;
++c_7321981.elements[12] = ((closureN)self_7312637)->elements[12];
++c_7321981.elements[13] = ((closureN)self_7312637)->elements[13];
++c_7321981.elements[14] = ((closureN)self_7312637)->elements[14];
+
+-pair_type local_7323642;
+
+-pair_type local_7323646;
++closureN_type c_7322040;
++object e_7322051 [1];
++c_7322040.hdr.mark = gc_color_red;
++ c_7322040.hdr.grayed = 0;
++c_7322040.tag = closureN_tag;
++ c_7322040.fn = (function_type)__lambda_992;
++c_7322040.num_args = 2;
++c_7322040.num_elements = 1;
++c_7322040.elements = (object *)e_7322051;
++c_7322040.elements[0] = ((closureN)self_7312637)->elements[6];
+
+-pair_type local_7323649;
++return_direct_with_clo1(data,(closure)&c_7321981,__lambda_987, &c_7322040);;
++}
+
+-pair_type local_7323652;
++static void __lambda_992(void *data, object self_7312638, int argc, object *args) /* object self_7312638, object k_736137, object x_731367_733293, object l_731368_733294 */
++ {
++ object k_736137 = args[0]; object x_731367_733293 = args[1]; object l_731368_733294 = args[2];
++
++list_2_type local_7322044;
+
+-pair_type local_7323656;
+
+-pair_type local_7323659;
+
+-pair_type local_7323663;
++list_2_type local_7322049;
++return_direct_with_clo1(data, k_736137, (((closure) k_736137)->fn), Cyc_fast_list_2(&local_7322044, Cyc_car(data, x_731367_733293), Cyc_fast_list_2(&local_7322049, ((closureN)self_7312638)->elements[0], l_731368_733294)));;
++}
+
+-pair_type local_7323667;
++static void __lambda_987(void *data, object self_7312639, int argc, object *args) /* object self_7312639, object r_736136 */
++ {
++ object r_736136 = args[0];
++
++closureN_type c_7321983;
++object e_7322036 [14];
++c_7321983.hdr.mark = gc_color_red;
++ c_7321983.hdr.grayed = 0;
++c_7321983.tag = closureN_tag;
++ c_7321983.fn = (function_type)__lambda_988;
++c_7321983.num_args = 1;
++c_7321983.num_elements = 14;
++c_7321983.elements = (object *)e_7322036;
++c_7321983.elements[0] = ((closureN)self_7312639)->elements[0];
++c_7321983.elements[1] = ((closureN)self_7312639)->elements[1];
++c_7321983.elements[2] = ((closureN)self_7312639)->elements[2];
++c_7321983.elements[3] = ((closureN)self_7312639)->elements[3];
++c_7321983.elements[4] = ((closureN)self_7312639)->elements[4];
++c_7321983.elements[5] = ((closureN)self_7312639)->elements[5];
++c_7321983.elements[6] = ((closureN)self_7312639)->elements[6];
++c_7321983.elements[7] = ((closureN)self_7312639)->elements[7];
++c_7321983.elements[8] = ((closureN)self_7312639)->elements[9];
++c_7321983.elements[9] = ((closureN)self_7312639)->elements[10];
++c_7321983.elements[10] = ((closureN)self_7312639)->elements[11];
++c_7321983.elements[11] = ((closureN)self_7312639)->elements[12];
++c_7321983.elements[12] = ((closureN)self_7312639)->elements[13];
++c_7321983.elements[13] = ((closureN)self_7312639)->elements[14];
+
+-pair_type local_7323671;
+-return_direct_with_clo1(data, ((closureN)self_7313904)->elements[15], (((closure) ((closureN)self_7313904)->elements[15])->fn), set_pair_as_expr(&local_7323482, ((closureN)self_7313904)->elements[10], set_pair_as_expr(&local_7323486, set_pair_as_expr(&local_7323489, set_pair_as_expr(&local_7323492, ((closureN)self_7313904)->elements[8], set_pair_as_expr(&local_7323496, set_pair_as_expr(&local_7323499, ((closureN)self_7313904)->elements[9], set_pair_as_expr(&local_7323503, ((closureN)self_7313904)->elements[17], NULL)), NULL)), NULL), set_pair_as_expr(&local_7323507, set_pair_as_expr(&local_7323510, ((closureN)self_7313904)->elements[2], set_pair_as_expr(&local_7323514, set_pair_as_expr(&local_7323517, ((closureN)self_7313904)->elements[1], set_pair_as_expr(&local_7323521, ((closureN)self_7313904)->elements[8], set_pair_as_expr(&local_7323525, ((closureN)self_7313904)->elements[16], NULL))), set_pair_as_expr(&local_7323529, set_pair_as_expr(&local_7323532, ((closureN)self
_7313904)->elements[10], set_pair_as_expr(&local_7323536, ((closureN)self_7313904)->elements[11], set_pair_as_expr(&local_7323540, set_pair_as_expr(&local_7323543, set_pair_as_expr(&local_7323546, ((closureN)self_7313904)->elements[12], set_pair_as_expr(&local_7323550, ((closureN)self_7313904)->elements[17], NULL)), set_pair_as_expr(&local_7323554, set_pair_as_expr(&local_7323557, ((closureN)self_7313904)->elements[6], set_pair_as_expr(&local_7323561, set_pair_as_expr(&local_7323564, ((closureN)self_7313904)->elements[0], set_pair_as_expr(&local_7323568, ((closureN)self_7313904)->elements[8], set_pair_as_expr(&local_7323572, ((closureN)self_7313904)->elements[16], NULL))), NULL)), set_pair_as_expr(&local_7323576, set_pair_as_expr(&local_7323579, ((closureN)self_7313904)->elements[14], set_pair_as_expr(&local_7323583, set_pair_as_expr(&local_7323586, ((closureN)self_7313904)->elements[13], set_pair_as_expr(&local_7323590, NULL, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7323593,
set_pair_as_expr(&local_7323596, ((closureN)self_7313904)->elements[7], set_pair_as_expr(&local_7323600, set_pair_as_expr(&local_7323603, ((closureN)self_7313904)->elements[1], set_pair_as_expr(&local_7323607, obj_int2obj(0), set_pair_as_expr(&local_7323610, ((closureN)self_7313904)->elements[6], NULL))), set_pair_as_expr(&local_7323614, r_736640, set_pair_as_expr(&local_7323617, set_pair_as_expr(&local_7323620, ((closureN)self_7313904)->elements[11], set_pair_as_expr(&local_7323624, set_pair_as_expr(&local_7323627, ((closureN)self_7313904)->elements[4], set_pair_as_expr(&local_7323631, ((closureN)self_7313904)->elements[12], NULL)), set_pair_as_expr(&local_7323635, set_pair_as_expr(&local_7323638, ((closureN)self_7313904)->elements[0], set_pair_as_expr(&local_7323642, ((closureN)self_7313904)->elements[6], set_pair_as_expr(&local_7323646, obj_int2obj(1), NULL))), set_pair_as_expr(&local_7323649, set_pair_as_expr(&local_7323652, ((closureN)self_7313904)->elements[5], set_pair_as_ex
pr(&local_7323656, set_pair_as_expr(&local_7323659, ((closureN)self_7313904)->elements[3], set_pair_as_expr(&local_7323663, ((closureN)self_7313904)->elements[12], NULL)), set_pair_as_expr(&local_7323667, ((closureN)self_7313904)->elements[14], set_pair_as_expr(&local_7323671, ((closureN)self_7313904)->elements[12], NULL)))), NULL)))), NULL)))), NULL)))), NULL))), NULL))));;
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7321983, r_736136, ((closureN)self_7312639)->elements[9], ((closureN)self_7312639)->elements[8]);;
+ }
+
+-static void __lambda_976(void *data, object self_7313871, int argc, object *args) /* object self_7313871, object r_736563 */
++static void __lambda_988(void *data, object self_7312640, int argc, object *args) /* object self_7312640, object r_736133 */
+ {
+- object r_736563 = args[0];
+- if( (boolean_f != r_736563) ){
++ object r_736133 = args[0];
+
+-closureN_type c_7323209;
+-object e_7323235 [6];
+-c_7323209.hdr.mark = gc_color_red;
+- c_7323209.hdr.grayed = 0;
+-c_7323209.tag = closureN_tag;
+- c_7323209.fn = (function_type)__lambda_977;
+-c_7323209.num_args = 1;
+-c_7323209.num_elements = 6;
+-c_7323209.elements = (object *)e_7323235;
+-c_7323209.elements[0] = ((closureN)self_7313871)->elements[0];
+-c_7323209.elements[1] = ((closureN)self_7313871)->elements[5];
+-c_7323209.elements[2] = ((closureN)self_7313871)->elements[6];
+-c_7323209.elements[3] = ((closureN)self_7313871)->elements[14];
+-c_7323209.elements[4] = ((closureN)self_7313871)->elements[17];
+-c_7323209.elements[5] = ((closureN)self_7313871)->elements[18];
+-
+-
+-pair_type local_7323238;
+-
+-pair_type local_7323241;
+-
+-
+-
+-complex_num_type local_7323247;
+-return_closcall2(data, ((closureN)self_7313871)->elements[13], &c_7323209, set_pair_as_expr(&local_7323238, set_pair_as_expr(&local_7323241, Cyc_car(data, ((closureN)self_7313871)->elements[17]), Cyc_fast_sum(data,&local_7323247, obj_int2obj(1), ((closureN)self_7313871)->elements[12])), ((closureN)self_7313871)->elements[19]));
+-} else {
+-
+-
+-
+-closureN_type c_7323254;
+-object e_7323450 [19];
+-c_7323254.hdr.mark = gc_color_red;
+- c_7323254.hdr.grayed = 0;
+-c_7323254.tag = closureN_tag;
+- c_7323254.fn = (function_type)__lambda_978;
+-c_7323254.num_args = 1;
+-c_7323254.num_elements = 19;
+-c_7323254.elements = (object *)e_7323450;
+-c_7323254.elements[0] = ((closureN)self_7313871)->elements[0];
+-c_7323254.elements[1] = ((closureN)self_7313871)->elements[1];
+-c_7323254.elements[2] = ((closureN)self_7313871)->elements[2];
+-c_7323254.elements[3] = ((closureN)self_7313871)->elements[3];
+-c_7323254.elements[4] = ((closureN)self_7313871)->elements[4];
+-c_7323254.elements[5] = ((closureN)self_7313871)->elements[5];
+-c_7323254.elements[6] = ((closureN)self_7313871)->elements[7];
+-c_7323254.elements[7] = ((closureN)self_7313871)->elements[8];
+-c_7323254.elements[8] = ((closureN)self_7313871)->elements[9];
+-c_7323254.elements[9] = ((closureN)self_7313871)->elements[10];
+-c_7323254.elements[10] = ((closureN)self_7313871)->elements[11];
+-c_7323254.elements[11] = ((closureN)self_7313871)->elements[12];
+-c_7323254.elements[12] = ((closureN)self_7313871)->elements[13];
+-c_7323254.elements[13] = ((closureN)self_7313871)->elements[14];
+-c_7323254.elements[14] = ((closureN)self_7313871)->elements[15];
+-c_7323254.elements[15] = ((closureN)self_7313871)->elements[16];
+-c_7323254.elements[16] = ((closureN)self_7313871)->elements[17];
+-c_7323254.elements[17] = ((closureN)self_7313871)->elements[18];
+-c_7323254.elements[18] = ((closureN)self_7313871)->elements[19];
+-
+-
+-make_utf8_string_with_len(c_7323451, "w.", 2, 2);
+-return_closcall2(data, car(((closureN)self_7313871)->elements[16]), &c_7323254, &c_7323451);}
+-;;
+-}
+-
+-static void __lambda_978(void *data, object self_7313873, int argc, object *args) /* object self_7313873, object w_731352_733634 */
+- {
+- object w_731352_733634 = args[0];
+-
+-
+-
+-closureN_type c_7323259;
+-object e_7323448 [20];
+-c_7323259.hdr.mark = gc_color_red;
+- c_7323259.hdr.grayed = 0;
+-c_7323259.tag = closureN_tag;
+- c_7323259.fn = (function_type)__lambda_979;
+-c_7323259.num_args = 1;
+-c_7323259.num_elements = 20;
+-c_7323259.elements = (object *)e_7323448;
+-c_7323259.elements[0] = ((closureN)self_7313873)->elements[0];
+-c_7323259.elements[1] = ((closureN)self_7313873)->elements[1];
+-c_7323259.elements[2] = ((closureN)self_7313873)->elements[2];
+-c_7323259.elements[3] = ((closureN)self_7313873)->elements[3];
+-c_7323259.elements[4] = ((closureN)self_7313873)->elements[4];
+-c_7323259.elements[5] = ((closureN)self_7313873)->elements[5];
+-c_7323259.elements[6] = ((closureN)self_7313873)->elements[6];
+-c_7323259.elements[7] = ((closureN)self_7313873)->elements[7];
+-c_7323259.elements[8] = ((closureN)self_7313873)->elements[8];
+-c_7323259.elements[9] = ((closureN)self_7313873)->elements[9];
+-c_7323259.elements[10] = ((closureN)self_7313873)->elements[10];
+-c_7323259.elements[11] = ((closureN)self_7313873)->elements[11];
+-c_7323259.elements[12] = ((closureN)self_7313873)->elements[12];
+-c_7323259.elements[13] = ((closureN)self_7313873)->elements[13];
+-c_7323259.elements[14] = ((closureN)self_7313873)->elements[14];
+-c_7323259.elements[15] = ((closureN)self_7313873)->elements[15];
+-c_7323259.elements[16] = ((closureN)self_7313873)->elements[16];
+-c_7323259.elements[17] = ((closureN)self_7313873)->elements[17];
+-c_7323259.elements[18] = ((closureN)self_7313873)->elements[18];
+-c_7323259.elements[19] = w_731352_733634;
+-
+-
+-make_utf8_string_with_len(c_7323449, "lp.", 3, 3);
+-return_closcall2(data, car(((closureN)self_7313873)->elements[15]), &c_7323259, &c_7323449);;
+-}
+-
+-static void __lambda_979(void *data, object self_7313874, int argc, object *args) /* object self_7313874, object _191lp_731355_733635 */
+- {
+- object _191lp_731355_733635 = args[0];
+-
+-
+-
+-closureN_type c_7323264;
+-object e_7323440 [20];
+-c_7323264.hdr.mark = gc_color_red;
+- c_7323264.hdr.grayed = 0;
+-c_7323264.tag = closureN_tag;
+- c_7323264.fn = (function_type)__lambda_980;
+-c_7323264.num_args = 1;
+-c_7323264.num_elements = 20;
+-c_7323264.elements = (object *)e_7323440;
+-c_7323264.elements[0] = ((closureN)self_7313874)->elements[0];
+-c_7323264.elements[1] = ((closureN)self_7313874)->elements[1];
+-c_7323264.elements[2] = ((closureN)self_7313874)->elements[2];
+-c_7323264.elements[3] = ((closureN)self_7313874)->elements[3];
+-c_7323264.elements[4] = ((closureN)self_7313874)->elements[4];
+-c_7323264.elements[5] = ((closureN)self_7313874)->elements[5];
+-c_7323264.elements[6] = _191lp_731355_733635;
+-c_7323264.elements[7] = ((closureN)self_7313874)->elements[6];
+-c_7323264.elements[8] = ((closureN)self_7313874)->elements[7];
+-c_7323264.elements[9] = ((closureN)self_7313874)->elements[8];
+-c_7323264.elements[10] = ((closureN)self_7313874)->elements[9];
+-c_7323264.elements[11] = ((closureN)self_7313874)->elements[11];
+-c_7323264.elements[12] = ((closureN)self_7313874)->elements[12];
+-c_7323264.elements[13] = ((closureN)self_7313874)->elements[13];
+-c_7323264.elements[14] = ((closureN)self_7313874)->elements[14];
+-c_7323264.elements[15] = ((closureN)self_7313874)->elements[15];
+-c_7323264.elements[16] = ((closureN)self_7313874)->elements[16];
+-c_7323264.elements[17] = ((closureN)self_7313874)->elements[17];
+-c_7323264.elements[18] = ((closureN)self_7313874)->elements[18];
+-c_7323264.elements[19] = ((closureN)self_7313874)->elements[19];
+-
+-
+-
+-
+-complex_num_type local_7323446;
+-return_closcall3(data, car(((closureN)self_7313874)->elements[10]), &c_7323264, Cyc_car(data, ((closureN)self_7313874)->elements[16]), Cyc_fast_sum(data,&local_7323446, ((closureN)self_7313874)->elements[11], obj_int2obj(1)));;
+-}
+-
+-static void __lambda_980(void *data, object self_7313875, int argc, object *args) /* object self_7313875, object new_91vars_731358_733636 */
+- {
+- object new_91vars_731358_733636 = args[0];
+-
+-closureN_type c_7323266;
+-object e_7323417 [20];
+-c_7323266.hdr.mark = gc_color_red;
+- c_7323266.hdr.grayed = 0;
+-c_7323266.tag = closureN_tag;
+- c_7323266.fn = (function_type)__lambda_981;
+-c_7323266.num_args = 1;
+-c_7323266.num_elements = 20;
+-c_7323266.elements = (object *)e_7323417;
+-c_7323266.elements[0] = ((closureN)self_7313875)->elements[0];
+-c_7323266.elements[1] = ((closureN)self_7313875)->elements[1];
+-c_7323266.elements[2] = ((closureN)self_7313875)->elements[2];
+-c_7323266.elements[3] = ((closureN)self_7313875)->elements[3];
+-c_7323266.elements[4] = ((closureN)self_7313875)->elements[4];
+-c_7323266.elements[5] = ((closureN)self_7313875)->elements[5];
+-c_7323266.elements[6] = ((closureN)self_7313875)->elements[6];
+-c_7323266.elements[7] = ((closureN)self_7313875)->elements[7];
+-c_7323266.elements[8] = ((closureN)self_7313875)->elements[8];
+-c_7323266.elements[9] = ((closureN)self_7313875)->elements[9];
+-c_7323266.elements[10] = ((closureN)self_7313875)->elements[10];
+-c_7323266.elements[11] = ((closureN)self_7313875)->elements[11];
+-c_7323266.elements[12] = ((closureN)self_7313875)->elements[12];
+-c_7323266.elements[13] = ((closureN)self_7313875)->elements[13];
+-c_7323266.elements[14] = ((closureN)self_7313875)->elements[14];
+-c_7323266.elements[15] = new_91vars_731358_733636;
+-c_7323266.elements[16] = ((closureN)self_7313875)->elements[16];
+-c_7323266.elements[17] = ((closureN)self_7313875)->elements[17];
+-c_7323266.elements[18] = ((closureN)self_7313875)->elements[18];
+-c_7323266.elements[19] = ((closureN)self_7313875)->elements[19];
+-
+-
+-closureN_type c_7323418;
+-object e_7323439 [1];
+-c_7323418.hdr.mark = gc_color_red;
+- c_7323418.hdr.grayed = 0;
+-c_7323418.tag = closureN_tag;
+- c_7323418.fn = (function_type)__lambda_999;
+-c_7323418.num_args = 1;
+-c_7323418.num_elements = 1;
+-c_7323418.elements = (object *)e_7323439;
+-c_7323418.elements[0] = ((closureN)self_7313875)->elements[15];
++closureN_type c_7321985;
++object e_7322033 [13];
++c_7321985.hdr.mark = gc_color_red;
++ c_7321985.hdr.grayed = 0;
++c_7321985.tag = closureN_tag;
++ c_7321985.fn = (function_type)__lambda_989;
++c_7321985.num_args = 1;
++c_7321985.num_elements = 13;
++c_7321985.elements = (object *)e_7322033;
++c_7321985.elements[0] = ((closureN)self_7312640)->elements[0];
++c_7321985.elements[1] = ((closureN)self_7312640)->elements[1];
++c_7321985.elements[2] = ((closureN)self_7312640)->elements[2];
++c_7321985.elements[3] = ((closureN)self_7312640)->elements[3];
++c_7321985.elements[4] = ((closureN)self_7312640)->elements[4];
++c_7321985.elements[5] = ((closureN)self_7312640)->elements[5];
++c_7321985.elements[6] = ((closureN)self_7312640)->elements[6];
++c_7321985.elements[7] = ((closureN)self_7312640)->elements[7];
++c_7321985.elements[8] = ((closureN)self_7312640)->elements[9];
++c_7321985.elements[9] = r_736133;
++c_7321985.elements[10] = ((closureN)self_7312640)->elements[10];
++c_7321985.elements[11] = ((closureN)self_7312640)->elements[11];
++c_7321985.elements[12] = ((closureN)self_7312640)->elements[13];
+
+-return_direct_with_clo1(data,(closure)&c_7323266,__lambda_981, &c_7323418);;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7321985, ((closureN)self_7312640)->elements[8], ((closureN)self_7312640)->elements[12]);;
+ }
+
+-static void __lambda_999(void *data, object self_7313876, int argc, object *args) /* object self_7313876, object k_736611, object x_731372_733645 */
++static void __lambda_989(void *data, object self_7312641, int argc, object *args) /* object self_7312641, object r_736135 */
+ {
+- object k_736611 = args[0]; object x_731372_733645 = args[1];
++ object r_736135 = args[0];
+
+-closureN_type c_7323420;
+-object e_7323433 [2];
+-c_7323420.hdr.mark = gc_color_red;
+- c_7323420.hdr.grayed = 0;
+-c_7323420.tag = closureN_tag;
+- c_7323420.fn = (function_type)__lambda_1000;
+-c_7323420.num_args = 1;
+-c_7323420.num_elements = 2;
+-c_7323420.elements = (object *)e_7323433;
+-c_7323420.elements[0] = k_736611;
+-c_7323420.elements[1] = ((closureN)self_7313876)->elements[0];
+-
+-
+-
+-
+-object c_7323436 = Cyc_symbol2string(data,(closure)&c_7323420,Cyc_car(data, x_731372_733645));
+-return_closcall1(data,(closure)&c_7323420, c_7323436);;
+-}
+-
+-static void __lambda_1000(void *data, object self_7313877, int argc, object *args) /* object self_7313877, object r_736613 */
+- {
+- object r_736613 = args[0];
+-
+-closureN_type c_7323422;
+-object e_7323428 [2];
+-c_7323422.hdr.mark = gc_color_red;
+- c_7323422.hdr.grayed = 0;
+-c_7323422.tag = closureN_tag;
+- c_7323422.fn = (function_type)__lambda_1001;
+-c_7323422.num_args = 1;
+-c_7323422.num_elements = 2;
+-c_7323422.elements = (object *)e_7323428;
+-c_7323422.elements[0] = ((closureN)self_7313877)->elements[0];
+-c_7323422.elements[1] = ((closureN)self_7313877)->elements[1];
+-
+-
+-make_utf8_string_with_len(c_7323432, "-ls", 3, 3);
+-
+-object c_7323431 = Cyc_string_append(data,(closure)&c_7323422,2,r_736613, &c_7323432);
+-return_closcall1(data,(closure)&c_7323422, c_7323431);;
+-}
+-
+-static void __lambda_1001(void *data, object self_7313878, int argc, object *args) /* object self_7313878, object r_736612 */
+- {
+- object r_736612 = args[0];
+-
+-
+-return_closcall2(data, car(((closureN)self_7313878)->elements[1]), ((closureN)self_7313878)->elements[0], r_736612);;
+-}
+-
+-static void __lambda_981(void *data, object self_7313879, int argc, object *args) /* object self_7313879, object r_736610 */
+- {
+- object r_736610 = args[0];
+-
+-closureN_type c_7323268;
+-object e_7323415 [20];
+-c_7323268.hdr.mark = gc_color_red;
+- c_7323268.hdr.grayed = 0;
+-c_7323268.tag = closureN_tag;
+- c_7323268.fn = (function_type)__lambda_982;
+-c_7323268.num_args = 1;
+-c_7323268.num_elements = 20;
+-c_7323268.elements = (object *)e_7323415;
+-c_7323268.elements[0] = ((closureN)self_7313879)->elements[0];
+-c_7323268.elements[1] = ((closureN)self_7313879)->elements[1];
+-c_7323268.elements[2] = ((closureN)self_7313879)->elements[2];
+-c_7323268.elements[3] = ((closureN)self_7313879)->elements[3];
+-c_7323268.elements[4] = ((closureN)self_7313879)->elements[4];
+-c_7323268.elements[5] = ((closureN)self_7313879)->elements[5];
+-c_7323268.elements[6] = ((closureN)self_7313879)->elements[6];
+-c_7323268.elements[7] = ((closureN)self_7313879)->elements[7];
+-c_7323268.elements[8] = ((closureN)self_7313879)->elements[8];
+-c_7323268.elements[9] = ((closureN)self_7313879)->elements[9];
+-c_7323268.elements[10] = ((closureN)self_7313879)->elements[10];
+-c_7323268.elements[11] = ((closureN)self_7313879)->elements[11];
+-c_7323268.elements[12] = ((closureN)self_7313879)->elements[12];
+-c_7323268.elements[13] = ((closureN)self_7313879)->elements[13];
+-c_7323268.elements[14] = ((closureN)self_7313879)->elements[14];
+-c_7323268.elements[15] = ((closureN)self_7313879)->elements[15];
+-c_7323268.elements[16] = ((closureN)self_7313879)->elements[16];
+-c_7323268.elements[17] = ((closureN)self_7313879)->elements[17];
+-c_7323268.elements[18] = ((closureN)self_7313879)->elements[18];
+-c_7323268.elements[19] = ((closureN)self_7313879)->elements[19];
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7323268, r_736610, ((closureN)self_7313879)->elements[15]);;
+-}
+-
+-static void __lambda_982(void *data, object self_7313880, int argc, object *args) /* object self_7313880, object ls_91vars_731361_733637 */
+- {
+- object ls_91vars_731361_733637 = args[0];
+-
+-closureN_type c_7323270;
+-object e_7323378 [19];
+-c_7323270.hdr.mark = gc_color_red;
+- c_7323270.hdr.grayed = 0;
+-c_7323270.tag = closureN_tag;
+- c_7323270.fn = (function_type)__lambda_983;
+-c_7323270.num_args = 1;
+-c_7323270.num_elements = 19;
+-c_7323270.elements = (object *)e_7323378;
+-c_7323270.elements[0] = ((closureN)self_7313880)->elements[0];
+-c_7323270.elements[1] = ((closureN)self_7313880)->elements[1];
+-c_7323270.elements[2] = ((closureN)self_7313880)->elements[4];
+-c_7323270.elements[3] = ((closureN)self_7313880)->elements[5];
+-c_7323270.elements[4] = ((closureN)self_7313880)->elements[6];
+-c_7323270.elements[5] = ((closureN)self_7313880)->elements[7];
+-c_7323270.elements[6] = ((closureN)self_7313880)->elements[8];
+-c_7323270.elements[7] = ((closureN)self_7313880)->elements[9];
+-c_7323270.elements[8] = ((closureN)self_7313880)->elements[10];
+-c_7323270.elements[9] = ((closureN)self_7313880)->elements[11];
+-c_7323270.elements[10] = ((closureN)self_7313880)->elements[12];
+-c_7323270.elements[11] = ((closureN)self_7313880)->elements[13];
+-c_7323270.elements[12] = ((closureN)self_7313880)->elements[14];
+-c_7323270.elements[13] = ls_91vars_731361_733637;
+-c_7323270.elements[14] = ((closureN)self_7313880)->elements[15];
+-c_7323270.elements[15] = ((closureN)self_7313880)->elements[16];
+-c_7323270.elements[16] = ((closureN)self_7313880)->elements[17];
+-c_7323270.elements[17] = ((closureN)self_7313880)->elements[18];
+-c_7323270.elements[18] = ((closureN)self_7313880)->elements[19];
++closureN_type c_7321988;
++object e_7322032 [12];
++c_7321988.hdr.mark = gc_color_red;
++ c_7321988.hdr.grayed = 0;
++c_7321988.tag = closureN_tag;
++ c_7321988.fn = (function_type)__lambda_990;
++c_7321988.num_args = 1;
++c_7321988.num_elements = 12;
++c_7321988.elements = (object *)e_7322032;
++c_7321988.elements[0] = ((closureN)self_7312641)->elements[0];
++c_7321988.elements[1] = ((closureN)self_7312641)->elements[1];
++c_7321988.elements[2] = ((closureN)self_7312641)->elements[2];
++c_7321988.elements[3] = ((closureN)self_7312641)->elements[3];
++c_7321988.elements[4] = ((closureN)self_7312641)->elements[4];
++c_7321988.elements[5] = ((closureN)self_7312641)->elements[5];
++c_7321988.elements[6] = ((closureN)self_7312641)->elements[7];
++c_7321988.elements[7] = ((closureN)self_7312641)->elements[8];
++c_7321988.elements[8] = ((closureN)self_7312641)->elements[9];
++c_7321988.elements[9] = ((closureN)self_7312641)->elements[10];
++c_7321988.elements[10] = ((closureN)self_7312641)->elements[11];
++c_7321988.elements[11] = ((closureN)self_7312641)->elements[12];
+
++return_closcall2(data, ((closureN)self_7312641)->elements[6], &c_7321988, r_736135);;
++}
+
+-closureN_type c_7323379;
+-object e_7323414 [6];
+-c_7323379.hdr.mark = gc_color_red;
+- c_7323379.hdr.grayed = 0;
+-c_7323379.tag = closureN_tag;
+- c_7323379.fn = (function_type)__lambda_994;
+-c_7323379.num_args = 1;
+-c_7323379.num_elements = 6;
+-c_7323379.elements = (object *)e_7323414;
+-c_7323379.elements[0] = ((closureN)self_7313880)->elements[2];
+-c_7323379.elements[1] = ((closureN)self_7313880)->elements[3];
+-c_7323379.elements[2] = ((closureN)self_7313880)->elements[6];
+-c_7323379.elements[3] = ls_91vars_731361_733637;
+-c_7323379.elements[4] = ((closureN)self_7313880)->elements[15];
+-c_7323379.elements[5] = ((closureN)self_7313880)->elements[19];
++static void __lambda_990(void *data, object self_7312642, int argc, object *args) /* object self_7312642, object r_736134 */
++ {
++ object r_736134 = args[0];
++
++closureN_type c_7321990;
++object e_7322026 [11];
++c_7321990.hdr.mark = gc_color_red;
++ c_7321990.hdr.grayed = 0;
++c_7321990.tag = closureN_tag;
++ c_7321990.fn = (function_type)__lambda_991;
++c_7321990.num_args = 1;
++c_7321990.num_elements = 11;
++c_7321990.elements = (object *)e_7322026;
++c_7321990.elements[0] = ((closureN)self_7312642)->elements[0];
++c_7321990.elements[1] = ((closureN)self_7312642)->elements[1];
++c_7321990.elements[2] = ((closureN)self_7312642)->elements[2];
++c_7321990.elements[3] = ((closureN)self_7312642)->elements[3];
++c_7321990.elements[4] = ((closureN)self_7312642)->elements[4];
++c_7321990.elements[5] = ((closureN)self_7312642)->elements[5];
++c_7321990.elements[6] = ((closureN)self_7312642)->elements[6];
++c_7321990.elements[7] = ((closureN)self_7312642)->elements[7];
++c_7321990.elements[8] = ((closureN)self_7312642)->elements[9];
++c_7321990.elements[9] = ((closureN)self_7312642)->elements[10];
++c_7321990.elements[10] = ((closureN)self_7312642)->elements[11];
+
+-return_direct_with_clo1(data,(closure)&c_7323270,__lambda_983, &c_7323379);;
++
++list_3_type local_7322029;
++return_direct_with_clo1(data,(closure)&c_7321990,__lambda_991, Cyc_fast_list_3(&local_7322029, ((closureN)self_7312642)->elements[2], ((closureN)self_7312642)->elements[8], r_736134));;
+ }
+
+-static void __lambda_994(void *data, object self_7313881, int argc, object *args) /* object self_7313881, object k_736603, object _191_731369_733642 */
++static void __lambda_991(void *data, object self_7312643, int argc, object *args) /* object self_7312643, object r_736130 */
+ {
+- object k_736603 = args[0];
++ object r_736130 = args[0];
+
+-closureN_type c_7323381;
+-object e_7323404 [6];
+-c_7323381.hdr.mark = gc_color_red;
+- c_7323381.hdr.grayed = 0;
+-c_7323381.tag = closureN_tag;
+- c_7323381.fn = (function_type)__lambda_995;
+-c_7323381.num_args = 1;
+-c_7323381.num_elements = 6;
+-c_7323381.elements = (object *)e_7323404;
+-c_7323381.elements[0] = ((closureN)self_7313881)->elements[0];
+-c_7323381.elements[1] = ((closureN)self_7313881)->elements[2];
+-c_7323381.elements[2] = k_736603;
+-c_7323381.elements[3] = ((closureN)self_7313881)->elements[3];
+-c_7323381.elements[4] = ((closureN)self_7313881)->elements[4];
+-c_7323381.elements[5] = ((closureN)self_7313881)->elements[5];
++list_4_type local_7321995;
++
++pair_type local_7322000;
+
++list_2_type local_7322003;
+
+-closureN_type c_7323405;
+-object e_7323413 [1];
+-c_7323405.hdr.mark = gc_color_red;
+- c_7323405.hdr.grayed = 0;
+-c_7323405.tag = closureN_tag;
+- c_7323405.fn = (function_type)__lambda_998;
+-c_7323405.num_args = 2;
+-c_7323405.num_elements = 1;
+-c_7323405.elements = (object *)e_7323413;
+-c_7323405.elements[0] = ((closureN)self_7313881)->elements[1];
++list_4_type local_7322009;
+
+-return_direct_with_clo1(data,(closure)&c_7323381,__lambda_995, &c_7323405);;
++list_2_type local_7322013;
++
++list_3_type local_7322018;
++
++list_2_type local_7322022;
++return_direct_with_clo1(data, ((closureN)self_7312643)->elements[6], (((closure) ((closureN)self_7312643)->elements[6])->fn), Cyc_fast_list_4(&local_7321995, ((closureN)self_7312643)->elements[2], ((closureN)self_7312643)->elements[3], set_pair_as_expr(&local_7322000, Cyc_fast_list_2(&local_7322003, ((closureN)self_7312643)->elements[10], ((closureN)self_7312643)->elements[9]), ((closureN)self_7312643)->elements[8]), Cyc_fast_list_4(&local_7322009, ((closureN)self_7312643)->elements[1], Cyc_fast_list_2(&local_7322013, ((closureN)self_7312643)->elements[4], ((closureN)self_7312643)->elements[10]), r_736130, Cyc_fast_list_3(&local_7322018, ((closureN)self_7312643)->elements[0], Cyc_fast_list_2(&local_7322022, ((closureN)self_7312643)->elements[5], ((closureN)self_7312643)->elements[10]), ((closureN)self_7312643)->elements[7]))));;
+ }
+
+-static void __lambda_998(void *data, object self_7313882, int argc, object *args) /* object self_7313882, object k_736608, object x_731370_733643, object l_731371_733644 */
++static void __lambda_977(void *data, object self_7312619, int argc, object *args) /* object self_7312619, object r_736115 */
+ {
+- object k_736608 = args[0]; object x_731370_733643 = args[1]; object l_731371_733644 = args[2];
++ object r_736115 = args[0];
+
+-list_3_type local_7323409;
++list_3_type local_7321914;
++
++list_2_type local_7321918;
++
++list_3_type local_7321923;
+
++pair_type local_7321927;
+
+-return_direct_with_clo1(data, k_736608, (((closure) k_736608)->fn), Cyc_fast_list_3(&local_7323409, ((closureN)self_7313882)->elements[0], Cyc_car(data, x_731370_733643), l_731371_733644));;
++list_2_type local_7321930;
++
++
++return_direct_with_clo1(data, ((closureN)self_7312619)->elements[3], (((closure) ((closureN)self_7312619)->elements[3])->fn), Cyc_fast_list_3(&local_7321914, ((closureN)self_7312619)->elements[0], Cyc_fast_list_2(&local_7321918, ((closureN)self_7312619)->elements[2], ((closureN)self_7312619)->elements[5]), Cyc_fast_list_3(&local_7321923, ((closureN)self_7312619)->elements[1], set_cell_as_expr(&local_7321927, Cyc_fast_list_2(&local_7321930, Cyc_car(data, ((closureN)self_7312619)->elements[4]), ((closureN)self_7312619)->elements[5])), r_736115)));;
++}
++
++static void __lambda_973(void *data, object self_7312610, int argc, object *args) /* object self_7312610, object k_736108, object l_731322_733283 */
++ {
++ object k_736108 = args[0]; object l_731322_733283 = args[1];
++ return_closcall3(data, ((closureN)self_7312610)->elements[0], k_736108, ((closureN)self_7312610)->elements[1], l_731322_733283);;
+ }
+
+-static void __lambda_995(void *data, object self_7313883, int argc, object *args) /* object self_7313883, object r_736607 */
++static void __lambda_968(void *data, object self_7312611, int argc, object *args) /* object self_7312611, object r_736107 */
+ {
+- object r_736607 = args[0];
++ object r_736107 = args[0];
+
+-closureN_type c_7323383;
+-object e_7323401 [4];
+-c_7323383.hdr.mark = gc_color_red;
+- c_7323383.hdr.grayed = 0;
+-c_7323383.tag = closureN_tag;
+- c_7323383.fn = (function_type)__lambda_996;
+-c_7323383.num_args = 1;
+-c_7323383.num_elements = 4;
+-c_7323383.elements = (object *)e_7323401;
+-c_7323383.elements[0] = ((closureN)self_7313883)->elements[0];
+-c_7323383.elements[1] = ((closureN)self_7313883)->elements[1];
+-c_7323383.elements[2] = ((closureN)self_7313883)->elements[2];
+-c_7323383.elements[3] = ((closureN)self_7313883)->elements[5];
++closureN_type c_7321827;
++object e_7321884 [11];
++c_7321827.hdr.mark = gc_color_red;
++ c_7321827.hdr.grayed = 0;
++c_7321827.tag = closureN_tag;
++ c_7321827.fn = (function_type)__lambda_969;
++c_7321827.num_args = 1;
++c_7321827.num_elements = 11;
++c_7321827.elements = (object *)e_7321884;
++c_7321827.elements[0] = ((closureN)self_7312611)->elements[0];
++c_7321827.elements[1] = ((closureN)self_7312611)->elements[1];
++c_7321827.elements[2] = ((closureN)self_7312611)->elements[2];
++c_7321827.elements[3] = ((closureN)self_7312611)->elements[3];
++c_7321827.elements[4] = ((closureN)self_7312611)->elements[4];
++c_7321827.elements[5] = ((closureN)self_7312611)->elements[5];
++c_7321827.elements[6] = ((closureN)self_7312611)->elements[6];
++c_7321827.elements[7] = ((closureN)self_7312611)->elements[7];
++c_7321827.elements[8] = ((closureN)self_7312611)->elements[9];
++c_7321827.elements[9] = ((closureN)self_7312611)->elements[10];
++c_7321827.elements[10] = ((closureN)self_7312611)->elements[11];
++
+
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7323383, r_736607, ((closureN)self_7313883)->elements[4], ((closureN)self_7313883)->elements[3]);;
++
++return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), &c_7321827, r_736107, car(((closureN)self_7312611)->elements[8]));;
+ }
+
+-static void __lambda_996(void *data, object self_7313884, int argc, object *args) /* object self_7313884, object r_736606 */
++static void __lambda_969(void *data, object self_7312612, int argc, object *args) /* object self_7312612, object r_736097 */
+ {
+- object r_736606 = args[0];
++ object r_736097 = args[0];
++ if( (boolean_f != r_736097) ){
++
++closureN_type c_7321829;
++object e_7321851 [7];
++c_7321829.hdr.mark = gc_color_red;
++ c_7321829.hdr.grayed = 0;
++c_7321829.tag = closureN_tag;
++ c_7321829.fn = (function_type)__lambda_970;
++c_7321829.num_args = 1;
++c_7321829.num_elements = 7;
++c_7321829.elements = (object *)e_7321851;
++c_7321829.elements[0] = ((closureN)self_7312612)->elements[0];
++c_7321829.elements[1] = ((closureN)self_7312612)->elements[1];
++c_7321829.elements[2] = ((closureN)self_7312612)->elements[4];
++c_7321829.elements[3] = ((closureN)self_7312612)->elements[6];
++c_7321829.elements[4] = ((closureN)self_7312612)->elements[7];
++c_7321829.elements[5] = ((closureN)self_7312612)->elements[9];
++c_7321829.elements[6] = ((closureN)self_7312612)->elements[10];
++
++
++list_2_type local_7321854;
++return_direct_with_clo1(data,(closure)&c_7321829,__lambda_970, Cyc_fast_list_2(&local_7321854, ((closureN)self_7312612)->elements[3], ((closureN)self_7312612)->elements[8]));
++} else {
+
+-closureN_type c_7323385;
+-object e_7323392 [2];
+-c_7323385.hdr.mark = gc_color_red;
+- c_7323385.hdr.grayed = 0;
+-c_7323385.tag = closureN_tag;
+- c_7323385.fn = (function_type)__lambda_997;
+-c_7323385.num_args = 1;
+-c_7323385.num_elements = 2;
+-c_7323385.elements = (object *)e_7323392;
+-c_7323385.elements[0] = ((closureN)self_7313884)->elements[1];
+-c_7323385.elements[1] = ((closureN)self_7313884)->elements[2];
++closureN_type c_7321859;
++object e_7321874 [4];
++c_7321859.hdr.mark = gc_color_red;
++ c_7321859.hdr.grayed = 0;
++c_7321859.tag = closureN_tag;
++ c_7321859.fn = (function_type)__lambda_972;
++c_7321859.num_args = 1;
++c_7321859.num_elements = 4;
++c_7321859.elements = (object *)e_7321874;
++c_7321859.elements[0] = ((closureN)self_7312612)->elements[2];
++c_7321859.elements[1] = ((closureN)self_7312612)->elements[7];
++c_7321859.elements[2] = ((closureN)self_7312612)->elements[8];
++c_7321859.elements[3] = ((closureN)self_7312612)->elements[9];
+
+
+-pair_type local_7323395;
++pair_type local_7321877;
+
+-list_2_type local_7323398;
+-return_direct_with_clo1(data,(closure)&c_7323385,__lambda_997, set_pair_as_expr(&local_7323395, Cyc_fast_list_2(&local_7323398, ((closureN)self_7313884)->elements[0], ((closureN)self_7313884)->elements[3]), r_736606));;
++pair_type local_7321880;
++return_closcall2(data, ((closureN)self_7312612)->elements[6], &c_7321859, set_pair_as_expr(&local_7321877, set_pair_as_expr(&local_7321880, ((closureN)self_7312612)->elements[8], ((closureN)self_7312612)->elements[5]), ((closureN)self_7312612)->elements[10]));}
++;;
+ }
+
+-static void __lambda_997(void *data, object self_7313885, int argc, object *args) /* object self_7313885, object r_736604 */
++static void __lambda_972(void *data, object self_7312615, int argc, object *args) /* object self_7312615, object r_736103 */
+ {
+- object r_736604 = args[0];
++ object r_736103 = args[0];
+
+-pair_type local_7323390;
+-return_direct_with_clo1(data, ((closureN)self_7313885)->elements[1], (((closure) ((closureN)self_7313885)->elements[1])->fn), set_pair_as_expr(&local_7323390, ((closureN)self_7313885)->elements[0], r_736604));;
++list_3_type local_7321864;
++
++pair_type local_7321868;
++
++list_2_type local_7321871;
++return_direct_with_clo1(data, ((closureN)self_7312615)->elements[1], (((closure) ((closureN)self_7312615)->elements[1])->fn), Cyc_fast_list_3(&local_7321864, ((closureN)self_7312615)->elements[0], set_cell_as_expr(&local_7321868, Cyc_fast_list_2(&local_7321871, ((closureN)self_7312615)->elements[2], ((closureN)self_7312615)->elements[3])), r_736103));;
+ }
+
+-static void __lambda_983(void *data, object self_7313886, int argc, object *args) /* object self_7313886, object r_736602 */
++static void __lambda_970(void *data, object self_7312613, int argc, object *args) /* object self_7312613, object r_736101 */
+ {
+- object r_736602 = args[0];
++ object r_736101 = args[0];
+
++closureN_type c_7321832;
++object e_7321849 [6];
++c_7321832.hdr.mark = gc_color_red;
++ c_7321832.hdr.grayed = 0;
++c_7321832.tag = closureN_tag;
++ c_7321832.fn = (function_type)__lambda_971;
++c_7321832.num_args = 1;
++c_7321832.num_elements = 6;
++c_7321832.elements = (object *)e_7321849;
++c_7321832.elements[0] = ((closureN)self_7312613)->elements[0];
++c_7321832.elements[1] = ((closureN)self_7312613)->elements[1];
++c_7321832.elements[2] = ((closureN)self_7312613)->elements[2];
++c_7321832.elements[3] = ((closureN)self_7312613)->elements[4];
++c_7321832.elements[4] = r_736101;
++c_7321832.elements[5] = ((closureN)self_7312613)->elements[5];
+
++return_closcall2(data, ((closureN)self_7312613)->elements[3], &c_7321832, ((closureN)self_7312613)->elements[6]);;
++}
+
+-closureN_type c_7323275;
+-object e_7323365 [15];
+-c_7323275.hdr.mark = gc_color_red;
+- c_7323275.hdr.grayed = 0;
+-c_7323275.tag = closureN_tag;
+- c_7323275.fn = (function_type)__lambda_984;
+-c_7323275.num_args = 1;
+-c_7323275.num_elements = 15;
+-c_7323275.elements = (object *)e_7323365;
+-c_7323275.elements[0] = ((closureN)self_7313886)->elements[0];
+-c_7323275.elements[1] = ((closureN)self_7313886)->elements[2];
+-c_7323275.elements[2] = ((closureN)self_7313886)->elements[3];
+-c_7323275.elements[3] = ((closureN)self_7313886)->elements[4];
+-c_7323275.elements[4] = ((closureN)self_7313886)->elements[5];
+-c_7323275.elements[5] = ((closureN)self_7313886)->elements[6];
+-c_7323275.elements[6] = ((closureN)self_7313886)->elements[7];
+-c_7323275.elements[7] = ((closureN)self_7313886)->elements[8];
+-c_7323275.elements[8] = ((closureN)self_7313886)->elements[10];
+-c_7323275.elements[9] = ((closureN)self_7313886)->elements[11];
+-c_7323275.elements[10] = ((closureN)self_7313886)->elements[13];
+-c_7323275.elements[11] = ((closureN)self_7313886)->elements[14];
+-c_7323275.elements[12] = ((closureN)self_7313886)->elements[16];
+-c_7323275.elements[13] = ((closureN)self_7313886)->elements[17];
+-c_7323275.elements[14] = ((closureN)self_7313886)->elements[18];
+-
+-
+-
+-
+-list_2_type local_7323371;
+-
+-complex_num_type local_7323376;
+-return_closcall6(data, car(((closureN)self_7313886)->elements[12]), &c_7323275, Cyc_car(data, ((closureN)self_7313886)->elements[15]), Cyc_fast_list_2(&local_7323371, ((closureN)self_7313886)->elements[1], ((closureN)self_7313886)->elements[18]), Cyc_fast_sum(data,&local_7323376, ((closureN)self_7313886)->elements[9], obj_int2obj(1)), NULL, r_736602);;
+-}
+-
+-static void __lambda_984(void *data, object self_7313887, int argc, object *args) /* object self_7313887, object once_731364_733638 */
+- {
+- object once_731364_733638 = args[0];
+-
+-closureN_type c_7323277;
+-object e_7323354 [15];
+-c_7323277.hdr.mark = gc_color_red;
+- c_7323277.hdr.grayed = 0;
+-c_7323277.tag = closureN_tag;
+- c_7323277.fn = (function_type)__lambda_985;
+-c_7323277.num_args = 1;
+-c_7323277.num_elements = 15;
+-c_7323277.elements = (object *)e_7323354;
+-c_7323277.elements[0] = ((closureN)self_7313887)->elements[0];
+-c_7323277.elements[1] = ((closureN)self_7313887)->elements[1];
+-c_7323277.elements[2] = ((closureN)self_7313887)->elements[2];
+-c_7323277.elements[3] = ((closureN)self_7313887)->elements[3];
+-c_7323277.elements[4] = ((closureN)self_7313887)->elements[4];
+-c_7323277.elements[5] = ((closureN)self_7313887)->elements[5];
+-c_7323277.elements[6] = ((closureN)self_7313887)->elements[7];
+-c_7323277.elements[7] = ((closureN)self_7313887)->elements[8];
+-c_7323277.elements[8] = ((closureN)self_7313887)->elements[9];
+-c_7323277.elements[9] = ((closureN)self_7313887)->elements[10];
+-c_7323277.elements[10] = ((closureN)self_7313887)->elements[11];
+-c_7323277.elements[11] = once_731364_733638;
+-c_7323277.elements[12] = ((closureN)self_7313887)->elements[12];
+-c_7323277.elements[13] = ((closureN)self_7313887)->elements[13];
+-c_7323277.elements[14] = ((closureN)self_7313887)->elements[14];
+-
+-
+-closureN_type c_7323355;
+-object e_7323364 [1];
+-c_7323355.hdr.mark = gc_color_red;
+- c_7323355.hdr.grayed = 0;
+-c_7323355.tag = closureN_tag;
+- c_7323355.fn = (function_type)__lambda_993;
+-c_7323355.num_args = 1;
+-c_7323355.num_elements = 1;
+-c_7323355.elements = (object *)e_7323364;
+-c_7323355.elements[0] = ((closureN)self_7313887)->elements[6];
+-
+-return_direct_with_clo1(data,(closure)&c_7323277,__lambda_985, &c_7323355);;
+-}
+-
+-static void __lambda_993(void *data, object self_7313888, int argc, object *args) /* object self_7313888, object k_736595, object x_731366_733639 */
+- {
+- object k_736595 = args[0]; object x_731366_733639 = args[1];
+-
+-list_2_type local_7323359;
+-
+-list_2_type local_7323362;
+-return_direct_with_clo1(data, k_736595, (((closure) k_736595)->fn), Cyc_fast_list_2(&local_7323359, x_731366_733639, Cyc_fast_list_2(&local_7323362, ((closureN)self_7313888)->elements[0], NULL)));;
+-}
+-
+-static void __lambda_985(void *data, object self_7313889, int argc, object *args) /* object self_7313889, object r_736594 */
+- {
+- object r_736594 = args[0];
+-
+-closureN_type c_7323279;
+-object e_7323352 [15];
+-c_7323279.hdr.mark = gc_color_red;
+- c_7323279.hdr.grayed = 0;
+-c_7323279.tag = closureN_tag;
+- c_7323279.fn = (function_type)__lambda_986;
+-c_7323279.num_args = 1;
+-c_7323279.num_elements = 15;
+-c_7323279.elements = (object *)e_7323352;
+-c_7323279.elements[0] = ((closureN)self_7313889)->elements[0];
+-c_7323279.elements[1] = ((closureN)self_7313889)->elements[1];
+-c_7323279.elements[2] = ((closureN)self_7313889)->elements[2];
+-c_7323279.elements[3] = ((closureN)self_7313889)->elements[3];
+-c_7323279.elements[4] = ((closureN)self_7313889)->elements[4];
+-c_7323279.elements[5] = ((closureN)self_7313889)->elements[5];
+-c_7323279.elements[6] = ((closureN)self_7313889)->elements[6];
+-c_7323279.elements[7] = ((closureN)self_7313889)->elements[7];
+-c_7323279.elements[8] = ((closureN)self_7313889)->elements[8];
+-c_7323279.elements[9] = ((closureN)self_7313889)->elements[9];
+-c_7323279.elements[10] = ((closureN)self_7313889)->elements[10];
+-c_7323279.elements[11] = ((closureN)self_7313889)->elements[11];
+-c_7323279.elements[12] = ((closureN)self_7313889)->elements[12];
+-c_7323279.elements[13] = ((closureN)self_7313889)->elements[13];
+-c_7323279.elements[14] = ((closureN)self_7313889)->elements[14];
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7323279, r_736594, ((closureN)self_7313889)->elements[9]);;
+-}
+-
+-static void __lambda_986(void *data, object self_7313890, int argc, object *args) /* object self_7313890, object r_736593 */
+- {
+- object r_736593 = args[0];
+-
+-closureN_type c_7323281;
+-object e_7323339 [15];
+-c_7323281.hdr.mark = gc_color_red;
+- c_7323281.hdr.grayed = 0;
+-c_7323281.tag = closureN_tag;
+- c_7323281.fn = (function_type)__lambda_987;
+-c_7323281.num_args = 1;
+-c_7323281.num_elements = 15;
+-c_7323281.elements = (object *)e_7323339;
+-c_7323281.elements[0] = ((closureN)self_7313890)->elements[0];
+-c_7323281.elements[1] = ((closureN)self_7313890)->elements[1];
+-c_7323281.elements[2] = ((closureN)self_7313890)->elements[2];
+-c_7323281.elements[3] = ((closureN)self_7313890)->elements[3];
+-c_7323281.elements[4] = ((closureN)self_7313890)->elements[4];
+-c_7323281.elements[5] = ((closureN)self_7313890)->elements[5];
+-c_7323281.elements[6] = ((closureN)self_7313890)->elements[7];
+-c_7323281.elements[7] = ((closureN)self_7313890)->elements[8];
+-c_7323281.elements[8] = ((closureN)self_7313890)->elements[9];
+-c_7323281.elements[9] = ((closureN)self_7313890)->elements[10];
+-c_7323281.elements[10] = ((closureN)self_7313890)->elements[11];
+-c_7323281.elements[11] = r_736593;
+-c_7323281.elements[12] = ((closureN)self_7313890)->elements[12];
+-c_7323281.elements[13] = ((closureN)self_7313890)->elements[13];
+-c_7323281.elements[14] = ((closureN)self_7313890)->elements[14];
+-
++static void __lambda_971(void *data, object self_7312614, int argc, object *args) /* object self_7312614, object r_736099 */
++ {
++ object r_736099 = args[0];
++
++list_3_type local_7321837;
+
+-closureN_type c_7323340;
+-object e_7323351 [1];
+-c_7323340.hdr.mark = gc_color_red;
+- c_7323340.hdr.grayed = 0;
+-c_7323340.tag = closureN_tag;
+- c_7323340.fn = (function_type)__lambda_992;
+-c_7323340.num_args = 2;
+-c_7323340.num_elements = 1;
+-c_7323340.elements = (object *)e_7323351;
+-c_7323340.elements[0] = ((closureN)self_7313890)->elements[6];
++list_3_type local_7321841;
+
+-return_direct_with_clo1(data,(closure)&c_7323281,__lambda_987, &c_7323340);;
++list_2_type local_7321846;
++return_direct_with_clo1(data, ((closureN)self_7312614)->elements[3], (((closure) ((closureN)self_7312614)->elements[3])->fn), Cyc_fast_list_3(&local_7321837, ((closureN)self_7312614)->elements[0], Cyc_fast_list_3(&local_7321841, ((closureN)self_7312614)->elements[1], ((closureN)self_7312614)->elements[5], Cyc_fast_list_2(&local_7321846, ((closureN)self_7312614)->elements[2], ((closureN)self_7312614)->elements[4])), r_736099));;
+ }
+
+-static void __lambda_992(void *data, object self_7313891, int argc, object *args) /* object self_7313891, object k_736589, object x_731367_733640, object l_731368_733641 */
++static void __lambda_962(void *data, object self_7312659, int argc, object *args) /* object self_7312659, object r_736090 */
+ {
+- object k_736589 = args[0]; object x_731367_733640 = args[1]; object l_731368_733641 = args[2];
++ object r_736090 = args[0];
+
+-list_2_type local_7323344;
++closureN_type c_7321799;
++object e_7321809 [6];
++c_7321799.hdr.mark = gc_color_red;
++ c_7321799.hdr.grayed = 0;
++c_7321799.tag = closureN_tag;
++ c_7321799.fn = (function_type)__lambda_963;
++c_7321799.num_args = 1;
++c_7321799.num_elements = 6;
++c_7321799.elements = (object *)e_7321809;
++c_7321799.elements[0] = ((closureN)self_7312659)->elements[0];
++c_7321799.elements[1] = ((closureN)self_7312659)->elements[1];
++c_7321799.elements[2] = ((closureN)self_7312659)->elements[2];
++c_7321799.elements[3] = ((closureN)self_7312659)->elements[3];
++c_7321799.elements[4] = ((closureN)self_7312659)->elements[4];
++c_7321799.elements[5] = ((closureN)self_7312659)->elements[5];
+
+
+
+-list_2_type local_7323349;
+-return_direct_with_clo1(data, k_736589, (((closure) k_736589)->fn), Cyc_fast_list_2(&local_7323344, Cyc_car(data, x_731367_733640), Cyc_fast_list_2(&local_7323349, ((closureN)self_7313891)->elements[0], l_731368_733641)));;
++return_direct_with_clo1(data,(closure)&c_7321799,__lambda_963, Cyc_set_cell(data, ((closureN)self_7312659)->elements[2], r_736090));;
+ }
+
+-static void __lambda_987(void *data, object self_7313892, int argc, object *args) /* object self_7313892, object r_736588 */
++static void __lambda_963(void *data, object self_7312660, int argc, object *args) /* object self_7312660, object r_736089 */
+ {
+- object r_736588 = args[0];
++
+
+-closureN_type c_7323283;
+-object e_7323336 [14];
+-c_7323283.hdr.mark = gc_color_red;
+- c_7323283.hdr.grayed = 0;
+-c_7323283.tag = closureN_tag;
+- c_7323283.fn = (function_type)__lambda_988;
+-c_7323283.num_args = 1;
+-c_7323283.num_elements = 14;
+-c_7323283.elements = (object *)e_7323336;
+-c_7323283.elements[0] = ((closureN)self_7313892)->elements[0];
+-c_7323283.elements[1] = ((closureN)self_7313892)->elements[1];
+-c_7323283.elements[2] = ((closureN)self_7313892)->elements[2];
+-c_7323283.elements[3] = ((closureN)self_7313892)->elements[3];
+-c_7323283.elements[4] = ((closureN)self_7313892)->elements[4];
+-c_7323283.elements[5] = ((closureN)self_7313892)->elements[5];
+-c_7323283.elements[6] = ((closureN)self_7313892)->elements[6];
+-c_7323283.elements[7] = ((closureN)self_7313892)->elements[7];
+-c_7323283.elements[8] = ((closureN)self_7313892)->elements[9];
+-c_7323283.elements[9] = ((closureN)self_7313892)->elements[10];
+-c_7323283.elements[10] = ((closureN)self_7313892)->elements[11];
+-c_7323283.elements[11] = ((closureN)self_7313892)->elements[12];
+-c_7323283.elements[12] = ((closureN)self_7313892)->elements[13];
+-c_7323283.elements[13] = ((closureN)self_7313892)->elements[14];
+
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7323283, r_736588, ((closureN)self_7313892)->elements[9], ((closureN)self_7313892)->elements[8]);;
++return_closcall6(data, car(((closureN)self_7312660)->elements[2]), ((closureN)self_7312660)->elements[1], ((closureN)self_7312660)->elements[3], ((closureN)self_7312660)->elements[5], obj_int2obj(0), ((closureN)self_7312660)->elements[4], ((closureN)self_7312660)->elements[0]);;
+ }
+
+-static void __lambda_988(void *data, object self_7313893, int argc, object *args) /* object self_7313893, object r_736585 */
++static void __lambda_860(void *data, object self_7312661, int argc, object *args) /* object self_7312661, object r_736083 */
+ {
+- object r_736585 = args[0];
++ object r_736083 = args[0];
+
+-closureN_type c_7323285;
+-object e_7323333 [13];
+-c_7323285.hdr.mark = gc_color_red;
+- c_7323285.hdr.grayed = 0;
+-c_7323285.tag = closureN_tag;
+- c_7323285.fn = (function_type)__lambda_989;
+-c_7323285.num_args = 1;
+-c_7323285.num_elements = 13;
+-c_7323285.elements = (object *)e_7323333;
+-c_7323285.elements[0] = ((closureN)self_7313893)->elements[0];
+-c_7323285.elements[1] = ((closureN)self_7313893)->elements[1];
+-c_7323285.elements[2] = ((closureN)self_7313893)->elements[2];
+-c_7323285.elements[3] = ((closureN)self_7313893)->elements[3];
+-c_7323285.elements[4] = ((closureN)self_7313893)->elements[4];
+-c_7323285.elements[5] = ((closureN)self_7313893)->elements[5];
+-c_7323285.elements[6] = ((closureN)self_7313893)->elements[6];
+-c_7323285.elements[7] = ((closureN)self_7313893)->elements[7];
+-c_7323285.elements[8] = ((closureN)self_7313893)->elements[9];
+-c_7323285.elements[9] = r_736585;
+-c_7323285.elements[10] = ((closureN)self_7313893)->elements[10];
+-c_7323285.elements[11] = ((closureN)self_7313893)->elements[11];
+-c_7323285.elements[12] = ((closureN)self_7313893)->elements[13];
++closureN_type c_7320931;
++object e_7321782 [29];
++c_7320931.hdr.mark = gc_color_red;
++ c_7320931.hdr.grayed = 0;
++c_7320931.tag = closureN_tag;
++ c_7320931.fn = (function_type)__lambda_861;
++c_7320931.num_args = 1;
++c_7320931.num_elements = 29;
++c_7320931.elements = (object *)e_7321782;
++c_7320931.elements[0] = ((closureN)self_7312661)->elements[0];
++c_7320931.elements[1] = ((closureN)self_7312661)->elements[1];
++c_7320931.elements[2] = ((closureN)self_7312661)->elements[2];
++c_7320931.elements[3] = ((closureN)self_7312661)->elements[3];
++c_7320931.elements[4] = ((closureN)self_7312661)->elements[4];
++c_7320931.elements[5] = ((closureN)self_7312661)->elements[5];
++c_7320931.elements[6] = ((closureN)self_7312661)->elements[6];
++c_7320931.elements[7] = ((closureN)self_7312661)->elements[7];
++c_7320931.elements[8] = ((closureN)self_7312661)->elements[8];
++c_7320931.elements[9] = ((closureN)self_7312661)->elements[9];
++c_7320931.elements[10] = ((closureN)self_7312661)->elements[10];
++c_7320931.elements[11] = ((closureN)self_7312661)->elements[11];
++c_7320931.elements[12] = ((closureN)self_7312661)->elements[12];
++c_7320931.elements[13] = ((closureN)self_7312661)->elements[13];
++c_7320931.elements[14] = ((closureN)self_7312661)->elements[14];
++c_7320931.elements[15] = ((closureN)self_7312661)->elements[15];
++c_7320931.elements[16] = ((closureN)self_7312661)->elements[16];
++c_7320931.elements[17] = ((closureN)self_7312661)->elements[17];
++c_7320931.elements[18] = ((closureN)self_7312661)->elements[18];
++c_7320931.elements[19] = ((closureN)self_7312661)->elements[19];
++c_7320931.elements[20] = ((closureN)self_7312661)->elements[20];
++c_7320931.elements[21] = ((closureN)self_7312661)->elements[21];
++c_7320931.elements[22] = ((closureN)self_7312661)->elements[22];
++c_7320931.elements[23] = ((closureN)self_7312661)->elements[23];
++c_7320931.elements[24] = ((closureN)self_7312661)->elements[24];
++c_7320931.elements[25] = ((closureN)self_7312661)->elements[25];
++c_7320931.elements[26] = ((closureN)self_7312661)->elements[26];
++c_7320931.elements[27] = ((closureN)self_7312661)->elements[27];
++c_7320931.elements[28] = ((closureN)self_7312661)->elements[28];
++
+
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7323285, ((closureN)self_7313893)->elements[8], ((closureN)self_7313893)->elements[12]);;
++
++return_direct_with_clo1(data,(closure)&c_7320931,__lambda_861, Cyc_set_cell(data, ((closureN)self_7312661)->elements[22], r_736083));;
+ }
+
+-static void __lambda_989(void *data, object self_7313894, int argc, object *args) /* object self_7313894, object r_736587 */
++static void __lambda_861(void *data, object self_7312662, int argc, object *args) /* object self_7312662, object r_735936 */
+ {
+- object r_736587 = args[0];
++
+
+-closureN_type c_7323288;
+-object e_7323332 [12];
+-c_7323288.hdr.mark = gc_color_red;
+- c_7323288.hdr.grayed = 0;
+-c_7323288.tag = closureN_tag;
+- c_7323288.fn = (function_type)__lambda_990;
+-c_7323288.num_args = 1;
+-c_7323288.num_elements = 12;
+-c_7323288.elements = (object *)e_7323332;
+-c_7323288.elements[0] = ((closureN)self_7313894)->elements[0];
+-c_7323288.elements[1] = ((closureN)self_7313894)->elements[1];
+-c_7323288.elements[2] = ((closureN)self_7313894)->elements[2];
+-c_7323288.elements[3] = ((closureN)self_7313894)->elements[3];
+-c_7323288.elements[4] = ((closureN)self_7313894)->elements[4];
+-c_7323288.elements[5] = ((closureN)self_7313894)->elements[5];
+-c_7323288.elements[6] = ((closureN)self_7313894)->elements[7];
+-c_7323288.elements[7] = ((closureN)self_7313894)->elements[8];
+-c_7323288.elements[8] = ((closureN)self_7313894)->elements[9];
+-c_7323288.elements[9] = ((closureN)self_7313894)->elements[10];
+-c_7323288.elements[10] = ((closureN)self_7313894)->elements[11];
+-c_7323288.elements[11] = ((closureN)self_7313894)->elements[12];
++closureN_type c_7320933;
++object e_7321769 [29];
++c_7320933.hdr.mark = gc_color_red;
++ c_7320933.hdr.grayed = 0;
++c_7320933.tag = closureN_tag;
++ c_7320933.fn = (function_type)__lambda_862;
++c_7320933.num_args = 1;
++c_7320933.num_elements = 29;
++c_7320933.elements = (object *)e_7321769;
++c_7320933.elements[0] = ((closureN)self_7312662)->elements[0];
++c_7320933.elements[1] = ((closureN)self_7312662)->elements[1];
++c_7320933.elements[2] = ((closureN)self_7312662)->elements[2];
++c_7320933.elements[3] = ((closureN)self_7312662)->elements[3];
++c_7320933.elements[4] = ((closureN)self_7312662)->elements[4];
++c_7320933.elements[5] = ((closureN)self_7312662)->elements[5];
++c_7320933.elements[6] = ((closureN)self_7312662)->elements[6];
++c_7320933.elements[7] = ((closureN)self_7312662)->elements[7];
++c_7320933.elements[8] = ((closureN)self_7312662)->elements[8];
++c_7320933.elements[9] = ((closureN)self_7312662)->elements[9];
++c_7320933.elements[10] = ((closureN)self_7312662)->elements[10];
++c_7320933.elements[11] = ((closureN)self_7312662)->elements[11];
++c_7320933.elements[12] = ((closureN)self_7312662)->elements[12];
++c_7320933.elements[13] = ((closureN)self_7312662)->elements[13];
++c_7320933.elements[14] = ((closureN)self_7312662)->elements[14];
++c_7320933.elements[15] = ((closureN)self_7312662)->elements[15];
++c_7320933.elements[16] = ((closureN)self_7312662)->elements[16];
++c_7320933.elements[17] = ((closureN)self_7312662)->elements[17];
++c_7320933.elements[18] = ((closureN)self_7312662)->elements[18];
++c_7320933.elements[19] = ((closureN)self_7312662)->elements[19];
++c_7320933.elements[20] = ((closureN)self_7312662)->elements[20];
++c_7320933.elements[21] = ((closureN)self_7312662)->elements[21];
++c_7320933.elements[22] = ((closureN)self_7312662)->elements[22];
++c_7320933.elements[23] = ((closureN)self_7312662)->elements[23];
++c_7320933.elements[24] = ((closureN)self_7312662)->elements[24];
++c_7320933.elements[25] = ((closureN)self_7312662)->elements[25];
++c_7320933.elements[26] = ((closureN)self_7312662)->elements[26];
++c_7320933.elements[27] = ((closureN)self_7312662)->elements[27];
++c_7320933.elements[28] = ((closureN)self_7312662)->elements[28];
+
+-return_closcall2(data, ((closureN)self_7313894)->elements[6], &c_7323288, r_736587);;
++
++closureN_type c_7321770;
++object e_7321781 [2];
++c_7321770.hdr.mark = gc_color_red;
++ c_7321770.hdr.grayed = 0;
++c_7321770.tag = closureN_tag;
++ c_7321770.fn = (function_type)__lambda_957;
++c_7321770.num_args = 1;
++c_7321770.num_elements = 2;
++c_7321770.elements = (object *)e_7321781;
++c_7321770.elements[0] = ((closureN)self_7312662)->elements[16];
++c_7321770.elements[1] = ((closureN)self_7312662)->elements[17];
++
++return_direct_with_clo1(data,(closure)&c_7320933,__lambda_862, &c_7321770);;
+ }
+
+-static void __lambda_990(void *data, object self_7313895, int argc, object *args) /* object self_7313895, object r_736586 */
++static void __lambda_957(void *data, object self_7312663, int argc, object *args) /* object self_7312663, object k_736080, object x_731385_733301 */
+ {
+- object r_736586 = args[0];
++ object k_736080 = args[0]; object x_731385_733301 = args[1];
++
++if( (boolean_f != Cyc_is_pair(x_731385_733301)) ){
+
+-closureN_type c_7323290;
+-object e_7323326 [11];
+-c_7323290.hdr.mark = gc_color_red;
+- c_7323290.hdr.grayed = 0;
+-c_7323290.tag = closureN_tag;
+- c_7323290.fn = (function_type)__lambda_991;
+-c_7323290.num_args = 1;
+-c_7323290.num_elements = 11;
+-c_7323290.elements = (object *)e_7323326;
+-c_7323290.elements[0] = ((closureN)self_7313895)->elements[0];
+-c_7323290.elements[1] = ((closureN)self_7313895)->elements[1];
+-c_7323290.elements[2] = ((closureN)self_7313895)->elements[2];
+-c_7323290.elements[3] = ((closureN)self_7313895)->elements[3];
+-c_7323290.elements[4] = ((closureN)self_7313895)->elements[4];
+-c_7323290.elements[5] = ((closureN)self_7313895)->elements[5];
+-c_7323290.elements[6] = ((closureN)self_7313895)->elements[6];
+-c_7323290.elements[7] = ((closureN)self_7313895)->elements[7];
+-c_7323290.elements[8] = ((closureN)self_7313895)->elements[9];
+-c_7323290.elements[9] = ((closureN)self_7313895)->elements[10];
+-c_7323290.elements[10] = ((closureN)self_7313895)->elements[11];
+
+
+-list_3_type local_7323329;
+-return_direct_with_clo1(data,(closure)&c_7323290,__lambda_991, Cyc_fast_list_3(&local_7323329, ((closureN)self_7313895)->elements[2], ((closureN)self_7313895)->elements[8], r_736586));;
++
++return_closcall3(data, ((closureN)self_7312663)->elements[0], k_736080, car(((closureN)self_7312663)->elements[1]), Cyc_car(data, x_731385_733301));
++} else {
++ return_direct_with_clo1(data, k_736080, (((closure) k_736080)->fn), boolean_f);}
++;;
+ }
+
+-static void __lambda_991(void *data, object self_7313896, int argc, object *args) /* object self_7313896, object r_736582 */
++static void __lambda_862(void *data, object self_7312664, int argc, object *args) /* object self_7312664, object r_736079 */
+ {
+- object r_736582 = args[0];
++ object r_736079 = args[0];
+
+-list_4_type local_7323295;
++closureN_type c_7320935;
++object e_7321765 [29];
++c_7320935.hdr.mark = gc_color_red;
++ c_7320935.hdr.grayed = 0;
++c_7320935.tag = closureN_tag;
++ c_7320935.fn = (function_type)__lambda_863;
++c_7320935.num_args = 1;
++c_7320935.num_elements = 29;
++c_7320935.elements = (object *)e_7321765;
++c_7320935.elements[0] = ((closureN)self_7312664)->elements[0];
++c_7320935.elements[1] = ((closureN)self_7312664)->elements[1];
++c_7320935.elements[2] = ((closureN)self_7312664)->elements[2];
++c_7320935.elements[3] = ((closureN)self_7312664)->elements[3];
++c_7320935.elements[4] = ((closureN)self_7312664)->elements[4];
++c_7320935.elements[5] = ((closureN)self_7312664)->elements[5];
++c_7320935.elements[6] = ((closureN)self_7312664)->elements[6];
++c_7320935.elements[7] = ((closureN)self_7312664)->elements[7];
++c_7320935.elements[8] = ((closureN)self_7312664)->elements[8];
++c_7320935.elements[9] = ((closureN)self_7312664)->elements[9];
++c_7320935.elements[10] = ((closureN)self_7312664)->elements[10];
++c_7320935.elements[11] = ((closureN)self_7312664)->elements[11];
++c_7320935.elements[12] = ((closureN)self_7312664)->elements[12];
++c_7320935.elements[13] = ((closureN)self_7312664)->elements[13];
++c_7320935.elements[14] = ((closureN)self_7312664)->elements[14];
++c_7320935.elements[15] = ((closureN)self_7312664)->elements[15];
++c_7320935.elements[16] = ((closureN)self_7312664)->elements[16];
++c_7320935.elements[17] = ((closureN)self_7312664)->elements[17];
++c_7320935.elements[18] = ((closureN)self_7312664)->elements[18];
++c_7320935.elements[19] = ((closureN)self_7312664)->elements[19];
++c_7320935.elements[20] = ((closureN)self_7312664)->elements[20];
++c_7320935.elements[21] = ((closureN)self_7312664)->elements[21];
++c_7320935.elements[22] = ((closureN)self_7312664)->elements[22];
++c_7320935.elements[23] = ((closureN)self_7312664)->elements[23];
++c_7320935.elements[24] = ((closureN)self_7312664)->elements[24];
++c_7320935.elements[25] = ((closureN)self_7312664)->elements[25];
++c_7320935.elements[26] = ((closureN)self_7312664)->elements[26];
++c_7320935.elements[27] = ((closureN)self_7312664)->elements[27];
++c_7320935.elements[28] = ((closureN)self_7312664)->elements[28];
++
++
+
+-pair_type local_7323300;
++return_direct_with_clo1(data,(closure)&c_7320935,__lambda_863, Cyc_set_cell(data, ((closureN)self_7312664)->elements[19], r_736079));;
++}
+
+-list_2_type local_7323303;
++static void __lambda_863(void *data, object self_7312665, int argc, object *args) /* object self_7312665, object r_735937 */
++ {
+
+-list_4_type local_7323309;
++
++closureN_type c_7320937;
++object e_7321747 [28];
++c_7320937.hdr.mark = gc_color_red;
++ c_7320937.hdr.grayed = 0;
++c_7320937.tag = closureN_tag;
++ c_7320937.fn = (function_type)__lambda_864;
++c_7320937.num_args = 1;
++c_7320937.num_elements = 28;
++c_7320937.elements = (object *)e_7321747;
++c_7320937.elements[0] = ((closureN)self_7312665)->elements[0];
++c_7320937.elements[1] = ((closureN)self_7312665)->elements[1];
++c_7320937.elements[2] = ((closureN)self_7312665)->elements[2];
++c_7320937.elements[3] = ((closureN)self_7312665)->elements[3];
++c_7320937.elements[4] = ((closureN)self_7312665)->elements[4];
++c_7320937.elements[5] = ((closureN)self_7312665)->elements[5];
++c_7320937.elements[6] = ((closureN)self_7312665)->elements[6];
++c_7320937.elements[7] = ((closureN)self_7312665)->elements[7];
++c_7320937.elements[8] = ((closureN)self_7312665)->elements[8];
++c_7320937.elements[9] = ((closureN)self_7312665)->elements[9];
++c_7320937.elements[10] = ((closureN)self_7312665)->elements[10];
++c_7320937.elements[11] = ((closureN)self_7312665)->elements[11];
++c_7320937.elements[12] = ((closureN)self_7312665)->elements[12];
++c_7320937.elements[13] = ((closureN)self_7312665)->elements[13];
++c_7320937.elements[14] = ((closureN)self_7312665)->elements[14];
++c_7320937.elements[15] = ((closureN)self_7312665)->elements[15];
++c_7320937.elements[16] = ((closureN)self_7312665)->elements[16];
++c_7320937.elements[17] = ((closureN)self_7312665)->elements[18];
++c_7320937.elements[18] = ((closureN)self_7312665)->elements[19];
++c_7320937.elements[19] = ((closureN)self_7312665)->elements[20];
++c_7320937.elements[20] = ((closureN)self_7312665)->elements[21];
++c_7320937.elements[21] = ((closureN)self_7312665)->elements[22];
++c_7320937.elements[22] = ((closureN)self_7312665)->elements[23];
++c_7320937.elements[23] = ((closureN)self_7312665)->elements[24];
++c_7320937.elements[24] = ((closureN)self_7312665)->elements[25];
++c_7320937.elements[25] = ((closureN)self_7312665)->elements[26];
++c_7320937.elements[26] = ((closureN)self_7312665)->elements[27];
++c_7320937.elements[27] = ((closureN)self_7312665)->elements[28];
+
+-list_2_type local_7323313;
+
+-list_3_type local_7323318;
++closureN_type c_7321748;
++object e_7321764 [2];
++c_7321748.hdr.mark = gc_color_red;
++ c_7321748.hdr.grayed = 0;
++c_7321748.tag = closureN_tag;
++ c_7321748.fn = (function_type)__lambda_956;
++c_7321748.num_args = 1;
++c_7321748.num_elements = 2;
++c_7321748.elements = (object *)e_7321764;
++c_7321748.elements[0] = ((closureN)self_7312665)->elements[16];
++c_7321748.elements[1] = ((closureN)self_7312665)->elements[17];
+
+-list_2_type local_7323322;
+-return_direct_with_clo1(data, ((closureN)self_7313896)->elements[6], (((closure) ((closureN)self_7313896)->elements[6])->fn), Cyc_fast_list_4(&local_7323295, ((closureN)self_7313896)->elements[2], ((closureN)self_7313896)->elements[3], set_pair_as_expr(&local_7323300, Cyc_fast_list_2(&local_7323303, ((closureN)self_7313896)->elements[10], ((closureN)self_7313896)->elements[9]), ((closureN)self_7313896)->elements[8]), Cyc_fast_list_4(&local_7323309, ((closureN)self_7313896)->elements[1], Cyc_fast_list_2(&local_7323313, ((closureN)self_7313896)->elements[4], ((closureN)self_7313896)->elements[10]), r_736582, Cyc_fast_list_3(&local_7323318, ((closureN)self_7313896)->elements[0], Cyc_fast_list_2(&local_7323322, ((closureN)self_7313896)->elements[5], ((closureN)self_7313896)->elements[10]), ((closureN)self_7313896)->elements[7]))));;
++return_direct_with_clo1(data,(closure)&c_7320937,__lambda_864, &c_7321748);;
+ }
+
+-static void __lambda_977(void *data, object self_7313872, int argc, object *args) /* object self_7313872, object r_736567 */
++static void __lambda_956(void *data, object self_7312666, int argc, object *args) /* object self_7312666, object k_736074, object x_731387_733302 */
+ {
+- object r_736567 = args[0];
++ object k_736074 = args[0]; object x_731387_733302 = args[1];
++
++if( (boolean_f != Cyc_is_pair(x_731387_733302)) ){
++
+
+-list_3_type local_7323214;
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_731387_733302))) ){
++
++
+
+-list_2_type local_7323218;
+
+-list_3_type local_7323223;
++return_closcall3(data, ((closureN)self_7312666)->elements[0], k_736074, car(((closureN)self_7312666)->elements[1]), Cyc_cadr(data, x_731387_733302));
++} else {
++ return_direct_with_clo1(data, k_736074, (((closure) k_736074)->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, k_736074, (((closure) k_736074)->fn), boolean_f);}
++;;
++}
+
+-pair_type local_7323227;
++static void __lambda_864(void *data, object self_7312667, int argc, object *args) /* object self_7312667, object r_736073 */
++ {
++ object r_736073 = args[0];
++
++closureN_type c_7320939;
++object e_7321743 [28];
++c_7320939.hdr.mark = gc_color_red;
++ c_7320939.hdr.grayed = 0;
++c_7320939.tag = closureN_tag;
++ c_7320939.fn = (function_type)__lambda_865;
++c_7320939.num_args = 1;
++c_7320939.num_elements = 28;
++c_7320939.elements = (object *)e_7321743;
++c_7320939.elements[0] = ((closureN)self_7312667)->elements[0];
++c_7320939.elements[1] = ((closureN)self_7312667)->elements[1];
++c_7320939.elements[2] = ((closureN)self_7312667)->elements[2];
++c_7320939.elements[3] = ((closureN)self_7312667)->elements[3];
++c_7320939.elements[4] = ((closureN)self_7312667)->elements[4];
++c_7320939.elements[5] = ((closureN)self_7312667)->elements[5];
++c_7320939.elements[6] = ((closureN)self_7312667)->elements[6];
++c_7320939.elements[7] = ((closureN)self_7312667)->elements[7];
++c_7320939.elements[8] = ((closureN)self_7312667)->elements[8];
++c_7320939.elements[9] = ((closureN)self_7312667)->elements[9];
++c_7320939.elements[10] = ((closureN)self_7312667)->elements[10];
++c_7320939.elements[11] = ((closureN)self_7312667)->elements[11];
++c_7320939.elements[12] = ((closureN)self_7312667)->elements[12];
++c_7320939.elements[13] = ((closureN)self_7312667)->elements[13];
++c_7320939.elements[14] = ((closureN)self_7312667)->elements[14];
++c_7320939.elements[15] = ((closureN)self_7312667)->elements[15];
++c_7320939.elements[16] = ((closureN)self_7312667)->elements[16];
++c_7320939.elements[17] = ((closureN)self_7312667)->elements[17];
++c_7320939.elements[18] = ((closureN)self_7312667)->elements[18];
++c_7320939.elements[19] = ((closureN)self_7312667)->elements[19];
++c_7320939.elements[20] = ((closureN)self_7312667)->elements[20];
++c_7320939.elements[21] = ((closureN)self_7312667)->elements[21];
++c_7320939.elements[22] = ((closureN)self_7312667)->elements[22];
++c_7320939.elements[23] = ((closureN)self_7312667)->elements[23];
++c_7320939.elements[24] = ((closureN)self_7312667)->elements[24];
++c_7320939.elements[25] = ((closureN)self_7312667)->elements[25];
++c_7320939.elements[26] = ((closureN)self_7312667)->elements[26];
++c_7320939.elements[27] = ((closureN)self_7312667)->elements[27];
+
+-list_2_type local_7323230;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313872)->elements[3], (((closure) ((closureN)self_7313872)->elements[3])->fn), Cyc_fast_list_3(&local_7323214, ((closureN)self_7313872)->elements[0], Cyc_fast_list_2(&local_7323218, ((closureN)self_7313872)->elements[2], ((closureN)self_7313872)->elements[5]), Cyc_fast_list_3(&local_7323223, ((closureN)self_7313872)->elements[1], set_cell_as_expr(&local_7323227, Cyc_fast_list_2(&local_7323230, Cyc_car(data, ((closureN)self_7313872)->elements[4]), ((closureN)self_7313872)->elements[5])), r_736567)));;
++return_direct_with_clo1(data,(closure)&c_7320939,__lambda_865, Cyc_set_cell(data, ((closureN)self_7312667)->elements[20], r_736073));;
+ }
+
+-static void __lambda_973(void *data, object self_7313863, int argc, object *args) /* object self_7313863, object k_736560, object l_731322_733630 */
++static void __lambda_865(void *data, object self_7312668, int argc, object *args) /* object self_7312668, object r_735938 */
+ {
+- object k_736560 = args[0]; object l_731322_733630 = args[1];
+- return_closcall3(data, ((closureN)self_7313863)->elements[0], k_736560, ((closureN)self_7313863)->elements[1], l_731322_733630);;
++
++
++closureN_type c_7320941;
++object e_7321718 [28];
++c_7320941.hdr.mark = gc_color_red;
++ c_7320941.hdr.grayed = 0;
++c_7320941.tag = closureN_tag;
++ c_7320941.fn = (function_type)__lambda_866;
++c_7320941.num_args = 1;
++c_7320941.num_elements = 28;
++c_7320941.elements = (object *)e_7321718;
++c_7320941.elements[0] = ((closureN)self_7312668)->elements[0];
++c_7320941.elements[1] = ((closureN)self_7312668)->elements[1];
++c_7320941.elements[2] = ((closureN)self_7312668)->elements[2];
++c_7320941.elements[3] = ((closureN)self_7312668)->elements[3];
++c_7320941.elements[4] = ((closureN)self_7312668)->elements[4];
++c_7320941.elements[5] = ((closureN)self_7312668)->elements[5];
++c_7320941.elements[6] = ((closureN)self_7312668)->elements[6];
++c_7320941.elements[7] = ((closureN)self_7312668)->elements[7];
++c_7320941.elements[8] = ((closureN)self_7312668)->elements[8];
++c_7320941.elements[9] = ((closureN)self_7312668)->elements[9];
++c_7320941.elements[10] = ((closureN)self_7312668)->elements[10];
++c_7320941.elements[11] = ((closureN)self_7312668)->elements[11];
++c_7320941.elements[12] = ((closureN)self_7312668)->elements[12];
++c_7320941.elements[13] = ((closureN)self_7312668)->elements[13];
++c_7320941.elements[14] = ((closureN)self_7312668)->elements[14];
++c_7320941.elements[15] = ((closureN)self_7312668)->elements[15];
++c_7320941.elements[16] = ((closureN)self_7312668)->elements[16];
++c_7320941.elements[17] = ((closureN)self_7312668)->elements[17];
++c_7320941.elements[18] = ((closureN)self_7312668)->elements[18];
++c_7320941.elements[19] = ((closureN)self_7312668)->elements[19];
++c_7320941.elements[20] = ((closureN)self_7312668)->elements[20];
++c_7320941.elements[21] = ((closureN)self_7312668)->elements[21];
++c_7320941.elements[22] = ((closureN)self_7312668)->elements[22];
++c_7320941.elements[23] = ((closureN)self_7312668)->elements[23];
++c_7320941.elements[24] = ((closureN)self_7312668)->elements[24];
++c_7320941.elements[25] = ((closureN)self_7312668)->elements[25];
++c_7320941.elements[26] = ((closureN)self_7312668)->elements[26];
++c_7320941.elements[27] = ((closureN)self_7312668)->elements[27];
++
++
++closureN_type c_7321719;
++object e_7321742 [2];
++c_7321719.hdr.mark = gc_color_red;
++ c_7321719.hdr.grayed = 0;
++c_7321719.tag = closureN_tag;
++ c_7321719.fn = (function_type)__lambda_953;
++c_7321719.num_args = 1;
++c_7321719.num_elements = 2;
++c_7321719.elements = (object *)e_7321742;
++c_7321719.elements[0] = ((closureN)self_7312668)->elements[17];
++c_7321719.elements[1] = ((closureN)self_7312668)->elements[20];
++
++return_direct_with_clo1(data,(closure)&c_7320941,__lambda_866, &c_7321719);;
+ }
+
+-static void __lambda_968(void *data, object self_7313864, int argc, object *args) /* object self_7313864, object r_736559 */
++static void __lambda_953(void *data, object self_7312669, int argc, object *args) /* object self_7312669, object k_736069, object x_731390_733303 */
+ {
+- object r_736559 = args[0];
++ object k_736069 = args[0]; object x_731390_733303 = args[1];
+
+-closureN_type c_7323127;
+-object e_7323184 [11];
+-c_7323127.hdr.mark = gc_color_red;
+- c_7323127.hdr.grayed = 0;
+-c_7323127.tag = closureN_tag;
+- c_7323127.fn = (function_type)__lambda_969;
+-c_7323127.num_args = 1;
+-c_7323127.num_elements = 11;
+-c_7323127.elements = (object *)e_7323184;
+-c_7323127.elements[0] = ((closureN)self_7313864)->elements[0];
+-c_7323127.elements[1] = ((closureN)self_7313864)->elements[1];
+-c_7323127.elements[2] = ((closureN)self_7313864)->elements[2];
+-c_7323127.elements[3] = ((closureN)self_7313864)->elements[3];
+-c_7323127.elements[4] = ((closureN)self_7313864)->elements[4];
+-c_7323127.elements[5] = ((closureN)self_7313864)->elements[5];
+-c_7323127.elements[6] = ((closureN)self_7313864)->elements[6];
+-c_7323127.elements[7] = ((closureN)self_7313864)->elements[7];
+-c_7323127.elements[8] = ((closureN)self_7313864)->elements[9];
+-c_7323127.elements[9] = ((closureN)self_7313864)->elements[10];
+-c_7323127.elements[10] = ((closureN)self_7313864)->elements[11];
+
+
++closureN_type c_7321724;
++object e_7321741 [3];
++c_7321724.hdr.mark = gc_color_red;
++ c_7321724.hdr.grayed = 0;
++c_7321724.tag = closureN_tag;
++ c_7321724.fn = (function_type)__lambda_954;
++c_7321724.num_args = 1;
++c_7321724.num_elements = 3;
++c_7321724.elements = (object *)e_7321741;
++c_7321724.elements[0] = ((closureN)self_7312669)->elements[0];
++c_7321724.elements[1] = k_736069;
++c_7321724.elements[2] = x_731390_733303;
+
+-return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), &c_7323127, r_736559, car(((closureN)self_7313864)->elements[8]));;
++return_closcall2(data, car(((closureN)self_7312669)->elements[1]), &c_7321724, x_731390_733303);;
+ }
+
+-static void __lambda_969(void *data, object self_7313865, int argc, object *args) /* object self_7313865, object r_736549 */
++static void __lambda_954(void *data, object self_7312670, int argc, object *args) /* object self_7312670, object r_736070 */
+ {
+- object r_736549 = args[0];
+- if( (boolean_f != r_736549) ){
++ object r_736070 = args[0];
++ if( (boolean_f != r_736070) ){
+
+-closureN_type c_7323129;
+-object e_7323151 [7];
+-c_7323129.hdr.mark = gc_color_red;
+- c_7323129.hdr.grayed = 0;
+-c_7323129.tag = closureN_tag;
+- c_7323129.fn = (function_type)__lambda_970;
+-c_7323129.num_args = 1;
+-c_7323129.num_elements = 7;
+-c_7323129.elements = (object *)e_7323151;
+-c_7323129.elements[0] = ((closureN)self_7313865)->elements[0];
+-c_7323129.elements[1] = ((closureN)self_7313865)->elements[1];
+-c_7323129.elements[2] = ((closureN)self_7313865)->elements[4];
+-c_7323129.elements[3] = ((closureN)self_7313865)->elements[6];
+-c_7323129.elements[4] = ((closureN)self_7313865)->elements[7];
+-c_7323129.elements[5] = ((closureN)self_7313865)->elements[9];
+-c_7323129.elements[6] = ((closureN)self_7313865)->elements[10];
+
+
+-list_2_type local_7323154;
+-return_direct_with_clo1(data,(closure)&c_7323129,__lambda_970, Cyc_fast_list_2(&local_7323154, ((closureN)self_7313865)->elements[3], ((closureN)self_7313865)->elements[8]));
++closureN_type c_7321729;
++object e_7321735 [1];
++c_7321729.hdr.mark = gc_color_red;
++ c_7321729.hdr.grayed = 0;
++c_7321729.tag = closureN_tag;
++ c_7321729.fn = (function_type)__lambda_955;
++c_7321729.num_args = 1;
++c_7321729.num_elements = 1;
++c_7321729.elements = (object *)e_7321735;
++c_7321729.elements[0] = ((closureN)self_7312670)->elements[1];
++
++
++
++return_closcall2(data, car(((closureN)self_7312670)->elements[0]), &c_7321729, Cyc_cdr(data, ((closureN)self_7312670)->elements[2]));
+ } else {
++ return_direct_with_clo1(data, ((closureN)self_7312670)->elements[1], (((closure) ((closureN)self_7312670)->elements[1])->fn), obj_int2obj(0));}
++;;
++}
++
++static void __lambda_955(void *data, object self_7312671, int argc, object *args) /* object self_7312671, object r_736071 */
++ {
++ object r_736071 = args[0];
++
++complex_num_type local_7321734;
++return_direct_with_clo1(data, ((closureN)self_7312671)->elements[0], (((closure) ((closureN)self_7312671)->elements[0])->fn), Cyc_fast_sum(data,&local_7321734, obj_int2obj(1), r_736071));;
++}
++
++static void __lambda_866(void *data, object self_7312672, int argc, object *args) /* object self_7312672, object r_736068 */
++ {
++ object r_736068 = args[0];
+
+-closureN_type c_7323159;
+-object e_7323174 [4];
+-c_7323159.hdr.mark = gc_color_red;
+- c_7323159.hdr.grayed = 0;
+-c_7323159.tag = closureN_tag;
+- c_7323159.fn = (function_type)__lambda_972;
+-c_7323159.num_args = 1;
+-c_7323159.num_elements = 4;
+-c_7323159.elements = (object *)e_7323174;
+-c_7323159.elements[0] = ((closureN)self_7313865)->elements[2];
+-c_7323159.elements[1] = ((closureN)self_7313865)->elements[7];
+-c_7323159.elements[2] = ((closureN)self_7313865)->elements[8];
+-c_7323159.elements[3] = ((closureN)self_7313865)->elements[9];
++closureN_type c_7320943;
++object e_7321714 [28];
++c_7320943.hdr.mark = gc_color_red;
++ c_7320943.hdr.grayed = 0;
++c_7320943.tag = closureN_tag;
++ c_7320943.fn = (function_type)__lambda_867;
++c_7320943.num_args = 1;
++c_7320943.num_elements = 28;
++c_7320943.elements = (object *)e_7321714;
++c_7320943.elements[0] = ((closureN)self_7312672)->elements[0];
++c_7320943.elements[1] = ((closureN)self_7312672)->elements[1];
++c_7320943.elements[2] = ((closureN)self_7312672)->elements[2];
++c_7320943.elements[3] = ((closureN)self_7312672)->elements[3];
++c_7320943.elements[4] = ((closureN)self_7312672)->elements[4];
++c_7320943.elements[5] = ((closureN)self_7312672)->elements[5];
++c_7320943.elements[6] = ((closureN)self_7312672)->elements[6];
++c_7320943.elements[7] = ((closureN)self_7312672)->elements[7];
++c_7320943.elements[8] = ((closureN)self_7312672)->elements[8];
++c_7320943.elements[9] = ((closureN)self_7312672)->elements[9];
++c_7320943.elements[10] = ((closureN)self_7312672)->elements[10];
++c_7320943.elements[11] = ((closureN)self_7312672)->elements[11];
++c_7320943.elements[12] = ((closureN)self_7312672)->elements[12];
++c_7320943.elements[13] = ((closureN)self_7312672)->elements[13];
++c_7320943.elements[14] = ((closureN)self_7312672)->elements[14];
++c_7320943.elements[15] = ((closureN)self_7312672)->elements[15];
++c_7320943.elements[16] = ((closureN)self_7312672)->elements[16];
++c_7320943.elements[17] = ((closureN)self_7312672)->elements[17];
++c_7320943.elements[18] = ((closureN)self_7312672)->elements[18];
++c_7320943.elements[19] = ((closureN)self_7312672)->elements[19];
++c_7320943.elements[20] = ((closureN)self_7312672)->elements[20];
++c_7320943.elements[21] = ((closureN)self_7312672)->elements[21];
++c_7320943.elements[22] = ((closureN)self_7312672)->elements[22];
++c_7320943.elements[23] = ((closureN)self_7312672)->elements[23];
++c_7320943.elements[24] = ((closureN)self_7312672)->elements[24];
++c_7320943.elements[25] = ((closureN)self_7312672)->elements[25];
++c_7320943.elements[26] = ((closureN)self_7312672)->elements[26];
++c_7320943.elements[27] = ((closureN)self_7312672)->elements[27];
+
+
+-pair_type local_7323177;
+
+-pair_type local_7323180;
+-return_closcall2(data, ((closureN)self_7313865)->elements[6], &c_7323159, set_pair_as_expr(&local_7323177, set_pair_as_expr(&local_7323180, ((closureN)self_7313865)->elements[8], ((closureN)self_7313865)->elements[5]), ((closureN)self_7313865)->elements[10]));}
+-;;
++return_direct_with_clo1(data,(closure)&c_7320943,__lambda_867, Cyc_set_cell(data, ((closureN)self_7312672)->elements[17], r_736068));;
+ }
+
+-static void __lambda_972(void *data, object self_7313868, int argc, object *args) /* object self_7313868, object r_736555 */
++static void __lambda_867(void *data, object self_7312673, int argc, object *args) /* object self_7312673, object r_735939 */
+ {
+- object r_736555 = args[0];
++
+
+-list_3_type local_7323164;
++closureN_type c_7320945;
++object e_7321692 [28];
++c_7320945.hdr.mark = gc_color_red;
++ c_7320945.hdr.grayed = 0;
++c_7320945.tag = closureN_tag;
++ c_7320945.fn = (function_type)__lambda_868;
++c_7320945.num_args = 1;
++c_7320945.num_elements = 28;
++c_7320945.elements = (object *)e_7321692;
++c_7320945.elements[0] = ((closureN)self_7312673)->elements[0];
++c_7320945.elements[1] = ((closureN)self_7312673)->elements[1];
++c_7320945.elements[2] = ((closureN)self_7312673)->elements[2];
++c_7320945.elements[3] = ((closureN)self_7312673)->elements[3];
++c_7320945.elements[4] = ((closureN)self_7312673)->elements[4];
++c_7320945.elements[5] = ((closureN)self_7312673)->elements[5];
++c_7320945.elements[6] = ((closureN)self_7312673)->elements[6];
++c_7320945.elements[7] = ((closureN)self_7312673)->elements[7];
++c_7320945.elements[8] = ((closureN)self_7312673)->elements[8];
++c_7320945.elements[9] = ((closureN)self_7312673)->elements[9];
++c_7320945.elements[10] = ((closureN)self_7312673)->elements[10];
++c_7320945.elements[11] = ((closureN)self_7312673)->elements[11];
++c_7320945.elements[12] = ((closureN)self_7312673)->elements[12];
++c_7320945.elements[13] = ((closureN)self_7312673)->elements[13];
++c_7320945.elements[14] = ((closureN)self_7312673)->elements[14];
++c_7320945.elements[15] = ((closureN)self_7312673)->elements[15];
++c_7320945.elements[16] = ((closureN)self_7312673)->elements[16];
++c_7320945.elements[17] = ((closureN)self_7312673)->elements[17];
++c_7320945.elements[18] = ((closureN)self_7312673)->elements[18];
++c_7320945.elements[19] = ((closureN)self_7312673)->elements[19];
++c_7320945.elements[20] = ((closureN)self_7312673)->elements[20];
++c_7320945.elements[21] = ((closureN)self_7312673)->elements[21];
++c_7320945.elements[22] = ((closureN)self_7312673)->elements[22];
++c_7320945.elements[23] = ((closureN)self_7312673)->elements[23];
++c_7320945.elements[24] = ((closureN)self_7312673)->elements[24];
++c_7320945.elements[25] = ((closureN)self_7312673)->elements[25];
++c_7320945.elements[26] = ((closureN)self_7312673)->elements[26];
++c_7320945.elements[27] = ((closureN)self_7312673)->elements[27];
+
+-pair_type local_7323168;
+
+-list_2_type local_7323171;
+-return_direct_with_clo1(data, ((closureN)self_7313868)->elements[1], (((closure) ((closureN)self_7313868)->elements[1])->fn), Cyc_fast_list_3(&local_7323164, ((closureN)self_7313868)->elements[0], set_cell_as_expr(&local_7323168, Cyc_fast_list_2(&local_7323171, ((closureN)self_7313868)->elements[2], ((closureN)self_7313868)->elements[3])), r_736555));;
++closureN_type c_7321693;
++object e_7321713 [2];
++c_7321693.hdr.mark = gc_color_red;
++ c_7321693.hdr.grayed = 0;
++c_7321693.tag = closureN_tag;
++ c_7321693.fn = (function_type)__lambda_951;
++c_7321693.num_args = 1;
++c_7321693.num_elements = 2;
++c_7321693.elements = (object *)e_7321713;
++c_7321693.elements[0] = ((closureN)self_7312673)->elements[19];
++c_7321693.elements[1] = ((closureN)self_7312673)->elements[20];
++
++return_direct_with_clo1(data,(closure)&c_7320945,__lambda_868, &c_7321693);;
+ }
+
+-static void __lambda_970(void *data, object self_7313866, int argc, object *args) /* object self_7313866, object r_736553 */
++static void __lambda_951(void *data, object self_7312674, int argc, object *args) /* object self_7312674, object k_736065, object x_731391_733304 */
+ {
+- object r_736553 = args[0];
++ object k_736065 = args[0]; object x_731391_733304 = args[1];
+
+-closureN_type c_7323132;
+-object e_7323149 [6];
+-c_7323132.hdr.mark = gc_color_red;
+- c_7323132.hdr.grayed = 0;
+-c_7323132.tag = closureN_tag;
+- c_7323132.fn = (function_type)__lambda_971;
+-c_7323132.num_args = 1;
+-c_7323132.num_elements = 6;
+-c_7323132.elements = (object *)e_7323149;
+-c_7323132.elements[0] = ((closureN)self_7313866)->elements[0];
+-c_7323132.elements[1] = ((closureN)self_7313866)->elements[1];
+-c_7323132.elements[2] = ((closureN)self_7313866)->elements[2];
+-c_7323132.elements[3] = ((closureN)self_7313866)->elements[4];
+-c_7323132.elements[4] = r_736553;
+-c_7323132.elements[5] = ((closureN)self_7313866)->elements[5];
+-
+-return_closcall2(data, ((closureN)self_7313866)->elements[3], &c_7323132, ((closureN)self_7313866)->elements[6]);;
+-}
+-
+-static void __lambda_971(void *data, object self_7313867, int argc, object *args) /* object self_7313867, object r_736551 */
+- {
+- object r_736551 = args[0];
+-
+-list_3_type local_7323137;
+-
+-list_3_type local_7323141;
+-
+-list_2_type local_7323146;
+-return_direct_with_clo1(data, ((closureN)self_7313867)->elements[3], (((closure) ((closureN)self_7313867)->elements[3])->fn), Cyc_fast_list_3(&local_7323137, ((closureN)self_7313867)->elements[0], Cyc_fast_list_3(&local_7323141, ((closureN)self_7313867)->elements[1], ((closureN)self_7313867)->elements[5], Cyc_fast_list_2(&local_7323146, ((closureN)self_7313867)->elements[2], ((closureN)self_7313867)->elements[4])), r_736551));;
+-}
+-
+-static void __lambda_962(void *data, object self_7313912, int argc, object *args) /* object self_7313912, object r_736542 */
+- {
+- object r_736542 = args[0];
+-
+-closureN_type c_7323099;
+-object e_7323109 [6];
+-c_7323099.hdr.mark = gc_color_red;
+- c_7323099.hdr.grayed = 0;
+-c_7323099.tag = closureN_tag;
+- c_7323099.fn = (function_type)__lambda_963;
+-c_7323099.num_args = 1;
+-c_7323099.num_elements = 6;
+-c_7323099.elements = (object *)e_7323109;
+-c_7323099.elements[0] = ((closureN)self_7313912)->elements[0];
+-c_7323099.elements[1] = ((closureN)self_7313912)->elements[1];
+-c_7323099.elements[2] = ((closureN)self_7313912)->elements[2];
+-c_7323099.elements[3] = ((closureN)self_7313912)->elements[3];
+-c_7323099.elements[4] = ((closureN)self_7313912)->elements[4];
+-c_7323099.elements[5] = ((closureN)self_7313912)->elements[5];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7323099,__lambda_963, Cyc_set_cell(data, ((closureN)self_7313912)->elements[2], r_736542));;
+-}
+-
+-static void __lambda_963(void *data, object self_7313913, int argc, object *args) /* object self_7313913, object r_736541 */
+- {
+-
+-
+-
+-return_closcall6(data, car(((closureN)self_7313913)->elements[2]), ((closureN)self_7313913)->elements[1], ((closureN)self_7313913)->elements[3], ((closureN)self_7313913)->elements[5], obj_int2obj(0), ((closureN)self_7313913)->elements[4], ((closureN)self_7313913)->elements[0]);;
+-}
+-
+-static void __lambda_860(void *data, object self_7313914, int argc, object *args) /* object self_7313914, object r_736535 */
+- {
+- object r_736535 = args[0];
+-
+-closureN_type c_7322231;
+-object e_7323082 [29];
+-c_7322231.hdr.mark = gc_color_red;
+- c_7322231.hdr.grayed = 0;
+-c_7322231.tag = closureN_tag;
+- c_7322231.fn = (function_type)__lambda_861;
+-c_7322231.num_args = 1;
+-c_7322231.num_elements = 29;
+-c_7322231.elements = (object *)e_7323082;
+-c_7322231.elements[0] = ((closureN)self_7313914)->elements[0];
+-c_7322231.elements[1] = ((closureN)self_7313914)->elements[1];
+-c_7322231.elements[2] = ((closureN)self_7313914)->elements[2];
+-c_7322231.elements[3] = ((closureN)self_7313914)->elements[3];
+-c_7322231.elements[4] = ((closureN)self_7313914)->elements[4];
+-c_7322231.elements[5] = ((closureN)self_7313914)->elements[5];
+-c_7322231.elements[6] = ((closureN)self_7313914)->elements[6];
+-c_7322231.elements[7] = ((closureN)self_7313914)->elements[7];
+-c_7322231.elements[8] = ((closureN)self_7313914)->elements[8];
+-c_7322231.elements[9] = ((closureN)self_7313914)->elements[9];
+-c_7322231.elements[10] = ((closureN)self_7313914)->elements[10];
+-c_7322231.elements[11] = ((closureN)self_7313914)->elements[11];
+-c_7322231.elements[12] = ((closureN)self_7313914)->elements[12];
+-c_7322231.elements[13] = ((closureN)self_7313914)->elements[13];
+-c_7322231.elements[14] = ((closureN)self_7313914)->elements[14];
+-c_7322231.elements[15] = ((closureN)self_7313914)->elements[15];
+-c_7322231.elements[16] = ((closureN)self_7313914)->elements[16];
+-c_7322231.elements[17] = ((closureN)self_7313914)->elements[17];
+-c_7322231.elements[18] = ((closureN)self_7313914)->elements[18];
+-c_7322231.elements[19] = ((closureN)self_7313914)->elements[19];
+-c_7322231.elements[20] = ((closureN)self_7313914)->elements[20];
+-c_7322231.elements[21] = ((closureN)self_7313914)->elements[21];
+-c_7322231.elements[22] = ((closureN)self_7313914)->elements[22];
+-c_7322231.elements[23] = ((closureN)self_7313914)->elements[23];
+-c_7322231.elements[24] = ((closureN)self_7313914)->elements[24];
+-c_7322231.elements[25] = ((closureN)self_7313914)->elements[25];
+-c_7322231.elements[26] = ((closureN)self_7313914)->elements[26];
+-c_7322231.elements[27] = ((closureN)self_7313914)->elements[27];
+-c_7322231.elements[28] = ((closureN)self_7313914)->elements[28];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322231,__lambda_861, Cyc_set_cell(data, ((closureN)self_7313914)->elements[22], r_736535));;
+-}
+-
+-static void __lambda_861(void *data, object self_7313915, int argc, object *args) /* object self_7313915, object r_736388 */
+- {
+-
+-
+-closureN_type c_7322233;
+-object e_7323069 [29];
+-c_7322233.hdr.mark = gc_color_red;
+- c_7322233.hdr.grayed = 0;
+-c_7322233.tag = closureN_tag;
+- c_7322233.fn = (function_type)__lambda_862;
+-c_7322233.num_args = 1;
+-c_7322233.num_elements = 29;
+-c_7322233.elements = (object *)e_7323069;
+-c_7322233.elements[0] = ((closureN)self_7313915)->elements[0];
+-c_7322233.elements[1] = ((closureN)self_7313915)->elements[1];
+-c_7322233.elements[2] = ((closureN)self_7313915)->elements[2];
+-c_7322233.elements[3] = ((closureN)self_7313915)->elements[3];
+-c_7322233.elements[4] = ((closureN)self_7313915)->elements[4];
+-c_7322233.elements[5] = ((closureN)self_7313915)->elements[5];
+-c_7322233.elements[6] = ((closureN)self_7313915)->elements[6];
+-c_7322233.elements[7] = ((closureN)self_7313915)->elements[7];
+-c_7322233.elements[8] = ((closureN)self_7313915)->elements[8];
+-c_7322233.elements[9] = ((closureN)self_7313915)->elements[9];
+-c_7322233.elements[10] = ((closureN)self_7313915)->elements[10];
+-c_7322233.elements[11] = ((closureN)self_7313915)->elements[11];
+-c_7322233.elements[12] = ((closureN)self_7313915)->elements[12];
+-c_7322233.elements[13] = ((closureN)self_7313915)->elements[13];
+-c_7322233.elements[14] = ((closureN)self_7313915)->elements[14];
+-c_7322233.elements[15] = ((closureN)self_7313915)->elements[15];
+-c_7322233.elements[16] = ((closureN)self_7313915)->elements[16];
+-c_7322233.elements[17] = ((closureN)self_7313915)->elements[17];
+-c_7322233.elements[18] = ((closureN)self_7313915)->elements[18];
+-c_7322233.elements[19] = ((closureN)self_7313915)->elements[19];
+-c_7322233.elements[20] = ((closureN)self_7313915)->elements[20];
+-c_7322233.elements[21] = ((closureN)self_7313915)->elements[21];
+-c_7322233.elements[22] = ((closureN)self_7313915)->elements[22];
+-c_7322233.elements[23] = ((closureN)self_7313915)->elements[23];
+-c_7322233.elements[24] = ((closureN)self_7313915)->elements[24];
+-c_7322233.elements[25] = ((closureN)self_7313915)->elements[25];
+-c_7322233.elements[26] = ((closureN)self_7313915)->elements[26];
+-c_7322233.elements[27] = ((closureN)self_7313915)->elements[27];
+-c_7322233.elements[28] = ((closureN)self_7313915)->elements[28];
+-
+-
+-closureN_type c_7323070;
+-object e_7323081 [2];
+-c_7323070.hdr.mark = gc_color_red;
+- c_7323070.hdr.grayed = 0;
+-c_7323070.tag = closureN_tag;
+- c_7323070.fn = (function_type)__lambda_957;
+-c_7323070.num_args = 1;
+-c_7323070.num_elements = 2;
+-c_7323070.elements = (object *)e_7323081;
+-c_7323070.elements[0] = ((closureN)self_7313915)->elements[16];
+-c_7323070.elements[1] = ((closureN)self_7313915)->elements[17];
+-
+-return_direct_with_clo1(data,(closure)&c_7322233,__lambda_862, &c_7323070);;
+-}
+-
+-static void __lambda_957(void *data, object self_7313916, int argc, object *args) /* object self_7313916, object k_736532, object x_731385_733648 */
+- {
+- object k_736532 = args[0]; object x_731385_733648 = args[1];
+-
+-if( (boolean_f != Cyc_is_pair(x_731385_733648)) ){
+-
+-
+-
+-
+-return_closcall3(data, ((closureN)self_7313916)->elements[0], k_736532, car(((closureN)self_7313916)->elements[1]), Cyc_car(data, x_731385_733648));
+-} else {
+- return_direct_with_clo1(data, k_736532, (((closure) k_736532)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_862(void *data, object self_7313917, int argc, object *args) /* object self_7313917, object r_736531 */
+- {
+- object r_736531 = args[0];
+-
+-closureN_type c_7322235;
+-object e_7323065 [29];
+-c_7322235.hdr.mark = gc_color_red;
+- c_7322235.hdr.grayed = 0;
+-c_7322235.tag = closureN_tag;
+- c_7322235.fn = (function_type)__lambda_863;
+-c_7322235.num_args = 1;
+-c_7322235.num_elements = 29;
+-c_7322235.elements = (object *)e_7323065;
+-c_7322235.elements[0] = ((closureN)self_7313917)->elements[0];
+-c_7322235.elements[1] = ((closureN)self_7313917)->elements[1];
+-c_7322235.elements[2] = ((closureN)self_7313917)->elements[2];
+-c_7322235.elements[3] = ((closureN)self_7313917)->elements[3];
+-c_7322235.elements[4] = ((closureN)self_7313917)->elements[4];
+-c_7322235.elements[5] = ((closureN)self_7313917)->elements[5];
+-c_7322235.elements[6] = ((closureN)self_7313917)->elements[6];
+-c_7322235.elements[7] = ((closureN)self_7313917)->elements[7];
+-c_7322235.elements[8] = ((closureN)self_7313917)->elements[8];
+-c_7322235.elements[9] = ((closureN)self_7313917)->elements[9];
+-c_7322235.elements[10] = ((closureN)self_7313917)->elements[10];
+-c_7322235.elements[11] = ((closureN)self_7313917)->elements[11];
+-c_7322235.elements[12] = ((closureN)self_7313917)->elements[12];
+-c_7322235.elements[13] = ((closureN)self_7313917)->elements[13];
+-c_7322235.elements[14] = ((closureN)self_7313917)->elements[14];
+-c_7322235.elements[15] = ((closureN)self_7313917)->elements[15];
+-c_7322235.elements[16] = ((closureN)self_7313917)->elements[16];
+-c_7322235.elements[17] = ((closureN)self_7313917)->elements[17];
+-c_7322235.elements[18] = ((closureN)self_7313917)->elements[18];
+-c_7322235.elements[19] = ((closureN)self_7313917)->elements[19];
+-c_7322235.elements[20] = ((closureN)self_7313917)->elements[20];
+-c_7322235.elements[21] = ((closureN)self_7313917)->elements[21];
+-c_7322235.elements[22] = ((closureN)self_7313917)->elements[22];
+-c_7322235.elements[23] = ((closureN)self_7313917)->elements[23];
+-c_7322235.elements[24] = ((closureN)self_7313917)->elements[24];
+-c_7322235.elements[25] = ((closureN)self_7313917)->elements[25];
+-c_7322235.elements[26] = ((closureN)self_7313917)->elements[26];
+-c_7322235.elements[27] = ((closureN)self_7313917)->elements[27];
+-c_7322235.elements[28] = ((closureN)self_7313917)->elements[28];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322235,__lambda_863, Cyc_set_cell(data, ((closureN)self_7313917)->elements[19], r_736531));;
+-}
+-
+-static void __lambda_863(void *data, object self_7313918, int argc, object *args) /* object self_7313918, object r_736389 */
+- {
+-
+-
+-closureN_type c_7322237;
+-object e_7323047 [28];
+-c_7322237.hdr.mark = gc_color_red;
+- c_7322237.hdr.grayed = 0;
+-c_7322237.tag = closureN_tag;
+- c_7322237.fn = (function_type)__lambda_864;
+-c_7322237.num_args = 1;
+-c_7322237.num_elements = 28;
+-c_7322237.elements = (object *)e_7323047;
+-c_7322237.elements[0] = ((closureN)self_7313918)->elements[0];
+-c_7322237.elements[1] = ((closureN)self_7313918)->elements[1];
+-c_7322237.elements[2] = ((closureN)self_7313918)->elements[2];
+-c_7322237.elements[3] = ((closureN)self_7313918)->elements[3];
+-c_7322237.elements[4] = ((closureN)self_7313918)->elements[4];
+-c_7322237.elements[5] = ((closureN)self_7313918)->elements[5];
+-c_7322237.elements[6] = ((closureN)self_7313918)->elements[6];
+-c_7322237.elements[7] = ((closureN)self_7313918)->elements[7];
+-c_7322237.elements[8] = ((closureN)self_7313918)->elements[8];
+-c_7322237.elements[9] = ((closureN)self_7313918)->elements[9];
+-c_7322237.elements[10] = ((closureN)self_7313918)->elements[10];
+-c_7322237.elements[11] = ((closureN)self_7313918)->elements[11];
+-c_7322237.elements[12] = ((closureN)self_7313918)->elements[12];
+-c_7322237.elements[13] = ((closureN)self_7313918)->elements[13];
+-c_7322237.elements[14] = ((closureN)self_7313918)->elements[14];
+-c_7322237.elements[15] = ((closureN)self_7313918)->elements[15];
+-c_7322237.elements[16] = ((closureN)self_7313918)->elements[16];
+-c_7322237.elements[17] = ((closureN)self_7313918)->elements[18];
+-c_7322237.elements[18] = ((closureN)self_7313918)->elements[19];
+-c_7322237.elements[19] = ((closureN)self_7313918)->elements[20];
+-c_7322237.elements[20] = ((closureN)self_7313918)->elements[21];
+-c_7322237.elements[21] = ((closureN)self_7313918)->elements[22];
+-c_7322237.elements[22] = ((closureN)self_7313918)->elements[23];
+-c_7322237.elements[23] = ((closureN)self_7313918)->elements[24];
+-c_7322237.elements[24] = ((closureN)self_7313918)->elements[25];
+-c_7322237.elements[25] = ((closureN)self_7313918)->elements[26];
+-c_7322237.elements[26] = ((closureN)self_7313918)->elements[27];
+-c_7322237.elements[27] = ((closureN)self_7313918)->elements[28];
+-
+-
+-closureN_type c_7323048;
+-object e_7323064 [2];
+-c_7323048.hdr.mark = gc_color_red;
+- c_7323048.hdr.grayed = 0;
+-c_7323048.tag = closureN_tag;
+- c_7323048.fn = (function_type)__lambda_956;
+-c_7323048.num_args = 1;
+-c_7323048.num_elements = 2;
+-c_7323048.elements = (object *)e_7323064;
+-c_7323048.elements[0] = ((closureN)self_7313918)->elements[16];
+-c_7323048.elements[1] = ((closureN)self_7313918)->elements[17];
+-
+-return_direct_with_clo1(data,(closure)&c_7322237,__lambda_864, &c_7323048);;
+-}
+-
+-static void __lambda_956(void *data, object self_7313919, int argc, object *args) /* object self_7313919, object k_736526, object x_731387_733649 */
+- {
+- object k_736526 = args[0]; object x_731387_733649 = args[1];
+-
+-if( (boolean_f != Cyc_is_pair(x_731387_733649)) ){
+-
+-
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_731387_733649))) ){
+-
+-
+-
+-
+-return_closcall3(data, ((closureN)self_7313919)->elements[0], k_736526, car(((closureN)self_7313919)->elements[1]), Cyc_cadr(data, x_731387_733649));
+-} else {
+- return_direct_with_clo1(data, k_736526, (((closure) k_736526)->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, k_736526, (((closure) k_736526)->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_864(void *data, object self_7313920, int argc, object *args) /* object self_7313920, object r_736525 */
+- {
+- object r_736525 = args[0];
+-
+-closureN_type c_7322239;
+-object e_7323043 [28];
+-c_7322239.hdr.mark = gc_color_red;
+- c_7322239.hdr.grayed = 0;
+-c_7322239.tag = closureN_tag;
+- c_7322239.fn = (function_type)__lambda_865;
+-c_7322239.num_args = 1;
+-c_7322239.num_elements = 28;
+-c_7322239.elements = (object *)e_7323043;
+-c_7322239.elements[0] = ((closureN)self_7313920)->elements[0];
+-c_7322239.elements[1] = ((closureN)self_7313920)->elements[1];
+-c_7322239.elements[2] = ((closureN)self_7313920)->elements[2];
+-c_7322239.elements[3] = ((closureN)self_7313920)->elements[3];
+-c_7322239.elements[4] = ((closureN)self_7313920)->elements[4];
+-c_7322239.elements[5] = ((closureN)self_7313920)->elements[5];
+-c_7322239.elements[6] = ((closureN)self_7313920)->elements[6];
+-c_7322239.elements[7] = ((closureN)self_7313920)->elements[7];
+-c_7322239.elements[8] = ((closureN)self_7313920)->elements[8];
+-c_7322239.elements[9] = ((closureN)self_7313920)->elements[9];
+-c_7322239.elements[10] = ((closureN)self_7313920)->elements[10];
+-c_7322239.elements[11] = ((closureN)self_7313920)->elements[11];
+-c_7322239.elements[12] = ((closureN)self_7313920)->elements[12];
+-c_7322239.elements[13] = ((closureN)self_7313920)->elements[13];
+-c_7322239.elements[14] = ((closureN)self_7313920)->elements[14];
+-c_7322239.elements[15] = ((closureN)self_7313920)->elements[15];
+-c_7322239.elements[16] = ((closureN)self_7313920)->elements[16];
+-c_7322239.elements[17] = ((closureN)self_7313920)->elements[17];
+-c_7322239.elements[18] = ((closureN)self_7313920)->elements[18];
+-c_7322239.elements[19] = ((closureN)self_7313920)->elements[19];
+-c_7322239.elements[20] = ((closureN)self_7313920)->elements[20];
+-c_7322239.elements[21] = ((closureN)self_7313920)->elements[21];
+-c_7322239.elements[22] = ((closureN)self_7313920)->elements[22];
+-c_7322239.elements[23] = ((closureN)self_7313920)->elements[23];
+-c_7322239.elements[24] = ((closureN)self_7313920)->elements[24];
+-c_7322239.elements[25] = ((closureN)self_7313920)->elements[25];
+-c_7322239.elements[26] = ((closureN)self_7313920)->elements[26];
+-c_7322239.elements[27] = ((closureN)self_7313920)->elements[27];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322239,__lambda_865, Cyc_set_cell(data, ((closureN)self_7313920)->elements[20], r_736525));;
+-}
+-
+-static void __lambda_865(void *data, object self_7313921, int argc, object *args) /* object self_7313921, object r_736390 */
+- {
+-
+-
+-closureN_type c_7322241;
+-object e_7323018 [28];
+-c_7322241.hdr.mark = gc_color_red;
+- c_7322241.hdr.grayed = 0;
+-c_7322241.tag = closureN_tag;
+- c_7322241.fn = (function_type)__lambda_866;
+-c_7322241.num_args = 1;
+-c_7322241.num_elements = 28;
+-c_7322241.elements = (object *)e_7323018;
+-c_7322241.elements[0] = ((closureN)self_7313921)->elements[0];
+-c_7322241.elements[1] = ((closureN)self_7313921)->elements[1];
+-c_7322241.elements[2] = ((closureN)self_7313921)->elements[2];
+-c_7322241.elements[3] = ((closureN)self_7313921)->elements[3];
+-c_7322241.elements[4] = ((closureN)self_7313921)->elements[4];
+-c_7322241.elements[5] = ((closureN)self_7313921)->elements[5];
+-c_7322241.elements[6] = ((closureN)self_7313921)->elements[6];
+-c_7322241.elements[7] = ((closureN)self_7313921)->elements[7];
+-c_7322241.elements[8] = ((closureN)self_7313921)->elements[8];
+-c_7322241.elements[9] = ((closureN)self_7313921)->elements[9];
+-c_7322241.elements[10] = ((closureN)self_7313921)->elements[10];
+-c_7322241.elements[11] = ((closureN)self_7313921)->elements[11];
+-c_7322241.elements[12] = ((closureN)self_7313921)->elements[12];
+-c_7322241.elements[13] = ((closureN)self_7313921)->elements[13];
+-c_7322241.elements[14] = ((closureN)self_7313921)->elements[14];
+-c_7322241.elements[15] = ((closureN)self_7313921)->elements[15];
+-c_7322241.elements[16] = ((closureN)self_7313921)->elements[16];
+-c_7322241.elements[17] = ((closureN)self_7313921)->elements[17];
+-c_7322241.elements[18] = ((closureN)self_7313921)->elements[18];
+-c_7322241.elements[19] = ((closureN)self_7313921)->elements[19];
+-c_7322241.elements[20] = ((closureN)self_7313921)->elements[20];
+-c_7322241.elements[21] = ((closureN)self_7313921)->elements[21];
+-c_7322241.elements[22] = ((closureN)self_7313921)->elements[22];
+-c_7322241.elements[23] = ((closureN)self_7313921)->elements[23];
+-c_7322241.elements[24] = ((closureN)self_7313921)->elements[24];
+-c_7322241.elements[25] = ((closureN)self_7313921)->elements[25];
+-c_7322241.elements[26] = ((closureN)self_7313921)->elements[26];
+-c_7322241.elements[27] = ((closureN)self_7313921)->elements[27];
+-
+-
+-closureN_type c_7323019;
+-object e_7323042 [2];
+-c_7323019.hdr.mark = gc_color_red;
+- c_7323019.hdr.grayed = 0;
+-c_7323019.tag = closureN_tag;
+- c_7323019.fn = (function_type)__lambda_953;
+-c_7323019.num_args = 1;
+-c_7323019.num_elements = 2;
+-c_7323019.elements = (object *)e_7323042;
+-c_7323019.elements[0] = ((closureN)self_7313921)->elements[17];
+-c_7323019.elements[1] = ((closureN)self_7313921)->elements[20];
+-
+-return_direct_with_clo1(data,(closure)&c_7322241,__lambda_866, &c_7323019);;
+-}
+-
+-static void __lambda_953(void *data, object self_7313922, int argc, object *args) /* object self_7313922, object k_736521, object x_731390_733650 */
+- {
+- object k_736521 = args[0]; object x_731390_733650 = args[1];
+-
+-
+-
+-closureN_type c_7323024;
+-object e_7323041 [3];
+-c_7323024.hdr.mark = gc_color_red;
+- c_7323024.hdr.grayed = 0;
+-c_7323024.tag = closureN_tag;
+- c_7323024.fn = (function_type)__lambda_954;
+-c_7323024.num_args = 1;
+-c_7323024.num_elements = 3;
+-c_7323024.elements = (object *)e_7323041;
+-c_7323024.elements[0] = ((closureN)self_7313922)->elements[0];
+-c_7323024.elements[1] = k_736521;
+-c_7323024.elements[2] = x_731390_733650;
+-
+-return_closcall2(data, car(((closureN)self_7313922)->elements[1]), &c_7323024, x_731390_733650);;
+-}
+-
+-static void __lambda_954(void *data, object self_7313923, int argc, object *args) /* object self_7313923, object r_736522 */
+- {
+- object r_736522 = args[0];
+- if( (boolean_f != r_736522) ){
+-
+-
+-
+-closureN_type c_7323029;
+-object e_7323035 [1];
+-c_7323029.hdr.mark = gc_color_red;
+- c_7323029.hdr.grayed = 0;
+-c_7323029.tag = closureN_tag;
+- c_7323029.fn = (function_type)__lambda_955;
+-c_7323029.num_args = 1;
+-c_7323029.num_elements = 1;
+-c_7323029.elements = (object *)e_7323035;
+-c_7323029.elements[0] = ((closureN)self_7313923)->elements[1];
+-
+-
+-
+-return_closcall2(data, car(((closureN)self_7313923)->elements[0]), &c_7323029, Cyc_cdr(data, ((closureN)self_7313923)->elements[2]));
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313923)->elements[1], (((closure) ((closureN)self_7313923)->elements[1])->fn), obj_int2obj(0));}
+-;;
+-}
+-
+-static void __lambda_955(void *data, object self_7313924, int argc, object *args) /* object self_7313924, object r_736523 */
+- {
+- object r_736523 = args[0];
+-
+-complex_num_type local_7323034;
+-return_direct_with_clo1(data, ((closureN)self_7313924)->elements[0], (((closure) ((closureN)self_7313924)->elements[0])->fn), Cyc_fast_sum(data,&local_7323034, obj_int2obj(1), r_736523));;
+-}
+-
+-static void __lambda_866(void *data, object self_7313925, int argc, object *args) /* object self_7313925, object r_736520 */
+- {
+- object r_736520 = args[0];
+-
+-closureN_type c_7322243;
+-object e_7323014 [28];
+-c_7322243.hdr.mark = gc_color_red;
+- c_7322243.hdr.grayed = 0;
+-c_7322243.tag = closureN_tag;
+- c_7322243.fn = (function_type)__lambda_867;
+-c_7322243.num_args = 1;
+-c_7322243.num_elements = 28;
+-c_7322243.elements = (object *)e_7323014;
+-c_7322243.elements[0] = ((closureN)self_7313925)->elements[0];
+-c_7322243.elements[1] = ((closureN)self_7313925)->elements[1];
+-c_7322243.elements[2] = ((closureN)self_7313925)->elements[2];
+-c_7322243.elements[3] = ((closureN)self_7313925)->elements[3];
+-c_7322243.elements[4] = ((closureN)self_7313925)->elements[4];
+-c_7322243.elements[5] = ((closureN)self_7313925)->elements[5];
+-c_7322243.elements[6] = ((closureN)self_7313925)->elements[6];
+-c_7322243.elements[7] = ((closureN)self_7313925)->elements[7];
+-c_7322243.elements[8] = ((closureN)self_7313925)->elements[8];
+-c_7322243.elements[9] = ((closureN)self_7313925)->elements[9];
+-c_7322243.elements[10] = ((closureN)self_7313925)->elements[10];
+-c_7322243.elements[11] = ((closureN)self_7313925)->elements[11];
+-c_7322243.elements[12] = ((closureN)self_7313925)->elements[12];
+-c_7322243.elements[13] = ((closureN)self_7313925)->elements[13];
+-c_7322243.elements[14] = ((closureN)self_7313925)->elements[14];
+-c_7322243.elements[15] = ((closureN)self_7313925)->elements[15];
+-c_7322243.elements[16] = ((closureN)self_7313925)->elements[16];
+-c_7322243.elements[17] = ((closureN)self_7313925)->elements[17];
+-c_7322243.elements[18] = ((closureN)self_7313925)->elements[18];
+-c_7322243.elements[19] = ((closureN)self_7313925)->elements[19];
+-c_7322243.elements[20] = ((closureN)self_7313925)->elements[20];
+-c_7322243.elements[21] = ((closureN)self_7313925)->elements[21];
+-c_7322243.elements[22] = ((closureN)self_7313925)->elements[22];
+-c_7322243.elements[23] = ((closureN)self_7313925)->elements[23];
+-c_7322243.elements[24] = ((closureN)self_7313925)->elements[24];
+-c_7322243.elements[25] = ((closureN)self_7313925)->elements[25];
+-c_7322243.elements[26] = ((closureN)self_7313925)->elements[26];
+-c_7322243.elements[27] = ((closureN)self_7313925)->elements[27];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322243,__lambda_867, Cyc_set_cell(data, ((closureN)self_7313925)->elements[17], r_736520));;
+-}
+-
+-static void __lambda_867(void *data, object self_7313926, int argc, object *args) /* object self_7313926, object r_736391 */
+- {
+-
+-
+-closureN_type c_7322245;
+-object e_7322992 [28];
+-c_7322245.hdr.mark = gc_color_red;
+- c_7322245.hdr.grayed = 0;
+-c_7322245.tag = closureN_tag;
+- c_7322245.fn = (function_type)__lambda_868;
+-c_7322245.num_args = 1;
+-c_7322245.num_elements = 28;
+-c_7322245.elements = (object *)e_7322992;
+-c_7322245.elements[0] = ((closureN)self_7313926)->elements[0];
+-c_7322245.elements[1] = ((closureN)self_7313926)->elements[1];
+-c_7322245.elements[2] = ((closureN)self_7313926)->elements[2];
+-c_7322245.elements[3] = ((closureN)self_7313926)->elements[3];
+-c_7322245.elements[4] = ((closureN)self_7313926)->elements[4];
+-c_7322245.elements[5] = ((closureN)self_7313926)->elements[5];
+-c_7322245.elements[6] = ((closureN)self_7313926)->elements[6];
+-c_7322245.elements[7] = ((closureN)self_7313926)->elements[7];
+-c_7322245.elements[8] = ((closureN)self_7313926)->elements[8];
+-c_7322245.elements[9] = ((closureN)self_7313926)->elements[9];
+-c_7322245.elements[10] = ((closureN)self_7313926)->elements[10];
+-c_7322245.elements[11] = ((closureN)self_7313926)->elements[11];
+-c_7322245.elements[12] = ((closureN)self_7313926)->elements[12];
+-c_7322245.elements[13] = ((closureN)self_7313926)->elements[13];
+-c_7322245.elements[14] = ((closureN)self_7313926)->elements[14];
+-c_7322245.elements[15] = ((closureN)self_7313926)->elements[15];
+-c_7322245.elements[16] = ((closureN)self_7313926)->elements[16];
+-c_7322245.elements[17] = ((closureN)self_7313926)->elements[17];
+-c_7322245.elements[18] = ((closureN)self_7313926)->elements[18];
+-c_7322245.elements[19] = ((closureN)self_7313926)->elements[19];
+-c_7322245.elements[20] = ((closureN)self_7313926)->elements[20];
+-c_7322245.elements[21] = ((closureN)self_7313926)->elements[21];
+-c_7322245.elements[22] = ((closureN)self_7313926)->elements[22];
+-c_7322245.elements[23] = ((closureN)self_7313926)->elements[23];
+-c_7322245.elements[24] = ((closureN)self_7313926)->elements[24];
+-c_7322245.elements[25] = ((closureN)self_7313926)->elements[25];
+-c_7322245.elements[26] = ((closureN)self_7313926)->elements[26];
+-c_7322245.elements[27] = ((closureN)self_7313926)->elements[27];
+-
+-
+-closureN_type c_7322993;
+-object e_7323013 [2];
+-c_7322993.hdr.mark = gc_color_red;
+- c_7322993.hdr.grayed = 0;
+-c_7322993.tag = closureN_tag;
+- c_7322993.fn = (function_type)__lambda_951;
+-c_7322993.num_args = 1;
+-c_7322993.num_elements = 2;
+-c_7322993.elements = (object *)e_7323013;
+-c_7322993.elements[0] = ((closureN)self_7313926)->elements[19];
+-c_7322993.elements[1] = ((closureN)self_7313926)->elements[20];
+-
+-return_direct_with_clo1(data,(closure)&c_7322245,__lambda_868, &c_7322993);;
+-}
+-
+-static void __lambda_951(void *data, object self_7313927, int argc, object *args) /* object self_7313927, object k_736517, object x_731391_733651 */
+- {
+- object k_736517 = args[0]; object x_731391_733651 = args[1];
+-
+-
+-
+-closureN_type c_7322998;
+-object e_7323012 [3];
+-c_7322998.hdr.mark = gc_color_red;
+- c_7322998.hdr.grayed = 0;
+-c_7322998.tag = closureN_tag;
+- c_7322998.fn = (function_type)__lambda_952;
+-c_7322998.num_args = 1;
+-c_7322998.num_elements = 3;
+-c_7322998.elements = (object *)e_7323012;
+-c_7322998.elements[0] = ((closureN)self_7313927)->elements[0];
+-c_7322998.elements[1] = k_736517;
+-c_7322998.elements[2] = x_731391_733651;
+
+-return_closcall2(data, car(((closureN)self_7313927)->elements[1]), &c_7322998, x_731391_733651);;
++
++closureN_type c_7321698;
++object e_7321712 [3];
++c_7321698.hdr.mark = gc_color_red;
++ c_7321698.hdr.grayed = 0;
++c_7321698.tag = closureN_tag;
++ c_7321698.fn = (function_type)__lambda_952;
++c_7321698.num_args = 1;
++c_7321698.num_elements = 3;
++c_7321698.elements = (object *)e_7321712;
++c_7321698.elements[0] = ((closureN)self_7312674)->elements[0];
++c_7321698.elements[1] = k_736065;
++c_7321698.elements[2] = x_731391_733304;
++
++return_closcall2(data, car(((closureN)self_7312674)->elements[1]), &c_7321698, x_731391_733304);;
+ }
+
+-static void __lambda_952(void *data, object self_7313928, int argc, object *args) /* object self_7313928, object r_736518 */
++static void __lambda_952(void *data, object self_7312675, int argc, object *args) /* object self_7312675, object r_736066 */
+ {
+- object r_736518 = args[0];
+- if( (boolean_f != r_736518) ){
++ object r_736066 = args[0];
++ if( (boolean_f != r_736066) ){
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313928)->elements[0]), ((closureN)self_7313928)->elements[1], Cyc_cdr(data, ((closureN)self_7313928)->elements[2]));
++return_closcall2(data, car(((closureN)self_7312675)->elements[0]), ((closureN)self_7312675)->elements[1], Cyc_cdr(data, ((closureN)self_7312675)->elements[2]));
+ } else {
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313928)->elements[1], (((closure) ((closureN)self_7313928)->elements[1])->fn), Cyc_cdr(data, ((closureN)self_7313928)->elements[2]));}
+-;;
+-}
+-
+-static void __lambda_868(void *data, object self_7313929, int argc, object *args) /* object self_7313929, object r_736516 */
+- {
+- object r_736516 = args[0];
+-
+-closureN_type c_7322247;
+-object e_7322988 [28];
+-c_7322247.hdr.mark = gc_color_red;
+- c_7322247.hdr.grayed = 0;
+-c_7322247.tag = closureN_tag;
+- c_7322247.fn = (function_type)__lambda_869;
+-c_7322247.num_args = 1;
+-c_7322247.num_elements = 28;
+-c_7322247.elements = (object *)e_7322988;
+-c_7322247.elements[0] = ((closureN)self_7313929)->elements[0];
+-c_7322247.elements[1] = ((closureN)self_7313929)->elements[1];
+-c_7322247.elements[2] = ((closureN)self_7313929)->elements[2];
+-c_7322247.elements[3] = ((closureN)self_7313929)->elements[3];
+-c_7322247.elements[4] = ((closureN)self_7313929)->elements[4];
+-c_7322247.elements[5] = ((closureN)self_7313929)->elements[5];
+-c_7322247.elements[6] = ((closureN)self_7313929)->elements[6];
+-c_7322247.elements[7] = ((closureN)self_7313929)->elements[7];
+-c_7322247.elements[8] = ((closureN)self_7313929)->elements[8];
+-c_7322247.elements[9] = ((closureN)self_7313929)->elements[9];
+-c_7322247.elements[10] = ((closureN)self_7313929)->elements[10];
+-c_7322247.elements[11] = ((closureN)self_7313929)->elements[11];
+-c_7322247.elements[12] = ((closureN)self_7313929)->elements[12];
+-c_7322247.elements[13] = ((closureN)self_7313929)->elements[13];
+-c_7322247.elements[14] = ((closureN)self_7313929)->elements[14];
+-c_7322247.elements[15] = ((closureN)self_7313929)->elements[15];
+-c_7322247.elements[16] = ((closureN)self_7313929)->elements[16];
+-c_7322247.elements[17] = ((closureN)self_7313929)->elements[17];
+-c_7322247.elements[18] = ((closureN)self_7313929)->elements[18];
+-c_7322247.elements[19] = ((closureN)self_7313929)->elements[19];
+-c_7322247.elements[20] = ((closureN)self_7313929)->elements[20];
+-c_7322247.elements[21] = ((closureN)self_7313929)->elements[21];
+-c_7322247.elements[22] = ((closureN)self_7313929)->elements[22];
+-c_7322247.elements[23] = ((closureN)self_7313929)->elements[23];
+-c_7322247.elements[24] = ((closureN)self_7313929)->elements[24];
+-c_7322247.elements[25] = ((closureN)self_7313929)->elements[25];
+-c_7322247.elements[26] = ((closureN)self_7313929)->elements[26];
+-c_7322247.elements[27] = ((closureN)self_7313929)->elements[27];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322247,__lambda_869, Cyc_set_cell(data, ((closureN)self_7313929)->elements[19], r_736516));;
+-}
+-
+-static void __lambda_869(void *data, object self_7313930, int argc, object *args) /* object self_7313930, object r_736392 */
+- {
+-
+-
+-closureN_type c_7322249;
+-object e_7322853 [26];
+-c_7322249.hdr.mark = gc_color_red;
+- c_7322249.hdr.grayed = 0;
+-c_7322249.tag = closureN_tag;
+- c_7322249.fn = (function_type)__lambda_870;
+-c_7322249.num_args = 1;
+-c_7322249.num_elements = 26;
+-c_7322249.elements = (object *)e_7322853;
+-c_7322249.elements[0] = ((closureN)self_7313930)->elements[0];
+-c_7322249.elements[1] = ((closureN)self_7313930)->elements[1];
+-c_7322249.elements[2] = ((closureN)self_7313930)->elements[2];
+-c_7322249.elements[3] = ((closureN)self_7313930)->elements[3];
+-c_7322249.elements[4] = ((closureN)self_7313930)->elements[4];
+-c_7322249.elements[5] = ((closureN)self_7313930)->elements[5];
+-c_7322249.elements[6] = ((closureN)self_7313930)->elements[6];
+-c_7322249.elements[7] = ((closureN)self_7313930)->elements[7];
+-c_7322249.elements[8] = ((closureN)self_7313930)->elements[8];
+-c_7322249.elements[9] = ((closureN)self_7313930)->elements[9];
+-c_7322249.elements[10] = ((closureN)self_7313930)->elements[10];
+-c_7322249.elements[11] = ((closureN)self_7313930)->elements[11];
+-c_7322249.elements[12] = ((closureN)self_7313930)->elements[12];
+-c_7322249.elements[13] = ((closureN)self_7313930)->elements[13];
+-c_7322249.elements[14] = ((closureN)self_7313930)->elements[14];
+-c_7322249.elements[15] = ((closureN)self_7313930)->elements[15];
+-c_7322249.elements[16] = ((closureN)self_7313930)->elements[17];
+-c_7322249.elements[17] = ((closureN)self_7313930)->elements[18];
+-c_7322249.elements[18] = ((closureN)self_7313930)->elements[19];
+-c_7322249.elements[19] = ((closureN)self_7313930)->elements[20];
+-c_7322249.elements[20] = ((closureN)self_7313930)->elements[21];
+-c_7322249.elements[21] = ((closureN)self_7313930)->elements[22];
+-c_7322249.elements[22] = ((closureN)self_7313930)->elements[23];
+-c_7322249.elements[23] = ((closureN)self_7313930)->elements[24];
+-c_7322249.elements[24] = ((closureN)self_7313930)->elements[25];
+-c_7322249.elements[25] = ((closureN)self_7313930)->elements[26];
+-
+-
+-closureN_type c_7322854;
+-object e_7322987 [3];
+-c_7322854.hdr.mark = gc_color_red;
+- c_7322854.hdr.grayed = 0;
+-c_7322854.tag = closureN_tag;
+- c_7322854.fn = (function_type)__lambda_937;
+-c_7322854.num_args = 2;
+-c_7322854.num_elements = 3;
+-c_7322854.elements = (object *)e_7322987;
+-c_7322854.elements[0] = ((closureN)self_7313930)->elements[16];
+-c_7322854.elements[1] = ((closureN)self_7313930)->elements[20];
+-c_7322854.elements[2] = ((closureN)self_7313930)->elements[27];
+-
+-return_direct_with_clo1(data,(closure)&c_7322249,__lambda_870, &c_7322854);;
+-}
+-
+-static void __lambda_937(void *data, object self_7313931, int argc, object *args) /* object self_7313931, object k_736495, object x_731392_733652, object dim_731393_733653 */
+- {
+- object k_736495 = args[0]; object x_731392_733652 = args[1]; object dim_731393_733653 = args[2];
+-
+-closureN_type c_7322856;
+-object e_7322986 [4];
+-c_7322856.hdr.mark = gc_color_red;
+- c_7322856.hdr.grayed = 0;
+-c_7322856.tag = closureN_tag;
+- c_7322856.fn = (function_type)__lambda_938;
+-c_7322856.num_args = 3;
+-c_7322856.num_elements = 4;
+-c_7322856.elements = (object *)e_7322986;
+-c_7322856.elements[0] = ((closureN)self_7313931)->elements[0];
+-c_7322856.elements[1] = ((closureN)self_7313931)->elements[1];
+-c_7322856.elements[2] = k_736495;
+-c_7322856.elements[3] = ((closureN)self_7313931)->elements[2];
+-
+-return_direct_with_clo3(data,(closure)&c_7322856,__lambda_938, x_731392_733652, dim_731393_733653, NULL);;
+-}
+-
+-static void __lambda_938(void *data, object self_7313932, int argc, object *args) /* object self_7313932, object x_731395_733654, object dim_731396_733655, object vars_731397_733656 */
+- {
+- object x_731395_733654 = args[0]; object dim_731396_733655 = args[1]; object vars_731397_733656 = args[2];
+-
+-closureN_type c_7322858;
+-object e_7322985 [7];
+-c_7322858.hdr.mark = gc_color_red;
+- c_7322858.hdr.grayed = 0;
+-c_7322858.tag = closureN_tag;
+- c_7322858.fn = (function_type)__lambda_939;
+-c_7322858.num_args = 1;
+-c_7322858.num_elements = 7;
+-c_7322858.elements = (object *)e_7322985;
+-c_7322858.elements[0] = ((closureN)self_7313932)->elements[0];
+-c_7322858.elements[1] = dim_731396_733655;
+-c_7322858.elements[2] = ((closureN)self_7313932)->elements[1];
+-c_7322858.elements[3] = ((closureN)self_7313932)->elements[2];
+-c_7322858.elements[4] = ((closureN)self_7313932)->elements[3];
+-c_7322858.elements[5] = vars_731397_733656;
+-c_7322858.elements[6] = x_731395_733654;
+-
+-return_direct_with_clo1(data,(closure)&c_7322858,__lambda_939, boolean_f);;
+-}
+-
+-static void __lambda_939(void *data, object self_7313933, int argc, object *args) /* object self_7313933, object lp_731398_733657 */
+- {
+- object lp_731398_733657 = args[0];
+-
+-closureN_type c_7322860;
+-object e_7322981 [7];
+-c_7322860.hdr.mark = gc_color_red;
+- c_7322860.hdr.grayed = 0;
+-c_7322860.tag = closureN_tag;
+- c_7322860.fn = (function_type)__lambda_1427;
+-c_7322860.num_args = 1;
+-c_7322860.num_elements = 7;
+-c_7322860.elements = (object *)e_7322981;
+-c_7322860.elements[0] = ((closureN)self_7313933)->elements[0];
+-c_7322860.elements[1] = ((closureN)self_7313933)->elements[1];
+-c_7322860.elements[2] = ((closureN)self_7313933)->elements[2];
+-c_7322860.elements[3] = ((closureN)self_7313933)->elements[3];
+-c_7322860.elements[4] = ((closureN)self_7313933)->elements[4];
+-c_7322860.elements[5] = ((closureN)self_7313933)->elements[5];
+-c_7322860.elements[6] = ((closureN)self_7313933)->elements[6];
++return_direct_with_clo1(data, ((closureN)self_7312675)->elements[1], (((closure) ((closureN)self_7312675)->elements[1])->fn), Cyc_cdr(data, ((closureN)self_7312675)->elements[2]));}
++;;
++}
+
++static void __lambda_868(void *data, object self_7312676, int argc, object *args) /* object self_7312676, object r_736064 */
++ {
++ object r_736064 = args[0];
++
++closureN_type c_7320947;
++object e_7321688 [28];
++c_7320947.hdr.mark = gc_color_red;
++ c_7320947.hdr.grayed = 0;
++c_7320947.tag = closureN_tag;
++ c_7320947.fn = (function_type)__lambda_869;
++c_7320947.num_args = 1;
++c_7320947.num_elements = 28;
++c_7320947.elements = (object *)e_7321688;
++c_7320947.elements[0] = ((closureN)self_7312676)->elements[0];
++c_7320947.elements[1] = ((closureN)self_7312676)->elements[1];
++c_7320947.elements[2] = ((closureN)self_7312676)->elements[2];
++c_7320947.elements[3] = ((closureN)self_7312676)->elements[3];
++c_7320947.elements[4] = ((closureN)self_7312676)->elements[4];
++c_7320947.elements[5] = ((closureN)self_7312676)->elements[5];
++c_7320947.elements[6] = ((closureN)self_7312676)->elements[6];
++c_7320947.elements[7] = ((closureN)self_7312676)->elements[7];
++c_7320947.elements[8] = ((closureN)self_7312676)->elements[8];
++c_7320947.elements[9] = ((closureN)self_7312676)->elements[9];
++c_7320947.elements[10] = ((closureN)self_7312676)->elements[10];
++c_7320947.elements[11] = ((closureN)self_7312676)->elements[11];
++c_7320947.elements[12] = ((closureN)self_7312676)->elements[12];
++c_7320947.elements[13] = ((closureN)self_7312676)->elements[13];
++c_7320947.elements[14] = ((closureN)self_7312676)->elements[14];
++c_7320947.elements[15] = ((closureN)self_7312676)->elements[15];
++c_7320947.elements[16] = ((closureN)self_7312676)->elements[16];
++c_7320947.elements[17] = ((closureN)self_7312676)->elements[17];
++c_7320947.elements[18] = ((closureN)self_7312676)->elements[18];
++c_7320947.elements[19] = ((closureN)self_7312676)->elements[19];
++c_7320947.elements[20] = ((closureN)self_7312676)->elements[20];
++c_7320947.elements[21] = ((closureN)self_7312676)->elements[21];
++c_7320947.elements[22] = ((closureN)self_7312676)->elements[22];
++c_7320947.elements[23] = ((closureN)self_7312676)->elements[23];
++c_7320947.elements[24] = ((closureN)self_7312676)->elements[24];
++c_7320947.elements[25] = ((closureN)self_7312676)->elements[25];
++c_7320947.elements[26] = ((closureN)self_7312676)->elements[26];
++c_7320947.elements[27] = ((closureN)self_7312676)->elements[27];
+
+-pair_type local_7322984;
+-return_direct_with_clo1(data,(closure)&c_7322860,__lambda_1427, set_cell_as_expr(&local_7322984, lp_731398_733657));;
++
++
++return_direct_with_clo1(data,(closure)&c_7320947,__lambda_869, Cyc_set_cell(data, ((closureN)self_7312676)->elements[19], r_736064));;
+ }
+
+-static void __lambda_1427(void *data, object self_7313934, int argc, object *args) /* object self_7313934, object lp_731398_733657 */
++static void __lambda_869(void *data, object self_7312677, int argc, object *args) /* object self_7312677, object r_735940 */
+ {
+- object lp_731398_733657 = args[0];
++
+
+-closureN_type c_7322862;
+-object e_7322877 [5];
+-c_7322862.hdr.mark = gc_color_red;
+- c_7322862.hdr.grayed = 0;
+-c_7322862.tag = closureN_tag;
+- c_7322862.fn = (function_type)__lambda_940;
+-c_7322862.num_args = 1;
+-c_7322862.num_elements = 5;
+-c_7322862.elements = (object *)e_7322877;
+-c_7322862.elements[0] = ((closureN)self_7313934)->elements[1];
+-c_7322862.elements[1] = ((closureN)self_7313934)->elements[3];
+-c_7322862.elements[2] = lp_731398_733657;
+-c_7322862.elements[3] = ((closureN)self_7313934)->elements[5];
+-c_7322862.elements[4] = ((closureN)self_7313934)->elements[6];
+-
+-
+-closureN_type c_7322878;
+-object e_7322980 [4];
+-c_7322878.hdr.mark = gc_color_red;
+- c_7322878.hdr.grayed = 0;
+-c_7322878.tag = closureN_tag;
+- c_7322878.fn = (function_type)__lambda_942;
+-c_7322878.num_args = 3;
+-c_7322878.num_elements = 4;
+-c_7322878.elements = (object *)e_7322980;
+-c_7322878.elements[0] = ((closureN)self_7313934)->elements[0];
+-c_7322878.elements[1] = ((closureN)self_7313934)->elements[2];
+-c_7322878.elements[2] = ((closureN)self_7313934)->elements[4];
+-c_7322878.elements[3] = lp_731398_733657;
+-
+-return_direct_with_clo1(data,(closure)&c_7322862,__lambda_940, &c_7322878);;
+-}
+-
+-static void __lambda_942(void *data, object self_7313935, int argc, object *args) /* object self_7313935, object k_736499, object x_731399_733658, object dim_731400_733659, object vars_731401_733660 */
+- {
+- object k_736499 = args[0]; object x_731399_733658 = args[1]; object dim_731400_733659 = args[2]; object vars_731401_733660 = args[3];
+-
+-closureN_type c_7322880;
+-object e_7322979 [8];
+-c_7322880.hdr.mark = gc_color_red;
+- c_7322880.hdr.grayed = 0;
+-c_7322880.tag = closureN_tag;
+- c_7322880.fn = (function_type)__lambda_943;
+-c_7322880.num_args = 1;
+-c_7322880.num_elements = 8;
+-c_7322880.elements = (object *)e_7322979;
+-c_7322880.elements[0] = ((closureN)self_7313935)->elements[0];
+-c_7322880.elements[1] = dim_731400_733659;
+-c_7322880.elements[2] = ((closureN)self_7313935)->elements[1];
+-c_7322880.elements[3] = k_736499;
+-c_7322880.elements[4] = ((closureN)self_7313935)->elements[2];
+-c_7322880.elements[5] = ((closureN)self_7313935)->elements[3];
+-c_7322880.elements[6] = vars_731401_733660;
+-c_7322880.elements[7] = x_731399_733658;
++closureN_type c_7320949;
++object e_7321553 [26];
++c_7320949.hdr.mark = gc_color_red;
++ c_7320949.hdr.grayed = 0;
++c_7320949.tag = closureN_tag;
++ c_7320949.fn = (function_type)__lambda_870;
++c_7320949.num_args = 1;
++c_7320949.num_elements = 26;
++c_7320949.elements = (object *)e_7321553;
++c_7320949.elements[0] = ((closureN)self_7312677)->elements[0];
++c_7320949.elements[1] = ((closureN)self_7312677)->elements[1];
++c_7320949.elements[2] = ((closureN)self_7312677)->elements[2];
++c_7320949.elements[3] = ((closureN)self_7312677)->elements[3];
++c_7320949.elements[4] = ((closureN)self_7312677)->elements[4];
++c_7320949.elements[5] = ((closureN)self_7312677)->elements[5];
++c_7320949.elements[6] = ((closureN)self_7312677)->elements[6];
++c_7320949.elements[7] = ((closureN)self_7312677)->elements[7];
++c_7320949.elements[8] = ((closureN)self_7312677)->elements[8];
++c_7320949.elements[9] = ((closureN)self_7312677)->elements[9];
++c_7320949.elements[10] = ((closureN)self_7312677)->elements[10];
++c_7320949.elements[11] = ((closureN)self_7312677)->elements[11];
++c_7320949.elements[12] = ((closureN)self_7312677)->elements[12];
++c_7320949.elements[13] = ((closureN)self_7312677)->elements[13];
++c_7320949.elements[14] = ((closureN)self_7312677)->elements[14];
++c_7320949.elements[15] = ((closureN)self_7312677)->elements[15];
++c_7320949.elements[16] = ((closureN)self_7312677)->elements[17];
++c_7320949.elements[17] = ((closureN)self_7312677)->elements[18];
++c_7320949.elements[18] = ((closureN)self_7312677)->elements[19];
++c_7320949.elements[19] = ((closureN)self_7312677)->elements[20];
++c_7320949.elements[20] = ((closureN)self_7312677)->elements[21];
++c_7320949.elements[21] = ((closureN)self_7312677)->elements[22];
++c_7320949.elements[22] = ((closureN)self_7312677)->elements[23];
++c_7320949.elements[23] = ((closureN)self_7312677)->elements[24];
++c_7320949.elements[24] = ((closureN)self_7312677)->elements[25];
++c_7320949.elements[25] = ((closureN)self_7312677)->elements[26];
++
++
++closureN_type c_7321554;
++object e_7321687 [3];
++c_7321554.hdr.mark = gc_color_red;
++ c_7321554.hdr.grayed = 0;
++c_7321554.tag = closureN_tag;
++ c_7321554.fn = (function_type)__lambda_937;
++c_7321554.num_args = 2;
++c_7321554.num_elements = 3;
++c_7321554.elements = (object *)e_7321687;
++c_7321554.elements[0] = ((closureN)self_7312677)->elements[16];
++c_7321554.elements[1] = ((closureN)self_7312677)->elements[20];
++c_7321554.elements[2] = ((closureN)self_7312677)->elements[27];
++
++return_direct_with_clo1(data,(closure)&c_7320949,__lambda_870, &c_7321554);;
++}
++
++static void __lambda_937(void *data, object self_7312678, int argc, object *args) /* object self_7312678, object k_736043, object x_731392_733305, object dim_731393_733306 */
++ {
++ object k_736043 = args[0]; object x_731392_733305 = args[1]; object dim_731393_733306 = args[2];
++
++closureN_type c_7321556;
++object e_7321686 [4];
++c_7321556.hdr.mark = gc_color_red;
++ c_7321556.hdr.grayed = 0;
++c_7321556.tag = closureN_tag;
++ c_7321556.fn = (function_type)__lambda_938;
++c_7321556.num_args = 3;
++c_7321556.num_elements = 4;
++c_7321556.elements = (object *)e_7321686;
++c_7321556.elements[0] = ((closureN)self_7312678)->elements[0];
++c_7321556.elements[1] = ((closureN)self_7312678)->elements[1];
++c_7321556.elements[2] = k_736043;
++c_7321556.elements[3] = ((closureN)self_7312678)->elements[2];
++
++return_direct_with_clo3(data,(closure)&c_7321556,__lambda_938, x_731392_733305, dim_731393_733306, NULL);;
++}
++
++static void __lambda_938(void *data, object self_7312679, int argc, object *args) /* object self_7312679, object x_731395_733307, object dim_731396_733308, object vars_731397_733309 */
++ {
++ object x_731395_733307 = args[0]; object dim_731396_733308 = args[1]; object vars_731397_733309 = args[2];
++
++closureN_type c_7321558;
++object e_7321685 [7];
++c_7321558.hdr.mark = gc_color_red;
++ c_7321558.hdr.grayed = 0;
++c_7321558.tag = closureN_tag;
++ c_7321558.fn = (function_type)__lambda_939;
++c_7321558.num_args = 1;
++c_7321558.num_elements = 7;
++c_7321558.elements = (object *)e_7321685;
++c_7321558.elements[0] = ((closureN)self_7312679)->elements[0];
++c_7321558.elements[1] = dim_731396_733308;
++c_7321558.elements[2] = ((closureN)self_7312679)->elements[1];
++c_7321558.elements[3] = ((closureN)self_7312679)->elements[2];
++c_7321558.elements[4] = ((closureN)self_7312679)->elements[3];
++c_7321558.elements[5] = vars_731397_733309;
++c_7321558.elements[6] = x_731395_733307;
++
++return_direct_with_clo1(data,(closure)&c_7321558,__lambda_939, boolean_f);;
++}
++
++static void __lambda_939(void *data, object self_7312680, int argc, object *args) /* object self_7312680, object lp_731398_733310 */
++ {
++ object lp_731398_733310 = args[0];
++
++closureN_type c_7321560;
++object e_7321681 [7];
++c_7321560.hdr.mark = gc_color_red;
++ c_7321560.hdr.grayed = 0;
++c_7321560.tag = closureN_tag;
++ c_7321560.fn = (function_type)__lambda_1380;
++c_7321560.num_args = 1;
++c_7321560.num_elements = 7;
++c_7321560.elements = (object *)e_7321681;
++c_7321560.elements[0] = ((closureN)self_7312680)->elements[0];
++c_7321560.elements[1] = ((closureN)self_7312680)->elements[1];
++c_7321560.elements[2] = ((closureN)self_7312680)->elements[2];
++c_7321560.elements[3] = ((closureN)self_7312680)->elements[3];
++c_7321560.elements[4] = ((closureN)self_7312680)->elements[4];
++c_7321560.elements[5] = ((closureN)self_7312680)->elements[5];
++c_7321560.elements[6] = ((closureN)self_7312680)->elements[6];
+
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7322880, x_731399_733658);;
++
++pair_type local_7321684;
++return_direct_with_clo1(data,(closure)&c_7321560,__lambda_1380, set_cell_as_expr(&local_7321684, lp_731398_733310));;
+ }
+
+-static void __lambda_943(void *data, object self_7313936, int argc, object *args) /* object self_7313936, object r_736500 */
++static void __lambda_1380(void *data, object self_7312681, int argc, object *args) /* object self_7312681, object lp_731398_733310 */
+ {
+- object r_736500 = args[0];
+- if( (boolean_f != r_736500) ){
++ object lp_731398_733310 = args[0];
+
+-closureN_type c_7322882;
+-object e_7322903 [5];
+-c_7322882.hdr.mark = gc_color_red;
+- c_7322882.hdr.grayed = 0;
+-c_7322882.tag = closureN_tag;
+- c_7322882.fn = (function_type)__lambda_944;
+-c_7322882.num_args = 1;
+-c_7322882.num_elements = 5;
+-c_7322882.elements = (object *)e_7322903;
+-c_7322882.elements[0] = ((closureN)self_7313936)->elements[1];
+-c_7322882.elements[1] = ((closureN)self_7313936)->elements[3];
+-c_7322882.elements[2] = ((closureN)self_7313936)->elements[4];
+-c_7322882.elements[3] = ((closureN)self_7313936)->elements[6];
+-c_7322882.elements[4] = ((closureN)self_7313936)->elements[7];
++closureN_type c_7321562;
++object e_7321577 [5];
++c_7321562.hdr.mark = gc_color_red;
++ c_7321562.hdr.grayed = 0;
++c_7321562.tag = closureN_tag;
++ c_7321562.fn = (function_type)__lambda_940;
++c_7321562.num_args = 1;
++c_7321562.num_elements = 5;
++c_7321562.elements = (object *)e_7321577;
++c_7321562.elements[0] = ((closureN)self_7312681)->elements[1];
++c_7321562.elements[1] = ((closureN)self_7312681)->elements[3];
++c_7321562.elements[2] = lp_731398_733310;
++c_7321562.elements[3] = ((closureN)self_7312681)->elements[5];
++c_7321562.elements[4] = ((closureN)self_7312681)->elements[6];
++
++
++closureN_type c_7321578;
++object e_7321680 [4];
++c_7321578.hdr.mark = gc_color_red;
++ c_7321578.hdr.grayed = 0;
++c_7321578.tag = closureN_tag;
++ c_7321578.fn = (function_type)__lambda_942;
++c_7321578.num_args = 3;
++c_7321578.num_elements = 4;
++c_7321578.elements = (object *)e_7321680;
++c_7321578.elements[0] = ((closureN)self_7312681)->elements[0];
++c_7321578.elements[1] = ((closureN)self_7312681)->elements[2];
++c_7321578.elements[2] = ((closureN)self_7312681)->elements[4];
++c_7321578.elements[3] = lp_731398_733310;
++
++return_direct_with_clo1(data,(closure)&c_7321562,__lambda_940, &c_7321578);;
++}
++
++static void __lambda_942(void *data, object self_7312682, int argc, object *args) /* object self_7312682, object k_736047, object x_731399_733311, object dim_731400_733312, object vars_731401_733313 */
++ {
++ object k_736047 = args[0]; object x_731399_733311 = args[1]; object dim_731400_733312 = args[2]; object vars_731401_733313 = args[3];
++
++closureN_type c_7321580;
++object e_7321679 [8];
++c_7321580.hdr.mark = gc_color_red;
++ c_7321580.hdr.grayed = 0;
++c_7321580.tag = closureN_tag;
++ c_7321580.fn = (function_type)__lambda_943;
++c_7321580.num_args = 1;
++c_7321580.num_elements = 8;
++c_7321580.elements = (object *)e_7321679;
++c_7321580.elements[0] = ((closureN)self_7312682)->elements[0];
++c_7321580.elements[1] = dim_731400_733312;
++c_7321580.elements[2] = ((closureN)self_7312682)->elements[1];
++c_7321580.elements[3] = k_736047;
++c_7321580.elements[4] = ((closureN)self_7312682)->elements[2];
++c_7321580.elements[5] = ((closureN)self_7312682)->elements[3];
++c_7321580.elements[6] = vars_731401_733313;
++c_7321580.elements[7] = x_731399_733311;
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7321580, x_731399_733311);;
++}
++
++static void __lambda_943(void *data, object self_7312683, int argc, object *args) /* object self_7312683, object r_736048 */
++ {
++ object r_736048 = args[0];
++ if( (boolean_f != r_736048) ){
++
++closureN_type c_7321582;
++object e_7321603 [5];
++c_7321582.hdr.mark = gc_color_red;
++ c_7321582.hdr.grayed = 0;
++c_7321582.tag = closureN_tag;
++ c_7321582.fn = (function_type)__lambda_944;
++c_7321582.num_args = 1;
++c_7321582.num_elements = 5;
++c_7321582.elements = (object *)e_7321603;
++c_7321582.elements[0] = ((closureN)self_7312683)->elements[1];
++c_7321582.elements[1] = ((closureN)self_7312683)->elements[3];
++c_7321582.elements[2] = ((closureN)self_7312683)->elements[4];
++c_7321582.elements[3] = ((closureN)self_7312683)->elements[6];
++c_7321582.elements[4] = ((closureN)self_7312683)->elements[7];
+
+
+-closureN_type c_7322904;
+-object e_7322908 [2];
+-c_7322904.hdr.mark = gc_color_red;
+- c_7322904.hdr.grayed = 0;
+-c_7322904.tag = closureN_tag;
+- c_7322904.fn = (function_type)__lambda_946;
+-c_7322904.num_args = 1;
+-c_7322904.num_elements = 2;
+-c_7322904.elements = (object *)e_7322908;
+-c_7322904.elements[0] = ((closureN)self_7313936)->elements[0];
+-c_7322904.elements[1] = ((closureN)self_7313936)->elements[7];
++closureN_type c_7321604;
++object e_7321608 [2];
++c_7321604.hdr.mark = gc_color_red;
++ c_7321604.hdr.grayed = 0;
++c_7321604.tag = closureN_tag;
++ c_7321604.fn = (function_type)__lambda_946;
++c_7321604.num_args = 1;
++c_7321604.num_elements = 2;
++c_7321604.elements = (object *)e_7321608;
++c_7321604.elements[0] = ((closureN)self_7312683)->elements[0];
++c_7321604.elements[1] = ((closureN)self_7312683)->elements[7];
+
+-return_direct_with_clo1(data,(closure)&c_7322882,__lambda_944, &c_7322904);
++return_direct_with_clo1(data,(closure)&c_7321582,__lambda_944, &c_7321604);
+ } else {
+
+
+
+-closureN_type c_7322913;
+-object e_7322977 [5];
+-c_7322913.hdr.mark = gc_color_red;
+- c_7322913.hdr.grayed = 0;
+-c_7322913.tag = closureN_tag;
+- c_7322913.fn = (function_type)__lambda_947;
+-c_7322913.num_args = 1;
+-c_7322913.num_elements = 5;
+-c_7322913.elements = (object *)e_7322977;
+-c_7322913.elements[0] = ((closureN)self_7313936)->elements[1];
+-c_7322913.elements[1] = ((closureN)self_7313936)->elements[3];
+-c_7322913.elements[2] = ((closureN)self_7313936)->elements[5];
+-c_7322913.elements[3] = ((closureN)self_7313936)->elements[6];
+-c_7322913.elements[4] = ((closureN)self_7313936)->elements[7];
++closureN_type c_7321613;
++object e_7321677 [5];
++c_7321613.hdr.mark = gc_color_red;
++ c_7321613.hdr.grayed = 0;
++c_7321613.tag = closureN_tag;
++ c_7321613.fn = (function_type)__lambda_947;
++c_7321613.num_args = 1;
++c_7321613.num_elements = 5;
++c_7321613.elements = (object *)e_7321677;
++c_7321613.elements[0] = ((closureN)self_7312683)->elements[1];
++c_7321613.elements[1] = ((closureN)self_7312683)->elements[3];
++c_7321613.elements[2] = ((closureN)self_7312683)->elements[5];
++c_7321613.elements[3] = ((closureN)self_7312683)->elements[6];
++c_7321613.elements[4] = ((closureN)self_7312683)->elements[7];
+
+-return_closcall2(data, car(((closureN)self_7313936)->elements[2]), &c_7322913, ((closureN)self_7313936)->elements[7]);}
++return_closcall2(data, car(((closureN)self_7312683)->elements[2]), &c_7321613, ((closureN)self_7312683)->elements[7]);}
+ ;;
+ }
+
+-static void __lambda_947(void *data, object self_7313940, int argc, object *args) /* object self_7313940, object r_736505 */
++static void __lambda_947(void *data, object self_7312687, int argc, object *args) /* object self_7312687, object r_736053 */
+ {
+- object r_736505 = args[0];
+- if( (boolean_f != r_736505) ){
++ object r_736053 = args[0];
++ if( (boolean_f != r_736053) ){
+
+
+
+-closureN_type c_7322918;
+-object e_7322931 [4];
+-c_7322918.hdr.mark = gc_color_red;
+- c_7322918.hdr.grayed = 0;
+-c_7322918.tag = closureN_tag;
+- c_7322918.fn = (function_type)__lambda_948;
+-c_7322918.num_args = 1;
+-c_7322918.num_elements = 4;
+-c_7322918.elements = (object *)e_7322931;
+-c_7322918.elements[0] = ((closureN)self_7313940)->elements[0];
+-c_7322918.elements[1] = ((closureN)self_7313940)->elements[1];
+-c_7322918.elements[2] = ((closureN)self_7313940)->elements[2];
+-c_7322918.elements[3] = ((closureN)self_7313940)->elements[4];
++closureN_type c_7321618;
++object e_7321631 [4];
++c_7321618.hdr.mark = gc_color_red;
++ c_7321618.hdr.grayed = 0;
++c_7321618.tag = closureN_tag;
++ c_7321618.fn = (function_type)__lambda_948;
++c_7321618.num_args = 1;
++c_7321618.num_elements = 4;
++c_7321618.elements = (object *)e_7321631;
++c_7321618.elements[0] = ((closureN)self_7312687)->elements[0];
++c_7321618.elements[1] = ((closureN)self_7312687)->elements[1];
++c_7321618.elements[2] = ((closureN)self_7312687)->elements[2];
++c_7321618.elements[3] = ((closureN)self_7312687)->elements[4];
+
+
+
+-return_closcall4(data, car(((closureN)self_7313940)->elements[2]), &c_7322918, Cyc_cddr(data, ((closureN)self_7313940)->elements[4]), ((closureN)self_7313940)->elements[0], ((closureN)self_7313940)->elements[3]);
++return_closcall4(data, car(((closureN)self_7312687)->elements[2]), &c_7321618, Cyc_cddr(data, ((closureN)self_7312687)->elements[4]), ((closureN)self_7312687)->elements[0], ((closureN)self_7312687)->elements[3]);
+ } else {
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313940)->elements[4])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312687)->elements[4])) ){
+
+
+
+-closureN_type c_7322944;
+-object e_7322954 [4];
+-c_7322944.hdr.mark = gc_color_red;
+- c_7322944.hdr.grayed = 0;
+-c_7322944.tag = closureN_tag;
+- c_7322944.fn = (function_type)__lambda_949;
+-c_7322944.num_args = 1;
+-c_7322944.num_elements = 4;
+-c_7322944.elements = (object *)e_7322954;
+-c_7322944.elements[0] = ((closureN)self_7313940)->elements[0];
+-c_7322944.elements[1] = ((closureN)self_7313940)->elements[1];
+-c_7322944.elements[2] = ((closureN)self_7313940)->elements[2];
+-c_7322944.elements[3] = ((closureN)self_7313940)->elements[4];
++closureN_type c_7321644;
++object e_7321654 [4];
++c_7321644.hdr.mark = gc_color_red;
++ c_7321644.hdr.grayed = 0;
++c_7321644.tag = closureN_tag;
++ c_7321644.fn = (function_type)__lambda_949;
++c_7321644.num_args = 1;
++c_7321644.num_elements = 4;
++c_7321644.elements = (object *)e_7321654;
++c_7321644.elements[0] = ((closureN)self_7312687)->elements[0];
++c_7321644.elements[1] = ((closureN)self_7312687)->elements[1];
++c_7321644.elements[2] = ((closureN)self_7312687)->elements[2];
++c_7321644.elements[3] = ((closureN)self_7312687)->elements[4];
+
+
+
+-return_closcall4(data, car(((closureN)self_7313940)->elements[2]), &c_7322944, Cyc_cdr(data, ((closureN)self_7313940)->elements[4]), ((closureN)self_7313940)->elements[0], ((closureN)self_7313940)->elements[3]);
++return_closcall4(data, car(((closureN)self_7312687)->elements[2]), &c_7321644, Cyc_cdr(data, ((closureN)self_7312687)->elements[4]), ((closureN)self_7312687)->elements[0], ((closureN)self_7312687)->elements[3]);
+ } else {
+
+-if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313940)->elements[4])) ){
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312687)->elements[4])) ){
+
+-closureN_type c_7322964;
+-object e_7322972 [4];
+-c_7322964.hdr.mark = gc_color_red;
+- c_7322964.hdr.grayed = 0;
+-c_7322964.tag = closureN_tag;
+- c_7322964.fn = (function_type)__lambda_950;
+-c_7322964.num_args = 1;
+-c_7322964.num_elements = 4;
+-c_7322964.elements = (object *)e_7322972;
+-c_7322964.elements[0] = ((closureN)self_7313940)->elements[0];
+-c_7322964.elements[1] = ((closureN)self_7313940)->elements[1];
+-c_7322964.elements[2] = ((closureN)self_7313940)->elements[2];
+-c_7322964.elements[3] = ((closureN)self_7313940)->elements[3];
++closureN_type c_7321664;
++object e_7321672 [4];
++c_7321664.hdr.mark = gc_color_red;
++ c_7321664.hdr.grayed = 0;
++c_7321664.tag = closureN_tag;
++ c_7321664.fn = (function_type)__lambda_950;
++c_7321664.num_args = 1;
++c_7321664.num_elements = 4;
++c_7321664.elements = (object *)e_7321672;
++c_7321664.elements[0] = ((closureN)self_7312687)->elements[0];
++c_7321664.elements[1] = ((closureN)self_7312687)->elements[1];
++c_7321664.elements[2] = ((closureN)self_7312687)->elements[2];
++c_7321664.elements[3] = ((closureN)self_7312687)->elements[3];
+
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7322964, ((closureN)self_7313940)->elements[4]);
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7321664, ((closureN)self_7312687)->elements[4]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313940)->elements[1], (((closure) ((closureN)self_7313940)->elements[1])->fn), ((closureN)self_7313940)->elements[3]);}
++ return_direct_with_clo1(data, ((closureN)self_7312687)->elements[1], (((closure) ((closureN)self_7312687)->elements[1])->fn), ((closureN)self_7312687)->elements[3]);}
+ ;}
+ ;}
+ ;;
+ }
+
+-static void __lambda_950(void *data, object self_7313943, int argc, object *args) /* object self_7313943, object r_736515 */
++static void __lambda_950(void *data, object self_7312690, int argc, object *args) /* object self_7312690, object r_736063 */
+ {
+- object r_736515 = args[0];
++ object r_736063 = args[0];
+
+
+-return_closcall4(data, car(((closureN)self_7313943)->elements[2]), ((closureN)self_7313943)->elements[1], r_736515, ((closureN)self_7313943)->elements[0], ((closureN)self_7313943)->elements[3]);;
++return_closcall4(data, car(((closureN)self_7312690)->elements[2]), ((closureN)self_7312690)->elements[1], r_736063, ((closureN)self_7312690)->elements[0], ((closureN)self_7312690)->elements[3]);;
+ }
+
+-static void __lambda_949(void *data, object self_7313942, int argc, object *args) /* object self_7313942, object r_736512 */
++static void __lambda_949(void *data, object self_7312689, int argc, object *args) /* object self_7312689, object r_736060 */
+ {
+- object r_736512 = args[0];
++ object r_736060 = args[0];
+
+
+
+
+-return_closcall4(data, car(((closureN)self_7313942)->elements[2]), ((closureN)self_7313942)->elements[1], Cyc_car(data, ((closureN)self_7313942)->elements[3]), ((closureN)self_7313942)->elements[0], r_736512);;
++return_closcall4(data, car(((closureN)self_7312689)->elements[2]), ((closureN)self_7312689)->elements[1], Cyc_car(data, ((closureN)self_7312689)->elements[3]), ((closureN)self_7312689)->elements[0], r_736060);;
+ }
+
+-static void __lambda_948(void *data, object self_7313941, int argc, object *args) /* object self_7313941, object r_736508 */
++static void __lambda_948(void *data, object self_7312688, int argc, object *args) /* object self_7312688, object r_736056 */
+ {
+- object r_736508 = args[0];
++ object r_736056 = args[0];
+
+
+
+
+
+-complex_num_type local_7322929;
+-return_closcall4(data, car(((closureN)self_7313941)->elements[2]), ((closureN)self_7313941)->elements[1], Cyc_car(data, ((closureN)self_7313941)->elements[3]), Cyc_fast_sum(data,&local_7322929, ((closureN)self_7313941)->elements[0], obj_int2obj(1)), r_736508);;
++complex_num_type local_7321629;
++return_closcall4(data, car(((closureN)self_7312688)->elements[2]), ((closureN)self_7312688)->elements[1], Cyc_car(data, ((closureN)self_7312688)->elements[3]), Cyc_fast_sum(data,&local_7321629, ((closureN)self_7312688)->elements[0], obj_int2obj(1)), r_736056);;
+ }
+
+-static void __lambda_946(void *data, object self_7313937, int argc, object *args) /* object self_7313937, object k_736504, object lit_731405_733661 */
++static void __lambda_946(void *data, object self_7312684, int argc, object *args) /* object self_7312684, object k_736052, object lit_731405_733314 */
+ {
+- object k_736504 = args[0]; object lit_731405_733661 = args[1];
+- return_closcall3(data, ((closureN)self_7313937)->elements[0], k_736504, ((closureN)self_7313937)->elements[1], lit_731405_733661);;
++ object k_736052 = args[0]; object lit_731405_733314 = args[1];
++ return_closcall3(data, ((closureN)self_7312684)->elements[0], k_736052, ((closureN)self_7312684)->elements[1], lit_731405_733314);;
+ }
+
+-static void __lambda_944(void *data, object self_7313938, int argc, object *args) /* object self_7313938, object r_736503 */
++static void __lambda_944(void *data, object self_7312685, int argc, object *args) /* object self_7312685, object r_736051 */
+ {
+- object r_736503 = args[0];
++ object r_736051 = args[0];
+
+-closureN_type c_7322884;
+-object e_7322899 [4];
+-c_7322884.hdr.mark = gc_color_red;
+- c_7322884.hdr.grayed = 0;
+-c_7322884.tag = closureN_tag;
+- c_7322884.fn = (function_type)__lambda_945;
+-c_7322884.num_args = 1;
+-c_7322884.num_elements = 4;
+-c_7322884.elements = (object *)e_7322899;
+-c_7322884.elements[0] = ((closureN)self_7313938)->elements[0];
+-c_7322884.elements[1] = ((closureN)self_7313938)->elements[1];
+-c_7322884.elements[2] = ((closureN)self_7313938)->elements[3];
+-c_7322884.elements[3] = ((closureN)self_7313938)->elements[4];
+-
+-
+-
+-return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), &c_7322884, r_736503, car(((closureN)self_7313938)->elements[2]));;
+-}
+-
+-static void __lambda_945(void *data, object self_7313939, int argc, object *args) /* object self_7313939, object r_736501 */
+- {
+- object r_736501 = args[0];
+- if( (boolean_f != r_736501) ){
+- return_direct_with_clo1(data, ((closureN)self_7313939)->elements[1], (((closure) ((closureN)self_7313939)->elements[1])->fn), ((closureN)self_7313939)->elements[2]);
+-} else {
+-
+-pair_type local_7322892;
+-
+-pair_type local_7322895;
+-return_direct_with_clo1(data, ((closureN)self_7313939)->elements[1], (((closure) ((closureN)self_7313939)->elements[1])->fn), set_pair_as_expr(&local_7322892, set_pair_as_expr(&local_7322895, ((closureN)self_7313939)->elements[3], ((closureN)self_7313939)->elements[0]), ((closureN)self_7313939)->elements[2]));}
+-;;
+-}
+-
+-static void __lambda_940(void *data, object self_7313944, int argc, object *args) /* object self_7313944, object r_736498 */
+- {
+- object r_736498 = args[0];
+-
+-closureN_type c_7322864;
+-object e_7322873 [5];
+-c_7322864.hdr.mark = gc_color_red;
+- c_7322864.hdr.grayed = 0;
+-c_7322864.tag = closureN_tag;
+- c_7322864.fn = (function_type)__lambda_941;
+-c_7322864.num_args = 1;
+-c_7322864.num_elements = 5;
+-c_7322864.elements = (object *)e_7322873;
+-c_7322864.elements[0] = ((closureN)self_7313944)->elements[0];
+-c_7322864.elements[1] = ((closureN)self_7313944)->elements[1];
+-c_7322864.elements[2] = ((closureN)self_7313944)->elements[2];
+-c_7322864.elements[3] = ((closureN)self_7313944)->elements[3];
+-c_7322864.elements[4] = ((closureN)self_7313944)->elements[4];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322864,__lambda_941, Cyc_set_cell(data, ((closureN)self_7313944)->elements[2], r_736498));;
+-}
+-
+-static void __lambda_941(void *data, object self_7313945, int argc, object *args) /* object self_7313945, object r_736497 */
+- {
+-
+-
+-
+-return_closcall4(data, car(((closureN)self_7313945)->elements[2]), ((closureN)self_7313945)->elements[1], ((closureN)self_7313945)->elements[4], ((closureN)self_7313945)->elements[0], ((closureN)self_7313945)->elements[3]);;
+-}
+-
+-static void __lambda_870(void *data, object self_7313946, int argc, object *args) /* object self_7313946, object r_736494 */
+- {
+- object r_736494 = args[0];
+-
+-closureN_type c_7322251;
+-object e_7322849 [25];
+-c_7322251.hdr.mark = gc_color_red;
+- c_7322251.hdr.grayed = 0;
+-c_7322251.tag = closureN_tag;
+- c_7322251.fn = (function_type)__lambda_871;
+-c_7322251.num_args = 1;
+-c_7322251.num_elements = 25;
+-c_7322251.elements = (object *)e_7322849;
+-c_7322251.elements[0] = ((closureN)self_7313946)->elements[0];
+-c_7322251.elements[1] = ((closureN)self_7313946)->elements[1];
+-c_7322251.elements[2] = ((closureN)self_7313946)->elements[2];
+-c_7322251.elements[3] = ((closureN)self_7313946)->elements[3];
+-c_7322251.elements[4] = ((closureN)self_7313946)->elements[4];
+-c_7322251.elements[5] = ((closureN)self_7313946)->elements[5];
+-c_7322251.elements[6] = ((closureN)self_7313946)->elements[6];
+-c_7322251.elements[7] = ((closureN)self_7313946)->elements[7];
+-c_7322251.elements[8] = ((closureN)self_7313946)->elements[8];
+-c_7322251.elements[9] = ((closureN)self_7313946)->elements[9];
+-c_7322251.elements[10] = ((closureN)self_7313946)->elements[10];
+-c_7322251.elements[11] = ((closureN)self_7313946)->elements[11];
+-c_7322251.elements[12] = ((closureN)self_7313946)->elements[12];
+-c_7322251.elements[13] = ((closureN)self_7313946)->elements[13];
+-c_7322251.elements[14] = ((closureN)self_7313946)->elements[14];
+-c_7322251.elements[15] = ((closureN)self_7313946)->elements[16];
+-c_7322251.elements[16] = ((closureN)self_7313946)->elements[17];
+-c_7322251.elements[17] = ((closureN)self_7313946)->elements[18];
+-c_7322251.elements[18] = ((closureN)self_7313946)->elements[19];
+-c_7322251.elements[19] = ((closureN)self_7313946)->elements[20];
+-c_7322251.elements[20] = ((closureN)self_7313946)->elements[21];
+-c_7322251.elements[21] = ((closureN)self_7313946)->elements[22];
+-c_7322251.elements[22] = ((closureN)self_7313946)->elements[23];
+-c_7322251.elements[23] = ((closureN)self_7313946)->elements[24];
+-c_7322251.elements[24] = ((closureN)self_7313946)->elements[25];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322251,__lambda_871, Cyc_set_cell(data, ((closureN)self_7313946)->elements[15], r_736494));;
+-}
+-
+-static void __lambda_871(void *data, object self_7313947, int argc, object *args) /* object self_7313947, object r_736393 */
+- {
+-
+-
+-closureN_type c_7322253;
+-object e_7322734 [25];
+-c_7322253.hdr.mark = gc_color_red;
+- c_7322253.hdr.grayed = 0;
+-c_7322253.tag = closureN_tag;
+- c_7322253.fn = (function_type)__lambda_872;
+-c_7322253.num_args = 1;
+-c_7322253.num_elements = 25;
+-c_7322253.elements = (object *)e_7322734;
+-c_7322253.elements[0] = ((closureN)self_7313947)->elements[0];
+-c_7322253.elements[1] = ((closureN)self_7313947)->elements[1];
+-c_7322253.elements[2] = ((closureN)self_7313947)->elements[2];
+-c_7322253.elements[3] = ((closureN)self_7313947)->elements[3];
+-c_7322253.elements[4] = ((closureN)self_7313947)->elements[4];
+-c_7322253.elements[5] = ((closureN)self_7313947)->elements[5];
+-c_7322253.elements[6] = ((closureN)self_7313947)->elements[6];
+-c_7322253.elements[7] = ((closureN)self_7313947)->elements[7];
+-c_7322253.elements[8] = ((closureN)self_7313947)->elements[8];
+-c_7322253.elements[9] = ((closureN)self_7313947)->elements[9];
+-c_7322253.elements[10] = ((closureN)self_7313947)->elements[10];
+-c_7322253.elements[11] = ((closureN)self_7313947)->elements[11];
+-c_7322253.elements[12] = ((closureN)self_7313947)->elements[12];
+-c_7322253.elements[13] = ((closureN)self_7313947)->elements[13];
+-c_7322253.elements[14] = ((closureN)self_7313947)->elements[14];
+-c_7322253.elements[15] = ((closureN)self_7313947)->elements[15];
+-c_7322253.elements[16] = ((closureN)self_7313947)->elements[16];
+-c_7322253.elements[17] = ((closureN)self_7313947)->elements[17];
+-c_7322253.elements[18] = ((closureN)self_7313947)->elements[18];
+-c_7322253.elements[19] = ((closureN)self_7313947)->elements[19];
+-c_7322253.elements[20] = ((closureN)self_7313947)->elements[20];
+-c_7322253.elements[21] = ((closureN)self_7313947)->elements[21];
+-c_7322253.elements[22] = ((closureN)self_7313947)->elements[22];
+-c_7322253.elements[23] = ((closureN)self_7313947)->elements[23];
+-c_7322253.elements[24] = ((closureN)self_7313947)->elements[24];
+-
+-
+-mmacro(c_7322735, (function_type)__lambda_923);c_7322735.num_args = 3;
+-return_direct_with_clo1(data,(closure)&c_7322253,__lambda_872, &c_7322735);;
+-}
+-
+-static void __lambda_923(void *data, object self_7313948, int argc, object *args) /* object self_7313948, object k_736477, object x_731416_733662, object vars_731417_733663, object dim_731418_733664 */
+- {
+- object k_736477 = args[0]; object x_731416_733662 = args[1]; object vars_731417_733663 = args[2]; object dim_731418_733664 = args[3];
+-
+-closureN_type c_7322737;
+-object e_7322848 [3];
+-c_7322737.hdr.mark = gc_color_red;
+- c_7322737.hdr.grayed = 0;
+-c_7322737.tag = closureN_tag;
+- c_7322737.fn = (function_type)__lambda_924;
+-c_7322737.num_args = 2;
+-c_7322737.num_elements = 3;
+-c_7322737.elements = (object *)e_7322848;
+-c_7322737.elements[0] = dim_731418_733664;
+-c_7322737.elements[1] = k_736477;
+-c_7322737.elements[2] = vars_731417_733663;
+-
+-return_direct_with_clo2(data,(closure)&c_7322737,__lambda_924, x_731416_733662, NULL);;
+-}
+-
+-static void __lambda_924(void *data, object self_7313949, int argc, object *args) /* object self_7313949, object x_731420_733665, object free_731421_733666 */
+- {
+- object x_731420_733665 = args[0]; object free_731421_733666 = args[1];
+-
+-closureN_type c_7322739;
+-object e_7322847 [5];
+-c_7322739.hdr.mark = gc_color_red;
+- c_7322739.hdr.grayed = 0;
+-c_7322739.tag = closureN_tag;
+- c_7322739.fn = (function_type)__lambda_925;
+-c_7322739.num_args = 1;
+-c_7322739.num_elements = 5;
+-c_7322739.elements = (object *)e_7322847;
+-c_7322739.elements[0] = ((closureN)self_7313949)->elements[0];
+-c_7322739.elements[1] = free_731421_733666;
+-c_7322739.elements[2] = ((closureN)self_7313949)->elements[1];
+-c_7322739.elements[3] = ((closureN)self_7313949)->elements[2];
+-c_7322739.elements[4] = x_731420_733665;
+-
+-return_direct_with_clo1(data,(closure)&c_7322739,__lambda_925, boolean_f);;
+-}
+-
+-static void __lambda_925(void *data, object self_7313950, int argc, object *args) /* object self_7313950, object lp_731422_733667 */
+- {
+- object lp_731422_733667 = args[0];
+-
+-closureN_type c_7322741;
+-object e_7322843 [5];
+-c_7322741.hdr.mark = gc_color_red;
+- c_7322741.hdr.grayed = 0;
+-c_7322741.tag = closureN_tag;
+- c_7322741.fn = (function_type)__lambda_1426;
+-c_7322741.num_args = 1;
+-c_7322741.num_elements = 5;
+-c_7322741.elements = (object *)e_7322843;
+-c_7322741.elements[0] = ((closureN)self_7313950)->elements[0];
+-c_7322741.elements[1] = ((closureN)self_7313950)->elements[1];
+-c_7322741.elements[2] = ((closureN)self_7313950)->elements[2];
+-c_7322741.elements[3] = ((closureN)self_7313950)->elements[3];
+-c_7322741.elements[4] = ((closureN)self_7313950)->elements[4];
+-
+-
+-pair_type local_7322846;
+-return_direct_with_clo1(data,(closure)&c_7322741,__lambda_1426, set_cell_as_expr(&local_7322846, lp_731422_733667));;
+-}
+-
+-static void __lambda_1426(void *data, object self_7313951, int argc, object *args) /* object self_7313951, object lp_731422_733667 */
+- {
+- object lp_731422_733667 = args[0];
+-
+-closureN_type c_7322743;
+-object e_7322757 [4];
+-c_7322743.hdr.mark = gc_color_red;
+- c_7322743.hdr.grayed = 0;
+-c_7322743.tag = closureN_tag;
+- c_7322743.fn = (function_type)__lambda_926;
+-c_7322743.num_args = 1;
+-c_7322743.num_elements = 4;
+-c_7322743.elements = (object *)e_7322757;
+-c_7322743.elements[0] = ((closureN)self_7313951)->elements[1];
+-c_7322743.elements[1] = ((closureN)self_7313951)->elements[2];
+-c_7322743.elements[2] = lp_731422_733667;
+-c_7322743.elements[3] = ((closureN)self_7313951)->elements[4];
+-
+-
+-closureN_type c_7322758;
+-object e_7322842 [3];
+-c_7322758.hdr.mark = gc_color_red;
+- c_7322758.hdr.grayed = 0;
+-c_7322758.tag = closureN_tag;
+- c_7322758.fn = (function_type)__lambda_928;
+-c_7322758.num_args = 2;
+-c_7322758.num_elements = 3;
+-c_7322758.elements = (object *)e_7322842;
+-c_7322758.elements[0] = ((closureN)self_7313951)->elements[0];
+-c_7322758.elements[1] = lp_731422_733667;
+-c_7322758.elements[2] = ((closureN)self_7313951)->elements[3];
+-
+-return_direct_with_clo1(data,(closure)&c_7322743,__lambda_926, &c_7322758);;
+-}
+-
+-static void __lambda_928(void *data, object self_7313952, int argc, object *args) /* object self_7313952, object k_736481, object x_731423_733668, object free_731424_733669 */
+- {
+- object k_736481 = args[0]; object x_731423_733668 = args[1]; object free_731424_733669 = args[2];
+-
+-closureN_type c_7322760;
+-object e_7322841 [6];
+-c_7322760.hdr.mark = gc_color_red;
+- c_7322760.hdr.grayed = 0;
+-c_7322760.tag = closureN_tag;
+- c_7322760.fn = (function_type)__lambda_929;
+-c_7322760.num_args = 1;
+-c_7322760.num_elements = 6;
+-c_7322760.elements = (object *)e_7322841;
+-c_7322760.elements[0] = ((closureN)self_7313952)->elements[0];
+-c_7322760.elements[1] = free_731424_733669;
+-c_7322760.elements[2] = k_736481;
+-c_7322760.elements[3] = ((closureN)self_7313952)->elements[1];
+-c_7322760.elements[4] = ((closureN)self_7313952)->elements[2];
+-c_7322760.elements[5] = x_731423_733668;
+-
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7322760, x_731423_733668);;
+-}
+-
+-static void __lambda_929(void *data, object self_7313953, int argc, object *args) /* object self_7313953, object r_736482 */
+- {
+- object r_736482 = args[0];
+- if( (boolean_f != r_736482) ){
+-
+-closureN_type c_7322762;
+-object e_7322791 [4];
+-c_7322762.hdr.mark = gc_color_red;
+- c_7322762.hdr.grayed = 0;
+-c_7322762.tag = closureN_tag;
+- c_7322762.fn = (function_type)__lambda_930;
+-c_7322762.num_args = 0;
+-c_7322762.num_elements = 4;
+-c_7322762.elements = (object *)e_7322791;
+-c_7322762.elements[0] = ((closureN)self_7313953)->elements[0];
+-c_7322762.elements[1] = ((closureN)self_7313953)->elements[1];
+-c_7322762.elements[2] = ((closureN)self_7313953)->elements[4];
+-c_7322762.elements[3] = ((closureN)self_7313953)->elements[5];
+-
+-
+-closureN_type c_7322792;
+-object e_7322803 [3];
+-c_7322792.hdr.mark = gc_color_red;
+- c_7322792.hdr.grayed = 0;
+-c_7322792.tag = closureN_tag;
+- c_7322792.fn = (function_type)__lambda_934;
+-c_7322792.num_args = 1;
+-c_7322792.num_elements = 3;
+-c_7322792.elements = (object *)e_7322803;
+-c_7322792.elements[0] = ((closureN)self_7313953)->elements[1];
+-c_7322792.elements[1] = ((closureN)self_7313953)->elements[2];
+-c_7322792.elements[2] = ((closureN)self_7313953)->elements[5];
+-
+-return_direct_with_clo1(data,(closure)&c_7322762,__lambda_930, &c_7322792);
+-} else {
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313953)->elements[5])) ){
+-
+-
+-
+-closureN_type c_7322811;
+-object e_7322820 [3];
+-c_7322811.hdr.mark = gc_color_red;
+- c_7322811.hdr.grayed = 0;
+-c_7322811.tag = closureN_tag;
+- c_7322811.fn = (function_type)__lambda_935;
+-c_7322811.num_args = 1;
+-c_7322811.num_elements = 3;
+-c_7322811.elements = (object *)e_7322820;
+-c_7322811.elements[0] = ((closureN)self_7313953)->elements[2];
+-c_7322811.elements[1] = ((closureN)self_7313953)->elements[3];
+-c_7322811.elements[2] = ((closureN)self_7313953)->elements[5];
+-
+-
+-
+-return_closcall3(data, car(((closureN)self_7313953)->elements[3]), &c_7322811, Cyc_cdr(data, ((closureN)self_7313953)->elements[5]), ((closureN)self_7313953)->elements[1]);
+-} else {
+-
+-if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313953)->elements[5])) ){
+-
+-closureN_type c_7322829;
+-object e_7322836 [3];
+-c_7322829.hdr.mark = gc_color_red;
+- c_7322829.hdr.grayed = 0;
+-c_7322829.tag = closureN_tag;
+- c_7322829.fn = (function_type)__lambda_936;
+-c_7322829.num_args = 1;
+-c_7322829.num_elements = 3;
+-c_7322829.elements = (object *)e_7322836;
+-c_7322829.elements[0] = ((closureN)self_7313953)->elements[1];
+-c_7322829.elements[1] = ((closureN)self_7313953)->elements[2];
+-c_7322829.elements[2] = ((closureN)self_7313953)->elements[3];
++closureN_type c_7321584;
++object e_7321599 [4];
++c_7321584.hdr.mark = gc_color_red;
++ c_7321584.hdr.grayed = 0;
++c_7321584.tag = closureN_tag;
++ c_7321584.fn = (function_type)__lambda_945;
++c_7321584.num_args = 1;
++c_7321584.num_elements = 4;
++c_7321584.elements = (object *)e_7321599;
++c_7321584.elements[0] = ((closureN)self_7312685)->elements[0];
++c_7321584.elements[1] = ((closureN)self_7312685)->elements[1];
++c_7321584.elements[2] = ((closureN)self_7312685)->elements[3];
++c_7321584.elements[3] = ((closureN)self_7312685)->elements[4];
+
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7322829, ((closureN)self_7313953)->elements[5]);
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313953)->elements[2], (((closure) ((closureN)self_7313953)->elements[2])->fn), ((closureN)self_7313953)->elements[1]);}
+-;}
+-;}
+-;;
++
++
++return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), &c_7321584, r_736051, car(((closureN)self_7312685)->elements[2]));;
+ }
+
+-static void __lambda_936(void *data, object self_7313960, int argc, object *args) /* object self_7313960, object r_736493 */
++static void __lambda_945(void *data, object self_7312686, int argc, object *args) /* object self_7312686, object r_736049 */
+ {
+- object r_736493 = args[0];
++ object r_736049 = args[0];
++ if( (boolean_f != r_736049) ){
++ return_direct_with_clo1(data, ((closureN)self_7312686)->elements[1], (((closure) ((closureN)self_7312686)->elements[1])->fn), ((closureN)self_7312686)->elements[2]);
++} else {
+
++pair_type local_7321592;
+
+-return_closcall3(data, car(((closureN)self_7313960)->elements[2]), ((closureN)self_7313960)->elements[1], r_736493, ((closureN)self_7313960)->elements[0]);;
++pair_type local_7321595;
++return_direct_with_clo1(data, ((closureN)self_7312686)->elements[1], (((closure) ((closureN)self_7312686)->elements[1])->fn), set_pair_as_expr(&local_7321592, set_pair_as_expr(&local_7321595, ((closureN)self_7312686)->elements[3], ((closureN)self_7312686)->elements[0]), ((closureN)self_7312686)->elements[2]));}
++;;
+ }
+
+-static void __lambda_935(void *data, object self_7313959, int argc, object *args) /* object self_7313959, object r_736490 */
++static void __lambda_940(void *data, object self_7312691, int argc, object *args) /* object self_7312691, object r_736046 */
+ {
+- object r_736490 = args[0];
++ object r_736046 = args[0];
+
++closureN_type c_7321564;
++object e_7321573 [5];
++c_7321564.hdr.mark = gc_color_red;
++ c_7321564.hdr.grayed = 0;
++c_7321564.tag = closureN_tag;
++ c_7321564.fn = (function_type)__lambda_941;
++c_7321564.num_args = 1;
++c_7321564.num_elements = 5;
++c_7321564.elements = (object *)e_7321573;
++c_7321564.elements[0] = ((closureN)self_7312691)->elements[0];
++c_7321564.elements[1] = ((closureN)self_7312691)->elements[1];
++c_7321564.elements[2] = ((closureN)self_7312691)->elements[2];
++c_7321564.elements[3] = ((closureN)self_7312691)->elements[3];
++c_7321564.elements[4] = ((closureN)self_7312691)->elements[4];
+
+
+
+-return_closcall3(data, car(((closureN)self_7313959)->elements[1]), ((closureN)self_7313959)->elements[0], Cyc_car(data, ((closureN)self_7313959)->elements[2]), r_736490);;
++return_direct_with_clo1(data,(closure)&c_7321564,__lambda_941, Cyc_set_cell(data, ((closureN)self_7312691)->elements[2], r_736046));;
+ }
+
+-static void __lambda_934(void *data, object self_7313954, int argc, object *args) /* object self_7313954, object r_736483 */
++static void __lambda_941(void *data, object self_7312692, int argc, object *args) /* object self_7312692, object r_736045 */
+ {
+- object r_736483 = args[0];
+- if( (boolean_f != r_736483) ){
++
+
+-pair_type local_7322797;
+-return_direct_with_clo1(data, ((closureN)self_7313954)->elements[1], (((closure) ((closureN)self_7313954)->elements[1])->fn), set_pair_as_expr(&local_7322797, ((closureN)self_7313954)->elements[2], ((closureN)self_7313954)->elements[0]));
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313954)->elements[1], (((closure) ((closureN)self_7313954)->elements[1])->fn), ((closureN)self_7313954)->elements[0]);}
+-;;
++
++return_closcall4(data, car(((closureN)self_7312692)->elements[2]), ((closureN)self_7312692)->elements[1], ((closureN)self_7312692)->elements[4], ((closureN)self_7312692)->elements[0], ((closureN)self_7312692)->elements[3]);;
+ }
+
+-static void __lambda_930(void *data, object self_7313955, int argc, object *args) /* object self_7313955, object k_736484 */
++static void __lambda_870(void *data, object self_7312693, int argc, object *args) /* object self_7312693, object r_736042 */
+ {
+- object k_736484 = args[0];
++ object r_736042 = args[0];
+
+-closureN_type c_7322764;
+-object e_7322786 [4];
+-c_7322764.hdr.mark = gc_color_red;
+- c_7322764.hdr.grayed = 0;
+-c_7322764.tag = closureN_tag;
+- c_7322764.fn = (function_type)__lambda_931;
+-c_7322764.num_args = 1;
+-c_7322764.num_elements = 4;
+-c_7322764.elements = (object *)e_7322786;
+-c_7322764.elements[0] = ((closureN)self_7313955)->elements[0];
+-c_7322764.elements[1] = k_736484;
+-c_7322764.elements[2] = ((closureN)self_7313955)->elements[2];
+-c_7322764.elements[3] = ((closureN)self_7313955)->elements[3];
++closureN_type c_7320951;
++object e_7321549 [25];
++c_7320951.hdr.mark = gc_color_red;
++ c_7320951.hdr.grayed = 0;
++c_7320951.tag = closureN_tag;
++ c_7320951.fn = (function_type)__lambda_871;
++c_7320951.num_args = 1;
++c_7320951.num_elements = 25;
++c_7320951.elements = (object *)e_7321549;
++c_7320951.elements[0] = ((closureN)self_7312693)->elements[0];
++c_7320951.elements[1] = ((closureN)self_7312693)->elements[1];
++c_7320951.elements[2] = ((closureN)self_7312693)->elements[2];
++c_7320951.elements[3] = ((closureN)self_7312693)->elements[3];
++c_7320951.elements[4] = ((closureN)self_7312693)->elements[4];
++c_7320951.elements[5] = ((closureN)self_7312693)->elements[5];
++c_7320951.elements[6] = ((closureN)self_7312693)->elements[6];
++c_7320951.elements[7] = ((closureN)self_7312693)->elements[7];
++c_7320951.elements[8] = ((closureN)self_7312693)->elements[8];
++c_7320951.elements[9] = ((closureN)self_7312693)->elements[9];
++c_7320951.elements[10] = ((closureN)self_7312693)->elements[10];
++c_7320951.elements[11] = ((closureN)self_7312693)->elements[11];
++c_7320951.elements[12] = ((closureN)self_7312693)->elements[12];
++c_7320951.elements[13] = ((closureN)self_7312693)->elements[13];
++c_7320951.elements[14] = ((closureN)self_7312693)->elements[14];
++c_7320951.elements[15] = ((closureN)self_7312693)->elements[16];
++c_7320951.elements[16] = ((closureN)self_7312693)->elements[17];
++c_7320951.elements[17] = ((closureN)self_7312693)->elements[18];
++c_7320951.elements[18] = ((closureN)self_7312693)->elements[19];
++c_7320951.elements[19] = ((closureN)self_7312693)->elements[20];
++c_7320951.elements[20] = ((closureN)self_7312693)->elements[21];
++c_7320951.elements[21] = ((closureN)self_7312693)->elements[22];
++c_7320951.elements[22] = ((closureN)self_7312693)->elements[23];
++c_7320951.elements[23] = ((closureN)self_7312693)->elements[24];
++c_7320951.elements[24] = ((closureN)self_7312693)->elements[25];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322764,__lambda_931, memqp(data, ((closureN)self_7313955)->elements[3], ((closureN)self_7313955)->elements[1]));;
++return_direct_with_clo1(data,(closure)&c_7320951,__lambda_871, Cyc_set_cell(data, ((closureN)self_7312693)->elements[15], r_736042));;
+ }
+
+-static void __lambda_931(void *data, object self_7313956, int argc, object *args) /* object self_7313956, object r_736485 */
++static void __lambda_871(void *data, object self_7312694, int argc, object *args) /* object self_7312694, object r_735941 */
+ {
+- object r_736485 = args[0];
+- if( (boolean_f != r_736485) ){
+- return_direct_with_clo1(data, ((closureN)self_7313956)->elements[1], (((closure) ((closureN)self_7313956)->elements[1])->fn), boolean_f);
+-} else {
+-
+-closureN_type c_7322768;
+-object e_7322781 [2];
+-c_7322768.hdr.mark = gc_color_red;
+- c_7322768.hdr.grayed = 0;
+-c_7322768.tag = closureN_tag;
+- c_7322768.fn = (function_type)__lambda_932;
+-c_7322768.num_args = 1;
+-c_7322768.num_elements = 2;
+-c_7322768.elements = (object *)e_7322781;
+-c_7322768.elements[0] = ((closureN)self_7313956)->elements[0];
+-c_7322768.elements[1] = ((closureN)self_7313956)->elements[1];
+-
+
++
++closureN_type c_7320953;
++object e_7321434 [25];
++c_7320953.hdr.mark = gc_color_red;
++ c_7320953.hdr.grayed = 0;
++c_7320953.tag = closureN_tag;
++ c_7320953.fn = (function_type)__lambda_872;
++c_7320953.num_args = 1;
++c_7320953.num_elements = 25;
++c_7320953.elements = (object *)e_7321434;
++c_7320953.elements[0] = ((closureN)self_7312694)->elements[0];
++c_7320953.elements[1] = ((closureN)self_7312694)->elements[1];
++c_7320953.elements[2] = ((closureN)self_7312694)->elements[2];
++c_7320953.elements[3] = ((closureN)self_7312694)->elements[3];
++c_7320953.elements[4] = ((closureN)self_7312694)->elements[4];
++c_7320953.elements[5] = ((closureN)self_7312694)->elements[5];
++c_7320953.elements[6] = ((closureN)self_7312694)->elements[6];
++c_7320953.elements[7] = ((closureN)self_7312694)->elements[7];
++c_7320953.elements[8] = ((closureN)self_7312694)->elements[8];
++c_7320953.elements[9] = ((closureN)self_7312694)->elements[9];
++c_7320953.elements[10] = ((closureN)self_7312694)->elements[10];
++c_7320953.elements[11] = ((closureN)self_7312694)->elements[11];
++c_7320953.elements[12] = ((closureN)self_7312694)->elements[12];
++c_7320953.elements[13] = ((closureN)self_7312694)->elements[13];
++c_7320953.elements[14] = ((closureN)self_7312694)->elements[14];
++c_7320953.elements[15] = ((closureN)self_7312694)->elements[15];
++c_7320953.elements[16] = ((closureN)self_7312694)->elements[16];
++c_7320953.elements[17] = ((closureN)self_7312694)->elements[17];
++c_7320953.elements[18] = ((closureN)self_7312694)->elements[18];
++c_7320953.elements[19] = ((closureN)self_7312694)->elements[19];
++c_7320953.elements[20] = ((closureN)self_7312694)->elements[20];
++c_7320953.elements[21] = ((closureN)self_7312694)->elements[21];
++c_7320953.elements[22] = ((closureN)self_7312694)->elements[22];
++c_7320953.elements[23] = ((closureN)self_7312694)->elements[23];
++c_7320953.elements[24] = ((closureN)self_7312694)->elements[24];
++
++
++mmacro(c_7321435, (function_type)__lambda_923);c_7321435.num_args = 3;
++return_direct_with_clo1(data,(closure)&c_7320953,__lambda_872, &c_7321435);;
++}
++
++static void __lambda_923(void *data, object self_7312695, int argc, object *args) /* object self_7312695, object k_736025, object x_731416_733315, object vars_731417_733316, object dim_731418_733317 */
++ {
++ object k_736025 = args[0]; object x_731416_733315 = args[1]; object vars_731417_733316 = args[2]; object dim_731418_733317 = args[3];
++
++closureN_type c_7321437;
++object e_7321548 [3];
++c_7321437.hdr.mark = gc_color_red;
++ c_7321437.hdr.grayed = 0;
++c_7321437.tag = closureN_tag;
++ c_7321437.fn = (function_type)__lambda_924;
++c_7321437.num_args = 2;
++c_7321437.num_elements = 3;
++c_7321437.elements = (object *)e_7321548;
++c_7321437.elements[0] = dim_731418_733317;
++c_7321437.elements[1] = k_736025;
++c_7321437.elements[2] = vars_731417_733316;
++
++return_direct_with_clo2(data,(closure)&c_7321437,__lambda_924, x_731416_733315, NULL);;
++}
++
++static void __lambda_924(void *data, object self_7312696, int argc, object *args) /* object self_7312696, object x_731420_733318, object free_731421_733319 */
++ {
++ object x_731420_733318 = args[0]; object free_731421_733319 = args[1];
++
++closureN_type c_7321439;
++object e_7321547 [5];
++c_7321439.hdr.mark = gc_color_red;
++ c_7321439.hdr.grayed = 0;
++c_7321439.tag = closureN_tag;
++ c_7321439.fn = (function_type)__lambda_925;
++c_7321439.num_args = 1;
++c_7321439.num_elements = 5;
++c_7321439.elements = (object *)e_7321547;
++c_7321439.elements[0] = ((closureN)self_7312696)->elements[0];
++c_7321439.elements[1] = free_731421_733319;
++c_7321439.elements[2] = ((closureN)self_7312696)->elements[1];
++c_7321439.elements[3] = ((closureN)self_7312696)->elements[2];
++c_7321439.elements[4] = x_731420_733318;
++
++return_direct_with_clo1(data,(closure)&c_7321439,__lambda_925, boolean_f);;
++}
++
++static void __lambda_925(void *data, object self_7312697, int argc, object *args) /* object self_7312697, object lp_731422_733320 */
++ {
++ object lp_731422_733320 = args[0];
++
++closureN_type c_7321441;
++object e_7321543 [5];
++c_7321441.hdr.mark = gc_color_red;
++ c_7321441.hdr.grayed = 0;
++c_7321441.tag = closureN_tag;
++ c_7321441.fn = (function_type)__lambda_1379;
++c_7321441.num_args = 1;
++c_7321441.num_elements = 5;
++c_7321441.elements = (object *)e_7321543;
++c_7321441.elements[0] = ((closureN)self_7312697)->elements[0];
++c_7321441.elements[1] = ((closureN)self_7312697)->elements[1];
++c_7321441.elements[2] = ((closureN)self_7312697)->elements[2];
++c_7321441.elements[3] = ((closureN)self_7312697)->elements[3];
++c_7321441.elements[4] = ((closureN)self_7312697)->elements[4];
++
++
++pair_type local_7321546;
++return_direct_with_clo1(data,(closure)&c_7321441,__lambda_1379, set_cell_as_expr(&local_7321546, lp_731422_733320));;
++}
++
++static void __lambda_1379(void *data, object self_7312698, int argc, object *args) /* object self_7312698, object lp_731422_733320 */
++ {
++ object lp_731422_733320 = args[0];
++
++closureN_type c_7321443;
++object e_7321457 [4];
++c_7321443.hdr.mark = gc_color_red;
++ c_7321443.hdr.grayed = 0;
++c_7321443.tag = closureN_tag;
++ c_7321443.fn = (function_type)__lambda_926;
++c_7321443.num_args = 1;
++c_7321443.num_elements = 4;
++c_7321443.elements = (object *)e_7321457;
++c_7321443.elements[0] = ((closureN)self_7312698)->elements[1];
++c_7321443.elements[1] = ((closureN)self_7312698)->elements[2];
++c_7321443.elements[2] = lp_731422_733320;
++c_7321443.elements[3] = ((closureN)self_7312698)->elements[4];
++
++
++closureN_type c_7321458;
++object e_7321542 [3];
++c_7321458.hdr.mark = gc_color_red;
++ c_7321458.hdr.grayed = 0;
++c_7321458.tag = closureN_tag;
++ c_7321458.fn = (function_type)__lambda_928;
++c_7321458.num_args = 2;
++c_7321458.num_elements = 3;
++c_7321458.elements = (object *)e_7321542;
++c_7321458.elements[0] = ((closureN)self_7312698)->elements[0];
++c_7321458.elements[1] = lp_731422_733320;
++c_7321458.elements[2] = ((closureN)self_7312698)->elements[3];
++
++return_direct_with_clo1(data,(closure)&c_7321443,__lambda_926, &c_7321458);;
++}
++
++static void __lambda_928(void *data, object self_7312699, int argc, object *args) /* object self_7312699, object k_736029, object x_731423_733321, object free_731424_733322 */
++ {
++ object k_736029 = args[0]; object x_731423_733321 = args[1]; object free_731424_733322 = args[2];
++
++closureN_type c_7321460;
++object e_7321541 [6];
++c_7321460.hdr.mark = gc_color_red;
++ c_7321460.hdr.grayed = 0;
++c_7321460.tag = closureN_tag;
++ c_7321460.fn = (function_type)__lambda_929;
++c_7321460.num_args = 1;
++c_7321460.num_elements = 6;
++c_7321460.elements = (object *)e_7321541;
++c_7321460.elements[0] = ((closureN)self_7312699)->elements[0];
++c_7321460.elements[1] = free_731424_733322;
++c_7321460.elements[2] = k_736029;
++c_7321460.elements[3] = ((closureN)self_7312699)->elements[1];
++c_7321460.elements[4] = ((closureN)self_7312699)->elements[2];
++c_7321460.elements[5] = x_731423_733321;
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7321460, x_731423_733321);;
++}
++
++static void __lambda_929(void *data, object self_7312700, int argc, object *args) /* object self_7312700, object r_736030 */
++ {
++ object r_736030 = args[0];
++ if( (boolean_f != r_736030) ){
++
++closureN_type c_7321462;
++object e_7321491 [4];
++c_7321462.hdr.mark = gc_color_red;
++ c_7321462.hdr.grayed = 0;
++c_7321462.tag = closureN_tag;
++ c_7321462.fn = (function_type)__lambda_930;
++c_7321462.num_args = 0;
++c_7321462.num_elements = 4;
++c_7321462.elements = (object *)e_7321491;
++c_7321462.elements[0] = ((closureN)self_7312700)->elements[0];
++c_7321462.elements[1] = ((closureN)self_7312700)->elements[1];
++c_7321462.elements[2] = ((closureN)self_7312700)->elements[4];
++c_7321462.elements[3] = ((closureN)self_7312700)->elements[5];
++
++
++closureN_type c_7321492;
++object e_7321503 [3];
++c_7321492.hdr.mark = gc_color_red;
++ c_7321492.hdr.grayed = 0;
++c_7321492.tag = closureN_tag;
++ c_7321492.fn = (function_type)__lambda_934;
++c_7321492.num_args = 1;
++c_7321492.num_elements = 3;
++c_7321492.elements = (object *)e_7321503;
++c_7321492.elements[0] = ((closureN)self_7312700)->elements[1];
++c_7321492.elements[1] = ((closureN)self_7312700)->elements[2];
++c_7321492.elements[2] = ((closureN)self_7312700)->elements[5];
++
++return_direct_with_clo1(data,(closure)&c_7321462,__lambda_930, &c_7321492);
++} else {
++
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312700)->elements[5])) ){
++
++
++
++closureN_type c_7321511;
++object e_7321520 [3];
++c_7321511.hdr.mark = gc_color_red;
++ c_7321511.hdr.grayed = 0;
++c_7321511.tag = closureN_tag;
++ c_7321511.fn = (function_type)__lambda_935;
++c_7321511.num_args = 1;
++c_7321511.num_elements = 3;
++c_7321511.elements = (object *)e_7321520;
++c_7321511.elements[0] = ((closureN)self_7312700)->elements[2];
++c_7321511.elements[1] = ((closureN)self_7312700)->elements[3];
++c_7321511.elements[2] = ((closureN)self_7312700)->elements[5];
++
++
++
++return_closcall3(data, car(((closureN)self_7312700)->elements[3]), &c_7321511, Cyc_cdr(data, ((closureN)self_7312700)->elements[5]), ((closureN)self_7312700)->elements[1]);
++} else {
++
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312700)->elements[5])) ){
++
++closureN_type c_7321529;
++object e_7321536 [3];
++c_7321529.hdr.mark = gc_color_red;
++ c_7321529.hdr.grayed = 0;
++c_7321529.tag = closureN_tag;
++ c_7321529.fn = (function_type)__lambda_936;
++c_7321529.num_args = 1;
++c_7321529.num_elements = 3;
++c_7321529.elements = (object *)e_7321536;
++c_7321529.elements[0] = ((closureN)self_7312700)->elements[1];
++c_7321529.elements[1] = ((closureN)self_7312700)->elements[2];
++c_7321529.elements[2] = ((closureN)self_7312700)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7322768,__lambda_932, assq(data, ((closureN)self_7313956)->elements[3], ((closureN)self_7313956)->elements[2]));}
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7321529, ((closureN)self_7312700)->elements[5]);
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312700)->elements[2], (((closure) ((closureN)self_7312700)->elements[2])->fn), ((closureN)self_7312700)->elements[1]);}
++;}
++;}
+ ;;
+ }
+
+-static void __lambda_932(void *data, object self_7313957, int argc, object *args) /* object self_7313957, object tmp_731431_731433_733670 */
++static void __lambda_936(void *data, object self_7312707, int argc, object *args) /* object self_7312707, object r_736041 */
+ {
+- object tmp_731431_731433_733670 = args[0];
+- if( (boolean_f != tmp_731431_731433_733670) ){
++ object r_736041 = args[0];
+
+-closureN_type c_7322770;
+-object e_7322778 [2];
+-c_7322770.hdr.mark = gc_color_red;
+- c_7322770.hdr.grayed = 0;
+-c_7322770.tag = closureN_tag;
+- c_7322770.fn = (function_type)__lambda_933;
+-c_7322770.num_args = 1;
+-c_7322770.num_elements = 2;
+-c_7322770.elements = (object *)e_7322778;
+-c_7322770.elements[0] = ((closureN)self_7313957)->elements[0];
+-c_7322770.elements[1] = ((closureN)self_7313957)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7322770,__lambda_933, tmp_731431_731433_733670);
++return_closcall3(data, car(((closureN)self_7312707)->elements[2]), ((closureN)self_7312707)->elements[1], r_736041, ((closureN)self_7312707)->elements[0]);;
++}
++
++static void __lambda_935(void *data, object self_7312706, int argc, object *args) /* object self_7312706, object r_736038 */
++ {
++ object r_736038 = args[0];
++
++
++
++
++return_closcall3(data, car(((closureN)self_7312706)->elements[1]), ((closureN)self_7312706)->elements[0], Cyc_car(data, ((closureN)self_7312706)->elements[2]), r_736038);;
++}
++
++static void __lambda_934(void *data, object self_7312701, int argc, object *args) /* object self_7312701, object r_736031 */
++ {
++ object r_736031 = args[0];
++ if( (boolean_f != r_736031) ){
++
++pair_type local_7321497;
++return_direct_with_clo1(data, ((closureN)self_7312701)->elements[1], (((closure) ((closureN)self_7312701)->elements[1])->fn), set_pair_as_expr(&local_7321497, ((closureN)self_7312701)->elements[2], ((closureN)self_7312701)->elements[0]));
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312701)->elements[1], (((closure) ((closureN)self_7312701)->elements[1])->fn), ((closureN)self_7312701)->elements[0]);}
++;;
++}
++
++static void __lambda_930(void *data, object self_7312702, int argc, object *args) /* object self_7312702, object k_736032 */
++ {
++ object k_736032 = args[0];
++
++closureN_type c_7321464;
++object e_7321486 [4];
++c_7321464.hdr.mark = gc_color_red;
++ c_7321464.hdr.grayed = 0;
++c_7321464.tag = closureN_tag;
++ c_7321464.fn = (function_type)__lambda_931;
++c_7321464.num_args = 1;
++c_7321464.num_elements = 4;
++c_7321464.elements = (object *)e_7321486;
++c_7321464.elements[0] = ((closureN)self_7312702)->elements[0];
++c_7321464.elements[1] = k_736032;
++c_7321464.elements[2] = ((closureN)self_7312702)->elements[2];
++c_7321464.elements[3] = ((closureN)self_7312702)->elements[3];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321464,__lambda_931, memqp(data, ((closureN)self_7312702)->elements[3], ((closureN)self_7312702)->elements[1]));;
++}
++
++static void __lambda_931(void *data, object self_7312703, int argc, object *args) /* object self_7312703, object r_736033 */
++ {
++ object r_736033 = args[0];
++ if( (boolean_f != r_736033) ){
++ return_direct_with_clo1(data, ((closureN)self_7312703)->elements[1], (((closure) ((closureN)self_7312703)->elements[1])->fn), boolean_f);
++} else {
++
++closureN_type c_7321468;
++object e_7321481 [2];
++c_7321468.hdr.mark = gc_color_red;
++ c_7321468.hdr.grayed = 0;
++c_7321468.tag = closureN_tag;
++ c_7321468.fn = (function_type)__lambda_932;
++c_7321468.num_args = 1;
++c_7321468.num_elements = 2;
++c_7321468.elements = (object *)e_7321481;
++c_7321468.elements[0] = ((closureN)self_7312703)->elements[0];
++c_7321468.elements[1] = ((closureN)self_7312703)->elements[1];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321468,__lambda_932, assq(data, ((closureN)self_7312703)->elements[3], ((closureN)self_7312703)->elements[2]));}
++;;
++}
++
++static void __lambda_932(void *data, object self_7312704, int argc, object *args) /* object self_7312704, object tmp_731431_731433_733323 */
++ {
++ object tmp_731431_731433_733323 = args[0];
++ if( (boolean_f != tmp_731431_731433_733323) ){
++
++closureN_type c_7321470;
++object e_7321478 [2];
++c_7321470.hdr.mark = gc_color_red;
++ c_7321470.hdr.grayed = 0;
++c_7321470.tag = closureN_tag;
++ c_7321470.fn = (function_type)__lambda_933;
++c_7321470.num_args = 1;
++c_7321470.num_elements = 2;
++c_7321470.elements = (object *)e_7321478;
++c_7321470.elements[0] = ((closureN)self_7312704)->elements[0];
++c_7321470.elements[1] = ((closureN)self_7312704)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7321470,__lambda_933, tmp_731431_731433_733323);
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312704)->elements[1], (((closure) ((closureN)self_7312704)->elements[1])->fn), boolean_f);}
++;;
++}
++
++static void __lambda_933(void *data, object self_7312705, int argc, object *args) /* object self_7312705, object cell_731434_733324 */
++ {
++ object cell_731434_733324 = args[0];
++
++
++
++
++return_direct_with_clo1(data, ((closureN)self_7312705)->elements[1], (((closure) ((closureN)self_7312705)->elements[1])->fn), Cyc_num_fast_gte_op(data, Cyc_cdr(data, cell_731434_733324), ((closureN)self_7312705)->elements[0]));;
++}
++
++static void __lambda_926(void *data, object self_7312708, int argc, object *args) /* object self_7312708, object r_736028 */
++ {
++ object r_736028 = args[0];
++
++closureN_type c_7321445;
++object e_7321453 [4];
++c_7321445.hdr.mark = gc_color_red;
++ c_7321445.hdr.grayed = 0;
++c_7321445.tag = closureN_tag;
++ c_7321445.fn = (function_type)__lambda_927;
++c_7321445.num_args = 1;
++c_7321445.num_elements = 4;
++c_7321445.elements = (object *)e_7321453;
++c_7321445.elements[0] = ((closureN)self_7312708)->elements[0];
++c_7321445.elements[1] = ((closureN)self_7312708)->elements[1];
++c_7321445.elements[2] = ((closureN)self_7312708)->elements[2];
++c_7321445.elements[3] = ((closureN)self_7312708)->elements[3];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321445,__lambda_927, Cyc_set_cell(data, ((closureN)self_7312708)->elements[2], r_736028));;
++}
++
++static void __lambda_927(void *data, object self_7312709, int argc, object *args) /* object self_7312709, object r_736027 */
++ {
++
++
++
++return_closcall3(data, car(((closureN)self_7312709)->elements[2]), ((closureN)self_7312709)->elements[1], ((closureN)self_7312709)->elements[3], ((closureN)self_7312709)->elements[0]);;
++}
++
++static void __lambda_872(void *data, object self_7312710, int argc, object *args) /* object self_7312710, object r_736024 */
++ {
++ object r_736024 = args[0];
++
++closureN_type c_7320955;
++object e_7321430 [25];
++c_7320955.hdr.mark = gc_color_red;
++ c_7320955.hdr.grayed = 0;
++c_7320955.tag = closureN_tag;
++ c_7320955.fn = (function_type)__lambda_873;
++c_7320955.num_args = 1;
++c_7320955.num_elements = 25;
++c_7320955.elements = (object *)e_7321430;
++c_7320955.elements[0] = ((closureN)self_7312710)->elements[0];
++c_7320955.elements[1] = ((closureN)self_7312710)->elements[1];
++c_7320955.elements[2] = ((closureN)self_7312710)->elements[2];
++c_7320955.elements[3] = ((closureN)self_7312710)->elements[3];
++c_7320955.elements[4] = ((closureN)self_7312710)->elements[4];
++c_7320955.elements[5] = ((closureN)self_7312710)->elements[5];
++c_7320955.elements[6] = ((closureN)self_7312710)->elements[6];
++c_7320955.elements[7] = ((closureN)self_7312710)->elements[7];
++c_7320955.elements[8] = ((closureN)self_7312710)->elements[8];
++c_7320955.elements[9] = ((closureN)self_7312710)->elements[9];
++c_7320955.elements[10] = ((closureN)self_7312710)->elements[10];
++c_7320955.elements[11] = ((closureN)self_7312710)->elements[11];
++c_7320955.elements[12] = ((closureN)self_7312710)->elements[12];
++c_7320955.elements[13] = ((closureN)self_7312710)->elements[13];
++c_7320955.elements[14] = ((closureN)self_7312710)->elements[14];
++c_7320955.elements[15] = ((closureN)self_7312710)->elements[15];
++c_7320955.elements[16] = ((closureN)self_7312710)->elements[16];
++c_7320955.elements[17] = ((closureN)self_7312710)->elements[17];
++c_7320955.elements[18] = ((closureN)self_7312710)->elements[18];
++c_7320955.elements[19] = ((closureN)self_7312710)->elements[19];
++c_7320955.elements[20] = ((closureN)self_7312710)->elements[20];
++c_7320955.elements[21] = ((closureN)self_7312710)->elements[21];
++c_7320955.elements[22] = ((closureN)self_7312710)->elements[22];
++c_7320955.elements[23] = ((closureN)self_7312710)->elements[23];
++c_7320955.elements[24] = ((closureN)self_7312710)->elements[24];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320955,__lambda_873, Cyc_set_cell(data, ((closureN)self_7312710)->elements[23], r_736024));;
++}
++
++static void __lambda_873(void *data, object self_7312711, int argc, object *args) /* object self_7312711, object r_735942 */
++ {
++
++
++closureN_type c_7320957;
++object e_7321027 [13];
++c_7320957.hdr.mark = gc_color_red;
++ c_7320957.hdr.grayed = 0;
++c_7320957.tag = closureN_tag;
++ c_7320957.fn = (function_type)__lambda_874;
++c_7320957.num_args = 1;
++c_7320957.num_elements = 13;
++c_7320957.elements = (object *)e_7321027;
++c_7320957.elements[0] = ((closureN)self_7312711)->elements[2];
++c_7320957.elements[1] = ((closureN)self_7312711)->elements[3];
++c_7320957.elements[2] = ((closureN)self_7312711)->elements[4];
++c_7320957.elements[3] = ((closureN)self_7312711)->elements[6];
++c_7320957.elements[4] = ((closureN)self_7312711)->elements[7];
++c_7320957.elements[5] = ((closureN)self_7312711)->elements[8];
++c_7320957.elements[6] = ((closureN)self_7312711)->elements[9];
++c_7320957.elements[7] = ((closureN)self_7312711)->elements[12];
++c_7320957.elements[8] = ((closureN)self_7312711)->elements[14];
++c_7320957.elements[9] = ((closureN)self_7312711)->elements[19];
++c_7320957.elements[10] = ((closureN)self_7312711)->elements[20];
++c_7320957.elements[11] = ((closureN)self_7312711)->elements[22];
++c_7320957.elements[12] = ((closureN)self_7312711)->elements[24];
++
++
++closureN_type c_7321028;
++object e_7321429 [14];
++c_7321028.hdr.mark = gc_color_red;
++ c_7321028.hdr.grayed = 0;
++c_7321028.tag = closureN_tag;
++ c_7321028.fn = (function_type)__lambda_881;
++c_7321028.num_args = 2;
++c_7321028.num_elements = 14;
++c_7321028.elements = (object *)e_7321429;
++c_7321028.elements[0] = ((closureN)self_7312711)->elements[0];
++c_7321028.elements[1] = ((closureN)self_7312711)->elements[1];
++c_7321028.elements[2] = ((closureN)self_7312711)->elements[5];
++c_7321028.elements[3] = ((closureN)self_7312711)->elements[9];
++c_7321028.elements[4] = ((closureN)self_7312711)->elements[10];
++c_7321028.elements[5] = ((closureN)self_7312711)->elements[11];
++c_7321028.elements[6] = ((closureN)self_7312711)->elements[13];
++c_7321028.elements[7] = ((closureN)self_7312711)->elements[14];
++c_7321028.elements[8] = ((closureN)self_7312711)->elements[15];
++c_7321028.elements[9] = ((closureN)self_7312711)->elements[16];
++c_7321028.elements[10] = ((closureN)self_7312711)->elements[17];
++c_7321028.elements[11] = ((closureN)self_7312711)->elements[18];
++c_7321028.elements[12] = ((closureN)self_7312711)->elements[21];
++c_7321028.elements[13] = ((closureN)self_7312711)->elements[23];
++
++return_direct_with_clo1(data,(closure)&c_7320957,__lambda_874, &c_7321028);;
++}
++
++static void __lambda_881(void *data, object self_7312712, int argc, object *args) /* object self_7312712, object k_735958, object tmpl_731443_733325, object vars_731444_733326 */
++ {
++ object k_735958 = args[0]; object tmpl_731443_733325 = args[1]; object vars_731444_733326 = args[2];
++
++closureN_type c_7321030;
++object e_7321428 [16];
++c_7321030.hdr.mark = gc_color_red;
++ c_7321030.hdr.grayed = 0;
++c_7321030.tag = closureN_tag;
++ c_7321030.fn = (function_type)__lambda_882;
++c_7321030.num_args = 1;
++c_7321030.num_elements = 16;
++c_7321030.elements = (object *)e_7321428;
++c_7321030.elements[0] = ((closureN)self_7312712)->elements[0];
++c_7321030.elements[1] = ((closureN)self_7312712)->elements[1];
++c_7321030.elements[2] = ((closureN)self_7312712)->elements[2];
++c_7321030.elements[3] = ((closureN)self_7312712)->elements[3];
++c_7321030.elements[4] = ((closureN)self_7312712)->elements[4];
++c_7321030.elements[5] = ((closureN)self_7312712)->elements[5];
++c_7321030.elements[6] = ((closureN)self_7312712)->elements[6];
++c_7321030.elements[7] = ((closureN)self_7312712)->elements[7];
++c_7321030.elements[8] = ((closureN)self_7312712)->elements[8];
++c_7321030.elements[9] = ((closureN)self_7312712)->elements[9];
++c_7321030.elements[10] = ((closureN)self_7312712)->elements[10];
++c_7321030.elements[11] = ((closureN)self_7312712)->elements[11];
++c_7321030.elements[12] = ((closureN)self_7312712)->elements[12];
++c_7321030.elements[13] = ((closureN)self_7312712)->elements[13];
++c_7321030.elements[14] = k_735958;
++c_7321030.elements[15] = vars_731444_733326;
++
++return_direct_with_clo1(data,(closure)&c_7321030,__lambda_882, tmpl_731443_733325);;
++}
++
++static void __lambda_882(void *data, object self_7312713, int argc, object *args) /* object self_7312713, object t_731446_733327 */
++ {
++ object t_731446_733327 = args[0];
++
++closureN_type c_7321032;
++object e_7321427 [17];
++c_7321032.hdr.mark = gc_color_red;
++ c_7321032.hdr.grayed = 0;
++c_7321032.tag = closureN_tag;
++ c_7321032.fn = (function_type)__lambda_883;
++c_7321032.num_args = 1;
++c_7321032.num_elements = 17;
++c_7321032.elements = (object *)e_7321427;
++c_7321032.elements[0] = ((closureN)self_7312713)->elements[0];
++c_7321032.elements[1] = ((closureN)self_7312713)->elements[1];
++c_7321032.elements[2] = ((closureN)self_7312713)->elements[2];
++c_7321032.elements[3] = ((closureN)self_7312713)->elements[3];
++c_7321032.elements[4] = ((closureN)self_7312713)->elements[4];
++c_7321032.elements[5] = ((closureN)self_7312713)->elements[5];
++c_7321032.elements[6] = ((closureN)self_7312713)->elements[6];
++c_7321032.elements[7] = ((closureN)self_7312713)->elements[7];
++c_7321032.elements[8] = ((closureN)self_7312713)->elements[8];
++c_7321032.elements[9] = ((closureN)self_7312713)->elements[9];
++c_7321032.elements[10] = ((closureN)self_7312713)->elements[10];
++c_7321032.elements[11] = ((closureN)self_7312713)->elements[11];
++c_7321032.elements[12] = ((closureN)self_7312713)->elements[12];
++c_7321032.elements[13] = ((closureN)self_7312713)->elements[13];
++c_7321032.elements[14] = ((closureN)self_7312713)->elements[14];
++c_7321032.elements[15] = t_731446_733327;
++c_7321032.elements[16] = ((closureN)self_7312713)->elements[15];
++
++return_direct_with_clo1(data,(closure)&c_7321032,__lambda_883, boolean_f);;
++}
++
++static void __lambda_883(void *data, object self_7312714, int argc, object *args) /* object self_7312714, object lp_731448_733329 */
++ {
++ object lp_731448_733329 = args[0];
++
++closureN_type c_7321034;
++object e_7321423 [17];
++c_7321034.hdr.mark = gc_color_red;
++ c_7321034.hdr.grayed = 0;
++c_7321034.tag = closureN_tag;
++ c_7321034.fn = (function_type)__lambda_1378;
++c_7321034.num_args = 1;
++c_7321034.num_elements = 17;
++c_7321034.elements = (object *)e_7321423;
++c_7321034.elements[0] = ((closureN)self_7312714)->elements[0];
++c_7321034.elements[1] = ((closureN)self_7312714)->elements[1];
++c_7321034.elements[2] = ((closureN)self_7312714)->elements[2];
++c_7321034.elements[3] = ((closureN)self_7312714)->elements[3];
++c_7321034.elements[4] = ((closureN)self_7312714)->elements[4];
++c_7321034.elements[5] = ((closureN)self_7312714)->elements[5];
++c_7321034.elements[6] = ((closureN)self_7312714)->elements[6];
++c_7321034.elements[7] = ((closureN)self_7312714)->elements[7];
++c_7321034.elements[8] = ((closureN)self_7312714)->elements[8];
++c_7321034.elements[9] = ((closureN)self_7312714)->elements[9];
++c_7321034.elements[10] = ((closureN)self_7312714)->elements[10];
++c_7321034.elements[11] = ((closureN)self_7312714)->elements[11];
++c_7321034.elements[12] = ((closureN)self_7312714)->elements[12];
++c_7321034.elements[13] = ((closureN)self_7312714)->elements[13];
++c_7321034.elements[14] = ((closureN)self_7312714)->elements[14];
++c_7321034.elements[15] = ((closureN)self_7312714)->elements[15];
++c_7321034.elements[16] = ((closureN)self_7312714)->elements[16];
++
++
++pair_type local_7321426;
++return_direct_with_clo1(data,(closure)&c_7321034,__lambda_1378, set_cell_as_expr(&local_7321426, lp_731448_733329));;
++}
++
++static void __lambda_1378(void *data, object self_7312715, int argc, object *args) /* object self_7312715, object lp_731448_733329 */
++ {
++ object lp_731448_733329 = args[0];
++
++closureN_type c_7321036;
++object e_7321049 [3];
++c_7321036.hdr.mark = gc_color_red;
++ c_7321036.hdr.grayed = 0;
++c_7321036.tag = closureN_tag;
++ c_7321036.fn = (function_type)__lambda_884;
++c_7321036.num_args = 1;
++c_7321036.num_elements = 3;
++c_7321036.elements = (object *)e_7321049;
++c_7321036.elements[0] = ((closureN)self_7312715)->elements[14];
++c_7321036.elements[1] = lp_731448_733329;
++c_7321036.elements[2] = ((closureN)self_7312715)->elements[15];
++
++
++closureN_type c_7321050;
++object e_7321422 [16];
++c_7321050.hdr.mark = gc_color_red;
++ c_7321050.hdr.grayed = 0;
++c_7321050.tag = closureN_tag;
++ c_7321050.fn = (function_type)__lambda_886;
++c_7321050.num_args = 2;
++c_7321050.num_elements = 16;
++c_7321050.elements = (object *)e_7321422;
++c_7321050.elements[0] = ((closureN)self_7312715)->elements[0];
++c_7321050.elements[1] = ((closureN)self_7312715)->elements[1];
++c_7321050.elements[2] = ((closureN)self_7312715)->elements[2];
++c_7321050.elements[3] = ((closureN)self_7312715)->elements[3];
++c_7321050.elements[4] = ((closureN)self_7312715)->elements[4];
++c_7321050.elements[5] = ((closureN)self_7312715)->elements[5];
++c_7321050.elements[6] = ((closureN)self_7312715)->elements[6];
++c_7321050.elements[7] = ((closureN)self_7312715)->elements[7];
++c_7321050.elements[8] = ((closureN)self_7312715)->elements[8];
++c_7321050.elements[9] = ((closureN)self_7312715)->elements[9];
++c_7321050.elements[10] = ((closureN)self_7312715)->elements[10];
++c_7321050.elements[11] = ((closureN)self_7312715)->elements[11];
++c_7321050.elements[12] = ((closureN)self_7312715)->elements[12];
++c_7321050.elements[13] = ((closureN)self_7312715)->elements[13];
++c_7321050.elements[14] = lp_731448_733329;
++c_7321050.elements[15] = ((closureN)self_7312715)->elements[16];
++
++return_direct_with_clo1(data,(closure)&c_7321036,__lambda_884, &c_7321050);;
++}
++
++static void __lambda_886(void *data, object self_7312716, int argc, object *args) /* object self_7312716, object k_735961, object t_731449_733330, object dim_731450_733331 */
++ {
++ object k_735961 = args[0]; object t_731449_733330 = args[1]; object dim_731450_733331 = args[2];
++
++closureN_type c_7321052;
++object e_7321421 [19];
++c_7321052.hdr.mark = gc_color_red;
++ c_7321052.hdr.grayed = 0;
++c_7321052.tag = closureN_tag;
++ c_7321052.fn = (function_type)__lambda_887;
++c_7321052.num_args = 1;
++c_7321052.num_elements = 19;
++c_7321052.elements = (object *)e_7321421;
++c_7321052.elements[0] = ((closureN)self_7312716)->elements[0];
++c_7321052.elements[1] = ((closureN)self_7312716)->elements[1];
++c_7321052.elements[2] = ((closureN)self_7312716)->elements[2];
++c_7321052.elements[3] = ((closureN)self_7312716)->elements[3];
++c_7321052.elements[4] = ((closureN)self_7312716)->elements[4];
++c_7321052.elements[5] = ((closureN)self_7312716)->elements[5];
++c_7321052.elements[6] = ((closureN)self_7312716)->elements[6];
++c_7321052.elements[7] = ((closureN)self_7312716)->elements[7];
++c_7321052.elements[8] = dim_731450_733331;
++c_7321052.elements[9] = ((closureN)self_7312716)->elements[8];
++c_7321052.elements[10] = ((closureN)self_7312716)->elements[9];
++c_7321052.elements[11] = ((closureN)self_7312716)->elements[10];
++c_7321052.elements[12] = ((closureN)self_7312716)->elements[11];
++c_7321052.elements[13] = ((closureN)self_7312716)->elements[12];
++c_7321052.elements[14] = ((closureN)self_7312716)->elements[13];
++c_7321052.elements[15] = k_735961;
++c_7321052.elements[16] = ((closureN)self_7312716)->elements[14];
++c_7321052.elements[17] = t_731449_733330;
++c_7321052.elements[18] = ((closureN)self_7312716)->elements[15];
++
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7321052, t_731449_733330);;
++}
++
++static void __lambda_887(void *data, object self_7312717, int argc, object *args) /* object self_7312717, object r_735962 */
++ {
++ object r_735962 = args[0];
++ if( (boolean_f != r_735962) ){
++
++closureN_type c_7321054;
++object e_7321084 [6];
++c_7321054.hdr.mark = gc_color_red;
++ c_7321054.hdr.grayed = 0;
++c_7321054.tag = closureN_tag;
++ c_7321054.fn = (function_type)__lambda_888;
++c_7321054.num_args = 1;
++c_7321054.num_elements = 6;
++c_7321054.elements = (object *)e_7321084;
++c_7321054.elements[0] = ((closureN)self_7312717)->elements[6];
++c_7321054.elements[1] = ((closureN)self_7312717)->elements[7];
++c_7321054.elements[2] = ((closureN)self_7312717)->elements[8];
++c_7321054.elements[3] = ((closureN)self_7312717)->elements[15];
++c_7321054.elements[4] = ((closureN)self_7312717)->elements[17];
++c_7321054.elements[5] = ((closureN)self_7312717)->elements[18];
++
++
++closureN_type c_7321085;
++object e_7321092 [1];
++c_7321085.hdr.mark = gc_color_red;
++ c_7321085.hdr.grayed = 0;
++c_7321085.tag = closureN_tag;
++ c_7321085.fn = (function_type)__lambda_891;
++c_7321085.num_args = 1;
++c_7321085.num_elements = 1;
++c_7321085.elements = (object *)e_7321092;
++c_7321085.elements[0] = ((closureN)self_7312717)->elements[17];
++
++return_direct_with_clo1(data,(closure)&c_7321054,__lambda_888, &c_7321085);
++} else {
++
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312717)->elements[17])) ){
++
++
++
++closureN_type c_7321100;
++object e_7321387 [16];
++c_7321100.hdr.mark = gc_color_red;
++ c_7321100.hdr.grayed = 0;
++c_7321100.tag = closureN_tag;
++ c_7321100.fn = (function_type)__lambda_892;
++c_7321100.num_args = 1;
++c_7321100.num_elements = 16;
++c_7321100.elements = (object *)e_7321387;
++c_7321100.elements[0] = ((closureN)self_7312717)->elements[0];
++c_7321100.elements[1] = ((closureN)self_7312717)->elements[1];
++c_7321100.elements[2] = ((closureN)self_7312717)->elements[2];
++c_7321100.elements[3] = ((closureN)self_7312717)->elements[3];
++c_7321100.elements[4] = ((closureN)self_7312717)->elements[5];
++c_7321100.elements[5] = ((closureN)self_7312717)->elements[6];
++c_7321100.elements[6] = ((closureN)self_7312717)->elements[8];
++c_7321100.elements[7] = ((closureN)self_7312717)->elements[9];
++c_7321100.elements[8] = ((closureN)self_7312717)->elements[11];
++c_7321100.elements[9] = ((closureN)self_7312717)->elements[12];
++c_7321100.elements[10] = ((closureN)self_7312717)->elements[13];
++c_7321100.elements[11] = ((closureN)self_7312717)->elements[14];
++c_7321100.elements[12] = ((closureN)self_7312717)->elements[15];
++c_7321100.elements[13] = ((closureN)self_7312717)->elements[16];
++c_7321100.elements[14] = ((closureN)self_7312717)->elements[17];
++c_7321100.elements[15] = ((closureN)self_7312717)->elements[18];
++
++return_closcall2(data, car(((closureN)self_7312717)->elements[10]), &c_7321100, ((closureN)self_7312717)->elements[17]);
++} else {
++
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312717)->elements[17])) ){
++
++closureN_type c_7321393;
++object e_7321407 [4];
++c_7321393.hdr.mark = gc_color_red;
++ c_7321393.hdr.grayed = 0;
++c_7321393.tag = closureN_tag;
++ c_7321393.fn = (function_type)__lambda_921;
++c_7321393.num_args = 1;
++c_7321393.num_elements = 4;
++c_7321393.elements = (object *)e_7321407;
++c_7321393.elements[0] = ((closureN)self_7312717)->elements[4];
++c_7321393.elements[1] = ((closureN)self_7312717)->elements[8];
++c_7321393.elements[2] = ((closureN)self_7312717)->elements[15];
++c_7321393.elements[3] = ((closureN)self_7312717)->elements[16];
++
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7321393, ((closureN)self_7312717)->elements[17]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313957)->elements[1], (((closure) ((closureN)self_7313957)->elements[1])->fn), boolean_f);}
++
++if( (boolean_f != Cyc_is_null(((closureN)self_7312717)->elements[17])) ){
++
++list_2_type local_7321416;
++return_direct_with_clo1(data, ((closureN)self_7312717)->elements[15], (((closure) ((closureN)self_7312717)->elements[15])->fn), Cyc_fast_list_2(&local_7321416, ((closureN)self_7312717)->elements[6], NULL));
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312717)->elements[15], (((closure) ((closureN)self_7312717)->elements[15])->fn), ((closureN)self_7312717)->elements[17]);}
++;}
++;}
++;}
+ ;;
+ }
+
+-static void __lambda_933(void *data, object self_7313958, int argc, object *args) /* object self_7313958, object cell_731434_733671 */
++static void __lambda_921(void *data, object self_7312752, int argc, object *args) /* object self_7312752, object r_736021 */
+ {
+- object cell_731434_733671 = args[0];
++ object r_736021 = args[0];
+
+
+
++closureN_type c_7321398;
++object e_7321405 [2];
++c_7321398.hdr.mark = gc_color_red;
++ c_7321398.hdr.grayed = 0;
++c_7321398.tag = closureN_tag;
++ c_7321398.fn = (function_type)__lambda_922;
++c_7321398.num_args = 1;
++c_7321398.num_elements = 2;
++c_7321398.elements = (object *)e_7321405;
++c_7321398.elements[0] = ((closureN)self_7312752)->elements[0];
++c_7321398.elements[1] = ((closureN)self_7312752)->elements[2];
+
+-return_direct_with_clo1(data, ((closureN)self_7313958)->elements[1], (((closure) ((closureN)self_7313958)->elements[1])->fn), Cyc_num_fast_gte_op(data, Cyc_cdr(data, cell_731434_733671), ((closureN)self_7313958)->elements[0]));;
++return_closcall3(data, car(((closureN)self_7312752)->elements[3]), &c_7321398, r_736021, ((closureN)self_7312752)->elements[1]);;
+ }
+
+-static void __lambda_926(void *data, object self_7313961, int argc, object *args) /* object self_7313961, object r_736480 */
++static void __lambda_922(void *data, object self_7312753, int argc, object *args) /* object self_7312753, object r_736020 */
+ {
+- object r_736480 = args[0];
++ object r_736020 = args[0];
+
+-closureN_type c_7322745;
+-object e_7322753 [4];
+-c_7322745.hdr.mark = gc_color_red;
+- c_7322745.hdr.grayed = 0;
+-c_7322745.tag = closureN_tag;
+- c_7322745.fn = (function_type)__lambda_927;
+-c_7322745.num_args = 1;
+-c_7322745.num_elements = 4;
+-c_7322745.elements = (object *)e_7322753;
+-c_7322745.elements[0] = ((closureN)self_7313961)->elements[0];
+-c_7322745.elements[1] = ((closureN)self_7313961)->elements[1];
+-c_7322745.elements[2] = ((closureN)self_7313961)->elements[2];
+-c_7322745.elements[3] = ((closureN)self_7313961)->elements[3];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322745,__lambda_927, Cyc_set_cell(data, ((closureN)self_7313961)->elements[2], r_736480));;
+-}
+-
+-static void __lambda_927(void *data, object self_7313962, int argc, object *args) /* object self_7313962, object r_736479 */
+- {
+-
+-
+-
+-return_closcall3(data, car(((closureN)self_7313962)->elements[2]), ((closureN)self_7313962)->elements[1], ((closureN)self_7313962)->elements[3], ((closureN)self_7313962)->elements[0]);;
+-}
+-
+-static void __lambda_872(void *data, object self_7313963, int argc, object *args) /* object self_7313963, object r_736476 */
+- {
+- object r_736476 = args[0];
+-
+-closureN_type c_7322255;
+-object e_7322730 [25];
+-c_7322255.hdr.mark = gc_color_red;
+- c_7322255.hdr.grayed = 0;
+-c_7322255.tag = closureN_tag;
+- c_7322255.fn = (function_type)__lambda_873;
+-c_7322255.num_args = 1;
+-c_7322255.num_elements = 25;
+-c_7322255.elements = (object *)e_7322730;
+-c_7322255.elements[0] = ((closureN)self_7313963)->elements[0];
+-c_7322255.elements[1] = ((closureN)self_7313963)->elements[1];
+-c_7322255.elements[2] = ((closureN)self_7313963)->elements[2];
+-c_7322255.elements[3] = ((closureN)self_7313963)->elements[3];
+-c_7322255.elements[4] = ((closureN)self_7313963)->elements[4];
+-c_7322255.elements[5] = ((closureN)self_7313963)->elements[5];
+-c_7322255.elements[6] = ((closureN)self_7313963)->elements[6];
+-c_7322255.elements[7] = ((closureN)self_7313963)->elements[7];
+-c_7322255.elements[8] = ((closureN)self_7313963)->elements[8];
+-c_7322255.elements[9] = ((closureN)self_7313963)->elements[9];
+-c_7322255.elements[10] = ((closureN)self_7313963)->elements[10];
+-c_7322255.elements[11] = ((closureN)self_7313963)->elements[11];
+-c_7322255.elements[12] = ((closureN)self_7313963)->elements[12];
+-c_7322255.elements[13] = ((closureN)self_7313963)->elements[13];
+-c_7322255.elements[14] = ((closureN)self_7313963)->elements[14];
+-c_7322255.elements[15] = ((closureN)self_7313963)->elements[15];
+-c_7322255.elements[16] = ((closureN)self_7313963)->elements[16];
+-c_7322255.elements[17] = ((closureN)self_7313963)->elements[17];
+-c_7322255.elements[18] = ((closureN)self_7313963)->elements[18];
+-c_7322255.elements[19] = ((closureN)self_7313963)->elements[19];
+-c_7322255.elements[20] = ((closureN)self_7313963)->elements[20];
+-c_7322255.elements[21] = ((closureN)self_7313963)->elements[21];
+-c_7322255.elements[22] = ((closureN)self_7313963)->elements[22];
+-c_7322255.elements[23] = ((closureN)self_7313963)->elements[23];
+-c_7322255.elements[24] = ((closureN)self_7313963)->elements[24];
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7322255,__lambda_873, Cyc_set_cell(data, ((closureN)self_7313963)->elements[23], r_736476));;
+-}
+-
+-static void __lambda_873(void *data, object self_7313964, int argc, object *args) /* object self_7313964, object r_736394 */
+- {
+-
+-
+-closureN_type c_7322257;
+-object e_7322327 [13];
+-c_7322257.hdr.mark = gc_color_red;
+- c_7322257.hdr.grayed = 0;
+-c_7322257.tag = closureN_tag;
+- c_7322257.fn = (function_type)__lambda_874;
+-c_7322257.num_args = 1;
+-c_7322257.num_elements = 13;
+-c_7322257.elements = (object *)e_7322327;
+-c_7322257.elements[0] = ((closureN)self_7313964)->elements[2];
+-c_7322257.elements[1] = ((closureN)self_7313964)->elements[3];
+-c_7322257.elements[2] = ((closureN)self_7313964)->elements[4];
+-c_7322257.elements[3] = ((closureN)self_7313964)->elements[6];
+-c_7322257.elements[4] = ((closureN)self_7313964)->elements[7];
+-c_7322257.elements[5] = ((closureN)self_7313964)->elements[8];
+-c_7322257.elements[6] = ((closureN)self_7313964)->elements[9];
+-c_7322257.elements[7] = ((closureN)self_7313964)->elements[12];
+-c_7322257.elements[8] = ((closureN)self_7313964)->elements[14];
+-c_7322257.elements[9] = ((closureN)self_7313964)->elements[19];
+-c_7322257.elements[10] = ((closureN)self_7313964)->elements[20];
+-c_7322257.elements[11] = ((closureN)self_7313964)->elements[22];
+-c_7322257.elements[12] = ((closureN)self_7313964)->elements[24];
+-
+-
+-closureN_type c_7322328;
+-object e_7322729 [14];
+-c_7322328.hdr.mark = gc_color_red;
+- c_7322328.hdr.grayed = 0;
+-c_7322328.tag = closureN_tag;
+- c_7322328.fn = (function_type)__lambda_881;
+-c_7322328.num_args = 2;
+-c_7322328.num_elements = 14;
+-c_7322328.elements = (object *)e_7322729;
+-c_7322328.elements[0] = ((closureN)self_7313964)->elements[0];
+-c_7322328.elements[1] = ((closureN)self_7313964)->elements[1];
+-c_7322328.elements[2] = ((closureN)self_7313964)->elements[5];
+-c_7322328.elements[3] = ((closureN)self_7313964)->elements[9];
+-c_7322328.elements[4] = ((closureN)self_7313964)->elements[10];
+-c_7322328.elements[5] = ((closureN)self_7313964)->elements[11];
+-c_7322328.elements[6] = ((closureN)self_7313964)->elements[13];
+-c_7322328.elements[7] = ((closureN)self_7313964)->elements[14];
+-c_7322328.elements[8] = ((closureN)self_7313964)->elements[15];
+-c_7322328.elements[9] = ((closureN)self_7313964)->elements[16];
+-c_7322328.elements[10] = ((closureN)self_7313964)->elements[17];
+-c_7322328.elements[11] = ((closureN)self_7313964)->elements[18];
+-c_7322328.elements[12] = ((closureN)self_7313964)->elements[21];
+-c_7322328.elements[13] = ((closureN)self_7313964)->elements[23];
+-
+-return_direct_with_clo1(data,(closure)&c_7322257,__lambda_874, &c_7322328);;
+-}
+-
+-static void __lambda_881(void *data, object self_7313965, int argc, object *args) /* object self_7313965, object k_736410, object tmpl_731443_733672, object vars_731444_733673 */
+- {
+- object k_736410 = args[0]; object tmpl_731443_733672 = args[1]; object vars_731444_733673 = args[2];
+-
+-closureN_type c_7322330;
+-object e_7322728 [16];
+-c_7322330.hdr.mark = gc_color_red;
+- c_7322330.hdr.grayed = 0;
+-c_7322330.tag = closureN_tag;
+- c_7322330.fn = (function_type)__lambda_882;
+-c_7322330.num_args = 1;
+-c_7322330.num_elements = 16;
+-c_7322330.elements = (object *)e_7322728;
+-c_7322330.elements[0] = ((closureN)self_7313965)->elements[0];
+-c_7322330.elements[1] = ((closureN)self_7313965)->elements[1];
+-c_7322330.elements[2] = ((closureN)self_7313965)->elements[2];
+-c_7322330.elements[3] = ((closureN)self_7313965)->elements[3];
+-c_7322330.elements[4] = ((closureN)self_7313965)->elements[4];
+-c_7322330.elements[5] = ((closureN)self_7313965)->elements[5];
+-c_7322330.elements[6] = ((closureN)self_7313965)->elements[6];
+-c_7322330.elements[7] = ((closureN)self_7313965)->elements[7];
+-c_7322330.elements[8] = ((closureN)self_7313965)->elements[8];
+-c_7322330.elements[9] = ((closureN)self_7313965)->elements[9];
+-c_7322330.elements[10] = ((closureN)self_7313965)->elements[10];
+-c_7322330.elements[11] = ((closureN)self_7313965)->elements[11];
+-c_7322330.elements[12] = ((closureN)self_7313965)->elements[12];
+-c_7322330.elements[13] = ((closureN)self_7313965)->elements[13];
+-c_7322330.elements[14] = k_736410;
+-c_7322330.elements[15] = vars_731444_733673;
+-
+-return_direct_with_clo1(data,(closure)&c_7322330,__lambda_882, tmpl_731443_733672);;
+-}
+-
+-static void __lambda_882(void *data, object self_7313966, int argc, object *args) /* object self_7313966, object t_731446_733674 */
+- {
+- object t_731446_733674 = args[0];
+-
+-closureN_type c_7322332;
+-object e_7322727 [17];
+-c_7322332.hdr.mark = gc_color_red;
+- c_7322332.hdr.grayed = 0;
+-c_7322332.tag = closureN_tag;
+- c_7322332.fn = (function_type)__lambda_883;
+-c_7322332.num_args = 1;
+-c_7322332.num_elements = 17;
+-c_7322332.elements = (object *)e_7322727;
+-c_7322332.elements[0] = ((closureN)self_7313966)->elements[0];
+-c_7322332.elements[1] = ((closureN)self_7313966)->elements[1];
+-c_7322332.elements[2] = ((closureN)self_7313966)->elements[2];
+-c_7322332.elements[3] = ((closureN)self_7313966)->elements[3];
+-c_7322332.elements[4] = ((closureN)self_7313966)->elements[4];
+-c_7322332.elements[5] = ((closureN)self_7313966)->elements[5];
+-c_7322332.elements[6] = ((closureN)self_7313966)->elements[6];
+-c_7322332.elements[7] = ((closureN)self_7313966)->elements[7];
+-c_7322332.elements[8] = ((closureN)self_7313966)->elements[8];
+-c_7322332.elements[9] = ((closureN)self_7313966)->elements[9];
+-c_7322332.elements[10] = ((closureN)self_7313966)->elements[10];
+-c_7322332.elements[11] = ((closureN)self_7313966)->elements[11];
+-c_7322332.elements[12] = ((closureN)self_7313966)->elements[12];
+-c_7322332.elements[13] = ((closureN)self_7313966)->elements[13];
+-c_7322332.elements[14] = ((closureN)self_7313966)->elements[14];
+-c_7322332.elements[15] = t_731446_733674;
+-c_7322332.elements[16] = ((closureN)self_7313966)->elements[15];
+-
+-return_direct_with_clo1(data,(closure)&c_7322332,__lambda_883, boolean_f);;
+-}
+-
+-static void __lambda_883(void *data, object self_7313967, int argc, object *args) /* object self_7313967, object lp_731448_733676 */
+- {
+- object lp_731448_733676 = args[0];
+-
+-closureN_type c_7322334;
+-object e_7322723 [17];
+-c_7322334.hdr.mark = gc_color_red;
+- c_7322334.hdr.grayed = 0;
+-c_7322334.tag = closureN_tag;
+- c_7322334.fn = (function_type)__lambda_1425;
+-c_7322334.num_args = 1;
+-c_7322334.num_elements = 17;
+-c_7322334.elements = (object *)e_7322723;
+-c_7322334.elements[0] = ((closureN)self_7313967)->elements[0];
+-c_7322334.elements[1] = ((closureN)self_7313967)->elements[1];
+-c_7322334.elements[2] = ((closureN)self_7313967)->elements[2];
+-c_7322334.elements[3] = ((closureN)self_7313967)->elements[3];
+-c_7322334.elements[4] = ((closureN)self_7313967)->elements[4];
+-c_7322334.elements[5] = ((closureN)self_7313967)->elements[5];
+-c_7322334.elements[6] = ((closureN)self_7313967)->elements[6];
+-c_7322334.elements[7] = ((closureN)self_7313967)->elements[7];
+-c_7322334.elements[8] = ((closureN)self_7313967)->elements[8];
+-c_7322334.elements[9] = ((closureN)self_7313967)->elements[9];
+-c_7322334.elements[10] = ((closureN)self_7313967)->elements[10];
+-c_7322334.elements[11] = ((closureN)self_7313967)->elements[11];
+-c_7322334.elements[12] = ((closureN)self_7313967)->elements[12];
+-c_7322334.elements[13] = ((closureN)self_7313967)->elements[13];
+-c_7322334.elements[14] = ((closureN)self_7313967)->elements[14];
+-c_7322334.elements[15] = ((closureN)self_7313967)->elements[15];
+-c_7322334.elements[16] = ((closureN)self_7313967)->elements[16];
+-
+-
+-pair_type local_7322726;
+-return_direct_with_clo1(data,(closure)&c_7322334,__lambda_1425, set_cell_as_expr(&local_7322726, lp_731448_733676));;
+-}
+-
+-static void __lambda_1425(void *data, object self_7313968, int argc, object *args) /* object self_7313968, object lp_731448_733676 */
+- {
+- object lp_731448_733676 = args[0];
+-
+-closureN_type c_7322336;
+-object e_7322349 [3];
+-c_7322336.hdr.mark = gc_color_red;
+- c_7322336.hdr.grayed = 0;
+-c_7322336.tag = closureN_tag;
+- c_7322336.fn = (function_type)__lambda_884;
+-c_7322336.num_args = 1;
+-c_7322336.num_elements = 3;
+-c_7322336.elements = (object *)e_7322349;
+-c_7322336.elements[0] = ((closureN)self_7313968)->elements[14];
+-c_7322336.elements[1] = lp_731448_733676;
+-c_7322336.elements[2] = ((closureN)self_7313968)->elements[15];
+-
+-
+-closureN_type c_7322350;
+-object e_7322722 [16];
+-c_7322350.hdr.mark = gc_color_red;
+- c_7322350.hdr.grayed = 0;
+-c_7322350.tag = closureN_tag;
+- c_7322350.fn = (function_type)__lambda_886;
+-c_7322350.num_args = 2;
+-c_7322350.num_elements = 16;
+-c_7322350.elements = (object *)e_7322722;
+-c_7322350.elements[0] = ((closureN)self_7313968)->elements[0];
+-c_7322350.elements[1] = ((closureN)self_7313968)->elements[1];
+-c_7322350.elements[2] = ((closureN)self_7313968)->elements[2];
+-c_7322350.elements[3] = ((closureN)self_7313968)->elements[3];
+-c_7322350.elements[4] = ((closureN)self_7313968)->elements[4];
+-c_7322350.elements[5] = ((closureN)self_7313968)->elements[5];
+-c_7322350.elements[6] = ((closureN)self_7313968)->elements[6];
+-c_7322350.elements[7] = ((closureN)self_7313968)->elements[7];
+-c_7322350.elements[8] = ((closureN)self_7313968)->elements[8];
+-c_7322350.elements[9] = ((closureN)self_7313968)->elements[9];
+-c_7322350.elements[10] = ((closureN)self_7313968)->elements[10];
+-c_7322350.elements[11] = ((closureN)self_7313968)->elements[11];
+-c_7322350.elements[12] = ((closureN)self_7313968)->elements[12];
+-c_7322350.elements[13] = ((closureN)self_7313968)->elements[13];
+-c_7322350.elements[14] = lp_731448_733676;
+-c_7322350.elements[15] = ((closureN)self_7313968)->elements[16];
+-
+-return_direct_with_clo1(data,(closure)&c_7322336,__lambda_884, &c_7322350);;
+-}
+-
+-static void __lambda_886(void *data, object self_7313969, int argc, object *args) /* object self_7313969, object k_736413, object t_731449_733677, object dim_731450_733678 */
+- {
+- object k_736413 = args[0]; object t_731449_733677 = args[1]; object dim_731450_733678 = args[2];
+-
+-closureN_type c_7322352;
+-object e_7322721 [19];
+-c_7322352.hdr.mark = gc_color_red;
+- c_7322352.hdr.grayed = 0;
+-c_7322352.tag = closureN_tag;
+- c_7322352.fn = (function_type)__lambda_887;
+-c_7322352.num_args = 1;
+-c_7322352.num_elements = 19;
+-c_7322352.elements = (object *)e_7322721;
+-c_7322352.elements[0] = ((closureN)self_7313969)->elements[0];
+-c_7322352.elements[1] = ((closureN)self_7313969)->elements[1];
+-c_7322352.elements[2] = ((closureN)self_7313969)->elements[2];
+-c_7322352.elements[3] = ((closureN)self_7313969)->elements[3];
+-c_7322352.elements[4] = ((closureN)self_7313969)->elements[4];
+-c_7322352.elements[5] = ((closureN)self_7313969)->elements[5];
+-c_7322352.elements[6] = ((closureN)self_7313969)->elements[6];
+-c_7322352.elements[7] = ((closureN)self_7313969)->elements[7];
+-c_7322352.elements[8] = dim_731450_733678;
+-c_7322352.elements[9] = ((closureN)self_7313969)->elements[8];
+-c_7322352.elements[10] = ((closureN)self_7313969)->elements[9];
+-c_7322352.elements[11] = ((closureN)self_7313969)->elements[10];
+-c_7322352.elements[12] = ((closureN)self_7313969)->elements[11];
+-c_7322352.elements[13] = ((closureN)self_7313969)->elements[12];
+-c_7322352.elements[14] = ((closureN)self_7313969)->elements[13];
+-c_7322352.elements[15] = k_736413;
+-c_7322352.elements[16] = ((closureN)self_7313969)->elements[14];
+-c_7322352.elements[17] = t_731449_733677;
+-c_7322352.elements[18] = ((closureN)self_7313969)->elements[15];
+-
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7322352, t_731449_733677);;
+-}
+-
+-static void __lambda_887(void *data, object self_7313970, int argc, object *args) /* object self_7313970, object r_736414 */
+- {
+- object r_736414 = args[0];
+- if( (boolean_f != r_736414) ){
+-
+-closureN_type c_7322354;
+-object e_7322384 [6];
+-c_7322354.hdr.mark = gc_color_red;
+- c_7322354.hdr.grayed = 0;
+-c_7322354.tag = closureN_tag;
+- c_7322354.fn = (function_type)__lambda_888;
+-c_7322354.num_args = 1;
+-c_7322354.num_elements = 6;
+-c_7322354.elements = (object *)e_7322384;
+-c_7322354.elements[0] = ((closureN)self_7313970)->elements[6];
+-c_7322354.elements[1] = ((closureN)self_7313970)->elements[7];
+-c_7322354.elements[2] = ((closureN)self_7313970)->elements[8];
+-c_7322354.elements[3] = ((closureN)self_7313970)->elements[15];
+-c_7322354.elements[4] = ((closureN)self_7313970)->elements[17];
+-c_7322354.elements[5] = ((closureN)self_7313970)->elements[18];
+-
+-
+-closureN_type c_7322385;
+-object e_7322392 [1];
+-c_7322385.hdr.mark = gc_color_red;
+- c_7322385.hdr.grayed = 0;
+-c_7322385.tag = closureN_tag;
+- c_7322385.fn = (function_type)__lambda_891;
+-c_7322385.num_args = 1;
+-c_7322385.num_elements = 1;
+-c_7322385.elements = (object *)e_7322392;
+-c_7322385.elements[0] = ((closureN)self_7313970)->elements[17];
+-
+-return_direct_with_clo1(data,(closure)&c_7322354,__lambda_888, &c_7322385);
+-} else {
+-
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313970)->elements[17])) ){
+-
+-
+-
+-closureN_type c_7322400;
+-object e_7322687 [16];
+-c_7322400.hdr.mark = gc_color_red;
+- c_7322400.hdr.grayed = 0;
+-c_7322400.tag = closureN_tag;
+- c_7322400.fn = (function_type)__lambda_892;
+-c_7322400.num_args = 1;
+-c_7322400.num_elements = 16;
+-c_7322400.elements = (object *)e_7322687;
+-c_7322400.elements[0] = ((closureN)self_7313970)->elements[0];
+-c_7322400.elements[1] = ((closureN)self_7313970)->elements[1];
+-c_7322400.elements[2] = ((closureN)self_7313970)->elements[2];
+-c_7322400.elements[3] = ((closureN)self_7313970)->elements[3];
+-c_7322400.elements[4] = ((closureN)self_7313970)->elements[5];
+-c_7322400.elements[5] = ((closureN)self_7313970)->elements[6];
+-c_7322400.elements[6] = ((closureN)self_7313970)->elements[8];
+-c_7322400.elements[7] = ((closureN)self_7313970)->elements[9];
+-c_7322400.elements[8] = ((closureN)self_7313970)->elements[11];
+-c_7322400.elements[9] = ((closureN)self_7313970)->elements[12];
+-c_7322400.elements[10] = ((closureN)self_7313970)->elements[13];
+-c_7322400.elements[11] = ((closureN)self_7313970)->elements[14];
+-c_7322400.elements[12] = ((closureN)self_7313970)->elements[15];
+-c_7322400.elements[13] = ((closureN)self_7313970)->elements[16];
+-c_7322400.elements[14] = ((closureN)self_7313970)->elements[17];
+-c_7322400.elements[15] = ((closureN)self_7313970)->elements[18];
+-
+-return_closcall2(data, car(((closureN)self_7313970)->elements[10]), &c_7322400, ((closureN)self_7313970)->elements[17]);
+-} else {
+-
+-if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313970)->elements[17])) ){
+-
+-closureN_type c_7322693;
+-object e_7322707 [4];
+-c_7322693.hdr.mark = gc_color_red;
+- c_7322693.hdr.grayed = 0;
+-c_7322693.tag = closureN_tag;
+- c_7322693.fn = (function_type)__lambda_921;
+-c_7322693.num_args = 1;
+-c_7322693.num_elements = 4;
+-c_7322693.elements = (object *)e_7322707;
+-c_7322693.elements[0] = ((closureN)self_7313970)->elements[4];
+-c_7322693.elements[1] = ((closureN)self_7313970)->elements[8];
+-c_7322693.elements[2] = ((closureN)self_7313970)->elements[15];
+-c_7322693.elements[3] = ((closureN)self_7313970)->elements[16];
+-
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7322693, ((closureN)self_7313970)->elements[17]);
+-} else {
+-
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313970)->elements[17])) ){
++list_2_type local_7321403;
++return_direct_with_clo1(data, ((closureN)self_7312753)->elements[1], (((closure) ((closureN)self_7312753)->elements[1])->fn), Cyc_fast_list_2(&local_7321403, ((closureN)self_7312753)->elements[0], r_736020));;
++}
++
++static void __lambda_892(void *data, object self_7312722, int argc, object *args) /* object self_7312722, object r_735971 */
++ {
++ object r_735971 = args[0];
++ if( (boolean_f != r_735971) ){
+
+-list_2_type local_7322716;
+-return_direct_with_clo1(data, ((closureN)self_7313970)->elements[15], (((closure) ((closureN)self_7313970)->elements[15])->fn), Cyc_fast_list_2(&local_7322716, ((closureN)self_7313970)->elements[6], NULL));
++closureN_type c_7321102;
++object e_7321125 [1];
++c_7321102.hdr.mark = gc_color_red;
++ c_7321102.hdr.grayed = 0;
++c_7321102.tag = closureN_tag;
++ c_7321102.fn = (function_type)__lambda_893;
++c_7321102.num_args = 0;
++c_7321102.num_elements = 1;
++c_7321102.elements = (object *)e_7321125;
++c_7321102.elements[0] = ((closureN)self_7312722)->elements[14];
++
++
++closureN_type c_7321126;
++object e_7321133 [2];
++c_7321126.hdr.mark = gc_color_red;
++ c_7321126.hdr.grayed = 0;
++c_7321126.tag = closureN_tag;
++ c_7321126.fn = (function_type)__lambda_894;
++c_7321126.num_args = 1;
++c_7321126.num_elements = 2;
++c_7321126.elements = (object *)e_7321133;
++c_7321126.elements[0] = ((closureN)self_7312722)->elements[5];
++c_7321126.elements[1] = ((closureN)self_7312722)->elements[12];
++
++return_direct_with_clo1(data,(closure)&c_7321102,__lambda_893, &c_7321126);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313970)->elements[15], (((closure) ((closureN)self_7313970)->elements[15])->fn), ((closureN)self_7313970)->elements[17]);}
+-;}
+-;}
+-;}
++
++
++
++closureN_type c_7321138;
++object e_7321385 [15];
++c_7321138.hdr.mark = gc_color_red;
++ c_7321138.hdr.grayed = 0;
++c_7321138.tag = closureN_tag;
++ c_7321138.fn = (function_type)__lambda_895;
++c_7321138.num_args = 1;
++c_7321138.num_elements = 15;
++c_7321138.elements = (object *)e_7321385;
++c_7321138.elements[0] = ((closureN)self_7312722)->elements[0];
++c_7321138.elements[1] = ((closureN)self_7312722)->elements[1];
++c_7321138.elements[2] = ((closureN)self_7312722)->elements[2];
++c_7321138.elements[3] = ((closureN)self_7312722)->elements[3];
++c_7321138.elements[4] = ((closureN)self_7312722)->elements[4];
++c_7321138.elements[5] = ((closureN)self_7312722)->elements[5];
++c_7321138.elements[6] = ((closureN)self_7312722)->elements[6];
++c_7321138.elements[7] = ((closureN)self_7312722)->elements[7];
++c_7321138.elements[8] = ((closureN)self_7312722)->elements[8];
++c_7321138.elements[9] = ((closureN)self_7312722)->elements[10];
++c_7321138.elements[10] = ((closureN)self_7312722)->elements[11];
++c_7321138.elements[11] = ((closureN)self_7312722)->elements[12];
++c_7321138.elements[12] = ((closureN)self_7312722)->elements[13];
++c_7321138.elements[13] = ((closureN)self_7312722)->elements[14];
++c_7321138.elements[14] = ((closureN)self_7312722)->elements[15];
++
++return_closcall2(data, car(((closureN)self_7312722)->elements[9]), &c_7321138, ((closureN)self_7312722)->elements[14]);}
+ ;;
+ }
+
+-static void __lambda_921(void *data, object self_7314005, int argc, object *args) /* object self_7314005, object r_736473 */
++static void __lambda_895(void *data, object self_7312725, int argc, object *args) /* object self_7312725, object r_735978 */
+ {
+- object r_736473 = args[0];
++ object r_735978 = args[0];
++ if( (boolean_f != r_735978) ){
+
+
+
+-closureN_type c_7322698;
+-object e_7322705 [2];
+-c_7322698.hdr.mark = gc_color_red;
+- c_7322698.hdr.grayed = 0;
+-c_7322698.tag = closureN_tag;
+- c_7322698.fn = (function_type)__lambda_922;
+-c_7322698.num_args = 1;
+-c_7322698.num_elements = 2;
+-c_7322698.elements = (object *)e_7322705;
+-c_7322698.elements[0] = ((closureN)self_7314005)->elements[0];
+-c_7322698.elements[1] = ((closureN)self_7314005)->elements[2];
+-
+-return_closcall3(data, car(((closureN)self_7314005)->elements[3]), &c_7322698, r_736473, ((closureN)self_7314005)->elements[1]);;
+-}
+-
+-static void __lambda_922(void *data, object self_7314006, int argc, object *args) /* object self_7314006, object r_736472 */
+- {
+- object r_736472 = args[0];
+-
+-list_2_type local_7322703;
+-return_direct_with_clo1(data, ((closureN)self_7314006)->elements[1], (((closure) ((closureN)self_7314006)->elements[1])->fn), Cyc_fast_list_2(&local_7322703, ((closureN)self_7314006)->elements[0], r_736472));;
+-}
+-
+-static void __lambda_892(void *data, object self_7313975, int argc, object *args) /* object self_7313975, object r_736423 */
+- {
+- object r_736423 = args[0];
+- if( (boolean_f != r_736423) ){
+-
+-closureN_type c_7322402;
+-object e_7322425 [1];
+-c_7322402.hdr.mark = gc_color_red;
+- c_7322402.hdr.grayed = 0;
+-c_7322402.tag = closureN_tag;
+- c_7322402.fn = (function_type)__lambda_893;
+-c_7322402.num_args = 0;
+-c_7322402.num_elements = 1;
+-c_7322402.elements = (object *)e_7322425;
+-c_7322402.elements[0] = ((closureN)self_7313975)->elements[14];
+-
+-
+-closureN_type c_7322426;
+-object e_7322433 [2];
+-c_7322426.hdr.mark = gc_color_red;
+- c_7322426.hdr.grayed = 0;
+-c_7322426.tag = closureN_tag;
+- c_7322426.fn = (function_type)__lambda_894;
+-c_7322426.num_args = 1;
+-c_7322426.num_elements = 2;
+-c_7322426.elements = (object *)e_7322433;
+-c_7322426.elements[0] = ((closureN)self_7313975)->elements[5];
+-c_7322426.elements[1] = ((closureN)self_7313975)->elements[12];
+-
+-return_direct_with_clo1(data,(closure)&c_7322402,__lambda_893, &c_7322426);
+-} else {
+-
+-
+-
+-closureN_type c_7322438;
+-object e_7322685 [15];
+-c_7322438.hdr.mark = gc_color_red;
+- c_7322438.hdr.grayed = 0;
+-c_7322438.tag = closureN_tag;
+- c_7322438.fn = (function_type)__lambda_895;
+-c_7322438.num_args = 1;
+-c_7322438.num_elements = 15;
+-c_7322438.elements = (object *)e_7322685;
+-c_7322438.elements[0] = ((closureN)self_7313975)->elements[0];
+-c_7322438.elements[1] = ((closureN)self_7313975)->elements[1];
+-c_7322438.elements[2] = ((closureN)self_7313975)->elements[2];
+-c_7322438.elements[3] = ((closureN)self_7313975)->elements[3];
+-c_7322438.elements[4] = ((closureN)self_7313975)->elements[4];
+-c_7322438.elements[5] = ((closureN)self_7313975)->elements[5];
+-c_7322438.elements[6] = ((closureN)self_7313975)->elements[6];
+-c_7322438.elements[7] = ((closureN)self_7313975)->elements[7];
+-c_7322438.elements[8] = ((closureN)self_7313975)->elements[8];
+-c_7322438.elements[9] = ((closureN)self_7313975)->elements[10];
+-c_7322438.elements[10] = ((closureN)self_7313975)->elements[11];
+-c_7322438.elements[11] = ((closureN)self_7313975)->elements[12];
+-c_7322438.elements[12] = ((closureN)self_7313975)->elements[13];
+-c_7322438.elements[13] = ((closureN)self_7313975)->elements[14];
+-c_7322438.elements[14] = ((closureN)self_7313975)->elements[15];
+-
+-return_closcall2(data, car(((closureN)self_7313975)->elements[9]), &c_7322438, ((closureN)self_7313975)->elements[14]);}
+-;;
+-}
+-
+-static void __lambda_895(void *data, object self_7313978, int argc, object *args) /* object self_7313978, object r_736430 */
+- {
+- object r_736430 = args[0];
+- if( (boolean_f != r_736430) ){
+-
+-
+-
+-closureN_type c_7322443;
+-object e_7322644 [12];
+-c_7322443.hdr.mark = gc_color_red;
+- c_7322443.hdr.grayed = 0;
+-c_7322443.tag = closureN_tag;
+- c_7322443.fn = (function_type)__lambda_896;
+-c_7322443.num_args = 1;
+-c_7322443.num_elements = 12;
+-c_7322443.elements = (object *)e_7322644;
+-c_7322443.elements[0] = ((closureN)self_7313978)->elements[0];
+-c_7322443.elements[1] = ((closureN)self_7313978)->elements[1];
+-c_7322443.elements[2] = ((closureN)self_7313978)->elements[3];
+-c_7322443.elements[3] = ((closureN)self_7313978)->elements[4];
+-c_7322443.elements[4] = ((closureN)self_7313978)->elements[6];
+-c_7322443.elements[5] = ((closureN)self_7313978)->elements[8];
+-c_7322443.elements[6] = ((closureN)self_7313978)->elements[9];
+-c_7322443.elements[7] = ((closureN)self_7313978)->elements[10];
+-c_7322443.elements[8] = ((closureN)self_7313978)->elements[11];
+-c_7322443.elements[9] = ((closureN)self_7313978)->elements[12];
+-c_7322443.elements[10] = ((closureN)self_7313978)->elements[13];
+-c_7322443.elements[11] = ((closureN)self_7313978)->elements[14];
++closureN_type c_7321143;
++object e_7321344 [12];
++c_7321143.hdr.mark = gc_color_red;
++ c_7321143.hdr.grayed = 0;
++c_7321143.tag = closureN_tag;
++ c_7321143.fn = (function_type)__lambda_896;
++c_7321143.num_args = 1;
++c_7321143.num_elements = 12;
++c_7321143.elements = (object *)e_7321344;
++c_7321143.elements[0] = ((closureN)self_7312725)->elements[0];
++c_7321143.elements[1] = ((closureN)self_7312725)->elements[1];
++c_7321143.elements[2] = ((closureN)self_7312725)->elements[3];
++c_7321143.elements[3] = ((closureN)self_7312725)->elements[4];
++c_7321143.elements[4] = ((closureN)self_7312725)->elements[6];
++c_7321143.elements[5] = ((closureN)self_7312725)->elements[8];
++c_7321143.elements[6] = ((closureN)self_7312725)->elements[9];
++c_7321143.elements[7] = ((closureN)self_7312725)->elements[10];
++c_7321143.elements[8] = ((closureN)self_7312725)->elements[11];
++c_7321143.elements[9] = ((closureN)self_7312725)->elements[12];
++c_7321143.elements[10] = ((closureN)self_7312725)->elements[13];
++c_7321143.elements[11] = ((closureN)self_7312725)->elements[14];
+
+-return_closcall2(data, car(((closureN)self_7313978)->elements[7]), &c_7322443, ((closureN)self_7313978)->elements[13]);
++return_closcall2(data, car(((closureN)self_7312725)->elements[7]), &c_7321143, ((closureN)self_7312725)->elements[13]);
+ } else {
+
+
+
+-closureN_type c_7322650;
+-object e_7322680 [6];
+-c_7322650.hdr.mark = gc_color_red;
+- c_7322650.hdr.grayed = 0;
+-c_7322650.tag = closureN_tag;
+- c_7322650.fn = (function_type)__lambda_917;
+-c_7322650.num_args = 1;
+-c_7322650.num_elements = 6;
+-c_7322650.elements = (object *)e_7322680;
+-c_7322650.elements[0] = ((closureN)self_7313978)->elements[2];
+-c_7322650.elements[1] = ((closureN)self_7313978)->elements[5];
+-c_7322650.elements[2] = ((closureN)self_7313978)->elements[6];
+-c_7322650.elements[3] = ((closureN)self_7313978)->elements[11];
+-c_7322650.elements[4] = ((closureN)self_7313978)->elements[12];
+-c_7322650.elements[5] = ((closureN)self_7313978)->elements[13];
++closureN_type c_7321350;
++object e_7321380 [6];
++c_7321350.hdr.mark = gc_color_red;
++ c_7321350.hdr.grayed = 0;
++c_7321350.tag = closureN_tag;
++ c_7321350.fn = (function_type)__lambda_917;
++c_7321350.num_args = 1;
++c_7321350.num_elements = 6;
++c_7321350.elements = (object *)e_7321380;
++c_7321350.elements[0] = ((closureN)self_7312725)->elements[2];
++c_7321350.elements[1] = ((closureN)self_7312725)->elements[5];
++c_7321350.elements[2] = ((closureN)self_7312725)->elements[6];
++c_7321350.elements[3] = ((closureN)self_7312725)->elements[11];
++c_7321350.elements[4] = ((closureN)self_7312725)->elements[12];
++c_7321350.elements[5] = ((closureN)self_7312725)->elements[13];
+
+
+
+-return_closcall3(data, car(((closureN)self_7313978)->elements[12]), &c_7322650, Cyc_car(data, ((closureN)self_7313978)->elements[13]), ((closureN)self_7313978)->elements[6]);}
++return_closcall3(data, car(((closureN)self_7312725)->elements[12]), &c_7321350, Cyc_car(data, ((closureN)self_7312725)->elements[13]), ((closureN)self_7312725)->elements[6]);}
+ ;;
+ }
+
+-static void __lambda_917(void *data, object self_7314001, int argc, object *args) /* object self_7314001, object r_736466 */
++static void __lambda_917(void *data, object self_7312748, int argc, object *args) /* object self_7312748, object r_736014 */
+ {
+- object r_736466 = args[0];
++ object r_736014 = args[0];
+
+-closureN_type c_7322652;
+-object e_7322676 [7];
+-c_7322652.hdr.mark = gc_color_red;
+- c_7322652.hdr.grayed = 0;
+-c_7322652.tag = closureN_tag;
+- c_7322652.fn = (function_type)__lambda_918;
+-c_7322652.num_args = 1;
+-c_7322652.num_elements = 7;
+-c_7322652.elements = (object *)e_7322676;
+-c_7322652.elements[0] = ((closureN)self_7314001)->elements[0];
+-c_7322652.elements[1] = ((closureN)self_7314001)->elements[1];
+-c_7322652.elements[2] = ((closureN)self_7314001)->elements[2];
+-c_7322652.elements[3] = ((closureN)self_7314001)->elements[3];
+-c_7322652.elements[4] = ((closureN)self_7314001)->elements[4];
+-c_7322652.elements[5] = r_736466;
+-c_7322652.elements[6] = ((closureN)self_7314001)->elements[5];
++closureN_type c_7321352;
++object e_7321376 [7];
++c_7321352.hdr.mark = gc_color_red;
++ c_7321352.hdr.grayed = 0;
++c_7321352.tag = closureN_tag;
++ c_7321352.fn = (function_type)__lambda_918;
++c_7321352.num_args = 1;
++c_7321352.num_elements = 7;
++c_7321352.elements = (object *)e_7321376;
++c_7321352.elements[0] = ((closureN)self_7312748)->elements[0];
++c_7321352.elements[1] = ((closureN)self_7312748)->elements[1];
++c_7321352.elements[2] = ((closureN)self_7312748)->elements[2];
++c_7321352.elements[3] = ((closureN)self_7312748)->elements[3];
++c_7321352.elements[4] = ((closureN)self_7312748)->elements[4];
++c_7321352.elements[5] = r_736014;
++c_7321352.elements[6] = ((closureN)self_7312748)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322652,__lambda_918, Cyc_cdr(data, ((closureN)self_7314001)->elements[5]));;
++return_direct_with_clo1(data,(closure)&c_7321352,__lambda_918, Cyc_cdr(data, ((closureN)self_7312748)->elements[5]));;
+ }
+
+-static void __lambda_918(void *data, object self_7314002, int argc, object *args) /* object self_7314002, object r_736469 */
++static void __lambda_918(void *data, object self_7312749, int argc, object *args) /* object self_7312749, object r_736017 */
+ {
+- object r_736469 = args[0];
++ object r_736017 = args[0];
+
+
+
+-closureN_type c_7322657;
+-object e_7322674 [5];
+-c_7322657.hdr.mark = gc_color_red;
+- c_7322657.hdr.grayed = 0;
+-c_7322657.tag = closureN_tag;
+- c_7322657.fn = (function_type)__lambda_919;
+-c_7322657.num_args = 1;
+-c_7322657.num_elements = 5;
+-c_7322657.elements = (object *)e_7322674;
+-c_7322657.elements[0] = ((closureN)self_7314002)->elements[0];
+-c_7322657.elements[1] = ((closureN)self_7314002)->elements[1];
+-c_7322657.elements[2] = ((closureN)self_7314002)->elements[3];
+-c_7322657.elements[3] = ((closureN)self_7314002)->elements[5];
+-c_7322657.elements[4] = ((closureN)self_7314002)->elements[6];
++closureN_type c_7321357;
++object e_7321374 [5];
++c_7321357.hdr.mark = gc_color_red;
++ c_7321357.hdr.grayed = 0;
++c_7321357.tag = closureN_tag;
++ c_7321357.fn = (function_type)__lambda_919;
++c_7321357.num_args = 1;
++c_7321357.num_elements = 5;
++c_7321357.elements = (object *)e_7321374;
++c_7321357.elements[0] = ((closureN)self_7312749)->elements[0];
++c_7321357.elements[1] = ((closureN)self_7312749)->elements[1];
++c_7321357.elements[2] = ((closureN)self_7312749)->elements[3];
++c_7321357.elements[3] = ((closureN)self_7312749)->elements[5];
++c_7321357.elements[4] = ((closureN)self_7312749)->elements[6];
+
+-return_closcall3(data, car(((closureN)self_7314002)->elements[4]), &c_7322657, r_736469, ((closureN)self_7314002)->elements[2]);;
++return_closcall3(data, car(((closureN)self_7312749)->elements[4]), &c_7321357, r_736017, ((closureN)self_7312749)->elements[2]);;
+ }
+
+-static void __lambda_919(void *data, object self_7314003, int argc, object *args) /* object self_7314003, object r_736467 */
++static void __lambda_919(void *data, object self_7312750, int argc, object *args) /* object self_7312750, object r_736015 */
+ {
+- object r_736467 = args[0];
++ object r_736015 = args[0];
+
+-closureN_type c_7322659;
+-object e_7322668 [4];
+-c_7322659.hdr.mark = gc_color_red;
+- c_7322659.hdr.grayed = 0;
+-c_7322659.tag = closureN_tag;
+- c_7322659.fn = (function_type)__lambda_920;
+-c_7322659.num_args = 1;
+-c_7322659.num_elements = 4;
+-c_7322659.elements = (object *)e_7322668;
+-c_7322659.elements[0] = ((closureN)self_7314003)->elements[0];
+-c_7322659.elements[1] = ((closureN)self_7314003)->elements[2];
+-c_7322659.elements[2] = ((closureN)self_7314003)->elements[3];
+-c_7322659.elements[3] = r_736467;
++closureN_type c_7321359;
++object e_7321368 [4];
++c_7321359.hdr.mark = gc_color_red;
++ c_7321359.hdr.grayed = 0;
++c_7321359.tag = closureN_tag;
++ c_7321359.fn = (function_type)__lambda_920;
++c_7321359.num_args = 1;
++c_7321359.num_elements = 4;
++c_7321359.elements = (object *)e_7321368;
++c_7321359.elements[0] = ((closureN)self_7312750)->elements[0];
++c_7321359.elements[1] = ((closureN)self_7312750)->elements[2];
++c_7321359.elements[2] = ((closureN)self_7312750)->elements[3];
++c_7321359.elements[3] = r_736015;
+
+
+-list_2_type local_7322671;
+-return_direct_with_clo1(data,(closure)&c_7322659,__lambda_920, Cyc_fast_list_2(&local_7322671, ((closureN)self_7314003)->elements[1], ((closureN)self_7314003)->elements[4]));;
++list_2_type local_7321371;
++return_direct_with_clo1(data,(closure)&c_7321359,__lambda_920, Cyc_fast_list_2(&local_7321371, ((closureN)self_7312750)->elements[1], ((closureN)self_7312750)->elements[4]));;
+ }
+
+-static void __lambda_920(void *data, object self_7314004, int argc, object *args) /* object self_7314004, object r_736468 */
++static void __lambda_920(void *data, object self_7312751, int argc, object *args) /* object self_7312751, object r_736016 */
+ {
+- object r_736468 = args[0];
++ object r_736016 = args[0];
+
+-list_4_type local_7322664;
+-return_direct_with_clo1(data, ((closureN)self_7314004)->elements[1], (((closure) ((closureN)self_7314004)->elements[1])->fn), Cyc_fast_list_4(&local_7322664, ((closureN)self_7314004)->elements[0], ((closureN)self_7314004)->elements[2], ((closureN)self_7314004)->elements[3], r_736468));;
++list_4_type local_7321364;
++return_direct_with_clo1(data, ((closureN)self_7312751)->elements[1], (((closure) ((closureN)self_7312751)->elements[1])->fn), Cyc_fast_list_4(&local_7321364, ((closureN)self_7312751)->elements[0], ((closureN)self_7312751)->elements[2], ((closureN)self_7312751)->elements[3], r_736016));;
+ }
+
+-static void __lambda_896(void *data, object self_7313979, int argc, object *args) /* object self_7313979, object depth_731473_733682 */
++static void __lambda_896(void *data, object self_7312726, int argc, object *args) /* object self_7312726, object depth_731473_733335 */
+ {
+- object depth_731473_733682 = args[0];
++ object depth_731473_733335 = args[0];
+
+-closureN_type c_7322445;
+-object e_7322640 [13];
+-c_7322445.hdr.mark = gc_color_red;
+- c_7322445.hdr.grayed = 0;
+-c_7322445.tag = closureN_tag;
+- c_7322445.fn = (function_type)__lambda_897;
+-c_7322445.num_args = 1;
+-c_7322445.num_elements = 13;
+-c_7322445.elements = (object *)e_7322640;
+-c_7322445.elements[0] = ((closureN)self_7313979)->elements[0];
+-c_7322445.elements[1] = ((closureN)self_7313979)->elements[1];
+-c_7322445.elements[2] = ((closureN)self_7313979)->elements[2];
+-c_7322445.elements[3] = ((closureN)self_7313979)->elements[3];
+-c_7322445.elements[4] = depth_731473_733682;
+-c_7322445.elements[5] = ((closureN)self_7313979)->elements[4];
+-c_7322445.elements[6] = ((closureN)self_7313979)->elements[5];
+-c_7322445.elements[7] = ((closureN)self_7313979)->elements[6];
+-c_7322445.elements[8] = ((closureN)self_7313979)->elements[7];
+-c_7322445.elements[9] = ((closureN)self_7313979)->elements[8];
+-c_7322445.elements[10] = ((closureN)self_7313979)->elements[9];
+-c_7322445.elements[11] = ((closureN)self_7313979)->elements[10];
+-c_7322445.elements[12] = ((closureN)self_7313979)->elements[11];
++closureN_type c_7321145;
++object e_7321340 [13];
++c_7321145.hdr.mark = gc_color_red;
++ c_7321145.hdr.grayed = 0;
++c_7321145.tag = closureN_tag;
++ c_7321145.fn = (function_type)__lambda_897;
++c_7321145.num_args = 1;
++c_7321145.num_elements = 13;
++c_7321145.elements = (object *)e_7321340;
++c_7321145.elements[0] = ((closureN)self_7312726)->elements[0];
++c_7321145.elements[1] = ((closureN)self_7312726)->elements[1];
++c_7321145.elements[2] = ((closureN)self_7312726)->elements[2];
++c_7321145.elements[3] = ((closureN)self_7312726)->elements[3];
++c_7321145.elements[4] = depth_731473_733335;
++c_7321145.elements[5] = ((closureN)self_7312726)->elements[4];
++c_7321145.elements[6] = ((closureN)self_7312726)->elements[5];
++c_7321145.elements[7] = ((closureN)self_7312726)->elements[6];
++c_7321145.elements[8] = ((closureN)self_7312726)->elements[7];
++c_7321145.elements[9] = ((closureN)self_7312726)->elements[8];
++c_7321145.elements[10] = ((closureN)self_7312726)->elements[9];
++c_7321145.elements[11] = ((closureN)self_7312726)->elements[10];
++c_7321145.elements[12] = ((closureN)self_7312726)->elements[11];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322445,__lambda_897, Cyc_car(data, ((closureN)self_7313979)->elements[10]));;
++return_direct_with_clo1(data,(closure)&c_7321145,__lambda_897, Cyc_car(data, ((closureN)self_7312726)->elements[10]));;
+ }
+
+-static void __lambda_897(void *data, object self_7313980, int argc, object *args) /* object self_7313980, object r_736465 */
++static void __lambda_897(void *data, object self_7312727, int argc, object *args) /* object self_7312727, object r_736013 */
+ {
+- object r_736465 = args[0];
++ object r_736013 = args[0];
+
+
+
+-closureN_type c_7322450;
+-object e_7322633 [12];
+-c_7322450.hdr.mark = gc_color_red;
+- c_7322450.hdr.grayed = 0;
+-c_7322450.tag = closureN_tag;
+- c_7322450.fn = (function_type)__lambda_898;
+-c_7322450.num_args = 1;
+-c_7322450.num_elements = 12;
+-c_7322450.elements = (object *)e_7322633;
+-c_7322450.elements[0] = ((closureN)self_7313980)->elements[0];
+-c_7322450.elements[1] = ((closureN)self_7313980)->elements[1];
+-c_7322450.elements[2] = ((closureN)self_7313980)->elements[2];
+-c_7322450.elements[3] = ((closureN)self_7313980)->elements[3];
+-c_7322450.elements[4] = ((closureN)self_7313980)->elements[4];
+-c_7322450.elements[5] = ((closureN)self_7313980)->elements[5];
+-c_7322450.elements[6] = ((closureN)self_7313980)->elements[6];
+-c_7322450.elements[7] = ((closureN)self_7313980)->elements[7];
+-c_7322450.elements[8] = ((closureN)self_7313980)->elements[9];
+-c_7322450.elements[9] = ((closureN)self_7313980)->elements[10];
+-c_7322450.elements[10] = ((closureN)self_7313980)->elements[11];
+-c_7322450.elements[11] = ((closureN)self_7313980)->elements[12];
++closureN_type c_7321150;
++object e_7321333 [12];
++c_7321150.hdr.mark = gc_color_red;
++ c_7321150.hdr.grayed = 0;
++c_7321150.tag = closureN_tag;
++ c_7321150.fn = (function_type)__lambda_898;
++c_7321150.num_args = 1;
++c_7321150.num_elements = 12;
++c_7321150.elements = (object *)e_7321333;
++c_7321150.elements[0] = ((closureN)self_7312727)->elements[0];
++c_7321150.elements[1] = ((closureN)self_7312727)->elements[1];
++c_7321150.elements[2] = ((closureN)self_7312727)->elements[2];
++c_7321150.elements[3] = ((closureN)self_7312727)->elements[3];
++c_7321150.elements[4] = ((closureN)self_7312727)->elements[4];
++c_7321150.elements[5] = ((closureN)self_7312727)->elements[5];
++c_7321150.elements[6] = ((closureN)self_7312727)->elements[6];
++c_7321150.elements[7] = ((closureN)self_7312727)->elements[7];
++c_7321150.elements[8] = ((closureN)self_7312727)->elements[9];
++c_7321150.elements[9] = ((closureN)self_7312727)->elements[10];
++c_7321150.elements[10] = ((closureN)self_7312727)->elements[11];
++c_7321150.elements[11] = ((closureN)self_7312727)->elements[12];
+
+
+-complex_num_type local_7322637;
+-return_closcall4(data, car(((closureN)self_7313980)->elements[8]), &c_7322450, r_736465, ((closureN)self_7313980)->elements[12], Cyc_fast_sum(data,&local_7322637, ((closureN)self_7313980)->elements[5], ((closureN)self_7313980)->elements[4]));;
++complex_num_type local_7321337;
++return_closcall4(data, car(((closureN)self_7312727)->elements[8]), &c_7321150, r_736013, ((closureN)self_7312727)->elements[12], Cyc_fast_sum(data,&local_7321337, ((closureN)self_7312727)->elements[5], ((closureN)self_7312727)->elements[4]));;
+ }
+
+-static void __lambda_898(void *data, object self_7313981, int argc, object *args) /* object self_7313981, object ell_91vars_731479_733684 */
++static void __lambda_898(void *data, object self_7312728, int argc, object *args) /* object self_7312728, object ell_91vars_731479_733337 */
+ {
+- object ell_91vars_731479_733684 = args[0];
++ object ell_91vars_731479_733337 = args[0];
+
+-if( (boolean_f != Cyc_is_null(ell_91vars_731479_733684)) ){
++if( (boolean_f != Cyc_is_null(ell_91vars_731479_733337)) ){
+
+-make_utf8_string_with_len(c_7322455, "too many ...'s", 14, 14);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313981)->elements[8], &c_7322455, ((closureN)self_7313981)->elements[7]);
++make_utf8_string_with_len(c_7321155, "too many ...'s", 14, 14);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7312728)->elements[8], &c_7321155, ((closureN)self_7312728)->elements[7]);
+ } else {
+
+-closureN_type c_7322458;
+-object e_7322471 [1];
+-c_7322458.hdr.mark = gc_color_red;
+- c_7322458.hdr.grayed = 0;
+-c_7322458.tag = closureN_tag;
+- c_7322458.fn = (function_type)__lambda_899;
+-c_7322458.num_args = 0;
+-c_7322458.num_elements = 1;
+-c_7322458.elements = (object *)e_7322471;
+-c_7322458.elements[0] = ((closureN)self_7313981)->elements[10];
++closureN_type c_7321158;
++object e_7321171 [1];
++c_7321158.hdr.mark = gc_color_red;
++ c_7321158.hdr.grayed = 0;
++c_7321158.tag = closureN_tag;
++ c_7321158.fn = (function_type)__lambda_899;
++c_7321158.num_args = 0;
++c_7321158.num_elements = 1;
++c_7321158.elements = (object *)e_7321171;
++c_7321158.elements[0] = ((closureN)self_7312728)->elements[10];
+
+
+-closureN_type c_7322472;
+-object e_7322632 [12];
+-c_7322472.hdr.mark = gc_color_red;
+- c_7322472.hdr.grayed = 0;
+-c_7322472.tag = closureN_tag;
+- c_7322472.fn = (function_type)__lambda_900;
+-c_7322472.num_args = 1;
+-c_7322472.num_elements = 12;
+-c_7322472.elements = (object *)e_7322632;
+-c_7322472.elements[0] = ((closureN)self_7313981)->elements[0];
+-c_7322472.elements[1] = ((closureN)self_7313981)->elements[1];
+-c_7322472.elements[2] = ((closureN)self_7313981)->elements[2];
+-c_7322472.elements[3] = ((closureN)self_7313981)->elements[3];
+-c_7322472.elements[4] = ((closureN)self_7313981)->elements[4];
+-c_7322472.elements[5] = ((closureN)self_7313981)->elements[5];
+-c_7322472.elements[6] = ell_91vars_731479_733684;
+-c_7322472.elements[7] = ((closureN)self_7313981)->elements[6];
+-c_7322472.elements[8] = ((closureN)self_7313981)->elements[8];
+-c_7322472.elements[9] = ((closureN)self_7313981)->elements[9];
+-c_7322472.elements[10] = ((closureN)self_7313981)->elements[10];
+-c_7322472.elements[11] = ((closureN)self_7313981)->elements[11];
++closureN_type c_7321172;
++object e_7321332 [12];
++c_7321172.hdr.mark = gc_color_red;
++ c_7321172.hdr.grayed = 0;
++c_7321172.tag = closureN_tag;
++ c_7321172.fn = (function_type)__lambda_900;
++c_7321172.num_args = 1;
++c_7321172.num_elements = 12;
++c_7321172.elements = (object *)e_7321332;
++c_7321172.elements[0] = ((closureN)self_7312728)->elements[0];
++c_7321172.elements[1] = ((closureN)self_7312728)->elements[1];
++c_7321172.elements[2] = ((closureN)self_7312728)->elements[2];
++c_7321172.elements[3] = ((closureN)self_7312728)->elements[3];
++c_7321172.elements[4] = ((closureN)self_7312728)->elements[4];
++c_7321172.elements[5] = ((closureN)self_7312728)->elements[5];
++c_7321172.elements[6] = ell_91vars_731479_733337;
++c_7321172.elements[7] = ((closureN)self_7312728)->elements[6];
++c_7321172.elements[8] = ((closureN)self_7312728)->elements[8];
++c_7321172.elements[9] = ((closureN)self_7312728)->elements[9];
++c_7321172.elements[10] = ((closureN)self_7312728)->elements[10];
++c_7321172.elements[11] = ((closureN)self_7312728)->elements[11];
+
+-return_direct_with_clo1(data,(closure)&c_7322458,__lambda_899, &c_7322472);}
++return_direct_with_clo1(data,(closure)&c_7321158,__lambda_899, &c_7321172);}
+ ;;
+ }
+
+-static void __lambda_900(void *data, object self_7313982, int argc, object *args) /* object self_7313982, object r_736435 */
++static void __lambda_900(void *data, object self_7312729, int argc, object *args) /* object self_7312729, object r_735983 */
+ {
+- object r_736435 = args[0];
+- if( (boolean_f != r_736435) ){
++ object r_735983 = args[0];
++ if( (boolean_f != r_735983) ){
+
+
+
+
+
+-complex_num_type local_7322483;
+-return_closcall3(data, car(((closureN)self_7313982)->elements[9]), ((closureN)self_7313982)->elements[8], Cyc_car(data, ((closureN)self_7313982)->elements[10]), Cyc_fast_sum(data,&local_7322483, ((closureN)self_7313982)->elements[5], ((closureN)self_7313982)->elements[4]));
++complex_num_type local_7321183;
++return_closcall3(data, car(((closureN)self_7312729)->elements[9]), ((closureN)self_7312729)->elements[8], Cyc_car(data, ((closureN)self_7312729)->elements[10]), Cyc_fast_sum(data,&local_7321183, ((closureN)self_7312729)->elements[5], ((closureN)self_7312729)->elements[4]));
+ } else {
+
+-closureN_type c_7322487;
+-object e_7322628 [12];
+-c_7322487.hdr.mark = gc_color_red;
+- c_7322487.hdr.grayed = 0;
+-c_7322487.tag = closureN_tag;
+- c_7322487.fn = (function_type)__lambda_901;
+-c_7322487.num_args = 1;
+-c_7322487.num_elements = 12;
+-c_7322487.elements = (object *)e_7322628;
+-c_7322487.elements[0] = ((closureN)self_7313982)->elements[0];
+-c_7322487.elements[1] = ((closureN)self_7313982)->elements[1];
+-c_7322487.elements[2] = ((closureN)self_7313982)->elements[2];
+-c_7322487.elements[3] = ((closureN)self_7313982)->elements[3];
+-c_7322487.elements[4] = ((closureN)self_7313982)->elements[4];
+-c_7322487.elements[5] = ((closureN)self_7313982)->elements[5];
+-c_7322487.elements[6] = ((closureN)self_7313982)->elements[6];
+-c_7322487.elements[7] = ((closureN)self_7313982)->elements[7];
+-c_7322487.elements[8] = ((closureN)self_7313982)->elements[8];
+-c_7322487.elements[9] = ((closureN)self_7313982)->elements[9];
+-c_7322487.elements[10] = ((closureN)self_7313982)->elements[10];
+-c_7322487.elements[11] = ((closureN)self_7313982)->elements[11];
++closureN_type c_7321187;
++object e_7321328 [12];
++c_7321187.hdr.mark = gc_color_red;
++ c_7321187.hdr.grayed = 0;
++c_7321187.tag = closureN_tag;
++ c_7321187.fn = (function_type)__lambda_901;
++c_7321187.num_args = 1;
++c_7321187.num_elements = 12;
++c_7321187.elements = (object *)e_7321328;
++c_7321187.elements[0] = ((closureN)self_7312729)->elements[0];
++c_7321187.elements[1] = ((closureN)self_7312729)->elements[1];
++c_7321187.elements[2] = ((closureN)self_7312729)->elements[2];
++c_7321187.elements[3] = ((closureN)self_7312729)->elements[3];
++c_7321187.elements[4] = ((closureN)self_7312729)->elements[4];
++c_7321187.elements[5] = ((closureN)self_7312729)->elements[5];
++c_7321187.elements[6] = ((closureN)self_7312729)->elements[6];
++c_7321187.elements[7] = ((closureN)self_7312729)->elements[7];
++c_7321187.elements[8] = ((closureN)self_7312729)->elements[8];
++c_7321187.elements[9] = ((closureN)self_7312729)->elements[9];
++c_7321187.elements[10] = ((closureN)self_7312729)->elements[10];
++c_7321187.elements[11] = ((closureN)self_7312729)->elements[11];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322487,__lambda_901, Cyc_car(data, ((closureN)self_7313982)->elements[10]));}
++return_direct_with_clo1(data,(closure)&c_7321187,__lambda_901, Cyc_car(data, ((closureN)self_7312729)->elements[10]));}
+ ;;
+ }
+
+-static void __lambda_901(void *data, object self_7313983, int argc, object *args) /* object self_7313983, object r_736459 */
++static void __lambda_901(void *data, object self_7312730, int argc, object *args) /* object self_7312730, object r_736007 */
+ {
+- object r_736459 = args[0];
++ object r_736007 = args[0];
+
+
+
+-closureN_type c_7322492;
+-object e_7322622 [12];
+-c_7322492.hdr.mark = gc_color_red;
+- c_7322492.hdr.grayed = 0;
+-c_7322492.tag = closureN_tag;
+- c_7322492.fn = (function_type)__lambda_902;
+-c_7322492.num_args = 1;
+-c_7322492.num_elements = 12;
+-c_7322492.elements = (object *)e_7322622;
+-c_7322492.elements[0] = ((closureN)self_7313983)->elements[0];
+-c_7322492.elements[1] = ((closureN)self_7313983)->elements[1];
+-c_7322492.elements[2] = ((closureN)self_7313983)->elements[2];
+-c_7322492.elements[3] = ((closureN)self_7313983)->elements[3];
+-c_7322492.elements[4] = ((closureN)self_7313983)->elements[4];
+-c_7322492.elements[5] = ((closureN)self_7313983)->elements[5];
+-c_7322492.elements[6] = ((closureN)self_7313983)->elements[6];
+-c_7322492.elements[7] = ((closureN)self_7313983)->elements[7];
+-c_7322492.elements[8] = ((closureN)self_7313983)->elements[8];
+-c_7322492.elements[9] = ((closureN)self_7313983)->elements[9];
+-c_7322492.elements[10] = ((closureN)self_7313983)->elements[10];
+-c_7322492.elements[11] = ((closureN)self_7313983)->elements[11];
++closureN_type c_7321192;
++object e_7321322 [12];
++c_7321192.hdr.mark = gc_color_red;
++ c_7321192.hdr.grayed = 0;
++c_7321192.tag = closureN_tag;
++ c_7321192.fn = (function_type)__lambda_902;
++c_7321192.num_args = 1;
++c_7321192.num_elements = 12;
++c_7321192.elements = (object *)e_7321322;
++c_7321192.elements[0] = ((closureN)self_7312730)->elements[0];
++c_7321192.elements[1] = ((closureN)self_7312730)->elements[1];
++c_7321192.elements[2] = ((closureN)self_7312730)->elements[2];
++c_7321192.elements[3] = ((closureN)self_7312730)->elements[3];
++c_7321192.elements[4] = ((closureN)self_7312730)->elements[4];
++c_7321192.elements[5] = ((closureN)self_7312730)->elements[5];
++c_7321192.elements[6] = ((closureN)self_7312730)->elements[6];
++c_7321192.elements[7] = ((closureN)self_7312730)->elements[7];
++c_7321192.elements[8] = ((closureN)self_7312730)->elements[8];
++c_7321192.elements[9] = ((closureN)self_7312730)->elements[9];
++c_7321192.elements[10] = ((closureN)self_7312730)->elements[10];
++c_7321192.elements[11] = ((closureN)self_7312730)->elements[11];
+
+
+-complex_num_type local_7322625;
+-return_closcall3(data, car(((closureN)self_7313983)->elements[9]), &c_7322492, r_736459, Cyc_fast_sum(data,&local_7322625, ((closureN)self_7313983)->elements[5], ((closureN)self_7313983)->elements[4]));;
++complex_num_type local_7321325;
++return_closcall3(data, car(((closureN)self_7312730)->elements[9]), &c_7321192, r_736007, Cyc_fast_sum(data,&local_7321325, ((closureN)self_7312730)->elements[5], ((closureN)self_7312730)->elements[4]));;
+ }
+
+-static void __lambda_902(void *data, object self_7313984, int argc, object *args) /* object self_7313984, object once_731491_733685 */
++static void __lambda_902(void *data, object self_7312731, int argc, object *args) /* object self_7312731, object once_731491_733338 */
+ {
+- object once_731491_733685 = args[0];
++ object once_731491_733338 = args[0];
+
+-closureN_type c_7322494;
+-object e_7322539 [5];
+-c_7322494.hdr.mark = gc_color_red;
+- c_7322494.hdr.grayed = 0;
+-c_7322494.tag = closureN_tag;
+- c_7322494.fn = (function_type)__lambda_903;
+-c_7322494.num_args = 0;
+-c_7322494.num_elements = 5;
+-c_7322494.elements = (object *)e_7322539;
+-c_7322494.elements[0] = ((closureN)self_7313984)->elements[2];
+-c_7322494.elements[1] = ((closureN)self_7313984)->elements[3];
+-c_7322494.elements[2] = ((closureN)self_7313984)->elements[6];
+-c_7322494.elements[3] = once_731491_733685;
+-c_7322494.elements[4] = ((closureN)self_7313984)->elements[11];
++closureN_type c_7321194;
++object e_7321239 [5];
++c_7321194.hdr.mark = gc_color_red;
++ c_7321194.hdr.grayed = 0;
++c_7321194.tag = closureN_tag;
++ c_7321194.fn = (function_type)__lambda_903;
++c_7321194.num_args = 0;
++c_7321194.num_elements = 5;
++c_7321194.elements = (object *)e_7321239;
++c_7321194.elements[0] = ((closureN)self_7312731)->elements[2];
++c_7321194.elements[1] = ((closureN)self_7312731)->elements[3];
++c_7321194.elements[2] = ((closureN)self_7312731)->elements[6];
++c_7321194.elements[3] = once_731491_733338;
++c_7321194.elements[4] = ((closureN)self_7312731)->elements[11];
+
+
+-closureN_type c_7322540;
+-object e_7322621 [8];
+-c_7322540.hdr.mark = gc_color_red;
+- c_7322540.hdr.grayed = 0;
+-c_7322540.tag = closureN_tag;
+- c_7322540.fn = (function_type)__lambda_907;
+-c_7322540.num_args = 1;
+-c_7322540.num_elements = 8;
+-c_7322540.elements = (object *)e_7322621;
+-c_7322540.elements[0] = ((closureN)self_7313984)->elements[0];
+-c_7322540.elements[1] = ((closureN)self_7313984)->elements[1];
+-c_7322540.elements[2] = ((closureN)self_7313984)->elements[4];
+-c_7322540.elements[3] = ((closureN)self_7313984)->elements[5];
+-c_7322540.elements[4] = ((closureN)self_7313984)->elements[7];
+-c_7322540.elements[5] = ((closureN)self_7313984)->elements[8];
+-c_7322540.elements[6] = ((closureN)self_7313984)->elements[9];
+-c_7322540.elements[7] = ((closureN)self_7313984)->elements[10];
++closureN_type c_7321240;
++object e_7321321 [8];
++c_7321240.hdr.mark = gc_color_red;
++ c_7321240.hdr.grayed = 0;
++c_7321240.tag = closureN_tag;
++ c_7321240.fn = (function_type)__lambda_907;
++c_7321240.num_args = 1;
++c_7321240.num_elements = 8;
++c_7321240.elements = (object *)e_7321321;
++c_7321240.elements[0] = ((closureN)self_7312731)->elements[0];
++c_7321240.elements[1] = ((closureN)self_7312731)->elements[1];
++c_7321240.elements[2] = ((closureN)self_7312731)->elements[4];
++c_7321240.elements[3] = ((closureN)self_7312731)->elements[5];
++c_7321240.elements[4] = ((closureN)self_7312731)->elements[7];
++c_7321240.elements[5] = ((closureN)self_7312731)->elements[8];
++c_7321240.elements[6] = ((closureN)self_7312731)->elements[9];
++c_7321240.elements[7] = ((closureN)self_7312731)->elements[10];
+
+-return_direct_with_clo1(data,(closure)&c_7322494,__lambda_903, &c_7322540);;
++return_direct_with_clo1(data,(closure)&c_7321194,__lambda_903, &c_7321240);;
+ }
+
+-static void __lambda_907(void *data, object self_7313985, int argc, object *args) /* object self_7313985, object nest_731494_733686 */
++static void __lambda_907(void *data, object self_7312732, int argc, object *args) /* object self_7312732, object nest_731494_733339 */
+ {
+- object nest_731494_733686 = args[0];
++ object nest_731494_733339 = args[0];
+
+-closureN_type c_7322542;
+-object e_7322619 [7];
+-c_7322542.hdr.mark = gc_color_red;
+- c_7322542.hdr.grayed = 0;
+-c_7322542.tag = closureN_tag;
+- c_7322542.fn = (function_type)__lambda_908;
+-c_7322542.num_args = 2;
+-c_7322542.num_elements = 7;
+-c_7322542.elements = (object *)e_7322619;
+-c_7322542.elements[0] = ((closureN)self_7313985)->elements[0];
+-c_7322542.elements[1] = ((closureN)self_7313985)->elements[1];
+-c_7322542.elements[2] = ((closureN)self_7313985)->elements[3];
+-c_7322542.elements[3] = ((closureN)self_7313985)->elements[4];
+-c_7322542.elements[4] = ((closureN)self_7313985)->elements[5];
+-c_7322542.elements[5] = ((closureN)self_7313985)->elements[6];
+-c_7322542.elements[6] = ((closureN)self_7313985)->elements[7];
++closureN_type c_7321242;
++object e_7321319 [7];
++c_7321242.hdr.mark = gc_color_red;
++ c_7321242.hdr.grayed = 0;
++c_7321242.tag = closureN_tag;
++ c_7321242.fn = (function_type)__lambda_908;
++c_7321242.num_args = 2;
++c_7321242.num_elements = 7;
++c_7321242.elements = (object *)e_7321319;
++c_7321242.elements[0] = ((closureN)self_7312732)->elements[0];
++c_7321242.elements[1] = ((closureN)self_7312732)->elements[1];
++c_7321242.elements[2] = ((closureN)self_7312732)->elements[3];
++c_7321242.elements[3] = ((closureN)self_7312732)->elements[4];
++c_7321242.elements[4] = ((closureN)self_7312732)->elements[5];
++c_7321242.elements[5] = ((closureN)self_7312732)->elements[6];
++c_7321242.elements[6] = ((closureN)self_7312732)->elements[7];
+
+-return_direct_with_clo2(data,(closure)&c_7322542,__lambda_908, ((closureN)self_7313985)->elements[2], nest_731494_733686);;
++return_direct_with_clo2(data,(closure)&c_7321242,__lambda_908, ((closureN)self_7312732)->elements[2], nest_731494_733339);;
+ }
+
+-static void __lambda_908(void *data, object self_7313986, int argc, object *args) /* object self_7313986, object d_731501_733688, object many_731502_733689 */
++static void __lambda_908(void *data, object self_7312733, int argc, object *args) /* object self_7312733, object d_731501_733341, object many_731502_733342 */
+ {
+- object d_731501_733688 = args[0]; object many_731502_733689 = args[1];
++ object d_731501_733341 = args[0]; object many_731502_733342 = args[1];
+
+-closureN_type c_7322544;
+-object e_7322618 [9];
+-c_7322544.hdr.mark = gc_color_red;
+- c_7322544.hdr.grayed = 0;
+-c_7322544.tag = closureN_tag;
+- c_7322544.fn = (function_type)__lambda_909;
+-c_7322544.num_args = 1;
+-c_7322544.num_elements = 9;
+-c_7322544.elements = (object *)e_7322618;
+-c_7322544.elements[0] = ((closureN)self_7313986)->elements[0];
+-c_7322544.elements[1] = ((closureN)self_7313986)->elements[1];
+-c_7322544.elements[2] = d_731501_733688;
+-c_7322544.elements[3] = ((closureN)self_7313986)->elements[2];
+-c_7322544.elements[4] = ((closureN)self_7313986)->elements[3];
+-c_7322544.elements[5] = ((closureN)self_7313986)->elements[4];
+-c_7322544.elements[6] = ((closureN)self_7313986)->elements[5];
+-c_7322544.elements[7] = many_731502_733689;
+-c_7322544.elements[8] = ((closureN)self_7313986)->elements[6];
++closureN_type c_7321244;
++object e_7321318 [9];
++c_7321244.hdr.mark = gc_color_red;
++ c_7321244.hdr.grayed = 0;
++c_7321244.tag = closureN_tag;
++ c_7321244.fn = (function_type)__lambda_909;
++c_7321244.num_args = 1;
++c_7321244.num_elements = 9;
++c_7321244.elements = (object *)e_7321318;
++c_7321244.elements[0] = ((closureN)self_7312733)->elements[0];
++c_7321244.elements[1] = ((closureN)self_7312733)->elements[1];
++c_7321244.elements[2] = d_731501_733341;
++c_7321244.elements[3] = ((closureN)self_7312733)->elements[2];
++c_7321244.elements[4] = ((closureN)self_7312733)->elements[3];
++c_7321244.elements[5] = ((closureN)self_7312733)->elements[4];
++c_7321244.elements[6] = ((closureN)self_7312733)->elements[5];
++c_7321244.elements[7] = many_731502_733342;
++c_7321244.elements[8] = ((closureN)self_7312733)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7322544,__lambda_909, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7321244,__lambda_909, boolean_f);;
+ }
+
+-static void __lambda_909(void *data, object self_7313987, int argc, object *args) /* object self_7313987, object lp_731448_731503_733690 */
++static void __lambda_909(void *data, object self_7312734, int argc, object *args) /* object self_7312734, object lp_731448_731503_733343 */
+ {
+- object lp_731448_731503_733690 = args[0];
++ object lp_731448_731503_733343 = args[0];
+
+-closureN_type c_7322546;
+-object e_7322614 [9];
+-c_7322546.hdr.mark = gc_color_red;
+- c_7322546.hdr.grayed = 0;
+-c_7322546.tag = closureN_tag;
+- c_7322546.fn = (function_type)__lambda_1424;
+-c_7322546.num_args = 1;
+-c_7322546.num_elements = 9;
+-c_7322546.elements = (object *)e_7322614;
+-c_7322546.elements[0] = ((closureN)self_7313987)->elements[0];
+-c_7322546.elements[1] = ((closureN)self_7313987)->elements[1];
+-c_7322546.elements[2] = ((closureN)self_7313987)->elements[2];
+-c_7322546.elements[3] = ((closureN)self_7313987)->elements[3];
+-c_7322546.elements[4] = ((closureN)self_7313987)->elements[4];
+-c_7322546.elements[5] = ((closureN)self_7313987)->elements[5];
+-c_7322546.elements[6] = ((closureN)self_7313987)->elements[6];
+-c_7322546.elements[7] = ((closureN)self_7313987)->elements[7];
+-c_7322546.elements[8] = ((closureN)self_7313987)->elements[8];
++closureN_type c_7321246;
++object e_7321314 [9];
++c_7321246.hdr.mark = gc_color_red;
++ c_7321246.hdr.grayed = 0;
++c_7321246.tag = closureN_tag;
++ c_7321246.fn = (function_type)__lambda_1377;
++c_7321246.num_args = 1;
++c_7321246.num_elements = 9;
++c_7321246.elements = (object *)e_7321314;
++c_7321246.elements[0] = ((closureN)self_7312734)->elements[0];
++c_7321246.elements[1] = ((closureN)self_7312734)->elements[1];
++c_7321246.elements[2] = ((closureN)self_7312734)->elements[2];
++c_7321246.elements[3] = ((closureN)self_7312734)->elements[3];
++c_7321246.elements[4] = ((closureN)self_7312734)->elements[4];
++c_7321246.elements[5] = ((closureN)self_7312734)->elements[5];
++c_7321246.elements[6] = ((closureN)self_7312734)->elements[6];
++c_7321246.elements[7] = ((closureN)self_7312734)->elements[7];
++c_7321246.elements[8] = ((closureN)self_7312734)->elements[8];
+
+
+-pair_type local_7322617;
+-return_direct_with_clo1(data,(closure)&c_7322546,__lambda_1424, set_cell_as_expr(&local_7322617, lp_731448_731503_733690));;
++pair_type local_7321317;
++return_direct_with_clo1(data,(closure)&c_7321246,__lambda_1377, set_cell_as_expr(&local_7321317, lp_731448_731503_733343));;
+ }
+
+-static void __lambda_1424(void *data, object self_7313988, int argc, object *args) /* object self_7313988, object lp_731448_731503_733690 */
++static void __lambda_1377(void *data, object self_7312735, int argc, object *args) /* object self_7312735, object lp_731448_731503_733343 */
+ {
+- object lp_731448_731503_733690 = args[0];
++ object lp_731448_731503_733343 = args[0];
+
+-closureN_type c_7322548;
+-object e_7322596 [9];
+-c_7322548.hdr.mark = gc_color_red;
+- c_7322548.hdr.grayed = 0;
+-c_7322548.tag = closureN_tag;
+- c_7322548.fn = (function_type)__lambda_910;
+-c_7322548.num_args = 1;
+-c_7322548.num_elements = 9;
+-c_7322548.elements = (object *)e_7322596;
+-c_7322548.elements[0] = ((closureN)self_7313988)->elements[0];
+-c_7322548.elements[1] = ((closureN)self_7313988)->elements[2];
+-c_7322548.elements[2] = ((closureN)self_7313988)->elements[3];
+-c_7322548.elements[3] = ((closureN)self_7313988)->elements[4];
+-c_7322548.elements[4] = ((closureN)self_7313988)->elements[5];
+-c_7322548.elements[5] = lp_731448_731503_733690;
+-c_7322548.elements[6] = ((closureN)self_7313988)->elements[6];
+-c_7322548.elements[7] = ((closureN)self_7313988)->elements[7];
+-c_7322548.elements[8] = ((closureN)self_7313988)->elements[8];
++closureN_type c_7321248;
++object e_7321296 [9];
++c_7321248.hdr.mark = gc_color_red;
++ c_7321248.hdr.grayed = 0;
++c_7321248.tag = closureN_tag;
++ c_7321248.fn = (function_type)__lambda_910;
++c_7321248.num_args = 1;
++c_7321248.num_elements = 9;
++c_7321248.elements = (object *)e_7321296;
++c_7321248.elements[0] = ((closureN)self_7312735)->elements[0];
++c_7321248.elements[1] = ((closureN)self_7312735)->elements[2];
++c_7321248.elements[2] = ((closureN)self_7312735)->elements[3];
++c_7321248.elements[3] = ((closureN)self_7312735)->elements[4];
++c_7321248.elements[4] = ((closureN)self_7312735)->elements[5];
++c_7321248.elements[5] = lp_731448_731503_733343;
++c_7321248.elements[6] = ((closureN)self_7312735)->elements[6];
++c_7321248.elements[7] = ((closureN)self_7312735)->elements[7];
++c_7321248.elements[8] = ((closureN)self_7312735)->elements[8];
+
+
+-closureN_type c_7322597;
+-object e_7322613 [3];
+-c_7322597.hdr.mark = gc_color_red;
+- c_7322597.hdr.grayed = 0;
+-c_7322597.tag = closureN_tag;
+- c_7322597.fn = (function_type)__lambda_916;
+-c_7322597.num_args = 2;
+-c_7322597.num_elements = 3;
+-c_7322597.elements = (object *)e_7322613;
+-c_7322597.elements[0] = ((closureN)self_7313988)->elements[0];
+-c_7322597.elements[1] = ((closureN)self_7313988)->elements[1];
+-c_7322597.elements[2] = lp_731448_731503_733690;
++closureN_type c_7321297;
++object e_7321313 [3];
++c_7321297.hdr.mark = gc_color_red;
++ c_7321297.hdr.grayed = 0;
++c_7321297.tag = closureN_tag;
++ c_7321297.fn = (function_type)__lambda_916;
++c_7321297.num_args = 2;
++c_7321297.num_elements = 3;
++c_7321297.elements = (object *)e_7321313;
++c_7321297.elements[0] = ((closureN)self_7312735)->elements[0];
++c_7321297.elements[1] = ((closureN)self_7312735)->elements[1];
++c_7321297.elements[2] = lp_731448_731503_733343;
+
+-return_direct_with_clo1(data,(closure)&c_7322548,__lambda_910, &c_7322597);;
++return_direct_with_clo1(data,(closure)&c_7321248,__lambda_910, &c_7321297);;
+ }
+
+-static void __lambda_916(void *data, object self_7313989, int argc, object *args) /* object self_7313989, object k_736446, object d_731504_733691, object many_731505_733692 */
++static void __lambda_916(void *data, object self_7312736, int argc, object *args) /* object self_7312736, object k_735994, object d_731504_733344, object many_731505_733345 */
+ {
+- object k_736446 = args[0]; object d_731504_733691 = args[1]; object many_731505_733692 = args[2];
++ object k_735994 = args[0]; object d_731504_733344 = args[1]; object many_731505_733345 = args[2];
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, d_731504_733691, obj_int2obj(1))) ){
+- return_direct_with_clo1(data, k_736446, (((closure) k_736446)->fn), many_731505_733692);
++if( (boolean_f != Cyc_num_fast_eq_op(data, d_731504_733344, obj_int2obj(1))) ){
++ return_direct_with_clo1(data, k_735994, (((closure) k_735994)->fn), many_731505_733345);
+ } else {
+
+
+
+-complex_num_type local_7322607;
++complex_num_type local_7321307;
+
+-list_3_type local_7322610;
+-return_closcall3(data, car(((closureN)self_7313989)->elements[2]), k_736446, Cyc_fast_sub(data,&local_7322607, d_731504_733691, obj_int2obj(1)), Cyc_fast_list_3(&local_7322610, ((closureN)self_7313989)->elements[1], ((closureN)self_7313989)->elements[0], many_731505_733692));}
++list_3_type local_7321310;
++return_closcall3(data, car(((closureN)self_7312736)->elements[2]), k_735994, Cyc_fast_sub(data,&local_7321307, d_731504_733344, obj_int2obj(1)), Cyc_fast_list_3(&local_7321310, ((closureN)self_7312736)->elements[1], ((closureN)self_7312736)->elements[0], many_731505_733345));}
+ ;;
+ }
+
+-static void __lambda_910(void *data, object self_7313990, int argc, object *args) /* object self_7313990, object r_736445 */
++static void __lambda_910(void *data, object self_7312737, int argc, object *args) /* object self_7312737, object r_735993 */
+ {
+- object r_736445 = args[0];
++ object r_735993 = args[0];
+
+-closureN_type c_7322550;
+-object e_7322592 [9];
+-c_7322550.hdr.mark = gc_color_red;
+- c_7322550.hdr.grayed = 0;
+-c_7322550.tag = closureN_tag;
+- c_7322550.fn = (function_type)__lambda_911;
+-c_7322550.num_args = 1;
+-c_7322550.num_elements = 9;
+-c_7322550.elements = (object *)e_7322592;
+-c_7322550.elements[0] = ((closureN)self_7313990)->elements[0];
+-c_7322550.elements[1] = ((closureN)self_7313990)->elements[1];
+-c_7322550.elements[2] = ((closureN)self_7313990)->elements[2];
+-c_7322550.elements[3] = ((closureN)self_7313990)->elements[3];
+-c_7322550.elements[4] = ((closureN)self_7313990)->elements[4];
+-c_7322550.elements[5] = ((closureN)self_7313990)->elements[5];
+-c_7322550.elements[6] = ((closureN)self_7313990)->elements[6];
+-c_7322550.elements[7] = ((closureN)self_7313990)->elements[7];
+-c_7322550.elements[8] = ((closureN)self_7313990)->elements[8];
++closureN_type c_7321250;
++object e_7321292 [9];
++c_7321250.hdr.mark = gc_color_red;
++ c_7321250.hdr.grayed = 0;
++c_7321250.tag = closureN_tag;
++ c_7321250.fn = (function_type)__lambda_911;
++c_7321250.num_args = 1;
++c_7321250.num_elements = 9;
++c_7321250.elements = (object *)e_7321292;
++c_7321250.elements[0] = ((closureN)self_7312737)->elements[0];
++c_7321250.elements[1] = ((closureN)self_7312737)->elements[1];
++c_7321250.elements[2] = ((closureN)self_7312737)->elements[2];
++c_7321250.elements[3] = ((closureN)self_7312737)->elements[3];
++c_7321250.elements[4] = ((closureN)self_7312737)->elements[4];
++c_7321250.elements[5] = ((closureN)self_7312737)->elements[5];
++c_7321250.elements[6] = ((closureN)self_7312737)->elements[6];
++c_7321250.elements[7] = ((closureN)self_7312737)->elements[7];
++c_7321250.elements[8] = ((closureN)self_7312737)->elements[8];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322550,__lambda_911, Cyc_set_cell(data, ((closureN)self_7313990)->elements[5], r_736445));;
++return_direct_with_clo1(data,(closure)&c_7321250,__lambda_911, Cyc_set_cell(data, ((closureN)self_7312737)->elements[5], r_735993));;
+ }
+
+-static void __lambda_911(void *data, object self_7313991, int argc, object *args) /* object self_7313991, object r_736444 */
++static void __lambda_911(void *data, object self_7312738, int argc, object *args) /* object self_7312738, object r_735992 */
+ {
+
+
+
+
+-closureN_type c_7322555;
+-object e_7322589 [6];
+-c_7322555.hdr.mark = gc_color_red;
+- c_7322555.hdr.grayed = 0;
+-c_7322555.tag = closureN_tag;
+- c_7322555.fn = (function_type)__lambda_912;
+-c_7322555.num_args = 1;
+-c_7322555.num_elements = 6;
+-c_7322555.elements = (object *)e_7322589;
+-c_7322555.elements[0] = ((closureN)self_7313991)->elements[0];
+-c_7322555.elements[1] = ((closureN)self_7313991)->elements[2];
+-c_7322555.elements[2] = ((closureN)self_7313991)->elements[3];
+-c_7322555.elements[3] = ((closureN)self_7313991)->elements[4];
+-c_7322555.elements[4] = ((closureN)self_7313991)->elements[6];
+-c_7322555.elements[5] = ((closureN)self_7313991)->elements[8];
++closureN_type c_7321255;
++object e_7321289 [6];
++c_7321255.hdr.mark = gc_color_red;
++ c_7321255.hdr.grayed = 0;
++c_7321255.tag = closureN_tag;
++ c_7321255.fn = (function_type)__lambda_912;
++c_7321255.num_args = 1;
++c_7321255.num_elements = 6;
++c_7321255.elements = (object *)e_7321289;
++c_7321255.elements[0] = ((closureN)self_7312738)->elements[0];
++c_7321255.elements[1] = ((closureN)self_7312738)->elements[2];
++c_7321255.elements[2] = ((closureN)self_7312738)->elements[3];
++c_7321255.elements[3] = ((closureN)self_7312738)->elements[4];
++c_7321255.elements[4] = ((closureN)self_7312738)->elements[6];
++c_7321255.elements[5] = ((closureN)self_7312738)->elements[8];
+
+-return_closcall3(data, car(((closureN)self_7313991)->elements[5]), &c_7322555, ((closureN)self_7313991)->elements[1], ((closureN)self_7313991)->elements[7]);;
++return_closcall3(data, car(((closureN)self_7312738)->elements[5]), &c_7321255, ((closureN)self_7312738)->elements[1], ((closureN)self_7312738)->elements[7]);;
+ }
+
+-static void __lambda_912(void *data, object self_7313992, int argc, object *args) /* object self_7313992, object many_731497_733687 */
++static void __lambda_912(void *data, object self_7312739, int argc, object *args) /* object self_7312739, object many_731497_733340 */
+ {
+- object many_731497_733687 = args[0];
++ object many_731497_733340 = args[0];
+
+
+
+-closureN_type c_7322560;
+-object e_7322587 [7];
+-c_7322560.hdr.mark = gc_color_red;
+- c_7322560.hdr.grayed = 0;
+-c_7322560.tag = closureN_tag;
+- c_7322560.fn = (function_type)__lambda_913;
+-c_7322560.num_args = 1;
+-c_7322560.num_elements = 7;
+-c_7322560.elements = (object *)e_7322587;
+-c_7322560.elements[0] = ((closureN)self_7313992)->elements[0];
+-c_7322560.elements[1] = ((closureN)self_7313992)->elements[1];
+-c_7322560.elements[2] = ((closureN)self_7313992)->elements[2];
+-c_7322560.elements[3] = ((closureN)self_7313992)->elements[3];
+-c_7322560.elements[4] = ((closureN)self_7313992)->elements[4];
+-c_7322560.elements[5] = many_731497_733687;
+-c_7322560.elements[6] = ((closureN)self_7313992)->elements[5];
++closureN_type c_7321260;
++object e_7321287 [7];
++c_7321260.hdr.mark = gc_color_red;
++ c_7321260.hdr.grayed = 0;
++c_7321260.tag = closureN_tag;
++ c_7321260.fn = (function_type)__lambda_913;
++c_7321260.num_args = 1;
++c_7321260.num_elements = 7;
++c_7321260.elements = (object *)e_7321287;
++c_7321260.elements[0] = ((closureN)self_7312739)->elements[0];
++c_7321260.elements[1] = ((closureN)self_7312739)->elements[1];
++c_7321260.elements[2] = ((closureN)self_7312739)->elements[2];
++c_7321260.elements[3] = ((closureN)self_7312739)->elements[3];
++c_7321260.elements[4] = ((closureN)self_7312739)->elements[4];
++c_7321260.elements[5] = many_731497_733340;
++c_7321260.elements[6] = ((closureN)self_7312739)->elements[5];
+
+-return_closcall2(data, car(((closureN)self_7313992)->elements[2]), &c_7322560, ((closureN)self_7313992)->elements[5]);;
++return_closcall2(data, car(((closureN)self_7312739)->elements[2]), &c_7321260, ((closureN)self_7312739)->elements[5]);;
+ }
+
+-static void __lambda_913(void *data, object self_7313993, int argc, object *args) /* object self_7313993, object r_736443 */
++static void __lambda_913(void *data, object self_7312740, int argc, object *args) /* object self_7312740, object r_735991 */
+ {
+- object r_736443 = args[0];
++ object r_735991 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_736443)) ){
+- return_direct_with_clo1(data, ((closureN)self_7313993)->elements[3], (((closure) ((closureN)self_7313993)->elements[3])->fn), ((closureN)self_7313993)->elements[5]);
++if( (boolean_f != Cyc_is_null(r_735991)) ){
++ return_direct_with_clo1(data, ((closureN)self_7312740)->elements[3], (((closure) ((closureN)self_7312740)->elements[3])->fn), ((closureN)self_7312740)->elements[5]);
+ } else {
+
+
+
+-closureN_type c_7322570;
+-object e_7322585 [5];
+-c_7322570.hdr.mark = gc_color_red;
+- c_7322570.hdr.grayed = 0;
+-c_7322570.tag = closureN_tag;
+- c_7322570.fn = (function_type)__lambda_914;
+-c_7322570.num_args = 1;
+-c_7322570.num_elements = 5;
+-c_7322570.elements = (object *)e_7322585;
+-c_7322570.elements[0] = ((closureN)self_7313993)->elements[0];
+-c_7322570.elements[1] = ((closureN)self_7313993)->elements[1];
+-c_7322570.elements[2] = ((closureN)self_7313993)->elements[3];
+-c_7322570.elements[3] = ((closureN)self_7313993)->elements[4];
+-c_7322570.elements[4] = ((closureN)self_7313993)->elements[5];
++closureN_type c_7321270;
++object e_7321285 [5];
++c_7321270.hdr.mark = gc_color_red;
++ c_7321270.hdr.grayed = 0;
++c_7321270.tag = closureN_tag;
++ c_7321270.fn = (function_type)__lambda_914;
++c_7321270.num_args = 1;
++c_7321270.num_elements = 5;
++c_7321270.elements = (object *)e_7321285;
++c_7321270.elements[0] = ((closureN)self_7312740)->elements[0];
++c_7321270.elements[1] = ((closureN)self_7312740)->elements[1];
++c_7321270.elements[2] = ((closureN)self_7312740)->elements[3];
++c_7321270.elements[3] = ((closureN)self_7312740)->elements[4];
++c_7321270.elements[4] = ((closureN)self_7312740)->elements[5];
+
+-return_closcall2(data, car(((closureN)self_7313993)->elements[2]), &c_7322570, ((closureN)self_7313993)->elements[6]);}
++return_closcall2(data, car(((closureN)self_7312740)->elements[2]), &c_7321270, ((closureN)self_7312740)->elements[6]);}
+ ;;
+ }
+
+-static void __lambda_914(void *data, object self_7313994, int argc, object *args) /* object self_7313994, object r_736442 */
++static void __lambda_914(void *data, object self_7312741, int argc, object *args) /* object self_7312741, object r_735990 */
+ {
+- object r_736442 = args[0];
++ object r_735990 = args[0];
+
+
+
+-closureN_type c_7322575;
+-object e_7322583 [3];
+-c_7322575.hdr.mark = gc_color_red;
+- c_7322575.hdr.grayed = 0;
+-c_7322575.tag = closureN_tag;
+- c_7322575.fn = (function_type)__lambda_915;
+-c_7322575.num_args = 1;
+-c_7322575.num_elements = 3;
+-c_7322575.elements = (object *)e_7322583;
+-c_7322575.elements[0] = ((closureN)self_7313994)->elements[0];
+-c_7322575.elements[1] = ((closureN)self_7313994)->elements[2];
+-c_7322575.elements[2] = ((closureN)self_7313994)->elements[4];
++closureN_type c_7321275;
++object e_7321283 [3];
++c_7321275.hdr.mark = gc_color_red;
++ c_7321275.hdr.grayed = 0;
++c_7321275.tag = closureN_tag;
++ c_7321275.fn = (function_type)__lambda_915;
++c_7321275.num_args = 1;
++c_7321275.num_elements = 3;
++c_7321275.elements = (object *)e_7321283;
++c_7321275.elements[0] = ((closureN)self_7312741)->elements[0];
++c_7321275.elements[1] = ((closureN)self_7312741)->elements[2];
++c_7321275.elements[2] = ((closureN)self_7312741)->elements[4];
+
+-return_closcall3(data, car(((closureN)self_7313994)->elements[3]), &c_7322575, r_736442, ((closureN)self_7313994)->elements[1]);;
++return_closcall3(data, car(((closureN)self_7312741)->elements[3]), &c_7321275, r_735990, ((closureN)self_7312741)->elements[1]);;
+ }
+
+-static void __lambda_915(void *data, object self_7313995, int argc, object *args) /* object self_7313995, object r_736441 */
++static void __lambda_915(void *data, object self_7312742, int argc, object *args) /* object self_7312742, object r_735989 */
+ {
+- object r_736441 = args[0];
++ object r_735989 = args[0];
+
+-list_3_type local_7322580;
+-return_direct_with_clo1(data, ((closureN)self_7313995)->elements[1], (((closure) ((closureN)self_7313995)->elements[1])->fn), Cyc_fast_list_3(&local_7322580, ((closureN)self_7313995)->elements[0], ((closureN)self_7313995)->elements[2], r_736441));;
++list_3_type local_7321280;
++return_direct_with_clo1(data, ((closureN)self_7312742)->elements[1], (((closure) ((closureN)self_7312742)->elements[1])->fn), Cyc_fast_list_3(&local_7321280, ((closureN)self_7312742)->elements[0], ((closureN)self_7312742)->elements[2], r_735989));;
+ }
+
+-static void __lambda_903(void *data, object self_7313996, int argc, object *args) /* object self_7313996, object k_736450 */
++static void __lambda_903(void *data, object self_7312743, int argc, object *args) /* object self_7312743, object k_735998 */
+ {
+- object k_736450 = args[0];
++ object k_735998 = args[0];
+
+-closureN_type c_7322496;
+-object e_7322517 [3];
+-c_7322496.hdr.mark = gc_color_red;
+- c_7322496.hdr.grayed = 0;
+-c_7322496.tag = closureN_tag;
+- c_7322496.fn = (function_type)__lambda_904;
+-c_7322496.num_args = 0;
+-c_7322496.num_elements = 3;
+-c_7322496.elements = (object *)e_7322517;
+-c_7322496.elements[0] = ((closureN)self_7313996)->elements[2];
+-c_7322496.elements[1] = ((closureN)self_7313996)->elements[3];
+-c_7322496.elements[2] = ((closureN)self_7313996)->elements[4];
++closureN_type c_7321196;
++object e_7321217 [3];
++c_7321196.hdr.mark = gc_color_red;
++ c_7321196.hdr.grayed = 0;
++c_7321196.tag = closureN_tag;
++ c_7321196.fn = (function_type)__lambda_904;
++c_7321196.num_args = 0;
++c_7321196.num_elements = 3;
++c_7321196.elements = (object *)e_7321217;
++c_7321196.elements[0] = ((closureN)self_7312743)->elements[2];
++c_7321196.elements[1] = ((closureN)self_7312743)->elements[3];
++c_7321196.elements[2] = ((closureN)self_7312743)->elements[4];
+
+
+-closureN_type c_7322518;
+-object e_7322538 [5];
+-c_7322518.hdr.mark = gc_color_red;
+- c_7322518.hdr.grayed = 0;
+-c_7322518.tag = closureN_tag;
+- c_7322518.fn = (function_type)__lambda_906;
+-c_7322518.num_args = 1;
+-c_7322518.num_elements = 5;
+-c_7322518.elements = (object *)e_7322538;
+-c_7322518.elements[0] = ((closureN)self_7313996)->elements[0];
+-c_7322518.elements[1] = ((closureN)self_7313996)->elements[1];
+-c_7322518.elements[2] = ((closureN)self_7313996)->elements[2];
+-c_7322518.elements[3] = k_736450;
+-c_7322518.elements[4] = ((closureN)self_7313996)->elements[3];
++closureN_type c_7321218;
++object e_7321238 [5];
++c_7321218.hdr.mark = gc_color_red;
++ c_7321218.hdr.grayed = 0;
++c_7321218.tag = closureN_tag;
++ c_7321218.fn = (function_type)__lambda_906;
++c_7321218.num_args = 1;
++c_7321218.num_elements = 5;
++c_7321218.elements = (object *)e_7321238;
++c_7321218.elements[0] = ((closureN)self_7312743)->elements[0];
++c_7321218.elements[1] = ((closureN)self_7312743)->elements[1];
++c_7321218.elements[2] = ((closureN)self_7312743)->elements[2];
++c_7321218.elements[3] = k_735998;
++c_7321218.elements[4] = ((closureN)self_7312743)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7322496,__lambda_904, &c_7322518);;
++return_direct_with_clo1(data,(closure)&c_7321196,__lambda_904, &c_7321218);;
+ }
+
+-static void __lambda_906(void *data, object self_7313997, int argc, object *args) /* object self_7313997, object r_736451 */
++static void __lambda_906(void *data, object self_7312744, int argc, object *args) /* object self_7312744, object r_735999 */
+ {
+- object r_736451 = args[0];
+- if( (boolean_f != r_736451) ){
+- return_direct_with_clo1(data, ((closureN)self_7313997)->elements[3], (((closure) ((closureN)self_7313997)->elements[3])->fn), ((closureN)self_7313997)->elements[4]);
++ object r_735999 = args[0];
++ if( (boolean_f != r_735999) ){
++ return_direct_with_clo1(data, ((closureN)self_7312744)->elements[3], (((closure) ((closureN)self_7312744)->elements[3])->fn), ((closureN)self_7312744)->elements[4]);
+ } else {
+
+-pair_type local_7322526;
++pair_type local_7321226;
+
+-pair_type local_7322530;
++pair_type local_7321230;
+
+-list_3_type local_7322533;
+-return_direct_with_clo1(data, ((closureN)self_7313997)->elements[3], (((closure) ((closureN)self_7313997)->elements[3])->fn), set_pair_as_expr(&local_7322526, ((closureN)self_7313997)->elements[1], set_pair_as_expr(&local_7322530, Cyc_fast_list_3(&local_7322533, ((closureN)self_7313997)->elements[0], ((closureN)self_7313997)->elements[2], ((closureN)self_7313997)->elements[4]), ((closureN)self_7313997)->elements[2])));}
++list_3_type local_7321233;
++return_direct_with_clo1(data, ((closureN)self_7312744)->elements[3], (((closure) ((closureN)self_7312744)->elements[3])->fn), set_pair_as_expr(&local_7321226, ((closureN)self_7312744)->elements[1], set_pair_as_expr(&local_7321230, Cyc_fast_list_3(&local_7321233, ((closureN)self_7312744)->elements[0], ((closureN)self_7312744)->elements[2], ((closureN)self_7312744)->elements[4]), ((closureN)self_7312744)->elements[2])));}
+ ;;
+ }
+
+-static void __lambda_904(void *data, object self_7313998, int argc, object *args) /* object self_7313998, object k_736454 */
++static void __lambda_904(void *data, object self_7312745, int argc, object *args) /* object self_7312745, object k_736002 */
+ {
+- object k_736454 = args[0];
++ object k_736002 = args[0];
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313998)->elements[0]))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312745)->elements[0]))) ){
+
+-closureN_type c_7322503;
+-object e_7322514 [3];
+-c_7322503.hdr.mark = gc_color_red;
+- c_7322503.hdr.grayed = 0;
+-c_7322503.tag = closureN_tag;
+- c_7322503.fn = (function_type)__lambda_905;
+-c_7322503.num_args = 1;
+-c_7322503.num_elements = 3;
+-c_7322503.elements = (object *)e_7322514;
+-c_7322503.elements[0] = k_736454;
+-c_7322503.elements[1] = ((closureN)self_7313998)->elements[1];
+-c_7322503.elements[2] = ((closureN)self_7313998)->elements[2];
++closureN_type c_7321203;
++object e_7321214 [3];
++c_7321203.hdr.mark = gc_color_red;
++ c_7321203.hdr.grayed = 0;
++c_7321203.tag = closureN_tag;
++ c_7321203.fn = (function_type)__lambda_905;
++c_7321203.num_args = 1;
++c_7321203.num_elements = 3;
++c_7321203.elements = (object *)e_7321214;
++c_7321203.elements[0] = k_736002;
++c_7321203.elements[1] = ((closureN)self_7312745)->elements[1];
++c_7321203.elements[2] = ((closureN)self_7312745)->elements[2];
+
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7322503, ((closureN)self_7313998)->elements[1]);
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), &c_7321203, ((closureN)self_7312745)->elements[1]);
+ } else {
+- return_direct_with_clo1(data, k_736454, (((closure) k_736454)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736002, (((closure) k_736002)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_905(void *data, object self_7313999, int argc, object *args) /* object self_7313999, object r_736456 */
++static void __lambda_905(void *data, object self_7312746, int argc, object *args) /* object self_7312746, object r_736004 */
+ {
+- object r_736456 = args[0];
+- if( (boolean_f != r_736456) ){
++ object r_736004 = args[0];
++ if( (boolean_f != r_736004) ){
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313999)->elements[0], (((closure) ((closureN)self_7313999)->elements[0])->fn), Cyc_eq(((closureN)self_7313999)->elements[1], Cyc_car(data, ((closureN)self_7313999)->elements[2])));
++return_direct_with_clo1(data, ((closureN)self_7312746)->elements[0], (((closure) ((closureN)self_7312746)->elements[0])->fn), Cyc_eq(((closureN)self_7312746)->elements[1], Cyc_car(data, ((closureN)self_7312746)->elements[2])));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313999)->elements[0], (((closure) ((closureN)self_7313999)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312746)->elements[0], (((closure) ((closureN)self_7312746)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_899(void *data, object self_7314000, int argc, object *args) /* object self_7314000, object k_736460 */
++static void __lambda_899(void *data, object self_7312747, int argc, object *args) /* object self_7312747, object k_736008 */
+ {
+- object k_736460 = args[0];
++ object k_736008 = args[0];
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314000)->elements[0])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312747)->elements[0])))) ){
+
+
+-return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), k_736460, Cyc_car(data, ((closureN)self_7314000)->elements[0]));
++return_direct_with_clo2(data, __glo_identifier_127_scheme_base, (((closure) __glo_identifier_127_scheme_base)->fn), k_736008, Cyc_car(data, ((closureN)self_7312747)->elements[0]));
+ } else {
+- return_direct_with_clo1(data, k_736460, (((closure) k_736460)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_736008, (((closure) k_736008)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_894(void *data, object self_7313976, int argc, object *args) /* object self_7313976, object r_736424 */
++static void __lambda_894(void *data, object self_7312723, int argc, object *args) /* object self_7312723, object r_735972 */
+ {
+- object r_736424 = args[0];
++ object r_735972 = args[0];
+
+-list_2_type local_7322431;
+-return_direct_with_clo1(data, ((closureN)self_7313976)->elements[1], (((closure) ((closureN)self_7313976)->elements[1])->fn), Cyc_fast_list_2(&local_7322431, ((closureN)self_7313976)->elements[0], r_736424));;
++list_2_type local_7321131;
++return_direct_with_clo1(data, ((closureN)self_7312723)->elements[1], (((closure) ((closureN)self_7312723)->elements[1])->fn), Cyc_fast_list_2(&local_7321131, ((closureN)self_7312723)->elements[0], r_735972));;
+ }
+
+-static void __lambda_893(void *data, object self_7313977, int argc, object *args) /* object self_7313977, object k_736425 */
++static void __lambda_893(void *data, object self_7312724, int argc, object *args) /* object self_7312724, object k_735973 */
+ {
+- object k_736425 = args[0];
++ object k_735973 = args[0];
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313977)->elements[0]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312724)->elements[0]))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, ((closureN)self_7313977)->elements[0]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, ((closureN)self_7312724)->elements[0]))) ){
+
+
+-return_direct_with_clo1(data, k_736425,__lambda_894, Cyc_cddr(data, ((closureN)self_7313977)->elements[0]));
++return_direct_with_clo1(data, k_735973,__lambda_894, Cyc_cddr(data, ((closureN)self_7312724)->elements[0]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_736425,__lambda_894, Cyc_cadr(data, ((closureN)self_7313977)->elements[0]));}
++return_direct_with_clo1(data, k_735973,__lambda_894, Cyc_cadr(data, ((closureN)self_7312724)->elements[0]));}
+ ;
+ } else {
+
+
+-return_direct_with_clo1(data, k_736425,__lambda_894, Cyc_cdr(data, ((closureN)self_7313977)->elements[0]));}
++return_direct_with_clo1(data, k_735973,__lambda_894, Cyc_cdr(data, ((closureN)self_7312724)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_891(void *data, object self_7313971, int argc, object *args) /* object self_7313971, object k_736420, object v_731461_733681 */
++static void __lambda_891(void *data, object self_7312718, int argc, object *args) /* object self_7312718, object k_735968, object v_731461_733334 */
+ {
+- object k_736420 = args[0]; object v_731461_733681 = args[1];
++ object k_735968 = args[0]; object v_731461_733334 = args[1];
+
+
+
+
+-return_direct_with_clo1(data, k_736420, (((closure) k_736420)->fn), Cyc_eq(((closureN)self_7313971)->elements[0], Cyc_car(data, v_731461_733681)));;
++return_direct_with_clo1(data, k_735968, (((closure) k_735968)->fn), Cyc_eq(((closureN)self_7312718)->elements[0], Cyc_car(data, v_731461_733334)));;
+ }
+
+-static void __lambda_888(void *data, object self_7313972, int argc, object *args) /* object self_7313972, object r_736419 */
++static void __lambda_888(void *data, object self_7312719, int argc, object *args) /* object self_7312719, object r_735967 */
+ {
+- object r_736419 = args[0];
++ object r_735967 = args[0];
+
+-closureN_type c_7322356;
+-object e_7322382 [5];
+-c_7322356.hdr.mark = gc_color_red;
+- c_7322356.hdr.grayed = 0;
+-c_7322356.tag = closureN_tag;
+- c_7322356.fn = (function_type)__lambda_889;
+-c_7322356.num_args = 1;
+-c_7322356.num_elements = 5;
+-c_7322356.elements = (object *)e_7322382;
+-c_7322356.elements[0] = ((closureN)self_7313972)->elements[0];
+-c_7322356.elements[1] = ((closureN)self_7313972)->elements[1];
+-c_7322356.elements[2] = ((closureN)self_7313972)->elements[2];
+-c_7322356.elements[3] = ((closureN)self_7313972)->elements[3];
+-c_7322356.elements[4] = ((closureN)self_7313972)->elements[4];
++closureN_type c_7321056;
++object e_7321082 [5];
++c_7321056.hdr.mark = gc_color_red;
++ c_7321056.hdr.grayed = 0;
++c_7321056.tag = closureN_tag;
++ c_7321056.fn = (function_type)__lambda_889;
++c_7321056.num_args = 1;
++c_7321056.num_elements = 5;
++c_7321056.elements = (object *)e_7321082;
++c_7321056.elements[0] = ((closureN)self_7312719)->elements[0];
++c_7321056.elements[1] = ((closureN)self_7312719)->elements[1];
++c_7321056.elements[2] = ((closureN)self_7312719)->elements[2];
++c_7321056.elements[3] = ((closureN)self_7312719)->elements[3];
++c_7321056.elements[4] = ((closureN)self_7312719)->elements[4];
+
+-return_direct_with_clo3(data, __glo_find_scheme_base, (((closure) __glo_find_scheme_base)->fn), &c_7322356, r_736419, ((closureN)self_7313972)->elements[5]);;
++return_direct_with_clo3(data, __glo_find_scheme_base, (((closure) __glo_find_scheme_base)->fn), &c_7321056, r_735967, ((closureN)self_7312719)->elements[5]);;
+ }
+
+-static void __lambda_889(void *data, object self_7313973, int argc, object *args) /* object self_7313973, object tmp_731456_731458_733679 */
++static void __lambda_889(void *data, object self_7312720, int argc, object *args) /* object self_7312720, object tmp_731456_731458_733332 */
+ {
+- object tmp_731456_731458_733679 = args[0];
+- if( (boolean_f != tmp_731456_731458_733679) ){
++ object tmp_731456_731458_733332 = args[0];
++ if( (boolean_f != tmp_731456_731458_733332) ){
+
+-closureN_type c_7322358;
+-object e_7322370 [3];
+-c_7322358.hdr.mark = gc_color_red;
+- c_7322358.hdr.grayed = 0;
+-c_7322358.tag = closureN_tag;
+- c_7322358.fn = (function_type)__lambda_890;
+-c_7322358.num_args = 1;
+-c_7322358.num_elements = 3;
+-c_7322358.elements = (object *)e_7322370;
+-c_7322358.elements[0] = ((closureN)self_7313973)->elements[2];
+-c_7322358.elements[1] = ((closureN)self_7313973)->elements[3];
+-c_7322358.elements[2] = ((closureN)self_7313973)->elements[4];
++closureN_type c_7321058;
++object e_7321070 [3];
++c_7321058.hdr.mark = gc_color_red;
++ c_7321058.hdr.grayed = 0;
++c_7321058.tag = closureN_tag;
++ c_7321058.fn = (function_type)__lambda_890;
++c_7321058.num_args = 1;
++c_7321058.num_elements = 3;
++c_7321058.elements = (object *)e_7321070;
++c_7321058.elements[0] = ((closureN)self_7312720)->elements[2];
++c_7321058.elements[1] = ((closureN)self_7312720)->elements[3];
++c_7321058.elements[2] = ((closureN)self_7312720)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7322358,__lambda_890, tmp_731456_731458_733679);
++return_direct_with_clo1(data,(closure)&c_7321058,__lambda_890, tmp_731456_731458_733332);
+ } else {
+
+-list_2_type local_7322375;
++list_2_type local_7321075;
+
+-list_2_type local_7322379;
+-return_direct_with_clo1(data, ((closureN)self_7313973)->elements[3], (((closure) ((closureN)self_7313973)->elements[3])->fn), Cyc_fast_list_2(&local_7322375, ((closureN)self_7313973)->elements[1], Cyc_fast_list_2(&local_7322379, ((closureN)self_7313973)->elements[0], ((closureN)self_7313973)->elements[4])));}
++list_2_type local_7321079;
++return_direct_with_clo1(data, ((closureN)self_7312720)->elements[3], (((closure) ((closureN)self_7312720)->elements[3])->fn), Cyc_fast_list_2(&local_7321075, ((closureN)self_7312720)->elements[1], Cyc_fast_list_2(&local_7321079, ((closureN)self_7312720)->elements[0], ((closureN)self_7312720)->elements[4])));}
+ ;;
+ }
+
+-static void __lambda_890(void *data, object self_7313974, int argc, object *args) /* object self_7313974, object cell_731459_733680 */
++static void __lambda_890(void *data, object self_7312721, int argc, object *args) /* object self_7312721, object cell_731459_733333 */
+ {
+- object cell_731459_733680 = args[0];
++ object cell_731459_733333 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_cdr(data, cell_731459_733680), ((closureN)self_7313974)->elements[0])) ){
+- return_direct_with_clo1(data, ((closureN)self_7313974)->elements[1], (((closure) ((closureN)self_7313974)->elements[1])->fn), ((closureN)self_7313974)->elements[2]);
++if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_cdr(data, cell_731459_733333), ((closureN)self_7312721)->elements[0])) ){
++ return_direct_with_clo1(data, ((closureN)self_7312721)->elements[1], (((closure) ((closureN)self_7312721)->elements[1])->fn), ((closureN)self_7312721)->elements[2]);
+ } else {
+
+-make_utf8_string_with_len(c_7322369, "too few ...'s", 13, 13);
+-return_direct_with_clo2(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7313974)->elements[1], &c_7322369);}
++make_utf8_string_with_len(c_7321069, "too few ...'s", 13, 13);
++return_direct_with_clo2(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7312721)->elements[1], &c_7321069);}
+ ;;
+ }
+
+-static void __lambda_884(void *data, object self_7314007, int argc, object *args) /* object self_7314007, object r_736412 */
++static void __lambda_884(void *data, object self_7312754, int argc, object *args) /* object self_7312754, object r_735960 */
+ {
+- object r_736412 = args[0];
++ object r_735960 = args[0];
+
+-closureN_type c_7322338;
+-object e_7322345 [3];
+-c_7322338.hdr.mark = gc_color_red;
+- c_7322338.hdr.grayed = 0;
+-c_7322338.tag = closureN_tag;
+- c_7322338.fn = (function_type)__lambda_885;
+-c_7322338.num_args = 1;
+-c_7322338.num_elements = 3;
+-c_7322338.elements = (object *)e_7322345;
+-c_7322338.elements[0] = ((closureN)self_7314007)->elements[0];
+-c_7322338.elements[1] = ((closureN)self_7314007)->elements[1];
+-c_7322338.elements[2] = ((closureN)self_7314007)->elements[2];
++closureN_type c_7321038;
++object e_7321045 [3];
++c_7321038.hdr.mark = gc_color_red;
++ c_7321038.hdr.grayed = 0;
++c_7321038.tag = closureN_tag;
++ c_7321038.fn = (function_type)__lambda_885;
++c_7321038.num_args = 1;
++c_7321038.num_elements = 3;
++c_7321038.elements = (object *)e_7321045;
++c_7321038.elements[0] = ((closureN)self_7312754)->elements[0];
++c_7321038.elements[1] = ((closureN)self_7312754)->elements[1];
++c_7321038.elements[2] = ((closureN)self_7312754)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322338,__lambda_885, Cyc_set_cell(data, ((closureN)self_7314007)->elements[1], r_736412));;
++return_direct_with_clo1(data,(closure)&c_7321038,__lambda_885, Cyc_set_cell(data, ((closureN)self_7312754)->elements[1], r_735960));;
+ }
+
+-static void __lambda_885(void *data, object self_7314008, int argc, object *args) /* object self_7314008, object r_736411 */
++static void __lambda_885(void *data, object self_7312755, int argc, object *args) /* object self_7312755, object r_735959 */
+ {
+
+
+
+-return_closcall3(data, car(((closureN)self_7314008)->elements[1]), ((closureN)self_7314008)->elements[0], ((closureN)self_7314008)->elements[2], obj_int2obj(0));;
++return_closcall3(data, car(((closureN)self_7312755)->elements[1]), ((closureN)self_7312755)->elements[0], ((closureN)self_7312755)->elements[2], obj_int2obj(0));;
+ }
+
+-static void __lambda_874(void *data, object self_7314009, int argc, object *args) /* object self_7314009, object r_736409 */
++static void __lambda_874(void *data, object self_7312756, int argc, object *args) /* object self_7312756, object r_735957 */
+ {
+- object r_736409 = args[0];
++ object r_735957 = args[0];
+
+-closureN_type c_7322259;
+-object e_7322323 [12];
+-c_7322259.hdr.mark = gc_color_red;
+- c_7322259.hdr.grayed = 0;
+-c_7322259.tag = closureN_tag;
+- c_7322259.fn = (function_type)__lambda_875;
+-c_7322259.num_args = 1;
+-c_7322259.num_elements = 12;
+-c_7322259.elements = (object *)e_7322323;
+-c_7322259.elements[0] = ((closureN)self_7314009)->elements[0];
+-c_7322259.elements[1] = ((closureN)self_7314009)->elements[1];
+-c_7322259.elements[2] = ((closureN)self_7314009)->elements[2];
+-c_7322259.elements[3] = ((closureN)self_7314009)->elements[3];
+-c_7322259.elements[4] = ((closureN)self_7314009)->elements[4];
+-c_7322259.elements[5] = ((closureN)self_7314009)->elements[5];
+-c_7322259.elements[6] = ((closureN)self_7314009)->elements[6];
+-c_7322259.elements[7] = ((closureN)self_7314009)->elements[7];
+-c_7322259.elements[8] = ((closureN)self_7314009)->elements[8];
+-c_7322259.elements[9] = ((closureN)self_7314009)->elements[9];
+-c_7322259.elements[10] = ((closureN)self_7314009)->elements[11];
+-c_7322259.elements[11] = ((closureN)self_7314009)->elements[12];
++closureN_type c_7320959;
++object e_7321023 [12];
++c_7320959.hdr.mark = gc_color_red;
++ c_7320959.hdr.grayed = 0;
++c_7320959.tag = closureN_tag;
++ c_7320959.fn = (function_type)__lambda_875;
++c_7320959.num_args = 1;
++c_7320959.num_elements = 12;
++c_7320959.elements = (object *)e_7321023;
++c_7320959.elements[0] = ((closureN)self_7312756)->elements[0];
++c_7320959.elements[1] = ((closureN)self_7312756)->elements[1];
++c_7320959.elements[2] = ((closureN)self_7312756)->elements[2];
++c_7320959.elements[3] = ((closureN)self_7312756)->elements[3];
++c_7320959.elements[4] = ((closureN)self_7312756)->elements[4];
++c_7320959.elements[5] = ((closureN)self_7312756)->elements[5];
++c_7320959.elements[6] = ((closureN)self_7312756)->elements[6];
++c_7320959.elements[7] = ((closureN)self_7312756)->elements[7];
++c_7320959.elements[8] = ((closureN)self_7312756)->elements[8];
++c_7320959.elements[9] = ((closureN)self_7312756)->elements[9];
++c_7320959.elements[10] = ((closureN)self_7312756)->elements[11];
++c_7320959.elements[11] = ((closureN)self_7312756)->elements[12];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7322259,__lambda_875, Cyc_set_cell(data, ((closureN)self_7314009)->elements[10], r_736409));;
++return_direct_with_clo1(data,(closure)&c_7320959,__lambda_875, Cyc_set_cell(data, ((closureN)self_7312756)->elements[10], r_735957));;
+ }
+
+-static void __lambda_875(void *data, object self_7314010, int argc, object *args) /* object self_7314010, object r_736395 */
++static void __lambda_875(void *data, object self_7312757, int argc, object *args) /* object self_7312757, object r_735943 */
+ {
+
+
+-closureN_type c_7322261;
+-object e_7322312 [11];
+-c_7322261.hdr.mark = gc_color_red;
+- c_7322261.hdr.grayed = 0;
+-c_7322261.tag = closureN_tag;
+- c_7322261.fn = (function_type)__lambda_876;
+-c_7322261.num_args = 1;
+-c_7322261.num_elements = 11;
+-c_7322261.elements = (object *)e_7322312;
+-c_7322261.elements[0] = ((closureN)self_7314010)->elements[0];
+-c_7322261.elements[1] = ((closureN)self_7314010)->elements[1];
+-c_7322261.elements[2] = ((closureN)self_7314010)->elements[2];
+-c_7322261.elements[3] = ((closureN)self_7314010)->elements[3];
+-c_7322261.elements[4] = ((closureN)self_7314010)->elements[4];
+-c_7322261.elements[5] = ((closureN)self_7314010)->elements[5];
+-c_7322261.elements[6] = ((closureN)self_7314010)->elements[6];
+-c_7322261.elements[7] = ((closureN)self_7314010)->elements[7];
+-c_7322261.elements[8] = ((closureN)self_7314010)->elements[8];
+-c_7322261.elements[9] = ((closureN)self_7314010)->elements[10];
+-c_7322261.elements[10] = ((closureN)self_7314010)->elements[11];
++closureN_type c_7320961;
++object e_7321012 [11];
++c_7320961.hdr.mark = gc_color_red;
++ c_7320961.hdr.grayed = 0;
++c_7320961.tag = closureN_tag;
++ c_7320961.fn = (function_type)__lambda_876;
++c_7320961.num_args = 1;
++c_7320961.num_elements = 11;
++c_7320961.elements = (object *)e_7321012;
++c_7320961.elements[0] = ((closureN)self_7312757)->elements[0];
++c_7320961.elements[1] = ((closureN)self_7312757)->elements[1];
++c_7320961.elements[2] = ((closureN)self_7312757)->elements[2];
++c_7320961.elements[3] = ((closureN)self_7312757)->elements[3];
++c_7320961.elements[4] = ((closureN)self_7312757)->elements[4];
++c_7320961.elements[5] = ((closureN)self_7312757)->elements[5];
++c_7320961.elements[6] = ((closureN)self_7312757)->elements[6];
++c_7320961.elements[7] = ((closureN)self_7312757)->elements[7];
++c_7320961.elements[8] = ((closureN)self_7312757)->elements[8];
++c_7320961.elements[9] = ((closureN)self_7312757)->elements[10];
++c_7320961.elements[10] = ((closureN)self_7312757)->elements[11];
+
+
+-closureN_type c_7322313;
+-object e_7322322 [1];
+-c_7322313.hdr.mark = gc_color_red;
+- c_7322313.hdr.grayed = 0;
+-c_7322313.tag = closureN_tag;
+- c_7322313.fn = (function_type)__lambda_880;
+-c_7322313.num_args = 1;
+-c_7322313.num_elements = 1;
+-c_7322313.elements = (object *)e_7322322;
+-c_7322313.elements[0] = ((closureN)self_7314010)->elements[9];
++closureN_type c_7321013;
++object e_7321022 [1];
++c_7321013.hdr.mark = gc_color_red;
++ c_7321013.hdr.grayed = 0;
++c_7321013.tag = closureN_tag;
++ c_7321013.fn = (function_type)__lambda_880;
++c_7321013.num_args = 1;
++c_7321013.num_elements = 1;
++c_7321013.elements = (object *)e_7321022;
++c_7321013.elements[0] = ((closureN)self_7312757)->elements[9];
+
+-return_direct_with_clo1(data,(closure)&c_7322261,__lambda_876, &c_7322313);;
++return_direct_with_clo1(data,(closure)&c_7320961,__lambda_876, &c_7321013);;
+ }
+
+-static void __lambda_880(void *data, object self_7314011, int argc, object *args) /* object self_7314011, object k_736406, object clause_731516_733693 */
++static void __lambda_880(void *data, object self_7312758, int argc, object *args) /* object self_7312758, object k_735954, object clause_731516_733346 */
+ {
+- object k_736406 = args[0]; object clause_731516_733693 = args[1];
++ object k_735954 = args[0]; object clause_731516_733346 = args[1];
+
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7314011)->elements[0]), k_736406, Cyc_car(data, clause_731516_733693), Cyc_cadr(data, clause_731516_733693));;
++return_closcall3(data, car(((closureN)self_7312758)->elements[0]), k_735954, Cyc_car(data, clause_731516_733346), Cyc_cadr(data, clause_731516_733346));;
+ }
+
+-static void __lambda_876(void *data, object self_7314012, int argc, object *args) /* object self_7314012, object r_736405 */
++static void __lambda_876(void *data, object self_7312759, int argc, object *args) /* object self_7312759, object r_735953 */
+ {
+- object r_736405 = args[0];
++ object r_735953 = args[0];
+
+-closureN_type c_7322263;
+-object e_7322308 [10];
+-c_7322263.hdr.mark = gc_color_red;
+- c_7322263.hdr.grayed = 0;
+-c_7322263.tag = closureN_tag;
+- c_7322263.fn = (function_type)__lambda_877;
+-c_7322263.num_args = 1;
+-c_7322263.num_elements = 10;
+-c_7322263.elements = (object *)e_7322308;
+-c_7322263.elements[0] = ((closureN)self_7314012)->elements[0];
+-c_7322263.elements[1] = ((closureN)self_7314012)->elements[1];
+-c_7322263.elements[2] = ((closureN)self_7314012)->elements[2];
+-c_7322263.elements[3] = ((closureN)self_7314012)->elements[3];
+-c_7322263.elements[4] = ((closureN)self_7314012)->elements[4];
+-c_7322263.elements[5] = ((closureN)self_7314012)->elements[5];
+-c_7322263.elements[6] = ((closureN)self_7314012)->elements[6];
+-c_7322263.elements[7] = ((closureN)self_7314012)->elements[7];
+-c_7322263.elements[8] = ((closureN)self_7314012)->elements[8];
+-c_7322263.elements[9] = ((closureN)self_7314012)->elements[10];
+-
+-
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7322263, r_736405, car(((closureN)self_7314012)->elements[9]));;
+-}
+-
+-static void __lambda_877(void *data, object self_7314013, int argc, object *args) /* object self_7314013, object r_736401 */
+- {
+- object r_736401 = args[0];
+-
+-closureN_type c_7322265;
+-object e_7322301 [10];
+-c_7322265.hdr.mark = gc_color_red;
+- c_7322265.hdr.grayed = 0;
+-c_7322265.tag = closureN_tag;
+- c_7322265.fn = (function_type)__lambda_878;
+-c_7322265.num_args = 1;
+-c_7322265.num_elements = 10;
+-c_7322265.elements = (object *)e_7322301;
+-c_7322265.elements[0] = ((closureN)self_7314013)->elements[0];
+-c_7322265.elements[1] = ((closureN)self_7314013)->elements[1];
+-c_7322265.elements[2] = ((closureN)self_7314013)->elements[2];
+-c_7322265.elements[3] = ((closureN)self_7314013)->elements[3];
+-c_7322265.elements[4] = ((closureN)self_7314013)->elements[5];
+-c_7322265.elements[5] = ((closureN)self_7314013)->elements[6];
+-c_7322265.elements[6] = ((closureN)self_7314013)->elements[7];
+-c_7322265.elements[7] = ((closureN)self_7314013)->elements[8];
+-c_7322265.elements[8] = ((closureN)self_7314013)->elements[9];
+-c_7322265.elements[9] = r_736401;
+-
+-
+-list_3_type local_7322304;
+-
+-make_utf8_string_with_len(c_7322306, "no expansion for", 16, 16);
+-return_direct_with_clo1(data,(closure)&c_7322265,__lambda_878, Cyc_fast_list_3(&local_7322304, ((closureN)self_7314013)->elements[4], &c_7322306, ((closureN)self_7314013)->elements[5]));;
+-}
+-
+-static void __lambda_878(void *data, object self_7314014, int argc, object *args) /* object self_7314014, object r_736404 */
+- {
+- object r_736404 = args[0];
+-
+-closureN_type c_7322267;
+-object e_7322292 [8];
+-c_7322267.hdr.mark = gc_color_red;
+- c_7322267.hdr.grayed = 0;
+-c_7322267.tag = closureN_tag;
+- c_7322267.fn = (function_type)__lambda_879;
+-c_7322267.num_args = 1;
+-c_7322267.num_elements = 8;
+-c_7322267.elements = (object *)e_7322292;
+-c_7322267.elements[0] = ((closureN)self_7314014)->elements[0];
+-c_7322267.elements[1] = ((closureN)self_7314014)->elements[1];
+-c_7322267.elements[2] = ((closureN)self_7314014)->elements[3];
+-c_7322267.elements[3] = ((closureN)self_7314014)->elements[4];
+-c_7322267.elements[4] = ((closureN)self_7314014)->elements[5];
+-c_7322267.elements[5] = ((closureN)self_7314014)->elements[6];
+-c_7322267.elements[6] = ((closureN)self_7314014)->elements[7];
+-c_7322267.elements[7] = ((closureN)self_7314014)->elements[8];
++closureN_type c_7320963;
++object e_7321008 [10];
++c_7320963.hdr.mark = gc_color_red;
++ c_7320963.hdr.grayed = 0;
++c_7320963.tag = closureN_tag;
++ c_7320963.fn = (function_type)__lambda_877;
++c_7320963.num_args = 1;
++c_7320963.num_elements = 10;
++c_7320963.elements = (object *)e_7321008;
++c_7320963.elements[0] = ((closureN)self_7312759)->elements[0];
++c_7320963.elements[1] = ((closureN)self_7312759)->elements[1];
++c_7320963.elements[2] = ((closureN)self_7312759)->elements[2];
++c_7320963.elements[3] = ((closureN)self_7312759)->elements[3];
++c_7320963.elements[4] = ((closureN)self_7312759)->elements[4];
++c_7320963.elements[5] = ((closureN)self_7312759)->elements[5];
++c_7320963.elements[6] = ((closureN)self_7312759)->elements[6];
++c_7320963.elements[7] = ((closureN)self_7312759)->elements[7];
++c_7320963.elements[8] = ((closureN)self_7312759)->elements[8];
++c_7320963.elements[9] = ((closureN)self_7312759)->elements[10];
+
+
+-pair_type local_7322296;
+
+-list_3_type local_7322299;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7322267, ((closureN)self_7314014)->elements[9], set_cell_as_expr(&local_7322296, Cyc_fast_list_3(&local_7322299, ((closureN)self_7314014)->elements[2], r_736404, boolean_f)));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7320963, r_735953, car(((closureN)self_7312759)->elements[9]));;
+ }
+
+-static void __lambda_879(void *data, object self_7314015, int argc, object *args) /* object self_7314015, object r_736400 */
++static void __lambda_877(void *data, object self_7312760, int argc, object *args) /* object self_7312760, object r_735949 */
+ {
+- object r_736400 = args[0];
++ object r_735949 = args[0];
+
+-list_2_type local_7322272;
++closureN_type c_7320965;
++object e_7321001 [10];
++c_7320965.hdr.mark = gc_color_red;
++ c_7320965.hdr.grayed = 0;
++c_7320965.tag = closureN_tag;
++ c_7320965.fn = (function_type)__lambda_878;
++c_7320965.num_args = 1;
++c_7320965.num_elements = 10;
++c_7320965.elements = (object *)e_7321001;
++c_7320965.elements[0] = ((closureN)self_7312760)->elements[0];
++c_7320965.elements[1] = ((closureN)self_7312760)->elements[1];
++c_7320965.elements[2] = ((closureN)self_7312760)->elements[2];
++c_7320965.elements[3] = ((closureN)self_7312760)->elements[3];
++c_7320965.elements[4] = ((closureN)self_7312760)->elements[5];
++c_7320965.elements[5] = ((closureN)self_7312760)->elements[6];
++c_7320965.elements[6] = ((closureN)self_7312760)->elements[7];
++c_7320965.elements[7] = ((closureN)self_7312760)->elements[8];
++c_7320965.elements[8] = ((closureN)self_7312760)->elements[9];
++c_7320965.elements[9] = r_735949;
+
+-list_3_type local_7322276;
+
+-list_3_type local_7322280;
++list_3_type local_7321004;
+
+-list_2_type local_7322286;
++make_utf8_string_with_len(c_7321006, "no expansion for", 16, 16);
++return_direct_with_clo1(data,(closure)&c_7320965,__lambda_878, Cyc_fast_list_3(&local_7321004, ((closureN)self_7312760)->elements[4], &c_7321006, ((closureN)self_7312760)->elements[5]));;
++}
+
+-pair_type local_7322290;
+-return_direct_with_clo1(data, ((closureN)self_7314015)->elements[7], (((closure) ((closureN)self_7314015)->elements[7])->fn), Cyc_fast_list_2(&local_7322272, ((closureN)self_7314015)->elements[2], Cyc_fast_list_3(&local_7322276, ((closureN)self_7314015)->elements[4], Cyc_fast_list_3(&local_7322280, ((closureN)self_7314015)->elements[3], ((closureN)self_7314015)->elements[6], ((closureN)self_7314015)->elements[1]), Cyc_fast_list_2(&local_7322286, ((closureN)self_7314015)->elements[0], set_pair_as_expr(&local_7322290, ((closureN)self_7314015)->elements[5], r_736400)))));;
++static void __lambda_878(void *data, object self_7312761, int argc, object *args) /* object self_7312761, object r_735952 */
++ {
++ object r_735952 = args[0];
++
++closureN_type c_7320967;
++object e_7320992 [8];
++c_7320967.hdr.mark = gc_color_red;
++ c_7320967.hdr.grayed = 0;
++c_7320967.tag = closureN_tag;
++ c_7320967.fn = (function_type)__lambda_879;
++c_7320967.num_args = 1;
++c_7320967.num_elements = 8;
++c_7320967.elements = (object *)e_7320992;
++c_7320967.elements[0] = ((closureN)self_7312761)->elements[0];
++c_7320967.elements[1] = ((closureN)self_7312761)->elements[1];
++c_7320967.elements[2] = ((closureN)self_7312761)->elements[3];
++c_7320967.elements[3] = ((closureN)self_7312761)->elements[4];
++c_7320967.elements[4] = ((closureN)self_7312761)->elements[5];
++c_7320967.elements[5] = ((closureN)self_7312761)->elements[6];
++c_7320967.elements[6] = ((closureN)self_7312761)->elements[7];
++c_7320967.elements[7] = ((closureN)self_7312761)->elements[8];
++
++
++pair_type local_7320996;
++
++list_3_type local_7320999;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7320967, ((closureN)self_7312761)->elements[9], set_cell_as_expr(&local_7320996, Cyc_fast_list_3(&local_7320999, ((closureN)self_7312761)->elements[2], r_735952, boolean_f)));;
++}
++
++static void __lambda_879(void *data, object self_7312762, int argc, object *args) /* object self_7312762, object r_735948 */
++ {
++ object r_735948 = args[0];
++
++list_2_type local_7320972;
++
++list_3_type local_7320976;
++
++list_3_type local_7320980;
++
++list_2_type local_7320986;
++
++pair_type local_7320990;
++return_direct_with_clo1(data, ((closureN)self_7312762)->elements[7], (((closure) ((closureN)self_7312762)->elements[7])->fn), Cyc_fast_list_2(&local_7320972, ((closureN)self_7312762)->elements[2], Cyc_fast_list_3(&local_7320976, ((closureN)self_7312762)->elements[4], Cyc_fast_list_3(&local_7320980, ((closureN)self_7312762)->elements[3], ((closureN)self_7312762)->elements[6], ((closureN)self_7312762)->elements[1]), Cyc_fast_list_2(&local_7320986, ((closureN)self_7312762)->elements[0], set_pair_as_expr(&local_7320990, ((closureN)self_7312762)->elements[5], r_735948)))));;
+ }
+
+-static void __lambda_855(void *data, object self_7314016, int argc, object *args) /* object self_7314016, object k_736759 */
++static void __lambda_855(void *data, object self_7312763, int argc, object *args) /* object self_7312763, object k_736307 */
+ {
+- object k_736759 = args[0];
+- if( (boolean_f != ((closureN)self_7314016)->elements[0]) ){
++ object k_736307 = args[0];
++ if( (boolean_f != ((closureN)self_7312763)->elements[0]) ){
+
+
+
+
+-return_direct_with_clo1(data, k_736759,__lambda_856, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7314016)->elements[1])));
++return_direct_with_clo1(data, k_736307,__lambda_856, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7312763)->elements[1])));
+ } else {
+
+
+-return_direct_with_clo1(data, k_736759,__lambda_856, Cyc_cddr(data, ((closureN)self_7314016)->elements[1]));}
++return_direct_with_clo1(data, k_736307,__lambda_856, Cyc_cddr(data, ((closureN)self_7312763)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_852(void *data, object self_7314017, int argc, object *args) /* object self_7314017, object k_736762 */
++static void __lambda_852(void *data, object self_7312764, int argc, object *args) /* object self_7312764, object k_736310 */
+ {
+- object k_736762 = args[0];
+- if( (boolean_f != ((closureN)self_7314017)->elements[0]) ){
++ object k_736310 = args[0];
++ if( (boolean_f != ((closureN)self_7312764)->elements[0]) ){
+
+
+
+
+-return_direct_with_clo1(data, k_736762,__lambda_853, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314017)->elements[1])));
++return_direct_with_clo1(data, k_736310,__lambda_853, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312764)->elements[1])));
+ } else {
+
+
+-return_direct_with_clo1(data, k_736762,__lambda_853, Cyc_cadr(data, ((closureN)self_7314017)->elements[1]));}
++return_direct_with_clo1(data, k_736310,__lambda_853, Cyc_cadr(data, ((closureN)self_7312764)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_809(void *data, object _, int argc, object *args) /* closure _,object k_736344, object kar_731260_733548, object kdr_731261_733549, object source_731262_733550 */
++static void __lambda_809(void *data, object _, int argc, object *args) /* closure _,object k_735892, object kar_731260_733201, object kdr_731261_733202, object source_731262_733203 */
+ {
+-object k_736344 = args[0]; object kar_731260_733548 = args[1]; object kdr_731261_733549 = args[2];
++object k_735892 = args[0]; object kar_731260_733201 = args[1]; object kdr_731261_733202 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:cons-source");
+
+-pair_type local_7322037;
+-return_direct_with_clo1(data, k_736344, (((closure) k_736344)->fn), set_pair_as_expr(&local_7322037, kar_731260_733548, kdr_731261_733549));;
++pair_type local_7320737;
++return_direct_with_clo1(data, k_735892, (((closure) k_735892)->fn), set_pair_as_expr(&local_7320737, kar_731260_733201, kdr_731261_733202));;
+ }
+
+-static void __lambda_807(void *data, object _, int argc, object *args) /* closure _,object k_736340, object pred_731252_733545, object ls_731253_733546 */
++static void __lambda_807(void *data, object _, int argc, object *args) /* closure _,object k_735888, object pred_731252_733198, object ls_731253_733199 */
+ {
+-object k_736340 = args[0]; object pred_731252_733545 = args[1]; object ls_731253_733546 = args[2];
++object k_735888 = args[0]; object pred_731252_733198 = args[1]; object ls_731253_733199 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:find");
+
+-closureN_type c_7322025;
+-object e_7322032 [1];
+-c_7322025.hdr.mark = gc_color_red;
+- c_7322025.hdr.grayed = 0;
+-c_7322025.tag = closureN_tag;
+- c_7322025.fn = (function_type)__lambda_808;
+-c_7322025.num_args = 1;
+-c_7322025.num_elements = 1;
+-c_7322025.elements = (object *)e_7322032;
+-c_7322025.elements[0] = k_736340;
++closureN_type c_7320725;
++object e_7320732 [1];
++c_7320725.hdr.mark = gc_color_red;
++ c_7320725.hdr.grayed = 0;
++c_7320725.tag = closureN_tag;
++ c_7320725.fn = (function_type)__lambda_808;
++c_7320725.num_args = 1;
++c_7320725.num_elements = 1;
++c_7320725.elements = (object *)e_7320732;
++c_7320725.elements[0] = k_735888;
+
+-return_direct_with_clo3(data, __glo_find_91tail_scheme_base, (((closure) __glo_find_91tail_scheme_base)->fn), &c_7322025, pred_731252_733545, ls_731253_733546);;
++return_direct_with_clo3(data, __glo_find_91tail_scheme_base, (((closure) __glo_find_91tail_scheme_base)->fn), &c_7320725, pred_731252_733198, ls_731253_733199);;
+ }
+
+-static void __lambda_808(void *data, object self_7313785, int argc, object *args) /* object self_7313785, object tmp_731256_731258_733547 */
++static void __lambda_808(void *data, object self_7312532, int argc, object *args) /* object self_7312532, object tmp_731256_731258_733200 */
+ {
+- object tmp_731256_731258_733547 = args[0];
+- if( (boolean_f != tmp_731256_731258_733547) ){
++ object tmp_731256_731258_733200 = args[0];
++ if( (boolean_f != tmp_731256_731258_733200) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313785)->elements[0], (((closure) ((closureN)self_7313785)->elements[0])->fn), Cyc_car(data, tmp_731256_731258_733547));
++return_direct_with_clo1(data, ((closureN)self_7312532)->elements[0], (((closure) ((closureN)self_7312532)->elements[0])->fn), Cyc_car(data, tmp_731256_731258_733200));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313785)->elements[0], (((closure) ((closureN)self_7313785)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312532)->elements[0], (((closure) ((closureN)self_7312532)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_805(void *data, object _, int argc, object *args) /* closure _,object k_736333, object pred_731249_733543, object ls_731250_733544 */
++static void __lambda_805(void *data, object _, int argc, object *args) /* closure _,object k_735881, object pred_731249_733196, object ls_731250_733197 */
+ {
+-object k_736333 = args[0]; object pred_731249_733543 = args[1]; object ls_731250_733544 = args[2];
++object k_735881 = args[0]; object pred_731249_733196 = args[1]; object ls_731250_733197 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:find-tail");
+
+-if( (boolean_f != Cyc_is_pair(ls_731250_733544)) ){
++if( (boolean_f != Cyc_is_pair(ls_731250_733197)) ){
+
+-closureN_type c_7322009;
+-object e_7322019 [3];
+-c_7322009.hdr.mark = gc_color_red;
+- c_7322009.hdr.grayed = 0;
+-c_7322009.tag = closureN_tag;
+- c_7322009.fn = (function_type)__lambda_806;
+-c_7322009.num_args = 1;
+-c_7322009.num_elements = 3;
+-c_7322009.elements = (object *)e_7322019;
+-c_7322009.elements[0] = k_736333;
+-c_7322009.elements[1] = ls_731250_733544;
+-c_7322009.elements[2] = pred_731249_733543;
++closureN_type c_7320709;
++object e_7320719 [3];
++c_7320709.hdr.mark = gc_color_red;
++ c_7320709.hdr.grayed = 0;
++c_7320709.tag = closureN_tag;
++ c_7320709.fn = (function_type)__lambda_806;
++c_7320709.num_args = 1;
++c_7320709.num_elements = 3;
++c_7320709.elements = (object *)e_7320719;
++c_7320709.elements[0] = k_735881;
++c_7320709.elements[1] = ls_731250_733197;
++c_7320709.elements[2] = pred_731249_733196;
+
+
+
+-return_closcall2(data, pred_731249_733543, &c_7322009, Cyc_car(data, ls_731250_733544));
++return_closcall2(data, pred_731249_733196, &c_7320709, Cyc_car(data, ls_731250_733197));
+ } else {
+- return_direct_with_clo1(data, k_736333, (((closure) k_736333)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735881, (((closure) k_735881)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_806(void *data, object self_7313784, int argc, object *args) /* object self_7313784, object r_736335 */
++static void __lambda_806(void *data, object self_7312531, int argc, object *args) /* object self_7312531, object r_735883 */
+ {
+- object r_736335 = args[0];
+- if( (boolean_f != r_736335) ){
+- return_direct_with_clo1(data, ((closureN)self_7313784)->elements[0], (((closure) ((closureN)self_7313784)->elements[0])->fn), ((closureN)self_7313784)->elements[1]);
++ object r_735883 = args[0];
++ if( (boolean_f != r_735883) ){
++ return_direct_with_clo1(data, ((closureN)self_7312531)->elements[0], (((closure) ((closureN)self_7312531)->elements[0])->fn), ((closureN)self_7312531)->elements[1]);
+ } else {
+
+
+-return_direct_with_clo3(data, __glo_find_91tail_scheme_base, (((closure) __glo_find_91tail_scheme_base)->fn), ((closureN)self_7313784)->elements[0], ((closureN)self_7313784)->elements[2], Cyc_cdr(data, ((closureN)self_7313784)->elements[1]));}
++return_direct_with_clo3(data, __glo_find_91tail_scheme_base, (((closure) __glo_find_91tail_scheme_base)->fn), ((closureN)self_7312531)->elements[0], ((closureN)self_7312531)->elements[2], Cyc_cdr(data, ((closureN)self_7312531)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_1513(void *data, object _, int argc, object *args) {object k = args[0];object bv = args[1]; port_type *p = Cyc_io_open_input_bytevector(data, bv);
++static void __lambda_1466(void *data, object _, int argc, object *args) {object k = args[0];object bv = args[1]; port_type *p = Cyc_io_open_input_bytevector(data, bv);
+ return_closcall1(data, k, p); }
+-static void __lambda_1512(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_get_output_bytevector(data, k, port);
++static void __lambda_1465(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_get_output_bytevector(data, k, port);
+ }
+-static void __lambda_1511(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_get_output_string(data, k, port);
++static void __lambda_1464(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_get_output_string(data, k, port);
+ }
+-static void __lambda_1510(void *data, object _, int argc, object *args) {object k = args[0]; port_type *p = Cyc_io_open_output_string(data);
++static void __lambda_1463(void *data, object _, int argc, object *args) {object k = args[0]; port_type *p = Cyc_io_open_output_string(data);
+ return_closcall1(data, k, p); }
+-static void __lambda_1509(void *data, object _, int argc, object *args) {object k = args[0];object str = args[1]; port_type *p = Cyc_io_open_input_string(data, str);
++static void __lambda_1462(void *data, object _, int argc, object *args) {object k = args[0];object str = args[1]; port_type *p = Cyc_io_open_input_string(data, str);
+ return_closcall1(data, k, p); }
+-static void __lambda_1508(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
++static void __lambda_1461(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
+ if (boolean_f == Cyc_is_port(port)) {
+ return_closcall1(data, k, boolean_f);
+ }
+@@ -20572,7 +18775,7 @@ static void __lambda_1508(void *data, ob
+ data,
+ k,
+ ((p->mode == 0 && p->fp != NULL) ? boolean_t : boolean_f)); }
+-static void __lambda_1507(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
++static void __lambda_1460(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
+ if (boolean_f == Cyc_is_port(port)) {
+ return_closcall1(data, k, boolean_f);
+ }
+@@ -20580,7 +18783,7 @@ static void __lambda_1507(void *data, ob
+ data,
+ k,
+ ((p->mode == 1 && p->fp != NULL) ? boolean_t : boolean_f)); }
+-static void __lambda_1506(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
++static void __lambda_1459(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
+ if (boolean_f == Cyc_is_port(port)) {
+ return_closcall1(data, k, boolean_f);
+ }
+@@ -20588,7 +18791,7 @@ static void __lambda_1506(void *data, ob
+ data,
+ k,
+ ((p->mode == 0) ? boolean_t : boolean_f)); }
+-static void __lambda_1505(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
++static void __lambda_1458(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
+ if (boolean_f == Cyc_is_port(port)) {
+ return_closcall1(data, k, boolean_f);
+ }
+@@ -20596,741 +18799,741 @@ static void __lambda_1505(void *data, ob
+ data,
+ k,
+ ((p->mode == 1) ? boolean_t : boolean_f)); }
+-static object __lambda_1504(void *data, object ptr) { return Cyc_RECORD_MARKER; }
+-static void __lambda_1503(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_RECORD_MARKER); }
+-static object __lambda_1502(void *data, object ptr) { return Cyc_VOID; }
+-static void __lambda_1501(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_VOID); }
+-static object __lambda_1500(void *data, object ptr) { return Cyc_EOF; }
+-static void __lambda_1499(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_EOF); }
+-static void __lambda_1498(void *data, object _, int argc, object *args) {object k = args[0];object z1 = args[1];object z2 = args[2]; Cyc_expt(data, k, z1, z2); }
+-static object __lambda_1497(void *data, object ptr,object z_731248_733542) {
++static object __lambda_1457(void *data, object ptr) { return Cyc_RECORD_MARKER; }
++static void __lambda_1456(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_RECORD_MARKER); }
++static object __lambda_1455(void *data, object ptr) { return Cyc_VOID; }
++static void __lambda_1454(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_VOID); }
++static object __lambda_1453(void *data, object ptr) { return Cyc_EOF; }
++static void __lambda_1452(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_EOF); }
++static void __lambda_1451(void *data, object _, int argc, object *args) {object k = args[0];object z1 = args[1];object z2 = args[2]; Cyc_expt(data, k, z1, z2); }
++static object __lambda_1450(void *data, object ptr,object z_731248_733195) {
+
+ Cyc_st_add(data, "scheme/base.sld:square");
+
+-complex_num_type local_7321988;
+-return_copy(ptr, Cyc_fast_mul(data,&local_7321988, z_731248_733542, z_731248_733542));;
++complex_num_type local_7320688;
++return_copy(ptr, Cyc_fast_mul(data,&local_7320688, z_731248_733195, z_731248_733195));;
+ }
+
+-static void __lambda_804(void *data, object _, int argc, object *args) /* closure _,object k_736326, object z_731248_733542 */
++static void __lambda_804(void *data, object _, int argc, object *args) /* closure _,object k_735874, object z_731248_733195 */
+ {
+-object k_736326 = args[0]; object z_731248_733542 = args[1];
++object k_735874 = args[0]; object z_731248_733195 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:square");
+
+-complex_num_type local_7321983;
+-return_direct_with_clo1(data, k_736326, (((closure) k_736326)->fn), Cyc_fast_mul(data,&local_7321983, z_731248_733542, z_731248_733542));;
++complex_num_type local_7320683;
++return_direct_with_clo1(data, k_735874, (((closure) k_735874)->fn), Cyc_fast_mul(data,&local_7320683, z_731248_733195, z_731248_733195));;
+ }
+
+-static void __lambda_801(void *data, object _, int argc, object *args) /* closure _,object k_736321, object n_731246_733540, object m_731247_733541 */
++static void __lambda_801(void *data, object _, int argc, object *args) /* closure _,object k_735869, object n_731246_733193, object m_731247_733194 */
+ {
+-object k_736321 = args[0]; object n_731246_733540 = args[1]; object m_731247_733541 = args[2];
++object k_735869 = args[0]; object n_731246_733193 = args[1]; object m_731247_733194 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:floor/");
+
+-closureN_type c_7321969;
+-object e_7321978 [3];
+-c_7321969.hdr.mark = gc_color_red;
+- c_7321969.hdr.grayed = 0;
+-c_7321969.tag = closureN_tag;
+- c_7321969.fn = (function_type)__lambda_802;
+-c_7321969.num_args = 1;
+-c_7321969.num_elements = 3;
+-c_7321969.elements = (object *)e_7321978;
+-c_7321969.elements[0] = k_736321;
+-c_7321969.elements[1] = m_731247_733541;
+-c_7321969.elements[2] = n_731246_733540;
++closureN_type c_7320669;
++object e_7320678 [3];
++c_7320669.hdr.mark = gc_color_red;
++ c_7320669.hdr.grayed = 0;
++c_7320669.tag = closureN_tag;
++ c_7320669.fn = (function_type)__lambda_802;
++c_7320669.num_args = 1;
++c_7320669.num_elements = 3;
++c_7320669.elements = (object *)e_7320678;
++c_7320669.elements[0] = k_735869;
++c_7320669.elements[1] = m_731247_733194;
++c_7320669.elements[2] = n_731246_733193;
+
+-return_direct_with_clo3(data, __glo_floor_91quotient_scheme_base, (((closure) __glo_floor_91quotient_scheme_base)->fn), &c_7321969, n_731246_733540, m_731247_733541);;
++return_direct_with_clo3(data, __glo_floor_91quotient_scheme_base, (((closure) __glo_floor_91quotient_scheme_base)->fn), &c_7320669, n_731246_733193, m_731247_733194);;
+ }
+
+-static void __lambda_802(void *data, object self_7313782, int argc, object *args) /* object self_7313782, object r_736322 */
++static void __lambda_802(void *data, object self_7312529, int argc, object *args) /* object self_7312529, object r_735870 */
+ {
+- object r_736322 = args[0];
++ object r_735870 = args[0];
+
+-closureN_type c_7321971;
+-object e_7321975 [2];
+-c_7321971.hdr.mark = gc_color_red;
+- c_7321971.hdr.grayed = 0;
+-c_7321971.tag = closureN_tag;
+- c_7321971.fn = (function_type)__lambda_803;
+-c_7321971.num_args = 1;
+-c_7321971.num_elements = 2;
+-c_7321971.elements = (object *)e_7321975;
+-c_7321971.elements[0] = ((closureN)self_7313782)->elements[0];
+-c_7321971.elements[1] = r_736322;
++closureN_type c_7320671;
++object e_7320675 [2];
++c_7320671.hdr.mark = gc_color_red;
++ c_7320671.hdr.grayed = 0;
++c_7320671.tag = closureN_tag;
++ c_7320671.fn = (function_type)__lambda_803;
++c_7320671.num_args = 1;
++c_7320671.num_elements = 2;
++c_7320671.elements = (object *)e_7320675;
++c_7320671.elements[0] = ((closureN)self_7312529)->elements[0];
++c_7320671.elements[1] = r_735870;
+
+-return_direct_with_clo3(data, __glo_floor_91remainder_scheme_base, (((closure) __glo_floor_91remainder_scheme_base)->fn), &c_7321971, ((closureN)self_7313782)->elements[2], ((closureN)self_7313782)->elements[1]);;
++return_direct_with_clo3(data, __glo_floor_91remainder_scheme_base, (((closure) __glo_floor_91remainder_scheme_base)->fn), &c_7320671, ((closureN)self_7312529)->elements[2], ((closureN)self_7312529)->elements[1]);;
+ }
+
+-static void __lambda_803(void *data, object self_7313783, int argc, object *args) /* object self_7313783, object r_736323 */
++static void __lambda_803(void *data, object self_7312530, int argc, object *args) /* object self_7312530, object r_735871 */
+ {
+- object r_736323 = args[0];
+- return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), ((closureN)self_7313783)->elements[0], ((closureN)self_7313783)->elements[1], r_736323);;
++ object r_735871 = args[0];
++ return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), ((closureN)self_7312530)->elements[0], ((closureN)self_7312530)->elements[1], r_735871);;
+ }
+
+-static void __lambda_799(void *data, object _, int argc, object *args) /* closure _,object k_736316, object n_731244_733538, object m_731245_733539 */
++static void __lambda_799(void *data, object _, int argc, object *args) /* closure _,object k_735864, object n_731244_733191, object m_731245_733192 */
+ {
+-object k_736316 = args[0]; object n_731244_733538 = args[1]; object m_731245_733539 = args[2];
++object k_735864 = args[0]; object n_731244_733191 = args[1]; object m_731245_733192 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:floor-remainder");
+
+-closureN_type c_7321955;
+-object e_7321966 [3];
+-c_7321955.hdr.mark = gc_color_red;
+- c_7321955.hdr.grayed = 0;
+-c_7321955.tag = closureN_tag;
+- c_7321955.fn = (function_type)__lambda_800;
+-c_7321955.num_args = 1;
+-c_7321955.num_elements = 3;
+-c_7321955.elements = (object *)e_7321966;
+-c_7321955.elements[0] = k_736316;
+-c_7321955.elements[1] = m_731245_733539;
+-c_7321955.elements[2] = n_731244_733538;
++closureN_type c_7320655;
++object e_7320666 [3];
++c_7320655.hdr.mark = gc_color_red;
++ c_7320655.hdr.grayed = 0;
++c_7320655.tag = closureN_tag;
++ c_7320655.fn = (function_type)__lambda_800;
++c_7320655.num_args = 1;
++c_7320655.num_elements = 3;
++c_7320655.elements = (object *)e_7320666;
++c_7320655.elements[0] = k_735864;
++c_7320655.elements[1] = m_731245_733192;
++c_7320655.elements[2] = n_731244_733191;
+
+-return_direct_with_clo3(data, __glo_floor_91quotient_scheme_base, (((closure) __glo_floor_91quotient_scheme_base)->fn), &c_7321955, n_731244_733538, m_731245_733539);;
++return_direct_with_clo3(data, __glo_floor_91quotient_scheme_base, (((closure) __glo_floor_91quotient_scheme_base)->fn), &c_7320655, n_731244_733191, m_731245_733192);;
+ }
+
+-static void __lambda_800(void *data, object self_7313781, int argc, object *args) /* object self_7313781, object r_736318 */
++static void __lambda_800(void *data, object self_7312528, int argc, object *args) /* object self_7312528, object r_735866 */
+ {
+- object r_736318 = args[0];
++ object r_735866 = args[0];
+
+-complex_num_type local_7321960;
++complex_num_type local_7320660;
+
+-complex_num_type local_7321964;
+-return_direct_with_clo1(data, ((closureN)self_7313781)->elements[0], (((closure) ((closureN)self_7313781)->elements[0])->fn), Cyc_fast_sub(data,&local_7321960, ((closureN)self_7313781)->elements[2], Cyc_fast_mul(data,&local_7321964, ((closureN)self_7313781)->elements[1], r_736318)));;
++complex_num_type local_7320664;
++return_direct_with_clo1(data, ((closureN)self_7312528)->elements[0], (((closure) ((closureN)self_7312528)->elements[0])->fn), Cyc_fast_sub(data,&local_7320660, ((closureN)self_7312528)->elements[2], Cyc_fast_mul(data,&local_7320664, ((closureN)self_7312528)->elements[1], r_735866)));;
+ }
+
+-static void __lambda_798(void *data, object _, int argc, object *args) /* closure _,object k_736308, object n_731240_733535, object m_731241_733536 */
++static void __lambda_798(void *data, object _, int argc, object *args) /* closure _,object k_735856, object n_731240_733188, object m_731241_733189 */
+ {
+-object k_736308 = args[0]; object n_731240_733535 = args[1]; object m_731241_733536 = args[2];
+- object r_736310;
++object k_735856 = args[0]; object n_731240_733188 = args[1]; object m_731241_733189 = args[2];
++ object r_735858;
+ Cyc_st_add(data, "scheme/base.sld:floor-quotient");
+- object local_7321930 = alloca(sizeof(complex_num_type));
++ object local_7320630 = alloca(sizeof(complex_num_type));
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321930, n_731240_733535)) ){
+- object local_7321934 = alloca(sizeof(complex_num_type));
+- r_736310 = ((inline_function_type)
+- ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321934, m_731241_733536);
++ ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320630, n_731240_733188)) ){
++ object local_7320634 = alloca(sizeof(complex_num_type));
++ r_735858 = ((inline_function_type)
++ ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320634, m_731241_733189);
+ } else {
+- r_736310 = boolean_f;}
+-;if( (boolean_f != r_736310) ){
++ r_735858 = boolean_f;}
++;if( (boolean_f != r_735858) ){
+
+-complex_num_type local_7321939;
++complex_num_type local_7320639;
+
+-complex_num_type local_7321942;
++complex_num_type local_7320642;
+
+-complex_num_type local_7321945;
+-return_direct_with_clo1(data, k_736308, (((closure) k_736308)->fn), ((inline_function_type)
+- ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321939, ((inline_function_type)
+- ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7321942, Cyc_fast_div(data,&local_7321945, n_731240_733535, m_731241_733536))));
++complex_num_type local_7320645;
++return_direct_with_clo1(data, k_735856, (((closure) k_735856)->fn), ((inline_function_type)
++ ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7320639, ((inline_function_type)
++ ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7320642, Cyc_fast_div(data,&local_7320645, n_731240_733188, m_731241_733189))));
+ } else {
+
+-complex_num_type local_7321949;
++complex_num_type local_7320649;
+
+-complex_num_type local_7321952;
+-return_direct_with_clo1(data, k_736308, (((closure) k_736308)->fn), ((inline_function_type)
+- ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7321949, Cyc_fast_div(data,&local_7321952, n_731240_733535, m_731241_733536)));}
++complex_num_type local_7320652;
++return_direct_with_clo1(data, k_735856, (((closure) k_735856)->fn), ((inline_function_type)
++ ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7320649, Cyc_fast_div(data,&local_7320652, n_731240_733188, m_731241_733189)));}
+ ;;
+ }
+
+-static void __lambda_795(void *data, object _, int argc, object *args) /* closure _,object k_736303, object n_731238_733533, object m_731239_733534 */
++static void __lambda_795(void *data, object _, int argc, object *args) /* closure _,object k_735851, object n_731238_733186, object m_731239_733187 */
+ {
+-object k_736303 = args[0]; object n_731238_733533 = args[1]; object m_731239_733534 = args[2];
++object k_735851 = args[0]; object n_731238_733186 = args[1]; object m_731239_733187 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:truncate/");
+
+-closureN_type c_7321916;
+-object e_7321925 [3];
+-c_7321916.hdr.mark = gc_color_red;
+- c_7321916.hdr.grayed = 0;
+-c_7321916.tag = closureN_tag;
+- c_7321916.fn = (function_type)__lambda_796;
+-c_7321916.num_args = 1;
+-c_7321916.num_elements = 3;
+-c_7321916.elements = (object *)e_7321925;
+-c_7321916.elements[0] = k_736303;
+-c_7321916.elements[1] = m_731239_733534;
+-c_7321916.elements[2] = n_731238_733533;
++closureN_type c_7320616;
++object e_7320625 [3];
++c_7320616.hdr.mark = gc_color_red;
++ c_7320616.hdr.grayed = 0;
++c_7320616.tag = closureN_tag;
++ c_7320616.fn = (function_type)__lambda_796;
++c_7320616.num_args = 1;
++c_7320616.num_elements = 3;
++c_7320616.elements = (object *)e_7320625;
++c_7320616.elements[0] = k_735851;
++c_7320616.elements[1] = m_731239_733187;
++c_7320616.elements[2] = n_731238_733186;
+
+-return_direct_with_clo3(data, __glo_truncate_91quotient_scheme_base, (((closure) __glo_truncate_91quotient_scheme_base)->fn), &c_7321916, n_731238_733533, m_731239_733534);;
++return_direct_with_clo3(data, __glo_truncate_91quotient_scheme_base, (((closure) __glo_truncate_91quotient_scheme_base)->fn), &c_7320616, n_731238_733186, m_731239_733187);;
+ }
+
+-static void __lambda_796(void *data, object self_7313779, int argc, object *args) /* object self_7313779, object r_736304 */
++static void __lambda_796(void *data, object self_7312526, int argc, object *args) /* object self_7312526, object r_735852 */
+ {
+- object r_736304 = args[0];
++ object r_735852 = args[0];
+
+-closureN_type c_7321918;
+-object e_7321922 [2];
+-c_7321918.hdr.mark = gc_color_red;
+- c_7321918.hdr.grayed = 0;
+-c_7321918.tag = closureN_tag;
+- c_7321918.fn = (function_type)__lambda_797;
+-c_7321918.num_args = 1;
+-c_7321918.num_elements = 2;
+-c_7321918.elements = (object *)e_7321922;
+-c_7321918.elements[0] = ((closureN)self_7313779)->elements[0];
+-c_7321918.elements[1] = r_736304;
++closureN_type c_7320618;
++object e_7320622 [2];
++c_7320618.hdr.mark = gc_color_red;
++ c_7320618.hdr.grayed = 0;
++c_7320618.tag = closureN_tag;
++ c_7320618.fn = (function_type)__lambda_797;
++c_7320618.num_args = 1;
++c_7320618.num_elements = 2;
++c_7320618.elements = (object *)e_7320622;
++c_7320618.elements[0] = ((closureN)self_7312526)->elements[0];
++c_7320618.elements[1] = r_735852;
+
+-return_direct_with_clo3(data, __glo_truncate_91remainder_scheme_base, (((closure) __glo_truncate_91remainder_scheme_base)->fn), &c_7321918, ((closureN)self_7313779)->elements[2], ((closureN)self_7313779)->elements[1]);;
++return_direct_with_clo3(data, __glo_truncate_91remainder_scheme_base, (((closure) __glo_truncate_91remainder_scheme_base)->fn), &c_7320618, ((closureN)self_7312526)->elements[2], ((closureN)self_7312526)->elements[1]);;
+ }
+
+-static void __lambda_797(void *data, object self_7313780, int argc, object *args) /* object self_7313780, object r_736305 */
++static void __lambda_797(void *data, object self_7312527, int argc, object *args) /* object self_7312527, object r_735853 */
+ {
+- object r_736305 = args[0];
+- return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), ((closureN)self_7313780)->elements[0], ((closureN)self_7313780)->elements[1], r_736305);;
++ object r_735853 = args[0];
++ return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), ((closureN)self_7312527)->elements[0], ((closureN)self_7312527)->elements[1], r_735853);;
+ }
+
+-static object __lambda_1496(void *data, object ptr,object x_731235_733531, object y_731236_733532) {
++static object __lambda_1449(void *data, object ptr,object x_731235_733184, object y_731236_733185) {
+
+- object r_736291;
++ object r_735839;
+ Cyc_st_add(data, "scheme/base.sld:quotient");
+- object local_7321891 = alloca(sizeof(complex_num_type));
++ object local_7320591 = alloca(sizeof(complex_num_type));
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321891, x_731235_733531)) ){
+- object local_7321895 = alloca(sizeof(complex_num_type));
+- r_736291 = ((inline_function_type)
+- ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321895, y_731236_733532);
++ ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320591, x_731235_733184)) ){
++ object local_7320595 = alloca(sizeof(complex_num_type));
++ r_735839 = ((inline_function_type)
++ ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320595, y_731236_733185);
+ } else {
+- r_736291 = boolean_f;}
+-;if( (boolean_f != r_736291) ){
++ r_735839 = boolean_f;}
++;if( (boolean_f != r_735839) ){
+
+-complex_num_type local_7321900;
++complex_num_type local_7320600;
+
+-complex_num_type local_7321903;
++complex_num_type local_7320603;
+
+-complex_num_type local_7321906;
++complex_num_type local_7320606;
+ return_copy(ptr, ((inline_function_type)
+- ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321900, ((inline_function_type)
+- ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321903, Cyc_fast_div(data,&local_7321906, x_731235_733531, y_731236_733532))));
++ ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7320600, ((inline_function_type)
++ ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320603, Cyc_fast_div(data,&local_7320606, x_731235_733184, y_731236_733185))));
+ } else {
+
+-complex_num_type local_7321910;
++complex_num_type local_7320610;
+
+-complex_num_type local_7321913;
++complex_num_type local_7320613;
+ return_copy(ptr, ((inline_function_type)
+- ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321910, Cyc_fast_div(data,&local_7321913, x_731235_733531, y_731236_733532)));}
++ ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320610, Cyc_fast_div(data,&local_7320613, x_731235_733184, y_731236_733185)));}
+ ;;
+ }
+
+-static void __lambda_794(void *data, object _, int argc, object *args) /* closure _,object k_736290, object x_731235_733531, object y_731236_733532 */
++static void __lambda_794(void *data, object _, int argc, object *args) /* closure _,object k_735838, object x_731235_733184, object y_731236_733185 */
+ {
+-object k_736290 = args[0]; object x_731235_733531 = args[1]; object y_731236_733532 = args[2];
+- object r_736291;
++object k_735838 = args[0]; object x_731235_733184 = args[1]; object y_731236_733185 = args[2];
++ object r_735839;
+ Cyc_st_add(data, "scheme/base.sld:quotient");
+- object local_7321864 = alloca(sizeof(complex_num_type));
++ object local_7320564 = alloca(sizeof(complex_num_type));
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321864, x_731235_733531)) ){
+- object local_7321868 = alloca(sizeof(complex_num_type));
+- r_736291 = ((inline_function_type)
+- ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321868, y_731236_733532);
++ ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320564, x_731235_733184)) ){
++ object local_7320568 = alloca(sizeof(complex_num_type));
++ r_735839 = ((inline_function_type)
++ ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320568, y_731236_733185);
+ } else {
+- r_736291 = boolean_f;}
+-;if( (boolean_f != r_736291) ){
++ r_735839 = boolean_f;}
++;if( (boolean_f != r_735839) ){
+
+-complex_num_type local_7321873;
++complex_num_type local_7320573;
+
+-complex_num_type local_7321876;
++complex_num_type local_7320576;
+
+-complex_num_type local_7321879;
+-return_direct_with_clo1(data, k_736290, (((closure) k_736290)->fn), ((inline_function_type)
+- ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321873, ((inline_function_type)
+- ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321876, Cyc_fast_div(data,&local_7321879, x_731235_733531, y_731236_733532))));
++complex_num_type local_7320579;
++return_direct_with_clo1(data, k_735838, (((closure) k_735838)->fn), ((inline_function_type)
++ ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7320573, ((inline_function_type)
++ ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320576, Cyc_fast_div(data,&local_7320579, x_731235_733184, y_731236_733185))));
+ } else {
+
+-complex_num_type local_7321883;
++complex_num_type local_7320583;
+
+-complex_num_type local_7321886;
+-return_direct_with_clo1(data, k_736290, (((closure) k_736290)->fn), ((inline_function_type)
+- ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321883, Cyc_fast_div(data,&local_7321886, x_731235_733531, y_731236_733532)));}
++complex_num_type local_7320586;
++return_direct_with_clo1(data, k_735838, (((closure) k_735838)->fn), ((inline_function_type)
++ ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320583, Cyc_fast_div(data,&local_7320586, x_731235_733184, y_731236_733185)));}
+ ;;
+ }
+
+-static object __lambda_1495(void *data, object ptr, object obj) { return obj_is_int(obj) ? boolean_t : boolean_f; }
+-static void __lambda_1494(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k,
++static object __lambda_1448(void *data, object ptr, object obj) { return obj_is_int(obj) ? boolean_t : boolean_f; }
++static void __lambda_1447(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k,
+ obj_is_int(obj) ? boolean_t : boolean_f); }
+-static void __lambda_1493(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 0); }
+-static void __lambda_1492(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 1); }
+-static void __lambda_793(void *data, object _, int argc, object *args) /* closure _,object k_736283, object nums_731234_733530_raw, ... */
++static void __lambda_1446(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 0); }
++static void __lambda_1445(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 1); }
++static void __lambda_793(void *data, object _, int argc, object *args) /* closure _,object k_735831, object nums_731234_733183_raw, ... */
+ {
+-object k_736283 = args[0];
+-load_varargs(nums_731234_733530, args, 1, argc - 1);
++object k_735831 = args[0];
++load_varargs(nums_731234_733183, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:lcm/entry");
+
+-if( (boolean_f != Cyc_eqv(nums_731234_733530, NULL)) ){
+- return_direct_with_clo1(data, k_736283, (((closure) k_736283)->fn), obj_int2obj(1));
++if( (boolean_f != Cyc_eqv(nums_731234_733183, NULL)) ){
++ return_direct_with_clo1(data, k_735831, (((closure) k_735831)->fn), obj_int2obj(1));
+ } else {
+
+
+
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_736283, __glo_lcm_95main_scheme_base, Cyc_car(data, nums_731234_733530), Cyc_cdr(data, nums_731234_733530));}
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_735831, __glo_lcm_95main_scheme_base, Cyc_car(data, nums_731234_733183), Cyc_cdr(data, nums_731234_733183));}
+ ;;
+ }
+
+-static void __lambda_791(void *data, object _, int argc, object *args) /* closure _,object k_736277, object a_731232_733528, object b_731233_733529 */
++static void __lambda_791(void *data, object _, int argc, object *args) /* closure _,object k_735825, object a_731232_733181, object b_731233_733182 */
+ {
+-object k_736277 = args[0]; object a_731232_733528 = args[1]; object b_731233_733529 = args[2];
++object k_735825 = args[0]; object a_731232_733181 = args[1]; object b_731233_733182 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:lcm/main");
+
+-closureN_type c_7321835;
+-object e_7321846 [3];
+-c_7321835.hdr.mark = gc_color_red;
+- c_7321835.hdr.grayed = 0;
+-c_7321835.tag = closureN_tag;
+- c_7321835.fn = (function_type)__lambda_792;
+-c_7321835.num_args = 1;
+-c_7321835.num_elements = 3;
+-c_7321835.elements = (object *)e_7321846;
+-c_7321835.elements[0] = a_731232_733528;
+-c_7321835.elements[1] = b_731233_733529;
+-c_7321835.elements[2] = k_736277;
++closureN_type c_7320535;
++object e_7320546 [3];
++c_7320535.hdr.mark = gc_color_red;
++ c_7320535.hdr.grayed = 0;
++c_7320535.tag = closureN_tag;
++ c_7320535.fn = (function_type)__lambda_792;
++c_7320535.num_args = 1;
++c_7320535.num_elements = 3;
++c_7320535.elements = (object *)e_7320546;
++c_7320535.elements[0] = a_731232_733181;
++c_7320535.elements[1] = b_731233_733182;
++c_7320535.elements[2] = k_735825;
+
+-return_direct_with_clo3(data, __glo_gcd_95main_scheme_base, (((closure) __glo_gcd_95main_scheme_base)->fn), &c_7321835, a_731232_733528, b_731233_733529);;
++return_direct_with_clo3(data, __glo_gcd_95main_scheme_base, (((closure) __glo_gcd_95main_scheme_base)->fn), &c_7320535, a_731232_733181, b_731233_733182);;
+ }
+
+-static void __lambda_792(void *data, object self_7313778, int argc, object *args) /* object self_7313778, object r_736280 */
++static void __lambda_792(void *data, object self_7312525, int argc, object *args) /* object self_7312525, object r_735828 */
+ {
+- object r_736280 = args[0];
++ object r_735828 = args[0];
+
+-complex_num_type local_7321840;
++complex_num_type local_7320540;
+
+-complex_num_type local_7321843;
+-return_direct_with_clo2(data, __glo_abs_scheme_base, (((closure) __glo_abs_scheme_base)->fn), ((closureN)self_7313778)->elements[2], Cyc_fast_div(data,&local_7321840, Cyc_fast_mul(data,&local_7321843, ((closureN)self_7313778)->elements[0], ((closureN)self_7313778)->elements[1]), r_736280));;
++complex_num_type local_7320543;
++return_direct_with_clo2(data, __glo_abs_scheme_base, (((closure) __glo_abs_scheme_base)->fn), ((closureN)self_7312525)->elements[2], Cyc_fast_div(data,&local_7320540, Cyc_fast_mul(data,&local_7320543, ((closureN)self_7312525)->elements[0], ((closureN)self_7312525)->elements[1]), r_735828));;
+ }
+
+-static void __lambda_790(void *data, object _, int argc, object *args) /* closure _,object k_736270, object nums_731231_733527_raw, ... */
++static void __lambda_790(void *data, object _, int argc, object *args) /* closure _,object k_735818, object nums_731231_733180_raw, ... */
+ {
+-object k_736270 = args[0];
+-load_varargs(nums_731231_733527, args, 1, argc - 1);
++object k_735818 = args[0];
++load_varargs(nums_731231_733180, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:gcd/entry");
+
+-if( (boolean_f != Cyc_eqv(nums_731231_733527, NULL)) ){
+- return_direct_with_clo1(data, k_736270, (((closure) k_736270)->fn), obj_int2obj(0));
++if( (boolean_f != Cyc_eqv(nums_731231_733180, NULL)) ){
++ return_direct_with_clo1(data, k_735818, (((closure) k_735818)->fn), obj_int2obj(0));
+ } else {
+
+
+
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_736270, __glo_gcd_95main_scheme_base, Cyc_car(data, nums_731231_733527), Cyc_cdr(data, nums_731231_733527));}
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_735818, __glo_gcd_95main_scheme_base, Cyc_car(data, nums_731231_733180), Cyc_cdr(data, nums_731231_733180));}
+ ;;
+ }
+
+-static void __lambda_788(void *data, object _, int argc, object *args) /* closure _,object k_736265, object a_731229_733525, object b_731230_733526 */
++static void __lambda_788(void *data, object _, int argc, object *args) /* closure _,object k_735813, object a_731229_733178, object b_731230_733179 */
+ {
+-object k_736265 = args[0]; object a_731229_733525 = args[1]; object b_731230_733526 = args[2];
++object k_735813 = args[0]; object a_731229_733178 = args[1]; object b_731230_733179 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:gcd/main");
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, b_731230_733526, obj_int2obj(0))) ){
+- return_direct_with_clo2(data, __glo_abs_scheme_base, (((closure) __glo_abs_scheme_base)->fn), k_736265, a_731229_733525);
++if( (boolean_f != Cyc_num_fast_eq_op(data, b_731230_733179, obj_int2obj(0))) ){
++ return_direct_with_clo2(data, __glo_abs_scheme_base, (((closure) __glo_abs_scheme_base)->fn), k_735813, a_731229_733178);
+ } else {
+
+-closureN_type c_7321819;
+-object e_7321823 [2];
+-c_7321819.hdr.mark = gc_color_red;
+- c_7321819.hdr.grayed = 0;
+-c_7321819.tag = closureN_tag;
+- c_7321819.fn = (function_type)__lambda_789;
+-c_7321819.num_args = 1;
+-c_7321819.num_elements = 2;
+-c_7321819.elements = (object *)e_7321823;
+-c_7321819.elements[0] = b_731230_733526;
+-c_7321819.elements[1] = k_736265;
++closureN_type c_7320519;
++object e_7320523 [2];
++c_7320519.hdr.mark = gc_color_red;
++ c_7320519.hdr.grayed = 0;
++c_7320519.tag = closureN_tag;
++ c_7320519.fn = (function_type)__lambda_789;
++c_7320519.num_args = 1;
++c_7320519.num_elements = 2;
++c_7320519.elements = (object *)e_7320523;
++c_7320519.elements[0] = b_731230_733179;
++c_7320519.elements[1] = k_735813;
+
+-return_direct_with_clo3(data, __glo_modulo_scheme_base, (((closure) __glo_modulo_scheme_base)->fn), &c_7321819, a_731229_733525, b_731230_733526);}
++return_direct_with_clo3(data, __glo_modulo_scheme_base, (((closure) __glo_modulo_scheme_base)->fn), &c_7320519, a_731229_733178, b_731230_733179);}
+ ;;
+ }
+
+-static void __lambda_789(void *data, object self_7313777, int argc, object *args) /* object self_7313777, object r_736267 */
++static void __lambda_789(void *data, object self_7312524, int argc, object *args) /* object self_7312524, object r_735815 */
+ {
+- object r_736267 = args[0];
+- return_direct_with_clo3(data, __glo_gcd_95main_scheme_base, (((closure) __glo_gcd_95main_scheme_base)->fn), ((closureN)self_7313777)->elements[1], ((closureN)self_7313777)->elements[0], r_736267);;
++ object r_735815 = args[0];
++ return_direct_with_clo3(data, __glo_gcd_95main_scheme_base, (((closure) __glo_gcd_95main_scheme_base)->fn), ((closureN)self_7312524)->elements[1], ((closureN)self_7312524)->elements[0], r_735815);;
+ }
+
+-static void __lambda_785(void *data, object _, int argc, object *args) /* closure _,object k_736255, object first_731225_733521, object rest_731226_733522_raw, ... */
++static void __lambda_785(void *data, object _, int argc, object *args) /* closure _,object k_735803, object first_731225_733174, object rest_731226_733175_raw, ... */
+ {
+-object k_736255 = args[0]; object first_731225_733521 = args[1];
+-load_varargs(rest_731226_733522, args, 2, argc - 2);
++object k_735803 = args[0]; object first_731225_733174 = args[1];
++load_varargs(rest_731226_733175, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:min");
+
+-closureN_type c_7321803;
+-object e_7321808 [3];
+-c_7321803.hdr.mark = gc_color_red;
+- c_7321803.hdr.grayed = 0;
+-c_7321803.tag = closureN_tag;
+- c_7321803.fn = (function_type)__lambda_786;
+-c_7321803.num_args = 1;
+-c_7321803.num_elements = 3;
+-c_7321803.elements = (object *)e_7321808;
+-c_7321803.elements[0] = first_731225_733521;
+-c_7321803.elements[1] = k_736255;
+-c_7321803.elements[2] = rest_731226_733522;
++closureN_type c_7320503;
++object e_7320508 [3];
++c_7320503.hdr.mark = gc_color_red;
++ c_7320503.hdr.grayed = 0;
++c_7320503.tag = closureN_tag;
++ c_7320503.fn = (function_type)__lambda_786;
++c_7320503.num_args = 1;
++c_7320503.num_elements = 3;
++c_7320503.elements = (object *)e_7320508;
++c_7320503.elements[0] = first_731225_733174;
++c_7320503.elements[1] = k_735803;
++c_7320503.elements[2] = rest_731226_733175;
+
+
+-mclosure0(c_7321809, (function_type)__lambda_787);c_7321809.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7321803,__lambda_786, &c_7321809);;
++mclosure0(c_7320509, (function_type)__lambda_787);c_7320509.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7320503,__lambda_786, &c_7320509);;
+ }
+
+-static void __lambda_787(void *data, object self_7313775, int argc, object *args) /* object self_7313775, object k_736257, object old_731227_733523, object new_731228_733524 */
++static void __lambda_787(void *data, object self_7312522, int argc, object *args) /* object self_7312522, object k_735805, object old_731227_733176, object new_731228_733177 */
+ {
+- object k_736257 = args[0]; object old_731227_733523 = args[1]; object new_731228_733524 = args[2];
++ object k_735805 = args[0]; object old_731227_733176 = args[1]; object new_731228_733177 = args[2];
+
+-if( (boolean_f != Cyc_num_fast_lt_op(data, old_731227_733523, new_731228_733524)) ){
+- return_direct_with_clo1(data, k_736257, (((closure) k_736257)->fn), old_731227_733523);
++if( (boolean_f != Cyc_num_fast_lt_op(data, old_731227_733176, new_731228_733177)) ){
++ return_direct_with_clo1(data, k_735805, (((closure) k_735805)->fn), old_731227_733176);
+ } else {
+- return_direct_with_clo1(data, k_736257, (((closure) k_736257)->fn), new_731228_733524);}
++ return_direct_with_clo1(data, k_735805, (((closure) k_735805)->fn), new_731228_733177);}
+ ;;
+ }
+
+-static void __lambda_786(void *data, object self_7313776, int argc, object *args) /* object self_7313776, object r_736256 */
++static void __lambda_786(void *data, object self_7312523, int argc, object *args) /* object self_7312523, object r_735804 */
+ {
+- object r_736256 = args[0];
+- return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7313776)->elements[1], r_736256, ((closureN)self_7313776)->elements[0], ((closureN)self_7313776)->elements[2]);;
++ object r_735804 = args[0];
++ return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7312523)->elements[1], r_735804, ((closureN)self_7312523)->elements[0], ((closureN)self_7312523)->elements[2]);;
+ }
+
+-static void __lambda_782(void *data, object _, int argc, object *args) /* closure _,object k_736249, object first_731221_733517, object rest_731222_733518_raw, ... */
++static void __lambda_782(void *data, object _, int argc, object *args) /* closure _,object k_735797, object first_731221_733170, object rest_731222_733171_raw, ... */
+ {
+-object k_736249 = args[0]; object first_731221_733517 = args[1];
+-load_varargs(rest_731222_733518, args, 2, argc - 2);
++object k_735797 = args[0]; object first_731221_733170 = args[1];
++load_varargs(rest_731222_733171, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:max");
+
+-closureN_type c_7321790;
+-object e_7321795 [3];
+-c_7321790.hdr.mark = gc_color_red;
+- c_7321790.hdr.grayed = 0;
+-c_7321790.tag = closureN_tag;
+- c_7321790.fn = (function_type)__lambda_783;
+-c_7321790.num_args = 1;
+-c_7321790.num_elements = 3;
+-c_7321790.elements = (object *)e_7321795;
+-c_7321790.elements[0] = first_731221_733517;
+-c_7321790.elements[1] = k_736249;
+-c_7321790.elements[2] = rest_731222_733518;
++closureN_type c_7320490;
++object e_7320495 [3];
++c_7320490.hdr.mark = gc_color_red;
++ c_7320490.hdr.grayed = 0;
++c_7320490.tag = closureN_tag;
++ c_7320490.fn = (function_type)__lambda_783;
++c_7320490.num_args = 1;
++c_7320490.num_elements = 3;
++c_7320490.elements = (object *)e_7320495;
++c_7320490.elements[0] = first_731221_733170;
++c_7320490.elements[1] = k_735797;
++c_7320490.elements[2] = rest_731222_733171;
+
+
+-mclosure0(c_7321796, (function_type)__lambda_784);c_7321796.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7321790,__lambda_783, &c_7321796);;
++mclosure0(c_7320496, (function_type)__lambda_784);c_7320496.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7320490,__lambda_783, &c_7320496);;
+ }
+
+-static void __lambda_784(void *data, object self_7313773, int argc, object *args) /* object self_7313773, object k_736251, object old_731223_733519, object new_731224_733520 */
++static void __lambda_784(void *data, object self_7312520, int argc, object *args) /* object self_7312520, object k_735799, object old_731223_733172, object new_731224_733173 */
+ {
+- object k_736251 = args[0]; object old_731223_733519 = args[1]; object new_731224_733520 = args[2];
++ object k_735799 = args[0]; object old_731223_733172 = args[1]; object new_731224_733173 = args[2];
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, old_731223_733519, new_731224_733520)) ){
+- return_direct_with_clo1(data, k_736251, (((closure) k_736251)->fn), old_731223_733519);
++if( (boolean_f != Cyc_num_fast_gt_op(data, old_731223_733172, new_731224_733173)) ){
++ return_direct_with_clo1(data, k_735799, (((closure) k_735799)->fn), old_731223_733172);
+ } else {
+- return_direct_with_clo1(data, k_736251, (((closure) k_736251)->fn), new_731224_733520);}
++ return_direct_with_clo1(data, k_735799, (((closure) k_735799)->fn), new_731224_733173);}
+ ;;
+ }
+
+-static void __lambda_783(void *data, object self_7313774, int argc, object *args) /* object self_7313774, object r_736250 */
++static void __lambda_783(void *data, object self_7312521, int argc, object *args) /* object self_7312521, object r_735798 */
+ {
+- object r_736250 = args[0];
+- return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7313774)->elements[1], r_736250, ((closureN)self_7313774)->elements[0], ((closureN)self_7313774)->elements[2]);;
++ object r_735798 = args[0];
++ return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7312521)->elements[1], r_735798, ((closureN)self_7312521)->elements[0], ((closureN)self_7312521)->elements[2]);;
+ }
+
+-static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_736246, object x_731219_733515, object y_731220_733516 */
++static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_735794, object x_731219_733168, object y_731220_733169 */
+ {
+-object k_736246 = args[0]; object x_731219_733515 = args[1]; object y_731220_733516 = args[2];
++object k_735794 = args[0]; object x_731219_733168 = args[1]; object y_731220_733169 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:rationalize");
+
+-complex_num_type local_7321787;
+-return_direct_with_clo1(data, k_736246, (((closure) k_736246)->fn), Cyc_fast_div(data,&local_7321787, x_731219_733515, y_731220_733516));;
++complex_num_type local_7320487;
++return_direct_with_clo1(data, k_735794, (((closure) k_735794)->fn), Cyc_fast_div(data,&local_7320487, x_731219_733168, y_731220_733169));;
+ }
+
+-static object __lambda_1491(void *data, object ptr, object z) { return Cyc_is_complex(z); }
+-static void __lambda_1490(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_closcall1(data, k, Cyc_is_complex(z)); }
+-static void __lambda_780(void *data, object _, int argc, object *args) /* closure _,object k_736240, object num_731218_733514 */
++static object __lambda_1444(void *data, object ptr, object z) { return Cyc_is_complex(z); }
++static void __lambda_1443(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_closcall1(data, k, Cyc_is_complex(z)); }
++static void __lambda_780(void *data, object _, int argc, object *args) /* closure _,object k_735788, object num_731218_733167 */
+ {
+-object k_736240 = args[0]; object num_731218_733514 = args[1];
++object k_735788 = args[0]; object num_731218_733167 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:inexact?");
+- complex_num_type local_7321778;
++ complex_num_type local_7320478;
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7321778, num_731218_733514)) ){
+- return_direct_with_clo1(data, k_736240, (((closure) k_736240)->fn), boolean_f);
++ ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7320478, num_731218_733167)) ){
++ return_direct_with_clo1(data, k_735788, (((closure) k_735788)->fn), boolean_f);
+ } else {
+- return_direct_with_clo1(data, k_736240, (((closure) k_736240)->fn), boolean_t);}
++ return_direct_with_clo1(data, k_735788, (((closure) k_735788)->fn), boolean_t);}
+ ;;
+ }
+
+-static object __lambda_1489(void *data, object ptr, object num) { Cyc_check_num(data, num);
++static object __lambda_1442(void *data, object ptr, object num) { Cyc_check_num(data, num);
+ if (obj_is_int(num) || type_of(num) == integer_tag
+ || type_of(num) == bignum_tag)
+ return boolean_t;
+ return boolean_f; }
+-static void __lambda_1488(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; Cyc_check_num(data, num);
++static void __lambda_1441(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; Cyc_check_num(data, num);
+ if (obj_is_int(num) || type_of(num) == integer_tag
+ || type_of(num) == bignum_tag)
+ return_closcall1(data, k, boolean_t);
+ return_closcall1(data, k, boolean_f); }
+-static object __lambda_1487(void *data, object ptr, object num) { if (obj_is_int(num) || (num != NULL && !is_value_type(num) &&
++static object __lambda_1440(void *data, object ptr, object num) { if (obj_is_int(num) || (num != NULL && !is_value_type(num) &&
+ (type_of(num) == integer_tag ||
+ type_of(num) == bignum_tag)))
+ return boolean_t;
+ return boolean_f; }
+-static void __lambda_1486(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; if (obj_is_int(num) || (num != NULL && !is_value_type(num) &&
++static void __lambda_1439(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; if (obj_is_int(num) || (num != NULL && !is_value_type(num) &&
+ (type_of(num) == integer_tag ||
+ type_of(num) == bignum_tag)))
+ return_closcall1(data, k, boolean_t);
+ return_closcall1(data, k, boolean_f); }
+-static object __lambda_1485(void *data, object ptr, object z) { return_inexact_double_op_no_cps(data, ptr, sqrt, z); }
+-static void __lambda_1484(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_inexact_double_op(data, k, sqrt, z); }
+-static void __lambda_774(void *data, object _, int argc, object *args) /* closure _,object k_736223, object k_731208_733511 */
++static object __lambda_1438(void *data, object ptr, object z) { return_inexact_double_op_no_cps(data, ptr, sqrt, z); }
++static void __lambda_1437(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_inexact_double_op(data, k, sqrt, z); }
++static void __lambda_774(void *data, object _, int argc, object *args) /* closure _,object k_735771, object k_731208_733164 */
+ {
+-object k_736223 = args[0]; object k_731208_733511 = args[1];
++object k_735771 = args[0]; object k_731208_733164 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:exact-integer-sqrt");
+
+-closureN_type c_7321713;
+-object e_7321733 [1];
+-c_7321713.hdr.mark = gc_color_red;
+- c_7321713.hdr.grayed = 0;
+-c_7321713.tag = closureN_tag;
+- c_7321713.fn = (function_type)__lambda_775;
+-c_7321713.num_args = 0;
+-c_7321713.num_elements = 1;
+-c_7321713.elements = (object *)e_7321733;
+-c_7321713.elements[0] = k_731208_733511;
++closureN_type c_7320413;
++object e_7320433 [1];
++c_7320413.hdr.mark = gc_color_red;
++ c_7320413.hdr.grayed = 0;
++c_7320413.tag = closureN_tag;
++ c_7320413.fn = (function_type)__lambda_775;
++c_7320413.num_args = 0;
++c_7320413.num_elements = 1;
++c_7320413.elements = (object *)e_7320433;
++c_7320413.elements[0] = k_731208_733164;
+
+
+-closureN_type c_7321734;
+-object e_7321768 [2];
+-c_7321734.hdr.mark = gc_color_red;
+- c_7321734.hdr.grayed = 0;
+-c_7321734.tag = closureN_tag;
+- c_7321734.fn = (function_type)__lambda_776;
+-c_7321734.num_args = 1;
+-c_7321734.num_elements = 2;
+-c_7321734.elements = (object *)e_7321768;
+-c_7321734.elements[0] = k_731208_733511;
+-c_7321734.elements[1] = k_736223;
++closureN_type c_7320434;
++object e_7320468 [2];
++c_7320434.hdr.mark = gc_color_red;
++ c_7320434.hdr.grayed = 0;
++c_7320434.tag = closureN_tag;
++ c_7320434.fn = (function_type)__lambda_776;
++c_7320434.num_args = 1;
++c_7320434.num_elements = 2;
++c_7320434.elements = (object *)e_7320468;
++c_7320434.elements[0] = k_731208_733164;
++c_7320434.elements[1] = k_735771;
+
+-return_direct_with_clo1(data,(closure)&c_7321713,__lambda_775, &c_7321734);;
++return_direct_with_clo1(data,(closure)&c_7320413,__lambda_775, &c_7320434);;
+ }
+
+-static void __lambda_776(void *data, object self_7313768, int argc, object *args) /* object self_7313768, object r_736224 */
++static void __lambda_776(void *data, object self_7312515, int argc, object *args) /* object self_7312515, object r_735772 */
+ {
+
+
+-closureN_type c_7321736;
+-object e_7321756 [1];
+-c_7321736.hdr.mark = gc_color_red;
+- c_7321736.hdr.grayed = 0;
+-c_7321736.tag = closureN_tag;
+- c_7321736.fn = (function_type)__lambda_777;
+-c_7321736.num_args = 0;
+-c_7321736.num_elements = 1;
+-c_7321736.elements = (object *)e_7321756;
+-c_7321736.elements[0] = ((closureN)self_7313768)->elements[0];
++closureN_type c_7320436;
++object e_7320456 [1];
++c_7320436.hdr.mark = gc_color_red;
++ c_7320436.hdr.grayed = 0;
++c_7320436.tag = closureN_tag;
++ c_7320436.fn = (function_type)__lambda_777;
++c_7320436.num_args = 0;
++c_7320436.num_elements = 1;
++c_7320436.elements = (object *)e_7320456;
++c_7320436.elements[0] = ((closureN)self_7312515)->elements[0];
+
+
+-closureN_type c_7321757;
+-object e_7321767 [2];
+-c_7321757.hdr.mark = gc_color_red;
+- c_7321757.hdr.grayed = 0;
+-c_7321757.tag = closureN_tag;
+- c_7321757.fn = (function_type)__lambda_779;
+-c_7321757.num_args = 1;
+-c_7321757.num_elements = 2;
+-c_7321757.elements = (object *)e_7321767;
+-c_7321757.elements[0] = ((closureN)self_7313768)->elements[0];
+-c_7321757.elements[1] = ((closureN)self_7313768)->elements[1];
++closureN_type c_7320457;
++object e_7320467 [2];
++c_7320457.hdr.mark = gc_color_red;
++ c_7320457.hdr.grayed = 0;
++c_7320457.tag = closureN_tag;
++ c_7320457.fn = (function_type)__lambda_779;
++c_7320457.num_args = 1;
++c_7320457.num_elements = 2;
++c_7320457.elements = (object *)e_7320467;
++c_7320457.elements[0] = ((closureN)self_7312515)->elements[0];
++c_7320457.elements[1] = ((closureN)self_7312515)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7321736,__lambda_777, &c_7321757);;
++return_direct_with_clo1(data,(closure)&c_7320436,__lambda_777, &c_7320457);;
+ }
+
+-static void __lambda_779(void *data, object self_7313769, int argc, object *args) /* object self_7313769, object s_731213_733512 */
++static void __lambda_779(void *data, object self_7312516, int argc, object *args) /* object self_7312516, object s_731213_733165 */
+ {
+- object s_731213_733512 = args[0];
++ object s_731213_733165 = args[0];
+
+-complex_num_type local_7321762;
++complex_num_type local_7320462;
+
+-complex_num_type local_7321766;
+-return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), ((closureN)self_7313769)->elements[1], s_731213_733512, Cyc_fast_sub(data,&local_7321762, ((closureN)self_7313769)->elements[0], Cyc_fast_mul(data,&local_7321766, s_731213_733512, s_731213_733512)));;
++complex_num_type local_7320466;
++return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), ((closureN)self_7312516)->elements[1], s_731213_733165, Cyc_fast_sub(data,&local_7320462, ((closureN)self_7312516)->elements[0], Cyc_fast_mul(data,&local_7320466, s_731213_733165, s_731213_733165)));;
+ }
+
+-static void __lambda_777(void *data, object self_7313770, int argc, object *args) /* object self_7313770, object k_736228 */
++static void __lambda_777(void *data, object self_7312517, int argc, object *args) /* object self_7312517, object k_735776 */
+ {
+- object k_736228 = args[0];
++ object k_735776 = args[0];
+
+-closureN_type c_7321738;
+-object e_7321754 [2];
+-c_7321738.hdr.mark = gc_color_red;
+- c_7321738.hdr.grayed = 0;
+-c_7321738.tag = closureN_tag;
+- c_7321738.fn = (function_type)__lambda_778;
+-c_7321738.num_args = 1;
+-c_7321738.num_elements = 2;
+-c_7321738.elements = (object *)e_7321754;
+-c_7321738.elements[0] = ((closureN)self_7313770)->elements[0];
+-c_7321738.elements[1] = k_736228;
++closureN_type c_7320438;
++object e_7320454 [2];
++c_7320438.hdr.mark = gc_color_red;
++ c_7320438.hdr.grayed = 0;
++c_7320438.tag = closureN_tag;
++ c_7320438.fn = (function_type)__lambda_778;
++c_7320438.num_args = 1;
++c_7320438.num_elements = 2;
++c_7320438.elements = (object *)e_7320454;
++c_7320438.elements[0] = ((closureN)self_7312517)->elements[0];
++c_7320438.elements[1] = k_735776;
+
+-return_direct_with_clo2(data, __glo_bignum_127_scheme_base, (((closure) __glo_bignum_127_scheme_base)->fn), &c_7321738, ((closureN)self_7313770)->elements[0]);;
++return_direct_with_clo2(data, __glo_bignum_127_scheme_base, (((closure) __glo_bignum_127_scheme_base)->fn), &c_7320438, ((closureN)self_7312517)->elements[0]);;
+ }
+
+-static void __lambda_778(void *data, object self_7313771, int argc, object *args) /* object self_7313771, object r_736229 */
++static void __lambda_778(void *data, object self_7312518, int argc, object *args) /* object self_7312518, object r_735777 */
+ {
+- object r_736229 = args[0];
+- if( (boolean_f != r_736229) ){
+- return_direct_with_clo2(data, __glo_bignum_91sqrt_scheme_base, (((closure) __glo_bignum_91sqrt_scheme_base)->fn), ((closureN)self_7313771)->elements[1], ((closureN)self_7313771)->elements[0]);
++ object r_735777 = args[0];
++ if( (boolean_f != r_735777) ){
++ return_direct_with_clo2(data, __glo_bignum_91sqrt_scheme_base, (((closure) __glo_bignum_91sqrt_scheme_base)->fn), ((closureN)self_7312518)->elements[1], ((closureN)self_7312518)->elements[0]);
+ } else {
+
+-complex_num_type local_7321746;
++complex_num_type local_7320446;
+
+-complex_num_type local_7321749;
++complex_num_type local_7320449;
+
+-complex_num_type local_7321752;
+-return_direct_with_clo1(data, ((closureN)self_7313771)->elements[1], (((closure) ((closureN)self_7313771)->elements[1])->fn), ((inline_function_type)
+- ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321746, ((inline_function_type)
+- ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321749, ((inline_function_type)
+- ((closure)__glo_sqrt_191_191inline_191_191_scheme_base)->fn)(data,&local_7321752, ((closureN)self_7313771)->elements[0]))));}
++complex_num_type local_7320452;
++return_direct_with_clo1(data, ((closureN)self_7312518)->elements[1], (((closure) ((closureN)self_7312518)->elements[1])->fn), ((inline_function_type)
++ ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7320446, ((inline_function_type)
++ ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320449, ((inline_function_type)
++ ((closure)__glo_sqrt_191_191inline_191_191_scheme_base)->fn)(data,&local_7320452, ((closureN)self_7312518)->elements[0]))));}
+ ;;
+ }
+
+-static void __lambda_775(void *data, object self_7313772, int argc, object *args) /* object self_7313772, object k_736232 */
++static void __lambda_775(void *data, object self_7312519, int argc, object *args) /* object self_7312519, object k_735780 */
+ {
+- object k_736232 = args[0];
+- object r_736233;
+- object local_7321717 = alloca(sizeof(complex_num_type));
++ object k_735780 = args[0];
++ object r_735781;
++ object local_7320417 = alloca(sizeof(complex_num_type));
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321717, ((closureN)self_7313772)->elements[0])) ){
++ ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320417, ((closureN)self_7312519)->elements[0])) ){
+
+-if( (boolean_f != Cyc_is_integer(((closureN)self_7313772)->elements[0])) ){
++if( (boolean_f != Cyc_is_integer(((closureN)self_7312519)->elements[0])) ){
+
+-if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7313772)->elements[0], obj_int2obj(0))) ){
+- r_736233 = boolean_f;
++if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7312519)->elements[0], obj_int2obj(0))) ){
++ r_735781 = boolean_f;
+ } else {
+- r_736233 = boolean_t;}
++ r_735781 = boolean_t;}
+ ;
+ } else {
+- r_736233 = boolean_f;}
++ r_735781 = boolean_f;}
+ ;
+ } else {
+- r_736233 = boolean_f;}
+-;if( (boolean_f != r_736233) ){
+- return_direct_with_clo1(data, k_736232, (((closure) k_736232)->fn), Cyc_VOID);
++ r_735781 = boolean_f;}
++;if( (boolean_f != r_735781) ){
++ return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), Cyc_VOID);
+ } else {
+
+-make_utf8_string_with_len(c_7321731, "exact non-negative integer required", 35, 35);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_736232, &c_7321731, ((closureN)self_7313772)->elements[0]);}
++make_utf8_string_with_len(c_7320431, "exact non-negative integer required", 35, 35);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_735780, &c_7320431, ((closureN)self_7312519)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_1483(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; alloc_bignum(data, bn);
++static void __lambda_1436(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; alloc_bignum(data, bn);
+ if (MP_OKAY != mp_sqrt(&(bignum_value(obj)), &bignum_value(bn))) {
+ Cyc_rt_raise2(data, "Error computing sqrt", obj);
+ }
+ return_closcall1(data, k, bn); }
+-static void __lambda_1482(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, Cyc_is_bignum(obj)); }
+-static void __lambda_772(void *data, object _, int argc, object *args) /* closure _,object k_736218, object num_731207_733510 */
++static void __lambda_1435(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, Cyc_is_bignum(obj)); }
++static void __lambda_772(void *data, object _, int argc, object *args) /* closure _,object k_735766, object num_731207_733163 */
+ {
+-object k_736218 = args[0]; object num_731207_733510 = args[1];
++object k_735766 = args[0]; object num_731207_733163 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:even?");
+
+-if( (boolean_f != Cyc_is_integer(num_731207_733510)) ){
++if( (boolean_f != Cyc_is_integer(num_731207_733163)) ){
+
+-closureN_type c_7321701;
+-object e_7321706 [1];
+-c_7321701.hdr.mark = gc_color_red;
+- c_7321701.hdr.grayed = 0;
+-c_7321701.tag = closureN_tag;
+- c_7321701.fn = (function_type)__lambda_773;
+-c_7321701.num_args = 1;
+-c_7321701.num_elements = 1;
+-c_7321701.elements = (object *)e_7321706;
+-c_7321701.elements[0] = k_736218;
++closureN_type c_7320401;
++object e_7320406 [1];
++c_7320401.hdr.mark = gc_color_red;
++ c_7320401.hdr.grayed = 0;
++c_7320401.tag = closureN_tag;
++ c_7320401.fn = (function_type)__lambda_773;
++c_7320401.num_args = 1;
++c_7320401.num_elements = 1;
++c_7320401.elements = (object *)e_7320406;
++c_7320401.elements[0] = k_735766;
+
+-return_direct_with_clo3(data, __glo_modulo_scheme_base, (((closure) __glo_modulo_scheme_base)->fn), &c_7321701, num_731207_733510, obj_int2obj(2));
++return_direct_with_clo3(data, __glo_modulo_scheme_base, (((closure) __glo_modulo_scheme_base)->fn), &c_7320401, num_731207_733163, obj_int2obj(2));
+ } else {
+
+-make_utf8_string_with_len(c_7321708, "Not an integer", 14, 14);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_736218, &c_7321708, num_731207_733510);}
++make_utf8_string_with_len(c_7320408, "Not an integer", 14, 14);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_735766, &c_7320408, num_731207_733163);}
+ ;;
+ }
+
+-static void __lambda_773(void *data, object self_7313767, int argc, object *args) /* object self_7313767, object r_736220 */
++static void __lambda_773(void *data, object self_7312514, int argc, object *args) /* object self_7312514, object r_735768 */
+ {
+- object r_736220 = args[0];
++ object r_735768 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313767)->elements[0], (((closure) ((closureN)self_7313767)->elements[0])->fn), Cyc_num_fast_eq_op(data, r_736220, obj_int2obj(0)));;
++return_direct_with_clo1(data, ((closureN)self_7312514)->elements[0], (((closure) ((closureN)self_7312514)->elements[0])->fn), Cyc_num_fast_eq_op(data, r_735768, obj_int2obj(0)));;
+ }
+
+-static void __lambda_770(void *data, object _, int argc, object *args) /* closure _,object k_736213, object num_731206_733509 */
++static void __lambda_770(void *data, object _, int argc, object *args) /* closure _,object k_735761, object num_731206_733162 */
+ {
+-object k_736213 = args[0]; object num_731206_733509 = args[1];
++object k_735761 = args[0]; object num_731206_733162 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:odd?");
+
+-if( (boolean_f != Cyc_is_integer(num_731206_733509)) ){
++if( (boolean_f != Cyc_is_integer(num_731206_733162)) ){
+
+-closureN_type c_7321689;
+-object e_7321694 [1];
+-c_7321689.hdr.mark = gc_color_red;
+- c_7321689.hdr.grayed = 0;
+-c_7321689.tag = closureN_tag;
+- c_7321689.fn = (function_type)__lambda_771;
+-c_7321689.num_args = 1;
+-c_7321689.num_elements = 1;
+-c_7321689.elements = (object *)e_7321694;
+-c_7321689.elements[0] = k_736213;
++closureN_type c_7320389;
++object e_7320394 [1];
++c_7320389.hdr.mark = gc_color_red;
++ c_7320389.hdr.grayed = 0;
++c_7320389.tag = closureN_tag;
++ c_7320389.fn = (function_type)__lambda_771;
++c_7320389.num_args = 1;
++c_7320389.num_elements = 1;
++c_7320389.elements = (object *)e_7320394;
++c_7320389.elements[0] = k_735761;
+
+-return_direct_with_clo3(data, __glo_modulo_scheme_base, (((closure) __glo_modulo_scheme_base)->fn), &c_7321689, num_731206_733509, obj_int2obj(2));
++return_direct_with_clo3(data, __glo_modulo_scheme_base, (((closure) __glo_modulo_scheme_base)->fn), &c_7320389, num_731206_733162, obj_int2obj(2));
+ } else {
+
+-make_utf8_string_with_len(c_7321696, "Not an integer", 14, 14);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_736213, &c_7321696, num_731206_733509);}
++make_utf8_string_with_len(c_7320396, "Not an integer", 14, 14);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_735761, &c_7320396, num_731206_733162);}
+ ;;
+ }
+
+-static void __lambda_771(void *data, object self_7313766, int argc, object *args) /* object self_7313766, object r_736215 */
++static void __lambda_771(void *data, object self_7312513, int argc, object *args) /* object self_7312513, object r_735763 */
+ {
+- object r_736215 = args[0];
++ object r_735763 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313766)->elements[0], (((closure) ((closureN)self_7313766)->elements[0])->fn), Cyc_num_fast_eq_op(data, r_736215, obj_int2obj(1)));;
++return_direct_with_clo1(data, ((closureN)self_7312513)->elements[0], (((closure) ((closureN)self_7312513)->elements[0])->fn), Cyc_num_fast_eq_op(data, r_735763, obj_int2obj(1)));;
+ }
+
+-static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_736206, object a_731203_733506, object b_731204_733507 */
++static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_735754, object a_731203_733159, object b_731204_733160 */
+ {
+-object k_736206 = args[0]; object a_731203_733506 = args[1]; object b_731204_733507 = args[2];
++object k_735754 = args[0]; object a_731203_733159 = args[1]; object b_731204_733160 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:modulo");
+
+-closureN_type c_7321660;
+-object e_7321684 [2];
+-c_7321660.hdr.mark = gc_color_red;
+- c_7321660.hdr.grayed = 0;
+-c_7321660.tag = closureN_tag;
+- c_7321660.fn = (function_type)__lambda_769;
+-c_7321660.num_args = 1;
+-c_7321660.num_elements = 2;
+-c_7321660.elements = (object *)e_7321684;
+-c_7321660.elements[0] = b_731204_733507;
+-c_7321660.elements[1] = k_736206;
++closureN_type c_7320360;
++object e_7320384 [2];
++c_7320360.hdr.mark = gc_color_red;
++ c_7320360.hdr.grayed = 0;
++c_7320360.tag = closureN_tag;
++ c_7320360.fn = (function_type)__lambda_769;
++c_7320360.num_args = 1;
++c_7320360.num_elements = 2;
++c_7320360.elements = (object *)e_7320384;
++c_7320360.elements[0] = b_731204_733160;
++c_7320360.elements[1] = k_735754;
+
+-return_direct_with_clo3(data, __glo_remainder_scheme_base, (((closure) __glo_remainder_scheme_base)->fn), &c_7321660, a_731203_733506, b_731204_733507);;
++return_direct_with_clo3(data, __glo_remainder_scheme_base, (((closure) __glo_remainder_scheme_base)->fn), &c_7320360, a_731203_733159, b_731204_733160);;
+ }
+
+-static void __lambda_769(void *data, object self_7313765, int argc, object *args) /* object self_7313765, object res_731205_733508 */
++static void __lambda_769(void *data, object self_7312512, int argc, object *args) /* object self_7312512, object res_731205_733161 */
+ {
+- object res_731205_733508 = args[0];
++ object res_731205_733161 = args[0];
+
+-if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7313765)->elements[0], obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7312512)->elements[0], obj_int2obj(0))) ){
+
+-if( (boolean_f != Cyc_num_fast_lte_op(data, res_731205_733508, obj_int2obj(0))) ){
+- return_direct_with_clo1(data, ((closureN)self_7313765)->elements[1], (((closure) ((closureN)self_7313765)->elements[1])->fn), res_731205_733508);
++if( (boolean_f != Cyc_num_fast_lte_op(data, res_731205_733161, obj_int2obj(0))) ){
++ return_direct_with_clo1(data, ((closureN)self_7312512)->elements[1], (((closure) ((closureN)self_7312512)->elements[1])->fn), res_731205_733161);
+ } else {
+
+-complex_num_type local_7321672;
+-return_direct_with_clo1(data, ((closureN)self_7313765)->elements[1], (((closure) ((closureN)self_7313765)->elements[1])->fn), Cyc_fast_sum(data,&local_7321672, res_731205_733508, ((closureN)self_7313765)->elements[0]));}
++complex_num_type local_7320372;
++return_direct_with_clo1(data, ((closureN)self_7312512)->elements[1], (((closure) ((closureN)self_7312512)->elements[1])->fn), Cyc_fast_sum(data,&local_7320372, res_731205_733161, ((closureN)self_7312512)->elements[0]));}
+ ;
+ } else {
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, res_731205_733508, obj_int2obj(0))) ){
+- return_direct_with_clo1(data, ((closureN)self_7313765)->elements[1], (((closure) ((closureN)self_7313765)->elements[1])->fn), res_731205_733508);
++if( (boolean_f != Cyc_num_fast_gte_op(data, res_731205_733161, obj_int2obj(0))) ){
++ return_direct_with_clo1(data, ((closureN)self_7312512)->elements[1], (((closure) ((closureN)self_7312512)->elements[1])->fn), res_731205_733161);
+ } else {
+
+-complex_num_type local_7321682;
+-return_direct_with_clo1(data, ((closureN)self_7313765)->elements[1], (((closure) ((closureN)self_7313765)->elements[1])->fn), Cyc_fast_sum(data,&local_7321682, res_731205_733508, ((closureN)self_7313765)->elements[0]));}
++complex_num_type local_7320382;
++return_direct_with_clo1(data, ((closureN)self_7312512)->elements[1], (((closure) ((closureN)self_7312512)->elements[1])->fn), Cyc_fast_sum(data,&local_7320382, res_731205_733161, ((closureN)self_7312512)->elements[0]));}
+ ;}
+ ;;
+ }
+
+-static void __lambda_1481(void *data, object _, int argc, object *args) {object k = args[0];object num1 = args[1];object num2 = args[2]; Cyc_remainder(data, k, num1, num2); }
+-static void __lambda_1480(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; Cyc_check_num(data, num);
++static void __lambda_1434(void *data, object _, int argc, object *args) {object k = args[0];object num1 = args[1];object num2 = args[2]; Cyc_remainder(data, k, num1, num2); }
++static void __lambda_1433(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; Cyc_check_num(data, num);
+ if (obj_is_int(num)) {
+ return_closcall1(data, k, obj_int2obj( labs( obj_obj2int(num))));
+ } else if (is_object_type(num) && type_of(num) == bignum_tag){
+@@ -21344,2114 +19547,2114 @@ static void __lambda_1480(void *data, ob
+ make_double(d, fabs(((double_type *)num)->value));
+ return_closcall1(data, k, &d);
+ } }
+-static object __lambda_1479(void *data, object ptr, object z) { return_inexact_double_or_cplx_op_no_cps(data, ptr, (double), (double complex), z); }
+-static void __lambda_1478(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_inexact_double_or_cplx_op(data, k, (double), (double complex), z); }
+-static object __lambda_1477(void *data, object ptr, object z) { return Cyc_exact_no_cps(data, ptr, z); }
+-static void __lambda_1476(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; Cyc_exact(data, k, z); }
+-static object __lambda_1475(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, round_to_nearest_even, z); }
+-static void __lambda_1474(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, round_to_nearest_even, z); }
+-static object __lambda_1473(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, trunc, z); }
+-static void __lambda_1472(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, trunc, z); }
+-static object __lambda_1471(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, ceil, z); }
+-static void __lambda_1470(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, ceil, z); }
+-static object __lambda_1469(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, floor, z); }
+-static void __lambda_1468(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, floor, z); }
+-static void __lambda_762(void *data, object _, int argc, object *args) /* closure _,object k_736196, object pred_731190_733501, object lst_731191_733502 */
++static object __lambda_1432(void *data, object ptr, object z) { return_inexact_double_or_cplx_op_no_cps(data, ptr, (double), (double complex), z); }
++static void __lambda_1431(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_inexact_double_or_cplx_op(data, k, (double), (double complex), z); }
++static object __lambda_1430(void *data, object ptr, object z) { return Cyc_exact_no_cps(data, ptr, z); }
++static void __lambda_1429(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; Cyc_exact(data, k, z); }
++static object __lambda_1428(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, round_to_nearest_even, z); }
++static void __lambda_1427(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, round_to_nearest_even, z); }
++static object __lambda_1426(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, trunc, z); }
++static void __lambda_1425(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, trunc, z); }
++static object __lambda_1424(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, ceil, z); }
++static void __lambda_1423(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, ceil, z); }
++static object __lambda_1422(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, floor, z); }
++static void __lambda_1421(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, floor, z); }
++static void __lambda_762(void *data, object _, int argc, object *args) /* closure _,object k_735744, object pred_731190_733154, object lst_731191_733155 */
+ {
+-object k_736196 = args[0]; object pred_731190_733501 = args[1]; object lst_731191_733502 = args[2];
++object k_735744 = args[0]; object pred_731190_733154 = args[1]; object lst_731191_733155 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:every");
+
+-closureN_type c_7321604;
+-object e_7321643 [1];
+-c_7321604.hdr.mark = gc_color_red;
+- c_7321604.hdr.grayed = 0;
+-c_7321604.tag = closureN_tag;
+- c_7321604.fn = (function_type)__lambda_763;
+-c_7321604.num_args = 1;
+-c_7321604.num_elements = 1;
+-c_7321604.elements = (object *)e_7321643;
+-c_7321604.elements[0] = k_736196;
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7321604, pred_731190_733501, lst_731191_733502);;
+-}
+-
+-static void __lambda_763(void *data, object self_7313759, int argc, object *args) /* object self_7313759, object l_731193_733503 */
+- {
+- object l_731193_733503 = args[0];
+-
+-closureN_type c_7321606;
+-object e_7321642 [2];
+-c_7321606.hdr.mark = gc_color_red;
+- c_7321606.hdr.grayed = 0;
+-c_7321606.tag = closureN_tag;
+- c_7321606.fn = (function_type)__lambda_764;
+-c_7321606.num_args = 1;
+-c_7321606.num_elements = 2;
+-c_7321606.elements = (object *)e_7321642;
+-c_7321606.elements[0] = ((closureN)self_7313759)->elements[0];
+-c_7321606.elements[1] = l_731193_733503;
++closureN_type c_7320304;
++object e_7320343 [1];
++c_7320304.hdr.mark = gc_color_red;
++ c_7320304.hdr.grayed = 0;
++c_7320304.tag = closureN_tag;
++ c_7320304.fn = (function_type)__lambda_763;
++c_7320304.num_args = 1;
++c_7320304.num_elements = 1;
++c_7320304.elements = (object *)e_7320343;
++c_7320304.elements[0] = k_735744;
++
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7320304, pred_731190_733154, lst_731191_733155);;
++}
++
++static void __lambda_763(void *data, object self_7312506, int argc, object *args) /* object self_7312506, object l_731193_733156 */
++ {
++ object l_731193_733156 = args[0];
++
++closureN_type c_7320306;
++object e_7320342 [2];
++c_7320306.hdr.mark = gc_color_red;
++ c_7320306.hdr.grayed = 0;
++c_7320306.tag = closureN_tag;
++ c_7320306.fn = (function_type)__lambda_764;
++c_7320306.num_args = 1;
++c_7320306.num_elements = 2;
++c_7320306.elements = (object *)e_7320342;
++c_7320306.elements[0] = ((closureN)self_7312506)->elements[0];
++c_7320306.elements[1] = l_731193_733156;
+
+-return_direct_with_clo1(data,(closure)&c_7321606,__lambda_764, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7320306,__lambda_764, boolean_f);;
+ }
+
+-static void __lambda_764(void *data, object self_7313760, int argc, object *args) /* object self_7313760, object every_85_731194_733504 */
++static void __lambda_764(void *data, object self_7312507, int argc, object *args) /* object self_7312507, object every_85_731194_733157 */
+ {
+- object every_85_731194_733504 = args[0];
++ object every_85_731194_733157 = args[0];
+
+-closureN_type c_7321608;
+-object e_7321638 [2];
+-c_7321608.hdr.mark = gc_color_red;
+- c_7321608.hdr.grayed = 0;
+-c_7321608.tag = closureN_tag;
+- c_7321608.fn = (function_type)__lambda_1423;
+-c_7321608.num_args = 1;
+-c_7321608.num_elements = 2;
+-c_7321608.elements = (object *)e_7321638;
+-c_7321608.elements[0] = ((closureN)self_7313760)->elements[0];
+-c_7321608.elements[1] = ((closureN)self_7313760)->elements[1];
++closureN_type c_7320308;
++object e_7320338 [2];
++c_7320308.hdr.mark = gc_color_red;
++ c_7320308.hdr.grayed = 0;
++c_7320308.tag = closureN_tag;
++ c_7320308.fn = (function_type)__lambda_1376;
++c_7320308.num_args = 1;
++c_7320308.num_elements = 2;
++c_7320308.elements = (object *)e_7320338;
++c_7320308.elements[0] = ((closureN)self_7312507)->elements[0];
++c_7320308.elements[1] = ((closureN)self_7312507)->elements[1];
+
+
+-pair_type local_7321641;
+-return_direct_with_clo1(data,(closure)&c_7321608,__lambda_1423, set_cell_as_expr(&local_7321641, every_85_731194_733504));;
++pair_type local_7320341;
++return_direct_with_clo1(data,(closure)&c_7320308,__lambda_1376, set_cell_as_expr(&local_7320341, every_85_731194_733157));;
+ }
+
+-static void __lambda_1423(void *data, object self_7313761, int argc, object *args) /* object self_7313761, object every_85_731194_733504 */
++static void __lambda_1376(void *data, object self_7312508, int argc, object *args) /* object self_7312508, object every_85_731194_733157 */
+ {
+- object every_85_731194_733504 = args[0];
++ object every_85_731194_733157 = args[0];
+
+-closureN_type c_7321610;
+-object e_7321623 [3];
+-c_7321610.hdr.mark = gc_color_red;
+- c_7321610.hdr.grayed = 0;
+-c_7321610.tag = closureN_tag;
+- c_7321610.fn = (function_type)__lambda_765;
+-c_7321610.num_args = 1;
+-c_7321610.num_elements = 3;
+-c_7321610.elements = (object *)e_7321623;
+-c_7321610.elements[0] = every_85_731194_733504;
+-c_7321610.elements[1] = ((closureN)self_7313761)->elements[0];
+-c_7321610.elements[2] = ((closureN)self_7313761)->elements[1];
++closureN_type c_7320310;
++object e_7320323 [3];
++c_7320310.hdr.mark = gc_color_red;
++ c_7320310.hdr.grayed = 0;
++c_7320310.tag = closureN_tag;
++ c_7320310.fn = (function_type)__lambda_765;
++c_7320310.num_args = 1;
++c_7320310.num_elements = 3;
++c_7320310.elements = (object *)e_7320323;
++c_7320310.elements[0] = every_85_731194_733157;
++c_7320310.elements[1] = ((closureN)self_7312508)->elements[0];
++c_7320310.elements[2] = ((closureN)self_7312508)->elements[1];
+
+
+-closureN_type c_7321624;
+-object e_7321637 [1];
+-c_7321624.hdr.mark = gc_color_red;
+- c_7321624.hdr.grayed = 0;
+-c_7321624.tag = closureN_tag;
+- c_7321624.fn = (function_type)__lambda_767;
+-c_7321624.num_args = 1;
+-c_7321624.num_elements = 1;
+-c_7321624.elements = (object *)e_7321637;
+-c_7321624.elements[0] = every_85_731194_733504;
++closureN_type c_7320324;
++object e_7320337 [1];
++c_7320324.hdr.mark = gc_color_red;
++ c_7320324.hdr.grayed = 0;
++c_7320324.tag = closureN_tag;
++ c_7320324.fn = (function_type)__lambda_767;
++c_7320324.num_args = 1;
++c_7320324.num_elements = 1;
++c_7320324.elements = (object *)e_7320337;
++c_7320324.elements[0] = every_85_731194_733157;
+
+-return_direct_with_clo1(data,(closure)&c_7321610,__lambda_765, &c_7321624);;
++return_direct_with_clo1(data,(closure)&c_7320310,__lambda_765, &c_7320324);;
+ }
+
+-static void __lambda_767(void *data, object self_7313762, int argc, object *args) /* object self_7313762, object k_736200, object l_731195_733505 */
++static void __lambda_767(void *data, object self_7312509, int argc, object *args) /* object self_7312509, object k_735748, object l_731195_733158 */
+ {
+- object k_736200 = args[0]; object l_731195_733505 = args[1];
++ object k_735748 = args[0]; object l_731195_733158 = args[1];
+
+-if( (boolean_f != Cyc_is_null(l_731195_733505)) ){
+- return_direct_with_clo1(data, k_736200, (((closure) k_736200)->fn), boolean_t);
++if( (boolean_f != Cyc_is_null(l_731195_733158)) ){
++ return_direct_with_clo1(data, k_735748, (((closure) k_735748)->fn), boolean_t);
+ } else {
+
+-if( (boolean_f != Cyc_car(data, l_731195_733505)) ){
++if( (boolean_f != Cyc_car(data, l_731195_733158)) ){
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313762)->elements[0]), k_736200, Cyc_cdr(data, l_731195_733505));
++return_closcall2(data, car(((closureN)self_7312509)->elements[0]), k_735748, Cyc_cdr(data, l_731195_733158));
+ } else {
+- return_direct_with_clo1(data, k_736200, (((closure) k_736200)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735748, (((closure) k_735748)->fn), boolean_f);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_765(void *data, object self_7313763, int argc, object *args) /* object self_7313763, object r_736199 */
++static void __lambda_765(void *data, object self_7312510, int argc, object *args) /* object self_7312510, object r_735747 */
+ {
+- object r_736199 = args[0];
++ object r_735747 = args[0];
+
+-closureN_type c_7321612;
+-object e_7321619 [3];
+-c_7321612.hdr.mark = gc_color_red;
+- c_7321612.hdr.grayed = 0;
+-c_7321612.tag = closureN_tag;
+- c_7321612.fn = (function_type)__lambda_766;
+-c_7321612.num_args = 1;
+-c_7321612.num_elements = 3;
+-c_7321612.elements = (object *)e_7321619;
+-c_7321612.elements[0] = ((closureN)self_7313763)->elements[0];
+-c_7321612.elements[1] = ((closureN)self_7313763)->elements[1];
+-c_7321612.elements[2] = ((closureN)self_7313763)->elements[2];
++closureN_type c_7320312;
++object e_7320319 [3];
++c_7320312.hdr.mark = gc_color_red;
++ c_7320312.hdr.grayed = 0;
++c_7320312.tag = closureN_tag;
++ c_7320312.fn = (function_type)__lambda_766;
++c_7320312.num_args = 1;
++c_7320312.num_elements = 3;
++c_7320312.elements = (object *)e_7320319;
++c_7320312.elements[0] = ((closureN)self_7312510)->elements[0];
++c_7320312.elements[1] = ((closureN)self_7312510)->elements[1];
++c_7320312.elements[2] = ((closureN)self_7312510)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321612,__lambda_766, Cyc_set_cell(data, ((closureN)self_7313763)->elements[0], r_736199));;
++return_direct_with_clo1(data,(closure)&c_7320312,__lambda_766, Cyc_set_cell(data, ((closureN)self_7312510)->elements[0], r_735747));;
+ }
+
+-static void __lambda_766(void *data, object self_7313764, int argc, object *args) /* object self_7313764, object r_736198 */
++static void __lambda_766(void *data, object self_7312511, int argc, object *args) /* object self_7312511, object r_735746 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313764)->elements[0]), ((closureN)self_7313764)->elements[1], ((closureN)self_7313764)->elements[2]);;
++return_closcall2(data, car(((closureN)self_7312511)->elements[0]), ((closureN)self_7312511)->elements[1], ((closureN)self_7312511)->elements[2]);;
+ }
+
+-static void __lambda_756(void *data, object _, int argc, object *args) /* closure _,object k_736186, object pred_731177_733496, object lst_731178_733497 */
++static void __lambda_756(void *data, object _, int argc, object *args) /* closure _,object k_735734, object pred_731177_733149, object lst_731178_733150 */
+ {
+-object k_736186 = args[0]; object pred_731177_733496 = args[1]; object lst_731178_733497 = args[2];
++object k_735734 = args[0]; object pred_731177_733149 = args[1]; object lst_731178_733150 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:any");
+
+-closureN_type c_7321562;
+-object e_7321601 [1];
+-c_7321562.hdr.mark = gc_color_red;
+- c_7321562.hdr.grayed = 0;
+-c_7321562.tag = closureN_tag;
+- c_7321562.fn = (function_type)__lambda_757;
+-c_7321562.num_args = 1;
+-c_7321562.num_elements = 1;
+-c_7321562.elements = (object *)e_7321601;
+-c_7321562.elements[0] = k_736186;
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7321562, pred_731177_733496, lst_731178_733497);;
+-}
+-
+-static void __lambda_757(void *data, object self_7313753, int argc, object *args) /* object self_7313753, object l_731180_733498 */
+- {
+- object l_731180_733498 = args[0];
+-
+-closureN_type c_7321564;
+-object e_7321600 [2];
+-c_7321564.hdr.mark = gc_color_red;
+- c_7321564.hdr.grayed = 0;
+-c_7321564.tag = closureN_tag;
+- c_7321564.fn = (function_type)__lambda_758;
+-c_7321564.num_args = 1;
+-c_7321564.num_elements = 2;
+-c_7321564.elements = (object *)e_7321600;
+-c_7321564.elements[0] = ((closureN)self_7313753)->elements[0];
+-c_7321564.elements[1] = l_731180_733498;
+-
+-return_direct_with_clo1(data,(closure)&c_7321564,__lambda_758, boolean_f);;
+-}
+-
+-static void __lambda_758(void *data, object self_7313754, int argc, object *args) /* object self_7313754, object any_85_731181_733499 */
+- {
+- object any_85_731181_733499 = args[0];
+-
+-closureN_type c_7321566;
+-object e_7321596 [2];
+-c_7321566.hdr.mark = gc_color_red;
+- c_7321566.hdr.grayed = 0;
+-c_7321566.tag = closureN_tag;
+- c_7321566.fn = (function_type)__lambda_1422;
+-c_7321566.num_args = 1;
+-c_7321566.num_elements = 2;
+-c_7321566.elements = (object *)e_7321596;
+-c_7321566.elements[0] = ((closureN)self_7313754)->elements[0];
+-c_7321566.elements[1] = ((closureN)self_7313754)->elements[1];
+-
+-
+-pair_type local_7321599;
+-return_direct_with_clo1(data,(closure)&c_7321566,__lambda_1422, set_cell_as_expr(&local_7321599, any_85_731181_733499));;
+-}
+-
+-static void __lambda_1422(void *data, object self_7313755, int argc, object *args) /* object self_7313755, object any_85_731181_733499 */
+- {
+- object any_85_731181_733499 = args[0];
+-
+-closureN_type c_7321568;
+-object e_7321581 [3];
+-c_7321568.hdr.mark = gc_color_red;
+- c_7321568.hdr.grayed = 0;
+-c_7321568.tag = closureN_tag;
+- c_7321568.fn = (function_type)__lambda_759;
+-c_7321568.num_args = 1;
+-c_7321568.num_elements = 3;
+-c_7321568.elements = (object *)e_7321581;
+-c_7321568.elements[0] = any_85_731181_733499;
+-c_7321568.elements[1] = ((closureN)self_7313755)->elements[0];
+-c_7321568.elements[2] = ((closureN)self_7313755)->elements[1];
++closureN_type c_7320262;
++object e_7320301 [1];
++c_7320262.hdr.mark = gc_color_red;
++ c_7320262.hdr.grayed = 0;
++c_7320262.tag = closureN_tag;
++ c_7320262.fn = (function_type)__lambda_757;
++c_7320262.num_args = 1;
++c_7320262.num_elements = 1;
++c_7320262.elements = (object *)e_7320301;
++c_7320262.elements[0] = k_735734;
++
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7320262, pred_731177_733149, lst_731178_733150);;
++}
++
++static void __lambda_757(void *data, object self_7312500, int argc, object *args) /* object self_7312500, object l_731180_733151 */
++ {
++ object l_731180_733151 = args[0];
++
++closureN_type c_7320264;
++object e_7320300 [2];
++c_7320264.hdr.mark = gc_color_red;
++ c_7320264.hdr.grayed = 0;
++c_7320264.tag = closureN_tag;
++ c_7320264.fn = (function_type)__lambda_758;
++c_7320264.num_args = 1;
++c_7320264.num_elements = 2;
++c_7320264.elements = (object *)e_7320300;
++c_7320264.elements[0] = ((closureN)self_7312500)->elements[0];
++c_7320264.elements[1] = l_731180_733151;
++
++return_direct_with_clo1(data,(closure)&c_7320264,__lambda_758, boolean_f);;
++}
++
++static void __lambda_758(void *data, object self_7312501, int argc, object *args) /* object self_7312501, object any_85_731181_733152 */
++ {
++ object any_85_731181_733152 = args[0];
++
++closureN_type c_7320266;
++object e_7320296 [2];
++c_7320266.hdr.mark = gc_color_red;
++ c_7320266.hdr.grayed = 0;
++c_7320266.tag = closureN_tag;
++ c_7320266.fn = (function_type)__lambda_1375;
++c_7320266.num_args = 1;
++c_7320266.num_elements = 2;
++c_7320266.elements = (object *)e_7320296;
++c_7320266.elements[0] = ((closureN)self_7312501)->elements[0];
++c_7320266.elements[1] = ((closureN)self_7312501)->elements[1];
++
++
++pair_type local_7320299;
++return_direct_with_clo1(data,(closure)&c_7320266,__lambda_1375, set_cell_as_expr(&local_7320299, any_85_731181_733152));;
++}
++
++static void __lambda_1375(void *data, object self_7312502, int argc, object *args) /* object self_7312502, object any_85_731181_733152 */
++ {
++ object any_85_731181_733152 = args[0];
++
++closureN_type c_7320268;
++object e_7320281 [3];
++c_7320268.hdr.mark = gc_color_red;
++ c_7320268.hdr.grayed = 0;
++c_7320268.tag = closureN_tag;
++ c_7320268.fn = (function_type)__lambda_759;
++c_7320268.num_args = 1;
++c_7320268.num_elements = 3;
++c_7320268.elements = (object *)e_7320281;
++c_7320268.elements[0] = any_85_731181_733152;
++c_7320268.elements[1] = ((closureN)self_7312502)->elements[0];
++c_7320268.elements[2] = ((closureN)self_7312502)->elements[1];
+
+
+-closureN_type c_7321582;
+-object e_7321595 [1];
+-c_7321582.hdr.mark = gc_color_red;
+- c_7321582.hdr.grayed = 0;
+-c_7321582.tag = closureN_tag;
+- c_7321582.fn = (function_type)__lambda_761;
+-c_7321582.num_args = 1;
+-c_7321582.num_elements = 1;
+-c_7321582.elements = (object *)e_7321595;
+-c_7321582.elements[0] = any_85_731181_733499;
++closureN_type c_7320282;
++object e_7320295 [1];
++c_7320282.hdr.mark = gc_color_red;
++ c_7320282.hdr.grayed = 0;
++c_7320282.tag = closureN_tag;
++ c_7320282.fn = (function_type)__lambda_761;
++c_7320282.num_args = 1;
++c_7320282.num_elements = 1;
++c_7320282.elements = (object *)e_7320295;
++c_7320282.elements[0] = any_85_731181_733152;
+
+-return_direct_with_clo1(data,(closure)&c_7321568,__lambda_759, &c_7321582);;
++return_direct_with_clo1(data,(closure)&c_7320268,__lambda_759, &c_7320282);;
+ }
+
+-static void __lambda_761(void *data, object self_7313756, int argc, object *args) /* object self_7313756, object k_736190, object l_731182_733500 */
++static void __lambda_761(void *data, object self_7312503, int argc, object *args) /* object self_7312503, object k_735738, object l_731182_733153 */
+ {
+- object k_736190 = args[0]; object l_731182_733500 = args[1];
++ object k_735738 = args[0]; object l_731182_733153 = args[1];
+
+-if( (boolean_f != Cyc_is_null(l_731182_733500)) ){
+- return_direct_with_clo1(data, k_736190, (((closure) k_736190)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(l_731182_733153)) ){
++ return_direct_with_clo1(data, k_735738, (((closure) k_735738)->fn), boolean_f);
+ } else {
+
+-if( (boolean_f != Cyc_car(data, l_731182_733500)) ){
+- return_direct_with_clo1(data, k_736190, (((closure) k_736190)->fn), boolean_t);
++if( (boolean_f != Cyc_car(data, l_731182_733153)) ){
++ return_direct_with_clo1(data, k_735738, (((closure) k_735738)->fn), boolean_t);
+ } else {
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313756)->elements[0]), k_736190, Cyc_cdr(data, l_731182_733500));}
++return_closcall2(data, car(((closureN)self_7312503)->elements[0]), k_735738, Cyc_cdr(data, l_731182_733153));}
+ ;}
+ ;;
+ }
+
+-static void __lambda_759(void *data, object self_7313757, int argc, object *args) /* object self_7313757, object r_736189 */
++static void __lambda_759(void *data, object self_7312504, int argc, object *args) /* object self_7312504, object r_735737 */
+ {
+- object r_736189 = args[0];
++ object r_735737 = args[0];
+
+-closureN_type c_7321570;
+-object e_7321577 [3];
+-c_7321570.hdr.mark = gc_color_red;
+- c_7321570.hdr.grayed = 0;
+-c_7321570.tag = closureN_tag;
+- c_7321570.fn = (function_type)__lambda_760;
+-c_7321570.num_args = 1;
+-c_7321570.num_elements = 3;
+-c_7321570.elements = (object *)e_7321577;
+-c_7321570.elements[0] = ((closureN)self_7313757)->elements[0];
+-c_7321570.elements[1] = ((closureN)self_7313757)->elements[1];
+-c_7321570.elements[2] = ((closureN)self_7313757)->elements[2];
++closureN_type c_7320270;
++object e_7320277 [3];
++c_7320270.hdr.mark = gc_color_red;
++ c_7320270.hdr.grayed = 0;
++c_7320270.tag = closureN_tag;
++ c_7320270.fn = (function_type)__lambda_760;
++c_7320270.num_args = 1;
++c_7320270.num_elements = 3;
++c_7320270.elements = (object *)e_7320277;
++c_7320270.elements[0] = ((closureN)self_7312504)->elements[0];
++c_7320270.elements[1] = ((closureN)self_7312504)->elements[1];
++c_7320270.elements[2] = ((closureN)self_7312504)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321570,__lambda_760, Cyc_set_cell(data, ((closureN)self_7313757)->elements[0], r_736189));;
++return_direct_with_clo1(data,(closure)&c_7320270,__lambda_760, Cyc_set_cell(data, ((closureN)self_7312504)->elements[0], r_735737));;
+ }
+
+-static void __lambda_760(void *data, object self_7313758, int argc, object *args) /* object self_7313758, object r_736188 */
++static void __lambda_760(void *data, object self_7312505, int argc, object *args) /* object self_7312505, object r_735736 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313758)->elements[0]), ((closureN)self_7313758)->elements[1], ((closureN)self_7313758)->elements[2]);;
++return_closcall2(data, car(((closureN)self_7312505)->elements[0]), ((closureN)self_7312505)->elements[1], ((closureN)self_7312505)->elements[2]);;
+ }
+
+-static void __lambda_742(void *data, object _, int argc, object *args) /* closure _,object k_736163, object reason_731161_733486, object expr_731162_733487, object args_731163_733488_raw, ... */
++static void __lambda_742(void *data, object _, int argc, object *args) /* closure _,object k_735711, object reason_731161_733139, object expr_731162_733140, object args_731163_733141_raw, ... */
+ {
+-object k_736163 = args[0]; object reason_731161_733486 = args[1]; object expr_731162_733487 = args[2];
+-load_varargs(args_731163_733488, args, 3, argc - 3);
++object k_735711 = args[0]; object reason_731161_733139 = args[1]; object expr_731162_733140 = args[2];
++load_varargs(args_731163_733141, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:error/loc");
+
+-closureN_type c_7321444;
+-object e_7321559 [4];
+-c_7321444.hdr.mark = gc_color_red;
+- c_7321444.hdr.grayed = 0;
+-c_7321444.tag = closureN_tag;
+- c_7321444.fn = (function_type)__lambda_743;
+-c_7321444.num_args = 1;
+-c_7321444.num_elements = 4;
+-c_7321444.elements = (object *)e_7321559;
+-c_7321444.elements[0] = args_731163_733488;
+-c_7321444.elements[1] = expr_731162_733487;
+-c_7321444.elements[2] = k_736163;
+-c_7321444.elements[3] = reason_731161_733486;
++closureN_type c_7320144;
++object e_7320259 [4];
++c_7320144.hdr.mark = gc_color_red;
++ c_7320144.hdr.grayed = 0;
++c_7320144.tag = closureN_tag;
++ c_7320144.fn = (function_type)__lambda_743;
++c_7320144.num_args = 1;
++c_7320144.num_elements = 4;
++c_7320144.elements = (object *)e_7320259;
++c_7320144.elements[0] = args_731163_733141;
++c_7320144.elements[1] = expr_731162_733140;
++c_7320144.elements[2] = k_735711;
++c_7320144.elements[3] = reason_731161_733139;
+
+-return_direct_with_clo1(data,(closure)&c_7321444,__lambda_743, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7320144,__lambda_743, boolean_f);;
+ }
+
+-static void __lambda_743(void *data, object self_7313739, int argc, object *args) /* object self_7313739, object reason_95line_91loc_127_733490 */
++static void __lambda_743(void *data, object self_7312486, int argc, object *args) /* object self_7312486, object reason_95line_91loc_127_733143 */
+ {
+- object reason_95line_91loc_127_733490 = args[0];
++ object reason_95line_91loc_127_733143 = args[0];
+
+-closureN_type c_7321446;
+-object e_7321555 [4];
+-c_7321446.hdr.mark = gc_color_red;
+- c_7321446.hdr.grayed = 0;
+-c_7321446.tag = closureN_tag;
+- c_7321446.fn = (function_type)__lambda_1421;
+-c_7321446.num_args = 1;
+-c_7321446.num_elements = 4;
+-c_7321446.elements = (object *)e_7321555;
+-c_7321446.elements[0] = ((closureN)self_7313739)->elements[0];
+-c_7321446.elements[1] = ((closureN)self_7313739)->elements[1];
+-c_7321446.elements[2] = ((closureN)self_7313739)->elements[2];
+-c_7321446.elements[3] = ((closureN)self_7313739)->elements[3];
++closureN_type c_7320146;
++object e_7320255 [4];
++c_7320146.hdr.mark = gc_color_red;
++ c_7320146.hdr.grayed = 0;
++c_7320146.tag = closureN_tag;
++ c_7320146.fn = (function_type)__lambda_1374;
++c_7320146.num_args = 1;
++c_7320146.num_elements = 4;
++c_7320146.elements = (object *)e_7320255;
++c_7320146.elements[0] = ((closureN)self_7312486)->elements[0];
++c_7320146.elements[1] = ((closureN)self_7312486)->elements[1];
++c_7320146.elements[2] = ((closureN)self_7312486)->elements[2];
++c_7320146.elements[3] = ((closureN)self_7312486)->elements[3];
+
+
+-pair_type local_7321558;
+-return_direct_with_clo1(data,(closure)&c_7321446,__lambda_1421, set_cell_as_expr(&local_7321558, reason_95line_91loc_127_733490));;
++pair_type local_7320258;
++return_direct_with_clo1(data,(closure)&c_7320146,__lambda_1374, set_cell_as_expr(&local_7320258, reason_95line_91loc_127_733143));;
+ }
+
+-static void __lambda_1421(void *data, object self_7313740, int argc, object *args) /* object self_7313740, object reason_95line_91loc_127_733490 */
++static void __lambda_1374(void *data, object self_7312487, int argc, object *args) /* object self_7312487, object reason_95line_91loc_127_733143 */
+ {
+- object reason_95line_91loc_127_733490 = args[0];
++ object reason_95line_91loc_127_733143 = args[0];
+
+-closureN_type c_7321448;
+-object e_7321539 [5];
+-c_7321448.hdr.mark = gc_color_red;
+- c_7321448.hdr.grayed = 0;
+-c_7321448.tag = closureN_tag;
+- c_7321448.fn = (function_type)__lambda_744;
+-c_7321448.num_args = 1;
+-c_7321448.num_elements = 5;
+-c_7321448.elements = (object *)e_7321539;
+-c_7321448.elements[0] = ((closureN)self_7313740)->elements[0];
+-c_7321448.elements[1] = ((closureN)self_7313740)->elements[1];
+-c_7321448.elements[2] = ((closureN)self_7313740)->elements[2];
+-c_7321448.elements[3] = ((closureN)self_7313740)->elements[3];
+-c_7321448.elements[4] = reason_95line_91loc_127_733490;
++closureN_type c_7320148;
++object e_7320239 [5];
++c_7320148.hdr.mark = gc_color_red;
++ c_7320148.hdr.grayed = 0;
++c_7320148.tag = closureN_tag;
++ c_7320148.fn = (function_type)__lambda_744;
++c_7320148.num_args = 1;
++c_7320148.num_elements = 5;
++c_7320148.elements = (object *)e_7320239;
++c_7320148.elements[0] = ((closureN)self_7312487)->elements[0];
++c_7320148.elements[1] = ((closureN)self_7312487)->elements[1];
++c_7320148.elements[2] = ((closureN)self_7312487)->elements[2];
++c_7320148.elements[3] = ((closureN)self_7312487)->elements[3];
++c_7320148.elements[4] = reason_95line_91loc_127_733143;
+
+
+-mclosure0(c_7321540, (function_type)__lambda_754);c_7321540.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7321448,__lambda_744, &c_7321540);;
++mclosure0(c_7320240, (function_type)__lambda_754);c_7320240.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7320148,__lambda_744, &c_7320240);;
+ }
+
+-static void __lambda_754(void *data, object self_7313741, int argc, object *args) /* object self_7313741, object k_736181, object reason_731164_733492 */
++static void __lambda_754(void *data, object self_7312488, int argc, object *args) /* object self_7312488, object k_735729, object reason_731164_733145 */
+ {
+- object k_736181 = args[0]; object reason_731164_733492 = args[1];
++ object k_735729 = args[0]; object reason_731164_733145 = args[1];
+
+-if( (boolean_f != Cyc_is_string(reason_731164_733492)) ){
++if( (boolean_f != Cyc_is_string(reason_731164_733145)) ){
+
+-closureN_type c_7321544;
+-object e_7321550 [1];
+-c_7321544.hdr.mark = gc_color_red;
+- c_7321544.hdr.grayed = 0;
+-c_7321544.tag = closureN_tag;
+- c_7321544.fn = (function_type)__lambda_755;
+-c_7321544.num_args = 1;
+-c_7321544.num_elements = 1;
+-c_7321544.elements = (object *)e_7321550;
+-c_7321544.elements[0] = k_736181;
++closureN_type c_7320244;
++object e_7320250 [1];
++c_7320244.hdr.mark = gc_color_red;
++ c_7320244.hdr.grayed = 0;
++c_7320244.tag = closureN_tag;
++ c_7320244.fn = (function_type)__lambda_755;
++c_7320244.num_args = 1;
++c_7320244.num_elements = 1;
++c_7320244.elements = (object *)e_7320250;
++c_7320244.elements[0] = k_735729;
+
+
+-object c_7321553 = Cyc_substring(data,(closure)&c_7321544,reason_731164_733492, obj_int2obj(0), obj_int2obj(8));
+-return_closcall1(data,(closure)&c_7321544, c_7321553);
++object c_7320253 = Cyc_substring(data,(closure)&c_7320244,reason_731164_733145, obj_int2obj(0), obj_int2obj(8));
++return_closcall1(data,(closure)&c_7320244, c_7320253);
+ } else {
+- return_direct_with_clo1(data, k_736181, (((closure) k_736181)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735729, (((closure) k_735729)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_755(void *data, object self_7313742, int argc, object *args) /* object self_7313742, object r_736183 */
++static void __lambda_755(void *data, object self_7312489, int argc, object *args) /* object self_7312489, object r_735731 */
+ {
+- object r_736183 = args[0];
++ object r_735731 = args[0];
+
+
+
+-make_utf8_string_with_len(c_7321549, "at line ", 8, 8);
+-return_direct_with_clo1(data, ((closureN)self_7313742)->elements[0], (((closure) ((closureN)self_7313742)->elements[0])->fn), equalp(r_736183, &c_7321549));;
++make_utf8_string_with_len(c_7320249, "at line ", 8, 8);
++return_direct_with_clo1(data, ((closureN)self_7312489)->elements[0], (((closure) ((closureN)self_7312489)->elements[0])->fn), equalp(r_735731, &c_7320249));;
+ }
+
+-static void __lambda_744(void *data, object self_7313743, int argc, object *args) /* object self_7313743, object r_736180 */
++static void __lambda_744(void *data, object self_7312490, int argc, object *args) /* object self_7312490, object r_735728 */
+ {
+- object r_736180 = args[0];
++ object r_735728 = args[0];
+
+-closureN_type c_7321450;
+-object e_7321535 [5];
+-c_7321450.hdr.mark = gc_color_red;
+- c_7321450.hdr.grayed = 0;
+-c_7321450.tag = closureN_tag;
+- c_7321450.fn = (function_type)__lambda_745;
+-c_7321450.num_args = 1;
+-c_7321450.num_elements = 5;
+-c_7321450.elements = (object *)e_7321535;
+-c_7321450.elements[0] = ((closureN)self_7313743)->elements[0];
+-c_7321450.elements[1] = ((closureN)self_7313743)->elements[1];
+-c_7321450.elements[2] = ((closureN)self_7313743)->elements[2];
+-c_7321450.elements[3] = ((closureN)self_7313743)->elements[3];
+-c_7321450.elements[4] = ((closureN)self_7313743)->elements[4];
++closureN_type c_7320150;
++object e_7320235 [5];
++c_7320150.hdr.mark = gc_color_red;
++ c_7320150.hdr.grayed = 0;
++c_7320150.tag = closureN_tag;
++ c_7320150.fn = (function_type)__lambda_745;
++c_7320150.num_args = 1;
++c_7320150.num_elements = 5;
++c_7320150.elements = (object *)e_7320235;
++c_7320150.elements[0] = ((closureN)self_7312490)->elements[0];
++c_7320150.elements[1] = ((closureN)self_7312490)->elements[1];
++c_7320150.elements[2] = ((closureN)self_7312490)->elements[2];
++c_7320150.elements[3] = ((closureN)self_7312490)->elements[3];
++c_7320150.elements[4] = ((closureN)self_7312490)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321450,__lambda_745, Cyc_set_cell(data, ((closureN)self_7313743)->elements[4], r_736180));;
++return_direct_with_clo1(data,(closure)&c_7320150,__lambda_745, Cyc_set_cell(data, ((closureN)self_7312490)->elements[4], r_735728));;
+ }
+
+-static void __lambda_745(void *data, object self_7313744, int argc, object *args) /* object self_7313744, object r_736164 */
++static void __lambda_745(void *data, object self_7312491, int argc, object *args) /* object self_7312491, object r_735712 */
+ {
+
+
+-closureN_type c_7321452;
+-object e_7321531 [5];
+-c_7321452.hdr.mark = gc_color_red;
+- c_7321452.hdr.grayed = 0;
+-c_7321452.tag = closureN_tag;
+- c_7321452.fn = (function_type)__lambda_746;
+-c_7321452.num_args = 1;
+-c_7321452.num_elements = 5;
+-c_7321452.elements = (object *)e_7321531;
+-c_7321452.elements[0] = ((closureN)self_7313744)->elements[0];
+-c_7321452.elements[1] = ((closureN)self_7313744)->elements[1];
+-c_7321452.elements[2] = ((closureN)self_7313744)->elements[2];
+-c_7321452.elements[3] = ((closureN)self_7313744)->elements[3];
+-c_7321452.elements[4] = ((closureN)self_7313744)->elements[4];
++closureN_type c_7320152;
++object e_7320231 [5];
++c_7320152.hdr.mark = gc_color_red;
++ c_7320152.hdr.grayed = 0;
++c_7320152.tag = closureN_tag;
++ c_7320152.fn = (function_type)__lambda_746;
++c_7320152.num_args = 1;
++c_7320152.num_elements = 5;
++c_7320152.elements = (object *)e_7320231;
++c_7320152.elements[0] = ((closureN)self_7312491)->elements[0];
++c_7320152.elements[1] = ((closureN)self_7312491)->elements[1];
++c_7320152.elements[2] = ((closureN)self_7312491)->elements[2];
++c_7320152.elements[3] = ((closureN)self_7312491)->elements[3];
++c_7320152.elements[4] = ((closureN)self_7312491)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321452,__lambda_746, assoc(data, ((closureN)self_7313744)->elements[1], __glo__85reader_91source_91db_85_scheme_cyclone_common));;
++return_direct_with_clo1(data,(closure)&c_7320152,__lambda_746, assoc(data, ((closureN)self_7312491)->elements[1], __glo__85reader_91source_91db_85_scheme_cyclone_common));;
+ }
+
+-static void __lambda_746(void *data, object self_7313745, int argc, object *args) /* object self_7313745, object found_731168_733493 */
++static void __lambda_746(void *data, object self_7312492, int argc, object *args) /* object self_7312492, object found_731168_733146 */
+ {
+- object found_731168_733493 = args[0];
+- object loc_91vec_731171_733494;
+- if( (boolean_f != found_731168_733493) ){
++ object found_731168_733146 = args[0];
++ object loc_91vec_731171_733147;
++ if( (boolean_f != found_731168_733146) ){
+
+- loc_91vec_731171_733494 = Cyc_cdr(data, found_731168_733493);
++ loc_91vec_731171_733147 = Cyc_cdr(data, found_731168_733146);
+ } else {
+- loc_91vec_731171_733494 = boolean_f;}
++ loc_91vec_731171_733147 = boolean_f;}
+ ;
+-closureN_type c_7321459;
+-object e_7321513 [3];
+-c_7321459.hdr.mark = gc_color_red;
+- c_7321459.hdr.grayed = 0;
+-c_7321459.tag = closureN_tag;
+- c_7321459.fn = (function_type)__lambda_747;
+-c_7321459.num_args = 0;
+-c_7321459.num_elements = 3;
+-c_7321459.elements = (object *)e_7321513;
+-c_7321459.elements[0] = loc_91vec_731171_733494;
+-c_7321459.elements[1] = ((closureN)self_7313745)->elements[3];
+-c_7321459.elements[2] = ((closureN)self_7313745)->elements[4];
++closureN_type c_7320159;
++object e_7320213 [3];
++c_7320159.hdr.mark = gc_color_red;
++ c_7320159.hdr.grayed = 0;
++c_7320159.tag = closureN_tag;
++ c_7320159.fn = (function_type)__lambda_747;
++c_7320159.num_args = 0;
++c_7320159.num_elements = 3;
++c_7320159.elements = (object *)e_7320213;
++c_7320159.elements[0] = loc_91vec_731171_733147;
++c_7320159.elements[1] = ((closureN)self_7312492)->elements[3];
++c_7320159.elements[2] = ((closureN)self_7312492)->elements[4];
+
+
+-closureN_type c_7321514;
+-object e_7321530 [3];
+-c_7321514.hdr.mark = gc_color_red;
+- c_7321514.hdr.grayed = 0;
+-c_7321514.tag = closureN_tag;
+- c_7321514.fn = (function_type)__lambda_753;
+-c_7321514.num_args = 1;
+-c_7321514.num_elements = 3;
+-c_7321514.elements = (object *)e_7321530;
+-c_7321514.elements[0] = ((closureN)self_7313745)->elements[0];
+-c_7321514.elements[1] = ((closureN)self_7313745)->elements[1];
+-c_7321514.elements[2] = ((closureN)self_7313745)->elements[2];
++closureN_type c_7320214;
++object e_7320230 [3];
++c_7320214.hdr.mark = gc_color_red;
++ c_7320214.hdr.grayed = 0;
++c_7320214.tag = closureN_tag;
++ c_7320214.fn = (function_type)__lambda_753;
++c_7320214.num_args = 1;
++c_7320214.num_elements = 3;
++c_7320214.elements = (object *)e_7320230;
++c_7320214.elements[0] = ((closureN)self_7312492)->elements[0];
++c_7320214.elements[1] = ((closureN)self_7312492)->elements[1];
++c_7320214.elements[2] = ((closureN)self_7312492)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7321459,__lambda_747, &c_7321514);;
++return_direct_with_clo1(data,(closure)&c_7320159,__lambda_747, &c_7320214);;
+ }
+
+-static void __lambda_753(void *data, object self_7313746, int argc, object *args) /* object self_7313746, object msg_731174_733495 */
++static void __lambda_753(void *data, object self_7312493, int argc, object *args) /* object self_7312493, object msg_731174_733148 */
+ {
+- object msg_731174_733495 = args[0];
++ object msg_731174_733148 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313746)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312493)->elements[0])) ){
+
+-pair_type local_7321525;
++pair_type local_7320225;
+
+-object c_7321522 = apply(data, ((closureN)self_7313746)->elements[2],__glo_error_scheme_base, set_pair_as_expr(&local_7321525, msg_731174_733495, ((closureN)self_7313746)->elements[0]));
+-return_direct_with_clo1(data, ((closureN)self_7313746)->elements[2], (((closure) ((closureN)self_7313746)->elements[2])->fn), c_7321522);
++object c_7320222 = apply(data, ((closureN)self_7312493)->elements[2],__glo_error_scheme_base, set_pair_as_expr(&local_7320225, msg_731174_733148, ((closureN)self_7312493)->elements[0]));
++return_direct_with_clo1(data, ((closureN)self_7312493)->elements[2], (((closure) ((closureN)self_7312493)->elements[2])->fn), c_7320222);
+ } else {
+- return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7313746)->elements[2], msg_731174_733495, ((closureN)self_7313746)->elements[1]);}
++ return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7312493)->elements[2], msg_731174_733148, ((closureN)self_7312493)->elements[1]);}
+ ;;
+ }
+
+-static void __lambda_747(void *data, object self_7313747, int argc, object *args) /* object self_7313747, object k_736170 */
++static void __lambda_747(void *data, object self_7312494, int argc, object *args) /* object self_7312494, object k_735718 */
+ {
+- object k_736170 = args[0];
++ object k_735718 = args[0];
+
+-closureN_type c_7321461;
+-object e_7321475 [3];
+-c_7321461.hdr.mark = gc_color_red;
+- c_7321461.hdr.grayed = 0;
+-c_7321461.tag = closureN_tag;
+- c_7321461.fn = (function_type)__lambda_748;
+-c_7321461.num_args = 0;
+-c_7321461.num_elements = 3;
+-c_7321461.elements = (object *)e_7321475;
+-c_7321461.elements[0] = ((closureN)self_7313747)->elements[0];
+-c_7321461.elements[1] = ((closureN)self_7313747)->elements[1];
+-c_7321461.elements[2] = ((closureN)self_7313747)->elements[2];
++closureN_type c_7320161;
++object e_7320175 [3];
++c_7320161.hdr.mark = gc_color_red;
++ c_7320161.hdr.grayed = 0;
++c_7320161.tag = closureN_tag;
++ c_7320161.fn = (function_type)__lambda_748;
++c_7320161.num_args = 0;
++c_7320161.num_elements = 3;
++c_7320161.elements = (object *)e_7320175;
++c_7320161.elements[0] = ((closureN)self_7312494)->elements[0];
++c_7320161.elements[1] = ((closureN)self_7312494)->elements[1];
++c_7320161.elements[2] = ((closureN)self_7312494)->elements[2];
+
+
+-closureN_type c_7321476;
+-object e_7321512 [3];
+-c_7321476.hdr.mark = gc_color_red;
+- c_7321476.hdr.grayed = 0;
+-c_7321476.tag = closureN_tag;
+- c_7321476.fn = (function_type)__lambda_750;
+-c_7321476.num_args = 1;
+-c_7321476.num_elements = 3;
+-c_7321476.elements = (object *)e_7321512;
+-c_7321476.elements[0] = k_736170;
+-c_7321476.elements[1] = ((closureN)self_7313747)->elements[0];
+-c_7321476.elements[2] = ((closureN)self_7313747)->elements[1];
++closureN_type c_7320176;
++object e_7320212 [3];
++c_7320176.hdr.mark = gc_color_red;
++ c_7320176.hdr.grayed = 0;
++c_7320176.tag = closureN_tag;
++ c_7320176.fn = (function_type)__lambda_750;
++c_7320176.num_args = 1;
++c_7320176.num_elements = 3;
++c_7320176.elements = (object *)e_7320212;
++c_7320176.elements[0] = k_735718;
++c_7320176.elements[1] = ((closureN)self_7312494)->elements[0];
++c_7320176.elements[2] = ((closureN)self_7312494)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7321461,__lambda_748, &c_7321476);;
++return_direct_with_clo1(data,(closure)&c_7320161,__lambda_748, &c_7320176);;
+ }
+
+-static void __lambda_750(void *data, object self_7313748, int argc, object *args) /* object self_7313748, object r_736171 */
++static void __lambda_750(void *data, object self_7312495, int argc, object *args) /* object self_7312495, object r_735719 */
+ {
+- object r_736171 = args[0];
+- if( (boolean_f != r_736171) ){
++ object r_735719 = args[0];
++ if( (boolean_f != r_735719) ){
+
+-closureN_type c_7321478;
+-object e_7321502 [3];
+-c_7321478.hdr.mark = gc_color_red;
+- c_7321478.hdr.grayed = 0;
+-c_7321478.tag = closureN_tag;
+- c_7321478.fn = (function_type)__lambda_751;
+-c_7321478.num_args = 1;
+-c_7321478.num_elements = 3;
+-c_7321478.elements = (object *)e_7321502;
+-c_7321478.elements[0] = ((closureN)self_7313748)->elements[0];
+-c_7321478.elements[1] = ((closureN)self_7313748)->elements[1];
+-c_7321478.elements[2] = ((closureN)self_7313748)->elements[2];
++closureN_type c_7320178;
++object e_7320202 [3];
++c_7320178.hdr.mark = gc_color_red;
++ c_7320178.hdr.grayed = 0;
++c_7320178.tag = closureN_tag;
++ c_7320178.fn = (function_type)__lambda_751;
++c_7320178.num_args = 1;
++c_7320178.num_elements = 3;
++c_7320178.elements = (object *)e_7320202;
++c_7320178.elements[0] = ((closureN)self_7312495)->elements[0];
++c_7320178.elements[1] = ((closureN)self_7312495)->elements[1];
++c_7320178.elements[2] = ((closureN)self_7312495)->elements[2];
+
+
+
+
+-object c_7321505 = Cyc_number2string2(data,(closure)&c_7321478,1,Cyc_vector_ref(data, ((closureN)self_7313748)->elements[1], obj_int2obj(1)));
+-return_closcall1(data,(closure)&c_7321478, c_7321505);
++object c_7320205 = Cyc_number2string2(data,(closure)&c_7320178,1,Cyc_vector_ref(data, ((closureN)self_7312495)->elements[1], obj_int2obj(1)));
++return_closcall1(data,(closure)&c_7320178, c_7320205);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313748)->elements[0], (((closure) ((closureN)self_7313748)->elements[0])->fn), ((closureN)self_7313748)->elements[2]);}
++ return_direct_with_clo1(data, ((closureN)self_7312495)->elements[0], (((closure) ((closureN)self_7312495)->elements[0])->fn), ((closureN)self_7312495)->elements[2]);}
+ ;;
+ }
+
+-static void __lambda_751(void *data, object self_7313749, int argc, object *args) /* object self_7313749, object r_736172 */
++static void __lambda_751(void *data, object self_7312496, int argc, object *args) /* object self_7312496, object r_735720 */
+ {
+- object r_736172 = args[0];
++ object r_735720 = args[0];
+
+-closureN_type c_7321480;
+-object e_7321495 [4];
+-c_7321480.hdr.mark = gc_color_red;
+- c_7321480.hdr.grayed = 0;
+-c_7321480.tag = closureN_tag;
+- c_7321480.fn = (function_type)__lambda_752;
+-c_7321480.num_args = 1;
+-c_7321480.num_elements = 4;
+-c_7321480.elements = (object *)e_7321495;
+-c_7321480.elements[0] = ((closureN)self_7313749)->elements[0];
+-c_7321480.elements[1] = ((closureN)self_7313749)->elements[1];
+-c_7321480.elements[2] = r_736172;
+-c_7321480.elements[3] = ((closureN)self_7313749)->elements[2];
++closureN_type c_7320180;
++object e_7320195 [4];
++c_7320180.hdr.mark = gc_color_red;
++ c_7320180.hdr.grayed = 0;
++c_7320180.tag = closureN_tag;
++ c_7320180.fn = (function_type)__lambda_752;
++c_7320180.num_args = 1;
++c_7320180.num_elements = 4;
++c_7320180.elements = (object *)e_7320195;
++c_7320180.elements[0] = ((closureN)self_7312496)->elements[0];
++c_7320180.elements[1] = ((closureN)self_7312496)->elements[1];
++c_7320180.elements[2] = r_735720;
++c_7320180.elements[3] = ((closureN)self_7312496)->elements[2];
+
+
+
+
+-object c_7321498 = Cyc_number2string2(data,(closure)&c_7321480,1,Cyc_vector_ref(data, ((closureN)self_7313749)->elements[1], obj_int2obj(2)));
+-return_closcall1(data,(closure)&c_7321480, c_7321498);;
++object c_7320198 = Cyc_number2string2(data,(closure)&c_7320180,1,Cyc_vector_ref(data, ((closureN)self_7312496)->elements[1], obj_int2obj(2)));
++return_closcall1(data,(closure)&c_7320180, c_7320198);;
+ }
+
+-static void __lambda_752(void *data, object self_7313750, int argc, object *args) /* object self_7313750, object r_736173 */
++static void __lambda_752(void *data, object self_7312497, int argc, object *args) /* object self_7312497, object r_735721 */
+ {
+- object r_736173 = args[0];
++ object r_735721 = args[0];
+
+-make_utf8_string_with_len(c_7321486, "at line ", 8, 8);
++make_utf8_string_with_len(c_7320186, "at line ", 8, 8);
+
+-make_utf8_string_with_len(c_7321488, ", column ", 9, 9);
++make_utf8_string_with_len(c_7320188, ", column ", 9, 9);
+
+-make_utf8_string_with_len(c_7321489, " of ", 4, 4);
++make_utf8_string_with_len(c_7320189, " of ", 4, 4);
+
+
+
+-make_utf8_string_with_len(c_7321493, ": ", 2, 2);
++make_utf8_string_with_len(c_7320193, ": ", 2, 2);
+
+-object c_7321485 = Cyc_string_append(data, ((closureN)self_7313750)->elements[0],8,&c_7321486, ((closureN)self_7313750)->elements[2], &c_7321488, r_736173, &c_7321489, Cyc_vector_ref(data, ((closureN)self_7313750)->elements[1], obj_int2obj(0)), &c_7321493, ((closureN)self_7313750)->elements[3]);
+-return_direct_with_clo1(data, ((closureN)self_7313750)->elements[0], (((closure) ((closureN)self_7313750)->elements[0])->fn), c_7321485);;
++object c_7320185 = Cyc_string_append(data, ((closureN)self_7312497)->elements[0],8,&c_7320186, ((closureN)self_7312497)->elements[2], &c_7320188, r_735721, &c_7320189, Cyc_vector_ref(data, ((closureN)self_7312497)->elements[1], obj_int2obj(0)), &c_7320193, ((closureN)self_7312497)->elements[3]);
++return_direct_with_clo1(data, ((closureN)self_7312497)->elements[0], (((closure) ((closureN)self_7312497)->elements[0])->fn), c_7320185);;
+ }
+
+-static void __lambda_748(void *data, object self_7313751, int argc, object *args) /* object self_7313751, object k_736177 */
++static void __lambda_748(void *data, object self_7312498, int argc, object *args) /* object self_7312498, object k_735725 */
+ {
+- object k_736177 = args[0];
+- if( (boolean_f != ((closureN)self_7313751)->elements[0]) ){
++ object k_735725 = args[0];
++ if( (boolean_f != ((closureN)self_7312498)->elements[0]) ){
+
+
+
+-closureN_type c_7321467;
+-object e_7321472 [1];
+-c_7321467.hdr.mark = gc_color_red;
+- c_7321467.hdr.grayed = 0;
+-c_7321467.tag = closureN_tag;
+- c_7321467.fn = (function_type)__lambda_749;
+-c_7321467.num_args = 1;
+-c_7321467.num_elements = 1;
+-c_7321467.elements = (object *)e_7321472;
+-c_7321467.elements[0] = k_736177;
++closureN_type c_7320167;
++object e_7320172 [1];
++c_7320167.hdr.mark = gc_color_red;
++ c_7320167.hdr.grayed = 0;
++c_7320167.tag = closureN_tag;
++ c_7320167.fn = (function_type)__lambda_749;
++c_7320167.num_args = 1;
++c_7320167.num_elements = 1;
++c_7320167.elements = (object *)e_7320172;
++c_7320167.elements[0] = k_735725;
+
+-return_closcall2(data, car(((closureN)self_7313751)->elements[2]), &c_7321467, ((closureN)self_7313751)->elements[1]);
++return_closcall2(data, car(((closureN)self_7312498)->elements[2]), &c_7320167, ((closureN)self_7312498)->elements[1]);
+ } else {
+- return_direct_with_clo1(data, k_736177, (((closure) k_736177)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735725, (((closure) k_735725)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_749(void *data, object self_7313752, int argc, object *args) /* object self_7313752, object r_736178 */
++static void __lambda_749(void *data, object self_7312499, int argc, object *args) /* object self_7312499, object r_735726 */
+ {
+- object r_736178 = args[0];
+- if( (boolean_f != r_736178) ){
+- return_direct_with_clo1(data, ((closureN)self_7313752)->elements[0], (((closure) ((closureN)self_7313752)->elements[0])->fn), boolean_f);
++ object r_735726 = args[0];
++ if( (boolean_f != r_735726) ){
++ return_direct_with_clo1(data, ((closureN)self_7312499)->elements[0], (((closure) ((closureN)self_7312499)->elements[0])->fn), boolean_f);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313752)->elements[0], (((closure) ((closureN)self_7313752)->elements[0])->fn), boolean_t);}
++ return_direct_with_clo1(data, ((closureN)self_7312499)->elements[0], (((closure) ((closureN)self_7312499)->elements[0])->fn), boolean_t);}
+ ;;
+ }
+
+-static void __lambda_1467(void *data, object _, int argc, object *args) {object k = args[0]; gc_thread_data *thd = (gc_thread_data *)data;
++static void __lambda_1420(void *data, object _, int argc, object *args) {object k = args[0]; gc_thread_data *thd = (gc_thread_data *)data;
+ if (thd->exception_handler_stack) {
+ thd->exception_handler_stack = cdr(thd->exception_handler_stack);
+ }
+ return_closcall1(data, k, thd->exception_handler_stack); }
+-static void __lambda_1466(void *data, object _, int argc, object *args) {object k = args[0];object h = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
++static void __lambda_1419(void *data, object _, int argc, object *args) {object k = args[0];object h = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
+ make_pair(c, h, thd->exception_handler_stack);
+ thd->exception_handler_stack = &c;
+ return_closcall1(data, k, &c); }
+-static void __lambda_730(void *data, object _, int argc, object *args) /* closure _,object k_736145, object handler_731153_733479, object thunk_731154_733480 */
++static void __lambda_730(void *data, object _, int argc, object *args) /* closure _,object k_735693, object handler_731153_733132, object thunk_731154_733133 */
+ {
+-object k_736145 = args[0]; object handler_731153_733479 = args[1]; object thunk_731154_733480 = args[2];
++object k_735693 = args[0]; object handler_731153_733132 = args[1]; object thunk_731154_733133 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:with-exception-handler");
+
+-closureN_type c_7321362;
+-object e_7321394 [2];
+-c_7321362.hdr.mark = gc_color_red;
+- c_7321362.hdr.grayed = 0;
+-c_7321362.tag = closureN_tag;
+- c_7321362.fn = (function_type)__lambda_731;
+-c_7321362.num_args = 1;
+-c_7321362.num_elements = 2;
+-c_7321362.elements = (object *)e_7321394;
+-c_7321362.elements[0] = k_736145;
+-c_7321362.elements[1] = thunk_731154_733480;
++closureN_type c_7320062;
++object e_7320094 [2];
++c_7320062.hdr.mark = gc_color_red;
++ c_7320062.hdr.grayed = 0;
++c_7320062.tag = closureN_tag;
++ c_7320062.fn = (function_type)__lambda_731;
++c_7320062.num_args = 1;
++c_7320062.num_elements = 2;
++c_7320062.elements = (object *)e_7320094;
++c_7320062.elements[0] = k_735693;
++c_7320062.elements[1] = thunk_731154_733133;
+
+
+-closureN_type c_7321395;
+-object e_7321439 [1];
+-c_7321395.hdr.mark = gc_color_red;
+- c_7321395.hdr.grayed = 0;
+-c_7321395.tag = closureN_tag;
+- c_7321395.fn = (function_type)__lambda_737;
+-c_7321395.num_args = 1;
+-c_7321395.num_elements = 1;
+-c_7321395.elements = (object *)e_7321439;
+-c_7321395.elements[0] = handler_731153_733479;
++closureN_type c_7320095;
++object e_7320139 [1];
++c_7320095.hdr.mark = gc_color_red;
++ c_7320095.hdr.grayed = 0;
++c_7320095.tag = closureN_tag;
++ c_7320095.fn = (function_type)__lambda_737;
++c_7320095.num_args = 1;
++c_7320095.num_elements = 1;
++c_7320095.elements = (object *)e_7320139;
++c_7320095.elements[0] = handler_731153_733132;
+
+-return_direct_with_clo1(data,(closure)&c_7321362,__lambda_731, &c_7321395);;
++return_direct_with_clo1(data,(closure)&c_7320062,__lambda_731, &c_7320095);;
+ }
+
+-static void __lambda_737(void *data, object self_7313726, int argc, object *args) /* object self_7313726, object k_736151, object obj_731157_733483 */
++static void __lambda_737(void *data, object self_7312473, int argc, object *args) /* object self_7312473, object k_735699, object obj_731157_733136 */
+ {
+- object k_736151 = args[0]; object obj_731157_733483 = args[1];
+- object r_736152;
++ object k_735699 = args[0]; object obj_731157_733136 = args[1];
++ object r_735700;
+
+-if( (boolean_f != Cyc_is_pair(obj_731157_733483)) ){
++if( (boolean_f != Cyc_is_pair(obj_731157_733136)) ){
+
+
+- r_736152 = equalp(Cyc_car(data, obj_731157_733483), quote_continuable);
++ r_735700 = equalp(Cyc_car(data, obj_731157_733136), quote_continuable);
+ } else {
+- r_736152 = boolean_f;}
++ r_735700 = boolean_f;}
+ ;
+-closureN_type c_7321406;
+-object e_7321438 [3];
+-c_7321406.hdr.mark = gc_color_red;
+- c_7321406.hdr.grayed = 0;
+-c_7321406.tag = closureN_tag;
+- c_7321406.fn = (function_type)__lambda_738;
+-c_7321406.num_args = 2;
+-c_7321406.num_elements = 3;
+-c_7321406.elements = (object *)e_7321438;
+-c_7321406.elements[0] = ((closureN)self_7313726)->elements[0];
+-c_7321406.elements[1] = k_736151;
+-c_7321406.elements[2] = obj_731157_733483;
++closureN_type c_7320106;
++object e_7320138 [3];
++c_7320106.hdr.mark = gc_color_red;
++ c_7320106.hdr.grayed = 0;
++c_7320106.tag = closureN_tag;
++ c_7320106.fn = (function_type)__lambda_738;
++c_7320106.num_args = 2;
++c_7320106.num_elements = 3;
++c_7320106.elements = (object *)e_7320138;
++c_7320106.elements[0] = ((closureN)self_7312473)->elements[0];
++c_7320106.elements[1] = k_735699;
++c_7320106.elements[2] = obj_731157_733136;
+
+-return_direct_with_clo2(data,(closure)&c_7321406,__lambda_738, boolean_f, r_736152);;
++return_direct_with_clo2(data,(closure)&c_7320106,__lambda_738, boolean_f, r_735700);;
+ }
+
+-static void __lambda_738(void *data, object self_7313727, int argc, object *args) /* object self_7313727, object result_731158_733484, object continuable_127_731159_733485 */
++static void __lambda_738(void *data, object self_7312474, int argc, object *args) /* object self_7312474, object result_731158_733137, object continuable_127_731159_733138 */
+ {
+- object result_731158_733484 = args[0]; object continuable_127_731159_733485 = args[1];
++ object result_731158_733137 = args[0]; object continuable_127_731159_733138 = args[1];
+
+-closureN_type c_7321408;
+-object e_7321434 [4];
+-c_7321408.hdr.mark = gc_color_red;
+- c_7321408.hdr.grayed = 0;
+-c_7321408.tag = closureN_tag;
+- c_7321408.fn = (function_type)__lambda_1420;
+-c_7321408.num_args = 1;
+-c_7321408.num_elements = 4;
+-c_7321408.elements = (object *)e_7321434;
+-c_7321408.elements[0] = continuable_127_731159_733485;
+-c_7321408.elements[1] = ((closureN)self_7313727)->elements[0];
+-c_7321408.elements[2] = ((closureN)self_7313727)->elements[1];
+-c_7321408.elements[3] = ((closureN)self_7313727)->elements[2];
++closureN_type c_7320108;
++object e_7320134 [4];
++c_7320108.hdr.mark = gc_color_red;
++ c_7320108.hdr.grayed = 0;
++c_7320108.tag = closureN_tag;
++ c_7320108.fn = (function_type)__lambda_1373;
++c_7320108.num_args = 1;
++c_7320108.num_elements = 4;
++c_7320108.elements = (object *)e_7320134;
++c_7320108.elements[0] = continuable_127_731159_733138;
++c_7320108.elements[1] = ((closureN)self_7312474)->elements[0];
++c_7320108.elements[2] = ((closureN)self_7312474)->elements[1];
++c_7320108.elements[3] = ((closureN)self_7312474)->elements[2];
+
+
+-pair_type local_7321437;
+-return_direct_with_clo1(data,(closure)&c_7321408,__lambda_1420, set_cell_as_expr(&local_7321437, result_731158_733484));;
++pair_type local_7320137;
++return_direct_with_clo1(data,(closure)&c_7320108,__lambda_1373, set_cell_as_expr(&local_7320137, result_731158_733137));;
+ }
+
+-static void __lambda_1420(void *data, object self_7313728, int argc, object *args) /* object self_7313728, object result_731158_733484 */
++static void __lambda_1373(void *data, object self_7312475, int argc, object *args) /* object self_7312475, object result_731158_733137 */
+ {
+- object result_731158_733484 = args[0];
++ object result_731158_733137 = args[0];
+
+-closureN_type c_7321410;
+-object e_7321433 [5];
+-c_7321410.hdr.mark = gc_color_red;
+- c_7321410.hdr.grayed = 0;
+-c_7321410.tag = closureN_tag;
+- c_7321410.fn = (function_type)__lambda_739;
+-c_7321410.num_args = 1;
+-c_7321410.num_elements = 5;
+-c_7321410.elements = (object *)e_7321433;
+-c_7321410.elements[0] = ((closureN)self_7313728)->elements[0];
+-c_7321410.elements[1] = ((closureN)self_7313728)->elements[1];
+-c_7321410.elements[2] = ((closureN)self_7313728)->elements[2];
+-c_7321410.elements[3] = ((closureN)self_7313728)->elements[3];
+-c_7321410.elements[4] = result_731158_733484;
++closureN_type c_7320110;
++object e_7320133 [5];
++c_7320110.hdr.mark = gc_color_red;
++ c_7320110.hdr.grayed = 0;
++c_7320110.tag = closureN_tag;
++ c_7320110.fn = (function_type)__lambda_739;
++c_7320110.num_args = 1;
++c_7320110.num_elements = 5;
++c_7320110.elements = (object *)e_7320133;
++c_7320110.elements[0] = ((closureN)self_7312475)->elements[0];
++c_7320110.elements[1] = ((closureN)self_7312475)->elements[1];
++c_7320110.elements[2] = ((closureN)self_7312475)->elements[2];
++c_7320110.elements[3] = ((closureN)self_7312475)->elements[3];
++c_7320110.elements[4] = result_731158_733137;
+
+-return_direct_with_clo1(data, __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure) __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn), &c_7321410);;
++return_direct_with_clo1(data, __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure) __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn), &c_7320110);;
+ }
+
+-static void __lambda_739(void *data, object self_7313729, int argc, object *args) /* object self_7313729, object r_736153 */
++static void __lambda_739(void *data, object self_7312476, int argc, object *args) /* object self_7312476, object r_735701 */
+ {
+
+
+-closureN_type c_7321413;
+-object e_7321429 [3];
+-c_7321413.hdr.mark = gc_color_red;
+- c_7321413.hdr.grayed = 0;
+-c_7321413.tag = closureN_tag;
+- c_7321413.fn = (function_type)__lambda_740;
+-c_7321413.num_args = 1;
+-c_7321413.num_elements = 3;
+-c_7321413.elements = (object *)e_7321429;
+-c_7321413.elements[0] = ((closureN)self_7313729)->elements[0];
+-c_7321413.elements[1] = ((closureN)self_7313729)->elements[2];
+-c_7321413.elements[2] = ((closureN)self_7313729)->elements[4];
++closureN_type c_7320113;
++object e_7320129 [3];
++c_7320113.hdr.mark = gc_color_red;
++ c_7320113.hdr.grayed = 0;
++c_7320113.tag = closureN_tag;
++ c_7320113.fn = (function_type)__lambda_740;
++c_7320113.num_args = 1;
++c_7320113.num_elements = 3;
++c_7320113.elements = (object *)e_7320129;
++c_7320113.elements[0] = ((closureN)self_7312476)->elements[0];
++c_7320113.elements[1] = ((closureN)self_7312476)->elements[2];
++c_7320113.elements[2] = ((closureN)self_7312476)->elements[4];
+
+
+
+-return_closcall2(data, ((closureN)self_7313729)->elements[1], &c_7321413, Cyc_cdr(data, ((closureN)self_7313729)->elements[3]));;
++return_closcall2(data, ((closureN)self_7312476)->elements[1], &c_7320113, Cyc_cdr(data, ((closureN)self_7312476)->elements[3]));;
+ }
+
+-static void __lambda_740(void *data, object self_7313730, int argc, object *args) /* object self_7313730, object r_736155 */
++static void __lambda_740(void *data, object self_7312477, int argc, object *args) /* object self_7312477, object r_735703 */
+ {
+- object r_736155 = args[0];
++ object r_735703 = args[0];
+
+-closureN_type c_7321415;
+-object e_7321425 [3];
+-c_7321415.hdr.mark = gc_color_red;
+- c_7321415.hdr.grayed = 0;
+-c_7321415.tag = closureN_tag;
+- c_7321415.fn = (function_type)__lambda_741;
+-c_7321415.num_args = 1;
+-c_7321415.num_elements = 3;
+-c_7321415.elements = (object *)e_7321425;
+-c_7321415.elements[0] = ((closureN)self_7313730)->elements[0];
+-c_7321415.elements[1] = ((closureN)self_7313730)->elements[1];
+-c_7321415.elements[2] = ((closureN)self_7313730)->elements[2];
++closureN_type c_7320115;
++object e_7320125 [3];
++c_7320115.hdr.mark = gc_color_red;
++ c_7320115.hdr.grayed = 0;
++c_7320115.tag = closureN_tag;
++ c_7320115.fn = (function_type)__lambda_741;
++c_7320115.num_args = 1;
++c_7320115.num_elements = 3;
++c_7320115.elements = (object *)e_7320125;
++c_7320115.elements[0] = ((closureN)self_7312477)->elements[0];
++c_7320115.elements[1] = ((closureN)self_7312477)->elements[1];
++c_7320115.elements[2] = ((closureN)self_7312477)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321415,__lambda_741, Cyc_set_cell(data, ((closureN)self_7313730)->elements[2], r_736155));;
++return_direct_with_clo1(data,(closure)&c_7320115,__lambda_741, Cyc_set_cell(data, ((closureN)self_7312477)->elements[2], r_735703));;
+ }
+
+-static void __lambda_741(void *data, object self_7313731, int argc, object *args) /* object self_7313731, object r_736154 */
++static void __lambda_741(void *data, object self_7312478, int argc, object *args) /* object self_7312478, object r_735702 */
+ {
+
+- if( (boolean_f != ((closureN)self_7313731)->elements[0]) ){
++ if( (boolean_f != ((closureN)self_7312478)->elements[0]) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313731)->elements[1], (((closure) ((closureN)self_7313731)->elements[1])->fn), car(((closureN)self_7313731)->elements[2]));
++return_direct_with_clo1(data, ((closureN)self_7312478)->elements[1], (((closure) ((closureN)self_7312478)->elements[1])->fn), car(((closureN)self_7312478)->elements[2]));
+ } else {
+
+-make_utf8_string_with_len(c_7321424, "exception handler returned", 26, 26);
+-return_direct_with_clo2(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7313731)->elements[1], &c_7321424);}
++make_utf8_string_with_len(c_7320124, "exception handler returned", 26, 26);
++return_direct_with_clo2(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), ((closureN)self_7312478)->elements[1], &c_7320124);}
+ ;;
+ }
+
+-static void __lambda_731(void *data, object self_7313732, int argc, object *args) /* object self_7313732, object r_736146 */
++static void __lambda_731(void *data, object self_7312479, int argc, object *args) /* object self_7312479, object r_735694 */
+ {
+- object r_736146 = args[0];
++ object r_735694 = args[0];
+
+-closureN_type c_7321364;
+-object e_7321393 [2];
+-c_7321364.hdr.mark = gc_color_red;
+- c_7321364.hdr.grayed = 0;
+-c_7321364.tag = closureN_tag;
+- c_7321364.fn = (function_type)__lambda_732;
+-c_7321364.num_args = 2;
+-c_7321364.num_elements = 2;
+-c_7321364.elements = (object *)e_7321393;
+-c_7321364.elements[0] = ((closureN)self_7313732)->elements[0];
+-c_7321364.elements[1] = ((closureN)self_7313732)->elements[1];
++closureN_type c_7320064;
++object e_7320093 [2];
++c_7320064.hdr.mark = gc_color_red;
++ c_7320064.hdr.grayed = 0;
++c_7320064.tag = closureN_tag;
++ c_7320064.fn = (function_type)__lambda_732;
++c_7320064.num_args = 2;
++c_7320064.num_elements = 2;
++c_7320064.elements = (object *)e_7320093;
++c_7320064.elements[0] = ((closureN)self_7312479)->elements[0];
++c_7320064.elements[1] = ((closureN)self_7312479)->elements[1];
+
+-return_direct_with_clo2(data,(closure)&c_7321364,__lambda_732, boolean_f, r_736146);;
++return_direct_with_clo2(data,(closure)&c_7320064,__lambda_732, boolean_f, r_735694);;
+ }
+
+-static void __lambda_732(void *data, object self_7313733, int argc, object *args) /* object self_7313733, object result_731155_733481, object my_91handler_731156_733482 */
++static void __lambda_732(void *data, object self_7312480, int argc, object *args) /* object self_7312480, object result_731155_733134, object my_91handler_731156_733135 */
+ {
+- object result_731155_733481 = args[0]; object my_91handler_731156_733482 = args[1];
++ object result_731155_733134 = args[0]; object my_91handler_731156_733135 = args[1];
+
+-closureN_type c_7321366;
+-object e_7321389 [3];
+-c_7321366.hdr.mark = gc_color_red;
+- c_7321366.hdr.grayed = 0;
+-c_7321366.tag = closureN_tag;
+- c_7321366.fn = (function_type)__lambda_1419;
+-c_7321366.num_args = 1;
+-c_7321366.num_elements = 3;
+-c_7321366.elements = (object *)e_7321389;
+-c_7321366.elements[0] = ((closureN)self_7313733)->elements[0];
+-c_7321366.elements[1] = my_91handler_731156_733482;
+-c_7321366.elements[2] = ((closureN)self_7313733)->elements[1];
++closureN_type c_7320066;
++object e_7320089 [3];
++c_7320066.hdr.mark = gc_color_red;
++ c_7320066.hdr.grayed = 0;
++c_7320066.tag = closureN_tag;
++ c_7320066.fn = (function_type)__lambda_1372;
++c_7320066.num_args = 1;
++c_7320066.num_elements = 3;
++c_7320066.elements = (object *)e_7320089;
++c_7320066.elements[0] = ((closureN)self_7312480)->elements[0];
++c_7320066.elements[1] = my_91handler_731156_733135;
++c_7320066.elements[2] = ((closureN)self_7312480)->elements[1];
+
+
+-pair_type local_7321392;
+-return_direct_with_clo1(data,(closure)&c_7321366,__lambda_1419, set_cell_as_expr(&local_7321392, result_731155_733481));;
++pair_type local_7320092;
++return_direct_with_clo1(data,(closure)&c_7320066,__lambda_1372, set_cell_as_expr(&local_7320092, result_731155_733134));;
+ }
+
+-static void __lambda_1419(void *data, object self_7313734, int argc, object *args) /* object self_7313734, object result_731155_733481 */
++static void __lambda_1372(void *data, object self_7312481, int argc, object *args) /* object self_7312481, object result_731155_733134 */
+ {
+- object result_731155_733481 = args[0];
++ object result_731155_733134 = args[0];
+
+-closureN_type c_7321368;
+-object e_7321387 [3];
+-c_7321368.hdr.mark = gc_color_red;
+- c_7321368.hdr.grayed = 0;
+-c_7321368.tag = closureN_tag;
+- c_7321368.fn = (function_type)__lambda_733;
+-c_7321368.num_args = 1;
+-c_7321368.num_elements = 3;
+-c_7321368.elements = (object *)e_7321387;
+-c_7321368.elements[0] = ((closureN)self_7313734)->elements[0];
+-c_7321368.elements[1] = result_731155_733481;
+-c_7321368.elements[2] = ((closureN)self_7313734)->elements[2];
++closureN_type c_7320068;
++object e_7320087 [3];
++c_7320068.hdr.mark = gc_color_red;
++ c_7320068.hdr.grayed = 0;
++c_7320068.tag = closureN_tag;
++ c_7320068.fn = (function_type)__lambda_733;
++c_7320068.num_args = 1;
++c_7320068.num_elements = 3;
++c_7320068.elements = (object *)e_7320087;
++c_7320068.elements[0] = ((closureN)self_7312481)->elements[0];
++c_7320068.elements[1] = result_731155_733134;
++c_7320068.elements[2] = ((closureN)self_7312481)->elements[2];
+
+-return_direct_with_clo2(data, __glo_Cyc_91add_91exception_91handler_scheme_base, (((closure) __glo_Cyc_91add_91exception_91handler_scheme_base)->fn), &c_7321368, ((closureN)self_7313734)->elements[1]);;
++return_direct_with_clo2(data, __glo_Cyc_91add_91exception_91handler_scheme_base, (((closure) __glo_Cyc_91add_91exception_91handler_scheme_base)->fn), &c_7320068, ((closureN)self_7312481)->elements[1]);;
+ }
+
+-static void __lambda_733(void *data, object self_7313735, int argc, object *args) /* object self_7313735, object r_736147 */
++static void __lambda_733(void *data, object self_7312482, int argc, object *args) /* object self_7312482, object r_735695 */
+ {
+
+
+-closureN_type c_7321371;
+-object e_7321386 [2];
+-c_7321371.hdr.mark = gc_color_red;
+- c_7321371.hdr.grayed = 0;
+-c_7321371.tag = closureN_tag;
+- c_7321371.fn = (function_type)__lambda_734;
+-c_7321371.num_args = 1;
+-c_7321371.num_elements = 2;
+-c_7321371.elements = (object *)e_7321386;
+-c_7321371.elements[0] = ((closureN)self_7313735)->elements[0];
+-c_7321371.elements[1] = ((closureN)self_7313735)->elements[1];
++closureN_type c_7320071;
++object e_7320086 [2];
++c_7320071.hdr.mark = gc_color_red;
++ c_7320071.hdr.grayed = 0;
++c_7320071.tag = closureN_tag;
++ c_7320071.fn = (function_type)__lambda_734;
++c_7320071.num_args = 1;
++c_7320071.num_elements = 2;
++c_7320071.elements = (object *)e_7320086;
++c_7320071.elements[0] = ((closureN)self_7312482)->elements[0];
++c_7320071.elements[1] = ((closureN)self_7312482)->elements[1];
+
+-return_closcall1(data, ((closureN)self_7313735)->elements[2], &c_7321371);;
++return_closcall1(data, ((closureN)self_7312482)->elements[2], &c_7320071);;
+ }
+
+-static void __lambda_734(void *data, object self_7313736, int argc, object *args) /* object self_7313736, object r_736150 */
++static void __lambda_734(void *data, object self_7312483, int argc, object *args) /* object self_7312483, object r_735698 */
+ {
+- object r_736150 = args[0];
++ object r_735698 = args[0];
+
+-closureN_type c_7321373;
+-object e_7321382 [2];
+-c_7321373.hdr.mark = gc_color_red;
+- c_7321373.hdr.grayed = 0;
+-c_7321373.tag = closureN_tag;
+- c_7321373.fn = (function_type)__lambda_735;
+-c_7321373.num_args = 1;
+-c_7321373.num_elements = 2;
+-c_7321373.elements = (object *)e_7321382;
+-c_7321373.elements[0] = ((closureN)self_7313736)->elements[0];
+-c_7321373.elements[1] = ((closureN)self_7313736)->elements[1];
++closureN_type c_7320073;
++object e_7320082 [2];
++c_7320073.hdr.mark = gc_color_red;
++ c_7320073.hdr.grayed = 0;
++c_7320073.tag = closureN_tag;
++ c_7320073.fn = (function_type)__lambda_735;
++c_7320073.num_args = 1;
++c_7320073.num_elements = 2;
++c_7320073.elements = (object *)e_7320082;
++c_7320073.elements[0] = ((closureN)self_7312483)->elements[0];
++c_7320073.elements[1] = ((closureN)self_7312483)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321373,__lambda_735, Cyc_set_cell(data, ((closureN)self_7313736)->elements[1], r_736150));;
++return_direct_with_clo1(data,(closure)&c_7320073,__lambda_735, Cyc_set_cell(data, ((closureN)self_7312483)->elements[1], r_735698));;
+ }
+
+-static void __lambda_735(void *data, object self_7313737, int argc, object *args) /* object self_7313737, object r_736148 */
++static void __lambda_735(void *data, object self_7312484, int argc, object *args) /* object self_7312484, object r_735696 */
+ {
+
+
+-closureN_type c_7321375;
+-object e_7321381 [2];
+-c_7321375.hdr.mark = gc_color_red;
+- c_7321375.hdr.grayed = 0;
+-c_7321375.tag = closureN_tag;
+- c_7321375.fn = (function_type)__lambda_736;
+-c_7321375.num_args = 1;
+-c_7321375.num_elements = 2;
+-c_7321375.elements = (object *)e_7321381;
+-c_7321375.elements[0] = ((closureN)self_7313737)->elements[0];
+-c_7321375.elements[1] = ((closureN)self_7313737)->elements[1];
++closureN_type c_7320075;
++object e_7320081 [2];
++c_7320075.hdr.mark = gc_color_red;
++ c_7320075.hdr.grayed = 0;
++c_7320075.tag = closureN_tag;
++ c_7320075.fn = (function_type)__lambda_736;
++c_7320075.num_args = 1;
++c_7320075.num_elements = 2;
++c_7320075.elements = (object *)e_7320081;
++c_7320075.elements[0] = ((closureN)self_7312484)->elements[0];
++c_7320075.elements[1] = ((closureN)self_7312484)->elements[1];
+
+-return_direct_with_clo1(data, __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure) __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn), &c_7321375);;
++return_direct_with_clo1(data, __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure) __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn), &c_7320075);;
+ }
+
+-static void __lambda_736(void *data, object self_7313738, int argc, object *args) /* object self_7313738, object r_736149 */
++static void __lambda_736(void *data, object self_7312485, int argc, object *args) /* object self_7312485, object r_735697 */
+ {
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313738)->elements[0], (((closure) ((closureN)self_7313738)->elements[0])->fn), car(((closureN)self_7313738)->elements[1]));;
++return_direct_with_clo1(data, ((closureN)self_7312485)->elements[0], (((closure) ((closureN)self_7312485)->elements[0])->fn), car(((closureN)self_7312485)->elements[1]));;
+ }
+
+-static void __lambda_729(void *data, object _, int argc, object *args) /* closure _,object k_736104, object exp_731147_733476, object rename_731148_733477, object compare_731149_733478 */
++static void __lambda_729(void *data, object _, int argc, object *args) /* closure _,object k_735652, object exp_731147_733129, object rename_731148_733130, object compare_731149_733131 */
+ {
+-object k_736104 = args[0]; object exp_731147_733476 = args[1];
++object k_735652 = args[0]; object exp_731147_733129 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:with-handler");
+
+-pair_type local_7321301;
++pair_type local_7320001;
+
+-pair_type local_7321304;
++pair_type local_7320004;
+
+-pair_type local_7321307;
++pair_type local_7320007;
+
+-pair_type local_7321310;
++pair_type local_7320010;
+
+-pair_type local_7321313;
++pair_type local_7320013;
+
+-pair_type local_7321316;
++pair_type local_7320016;
+
+-pair_type local_7321319;
++pair_type local_7320019;
+
+-pair_type local_7321322;
++pair_type local_7320022;
+
+-pair_type local_7321325;
++pair_type local_7320025;
+
+-pair_type local_7321328;
++pair_type local_7320028;
+
+-pair_type local_7321331;
++pair_type local_7320031;
+
+-pair_type local_7321334;
++pair_type local_7320034;
+
+-pair_type local_7321337;
++pair_type local_7320037;
+
+-pair_type local_7321340;
++pair_type local_7320040;
+
+-pair_type local_7321343;
++pair_type local_7320043;
+
+
+
+-pair_type local_7321348;
++pair_type local_7320048;
+
+-pair_type local_7321351;
++pair_type local_7320051;
+
+-pair_type local_7321354;
++pair_type local_7320054;
+
+-pair_type local_7321357;
++pair_type local_7320057;
+
+
+-return_direct_with_clo1(data, k_736104, (((closure) k_736104)->fn), set_pair_as_expr(&local_7321301, quote_call_95cc, set_pair_as_expr(&local_7321304, set_pair_as_expr(&local_7321307, quote_lambda, set_pair_as_expr(&local_7321310, set_pair_as_expr(&local_7321313, quote_k, NULL), set_pair_as_expr(&local_7321316, set_pair_as_expr(&local_7321319, quote_with_91exception_91handler, set_pair_as_expr(&local_7321322, set_pair_as_expr(&local_7321325, quote_lambda, set_pair_as_expr(&local_7321328, set_pair_as_expr(&local_7321331, quote_obj, NULL), set_pair_as_expr(&local_7321334, set_pair_as_expr(&local_7321337, quote_k, set_pair_as_expr(&local_7321340, set_pair_as_expr(&local_7321343, Cyc_cadr(data, exp_731147_733476), set_pair_as_expr(&local_7321348, quote_obj, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7321351, set_pair_as_expr(&local_7321354, quote_lambda, set_pair_as_expr(&local_7321357, NULL, Cyc_cddr(data, exp_731147_733476))), NULL))), NULL))), NULL)));;
++return_direct_with_clo1(data, k_735652, (((closure) k_735652)->fn), set_pair_as_expr(&local_7320001, quote_call_95cc, set_pair_as_expr(&local_7320004, set_pair_as_expr(&local_7320007, quote_lambda, set_pair_as_expr(&local_7320010, set_pair_as_expr(&local_7320013, quote_k, NULL), set_pair_as_expr(&local_7320016, set_pair_as_expr(&local_7320019, quote_with_91exception_91handler, set_pair_as_expr(&local_7320022, set_pair_as_expr(&local_7320025, quote_lambda, set_pair_as_expr(&local_7320028, set_pair_as_expr(&local_7320031, quote_obj, NULL), set_pair_as_expr(&local_7320034, set_pair_as_expr(&local_7320037, quote_k, set_pair_as_expr(&local_7320040, set_pair_as_expr(&local_7320043, Cyc_cadr(data, exp_731147_733129), set_pair_as_expr(&local_7320048, quote_obj, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7320051, set_pair_as_expr(&local_7320054, quote_lambda, set_pair_as_expr(&local_7320057, NULL, Cyc_cddr(data, exp_731147_733129))), NULL))), NULL))), NULL)));;
+ }
+
+-static void __lambda_728(void *data, object _, int argc, object *args) /* closure _,object k_736095, object obj_731146_733475 */
++static void __lambda_728(void *data, object _, int argc, object *args) /* closure _,object k_735643, object obj_731146_733128 */
+ {
+-object k_736095 = args[0]; object obj_731146_733475 = args[1];
+- object r_736099;
++object k_735643 = args[0]; object obj_731146_733128 = args[1];
++ object r_735647;
+ Cyc_st_add(data, "scheme/base.sld:raise-continuable");
+
+-if( (boolean_f != Cyc_is_pair(obj_731146_733475)) ){
+- r_736099 = obj_731146_733475;
++if( (boolean_f != Cyc_is_pair(obj_731146_733128)) ){
++ r_735647 = obj_731146_733128;
+ } else {
+- object local_7321290 = alloca(sizeof(pair_type));
+- r_736099 = set_cell_as_expr(local_7321290, obj_731146_733475);}
++ object local_7319990 = alloca(sizeof(pair_type));
++ r_735647 = set_cell_as_expr(local_7319990, obj_731146_733128);}
+ ;
+
+
+-pair_type local_7321296;
+-return_closcall2(data, Cyc_current_exception_handler(data), k_736095, set_pair_as_expr(&local_7321296, quote_continuable, r_736099));;
++pair_type local_7319996;
++return_closcall2(data, Cyc_current_exception_handler(data), k_735643, set_pair_as_expr(&local_7319996, quote_continuable, r_735647));;
+ }
+
+-static void __lambda_727(void *data, object _, int argc, object *args) /* closure _,object k_736086, object obj_731145_733474 */
++static void __lambda_727(void *data, object _, int argc, object *args) /* closure _,object k_735634, object obj_731145_733127 */
+ {
+-object k_736086 = args[0]; object obj_731145_733474 = args[1];
+- object r_736090;
++object k_735634 = args[0]; object obj_731145_733127 = args[1];
++ object r_735638;
+ Cyc_st_add(data, "scheme/base.sld:raise");
+
+-if( (boolean_f != Cyc_is_pair(obj_731145_733474)) ){
+- r_736090 = obj_731145_733474;
++if( (boolean_f != Cyc_is_pair(obj_731145_733127)) ){
++ r_735638 = obj_731145_733127;
+ } else {
+- object local_7321275 = alloca(sizeof(pair_type));
+- r_736090 = set_cell_as_expr(local_7321275, obj_731145_733474);}
++ object local_7319975 = alloca(sizeof(pair_type));
++ r_735638 = set_cell_as_expr(local_7319975, obj_731145_733127);}
+ ;
+
+
+-pair_type local_7321281;
+-return_closcall2(data, Cyc_current_exception_handler(data), k_736086, set_pair_as_expr(&local_7321281, quote_raised, r_736090));;
++pair_type local_7319981;
++return_closcall2(data, Cyc_current_exception_handler(data), k_735634, set_pair_as_expr(&local_7319981, quote_raised, r_735638));;
+ }
+
+-static void __lambda_726(void *data, object _, int argc, object *args) /* closure _,object k_736082, object msg_731143_733472, object args_731144_733473_raw, ... */
++static void __lambda_726(void *data, object _, int argc, object *args) /* closure _,object k_735630, object msg_731143_733125, object args_731144_733126_raw, ... */
+ {
+-object k_736082 = args[0]; object msg_731143_733472 = args[1];
+-load_varargs(args_731144_733473, args, 2, argc - 2);
++object k_735630 = args[0]; object msg_731143_733125 = args[1];
++load_varargs(args_731144_733126, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:error");
+
+-pair_type local_7321266;
+-return_direct_with_clo2(data, __glo_raise_scheme_base, (((closure) __glo_raise_scheme_base)->fn), k_736082, set_pair_as_expr(&local_7321266, msg_731143_733472, args_731144_733473));;
++pair_type local_7319966;
++return_direct_with_clo2(data, __glo_raise_scheme_base, (((closure) __glo_raise_scheme_base)->fn), k_735630, set_pair_as_expr(&local_7319966, msg_731143_733125, args_731144_733126));;
+ }
+
+-static void __lambda_725(void *data, object _, int argc, object *args) /* closure _,object k_736073, object x_731141_733471 */
++static void __lambda_725(void *data, object _, int argc, object *args) /* closure _,object k_735621, object x_731141_733124 */
+ {
+-object k_736073 = args[0]; object x_731141_733471 = args[1];
++object k_735621 = args[0]; object x_731141_733124 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:error-object?");
+
+-if( (boolean_f != Cyc_is_pair(x_731141_733471)) ){
++if( (boolean_f != Cyc_is_pair(x_731141_733124)) ){
+
+
+
+
+-return_direct_with_clo1(data, k_736073, (((closure) k_736073)->fn), Cyc_is_string(Cyc_car(data, x_731141_733471)));
++return_direct_with_clo1(data, k_735621, (((closure) k_735621)->fn), Cyc_is_string(Cyc_car(data, x_731141_733124)));
+ } else {
+- return_direct_with_clo1(data, k_736073, (((closure) k_736073)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735621, (((closure) k_735621)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_707(void *data, object _, int argc, object *args) /* closure _,object k_736037, object init_731114_733461, object o_731115_733462_raw, ... */
++static void __lambda_707(void *data, object _, int argc, object *args) /* closure _,object k_735585, object init_731114_733114, object o_731115_733115_raw, ... */
+ {
+-object k_736037 = args[0]; object init_731114_733461 = args[1];
+-load_varargs(o_731115_733462, args, 2, argc - 2);
++object k_735585 = args[0]; object init_731114_733114 = args[1];
++load_varargs(o_731115_733115, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:make-parameter");
+
+-closureN_type c_7321125;
+-object e_7321136 [1];
+-c_7321125.hdr.mark = gc_color_red;
+- c_7321125.hdr.grayed = 0;
+-c_7321125.tag = closureN_tag;
+- c_7321125.fn = (function_type)__lambda_708;
+-c_7321125.num_args = 0;
+-c_7321125.num_elements = 1;
+-c_7321125.elements = (object *)e_7321136;
+-c_7321125.elements[0] = o_731115_733462;
+-
+-
+-closureN_type c_7321137;
+-object e_7321252 [2];
+-c_7321137.hdr.mark = gc_color_red;
+- c_7321137.hdr.grayed = 0;
+-c_7321137.tag = closureN_tag;
+- c_7321137.fn = (function_type)__lambda_710;
+-c_7321137.num_args = 1;
+-c_7321137.num_elements = 2;
+-c_7321137.elements = (object *)e_7321252;
+-c_7321137.elements[0] = init_731114_733461;
+-c_7321137.elements[1] = k_736037;
+-
+-return_direct_with_clo1(data,(closure)&c_7321125,__lambda_708, &c_7321137);;
+-}
+-
+-static void __lambda_710(void *data, object self_7313708, int argc, object *args) /* object self_7313708, object converter_731118_733463 */
+- {
+- object converter_731118_733463 = args[0];
+-
+-closureN_type c_7321139;
+-object e_7321250 [2];
+-c_7321139.hdr.mark = gc_color_red;
+- c_7321139.hdr.grayed = 0;
+-c_7321139.tag = closureN_tag;
+- c_7321139.fn = (function_type)__lambda_711;
+-c_7321139.num_args = 1;
+-c_7321139.num_elements = 2;
+-c_7321139.elements = (object *)e_7321250;
+-c_7321139.elements[0] = converter_731118_733463;
+-c_7321139.elements[1] = ((closureN)self_7313708)->elements[1];
+-
+-return_closcall2(data, converter_731118_733463, &c_7321139, ((closureN)self_7313708)->elements[0]);;
+-}
+-
+-static void __lambda_711(void *data, object self_7313709, int argc, object *args) /* object self_7313709, object value_731121_733464 */
+- {
+- object value_731121_733464 = args[0];
+-
+-closureN_type c_7321141;
+-object e_7321249 [3];
+-c_7321141.hdr.mark = gc_color_red;
+- c_7321141.hdr.grayed = 0;
+-c_7321141.tag = closureN_tag;
+- c_7321141.fn = (function_type)__lambda_712;
+-c_7321141.num_args = 1;
+-c_7321141.num_elements = 3;
+-c_7321141.elements = (object *)e_7321249;
+-c_7321141.elements[0] = ((closureN)self_7313709)->elements[0];
+-c_7321141.elements[1] = ((closureN)self_7313709)->elements[1];
+-c_7321141.elements[2] = value_731121_733464;
++closureN_type c_7319825;
++object e_7319836 [1];
++c_7319825.hdr.mark = gc_color_red;
++ c_7319825.hdr.grayed = 0;
++c_7319825.tag = closureN_tag;
++ c_7319825.fn = (function_type)__lambda_708;
++c_7319825.num_args = 0;
++c_7319825.num_elements = 1;
++c_7319825.elements = (object *)e_7319836;
++c_7319825.elements[0] = o_731115_733115;
++
++
++closureN_type c_7319837;
++object e_7319952 [2];
++c_7319837.hdr.mark = gc_color_red;
++ c_7319837.hdr.grayed = 0;
++c_7319837.tag = closureN_tag;
++ c_7319837.fn = (function_type)__lambda_710;
++c_7319837.num_args = 1;
++c_7319837.num_elements = 2;
++c_7319837.elements = (object *)e_7319952;
++c_7319837.elements[0] = init_731114_733114;
++c_7319837.elements[1] = k_735585;
+
+-return_direct_with_clo1(data,(closure)&c_7321141,__lambda_712, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7319825,__lambda_708, &c_7319837);;
+ }
+
+-static void __lambda_712(void *data, object self_7313710, int argc, object *args) /* object self_7313710, object key_731124_733465 */
++static void __lambda_710(void *data, object self_7312455, int argc, object *args) /* object self_7312455, object converter_731118_733116 */
+ {
+- object key_731124_733465 = args[0];
++ object converter_731118_733116 = args[0];
+
+-closureN_type c_7321143;
+-object e_7321245 [3];
+-c_7321143.hdr.mark = gc_color_red;
+- c_7321143.hdr.grayed = 0;
+-c_7321143.tag = closureN_tag;
+- c_7321143.fn = (function_type)__lambda_1418;
+-c_7321143.num_args = 1;
+-c_7321143.num_elements = 3;
+-c_7321143.elements = (object *)e_7321245;
+-c_7321143.elements[0] = ((closureN)self_7313710)->elements[0];
+-c_7321143.elements[1] = ((closureN)self_7313710)->elements[1];
+-c_7321143.elements[2] = ((closureN)self_7313710)->elements[2];
++closureN_type c_7319839;
++object e_7319950 [2];
++c_7319839.hdr.mark = gc_color_red;
++ c_7319839.hdr.grayed = 0;
++c_7319839.tag = closureN_tag;
++ c_7319839.fn = (function_type)__lambda_711;
++c_7319839.num_args = 1;
++c_7319839.num_elements = 2;
++c_7319839.elements = (object *)e_7319950;
++c_7319839.elements[0] = converter_731118_733116;
++c_7319839.elements[1] = ((closureN)self_7312455)->elements[1];
++
++return_closcall2(data, converter_731118_733116, &c_7319839, ((closureN)self_7312455)->elements[0]);;
++}
+
++static void __lambda_711(void *data, object self_7312456, int argc, object *args) /* object self_7312456, object value_731121_733117 */
++ {
++ object value_731121_733117 = args[0];
++
++closureN_type c_7319841;
++object e_7319949 [3];
++c_7319841.hdr.mark = gc_color_red;
++ c_7319841.hdr.grayed = 0;
++c_7319841.tag = closureN_tag;
++ c_7319841.fn = (function_type)__lambda_712;
++c_7319841.num_args = 1;
++c_7319841.num_elements = 3;
++c_7319841.elements = (object *)e_7319949;
++c_7319841.elements[0] = ((closureN)self_7312456)->elements[0];
++c_7319841.elements[1] = ((closureN)self_7312456)->elements[1];
++c_7319841.elements[2] = value_731121_733117;
+
+-pair_type local_7321248;
+-return_direct_with_clo1(data,(closure)&c_7321143,__lambda_1418, set_cell_as_expr(&local_7321248, key_731124_733465));;
++return_direct_with_clo1(data,(closure)&c_7319841,__lambda_712, boolean_f);;
+ }
+
+-static void __lambda_1418(void *data, object self_7313711, int argc, object *args) /* object self_7313711, object key_731124_733465 */
++static void __lambda_712(void *data, object self_7312457, int argc, object *args) /* object self_7312457, object key_731124_733118 */
+ {
+- object key_731124_733465 = args[0];
++ object key_731124_733118 = args[0];
+
+-closureN_type c_7321145;
+-object e_7321242 [4];
+-c_7321145.hdr.mark = gc_color_red;
+- c_7321145.hdr.grayed = 0;
+-c_7321145.tag = closureN_tag;
+- c_7321145.fn = (function_type)__lambda_713;
+-c_7321145.num_args = 1;
+-c_7321145.num_elements = 4;
+-c_7321145.elements = (object *)e_7321242;
+-c_7321145.elements[0] = ((closureN)self_7313711)->elements[0];
+-c_7321145.elements[1] = ((closureN)self_7313711)->elements[1];
+-c_7321145.elements[2] = key_731124_733465;
+-c_7321145.elements[3] = ((closureN)self_7313711)->elements[2];
++closureN_type c_7319843;
++object e_7319945 [3];
++c_7319843.hdr.mark = gc_color_red;
++ c_7319843.hdr.grayed = 0;
++c_7319843.tag = closureN_tag;
++ c_7319843.fn = (function_type)__lambda_1371;
++c_7319843.num_args = 1;
++c_7319843.num_elements = 3;
++c_7319843.elements = (object *)e_7319945;
++c_7319843.elements[0] = ((closureN)self_7312457)->elements[0];
++c_7319843.elements[1] = ((closureN)self_7312457)->elements[1];
++c_7319843.elements[2] = ((closureN)self_7312457)->elements[2];
++
++
++pair_type local_7319948;
++return_direct_with_clo1(data,(closure)&c_7319843,__lambda_1371, set_cell_as_expr(&local_7319948, key_731124_733118));;
++}
++
++static void __lambda_1371(void *data, object self_7312458, int argc, object *args) /* object self_7312458, object key_731124_733118 */
++ {
++ object key_731124_733118 = args[0];
++
++closureN_type c_7319845;
++object e_7319942 [4];
++c_7319845.hdr.mark = gc_color_red;
++ c_7319845.hdr.grayed = 0;
++c_7319845.tag = closureN_tag;
++ c_7319845.fn = (function_type)__lambda_713;
++c_7319845.num_args = 1;
++c_7319845.num_elements = 4;
++c_7319845.elements = (object *)e_7319942;
++c_7319845.elements[0] = ((closureN)self_7312458)->elements[0];
++c_7319845.elements[1] = ((closureN)self_7312458)->elements[1];
++c_7319845.elements[2] = key_731124_733118;
++c_7319845.elements[3] = ((closureN)self_7312458)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321145,__lambda_713, Cyc_set_cell(data, key_731124_733465, __glo__85parameter_91id_85_scheme_base));;
++return_direct_with_clo1(data,(closure)&c_7319845,__lambda_713, Cyc_set_cell(data, key_731124_733118, __glo__85parameter_91id_85_scheme_base));;
+ }
+
+-static void __lambda_713(void *data, object self_7313712, int argc, object *args) /* object self_7313712, object r_736040 */
++static void __lambda_713(void *data, object self_7312459, int argc, object *args) /* object self_7312459, object r_735588 */
+ {
+
+
+-closureN_type c_7321147;
+-object e_7321238 [4];
+-c_7321147.hdr.mark = gc_color_red;
+- c_7321147.hdr.grayed = 0;
+-c_7321147.tag = closureN_tag;
+- c_7321147.fn = (function_type)__lambda_714;
+-c_7321147.num_args = 1;
+-c_7321147.num_elements = 4;
+-c_7321147.elements = (object *)e_7321238;
+-c_7321147.elements[0] = ((closureN)self_7313712)->elements[0];
+-c_7321147.elements[1] = ((closureN)self_7313712)->elements[1];
+-c_7321147.elements[2] = ((closureN)self_7313712)->elements[2];
+-c_7321147.elements[3] = ((closureN)self_7313712)->elements[3];
++closureN_type c_7319847;
++object e_7319938 [4];
++c_7319847.hdr.mark = gc_color_red;
++ c_7319847.hdr.grayed = 0;
++c_7319847.tag = closureN_tag;
++ c_7319847.fn = (function_type)__lambda_714;
++c_7319847.num_args = 1;
++c_7319847.num_elements = 4;
++c_7319847.elements = (object *)e_7319938;
++c_7319847.elements[0] = ((closureN)self_7312459)->elements[0];
++c_7319847.elements[1] = ((closureN)self_7312459)->elements[1];
++c_7319847.elements[2] = ((closureN)self_7312459)->elements[2];
++c_7319847.elements[3] = ((closureN)self_7312459)->elements[3];
+
+
+-complex_num_type local_7321241;
+-return_direct_with_clo1(data,(closure)&c_7321147,__lambda_714, Cyc_fast_sum(data,&local_7321241, __glo__85parameter_91id_85_scheme_base, obj_int2obj(1)));;
++complex_num_type local_7319941;
++return_direct_with_clo1(data,(closure)&c_7319847,__lambda_714, Cyc_fast_sum(data,&local_7319941, __glo__85parameter_91id_85_scheme_base, obj_int2obj(1)));;
+ }
+
+-static void __lambda_714(void *data, object self_7313713, int argc, object *args) /* object self_7313713, object r_736061 */
++static void __lambda_714(void *data, object self_7312460, int argc, object *args) /* object self_7312460, object r_735609 */
+ {
+- object r_736061 = args[0];
++ object r_735609 = args[0];
+
+-closureN_type c_7321149;
+-object e_7321234 [4];
+-c_7321149.hdr.mark = gc_color_red;
+- c_7321149.hdr.grayed = 0;
+-c_7321149.tag = closureN_tag;
+- c_7321149.fn = (function_type)__lambda_715;
+-c_7321149.num_args = 1;
+-c_7321149.num_elements = 4;
+-c_7321149.elements = (object *)e_7321234;
+-c_7321149.elements[0] = ((closureN)self_7313713)->elements[0];
+-c_7321149.elements[1] = ((closureN)self_7313713)->elements[1];
+-c_7321149.elements[2] = ((closureN)self_7313713)->elements[2];
+-c_7321149.elements[3] = ((closureN)self_7313713)->elements[3];
++closureN_type c_7319849;
++object e_7319934 [4];
++c_7319849.hdr.mark = gc_color_red;
++ c_7319849.hdr.grayed = 0;
++c_7319849.tag = closureN_tag;
++ c_7319849.fn = (function_type)__lambda_715;
++c_7319849.num_args = 1;
++c_7319849.num_elements = 4;
++c_7319849.elements = (object *)e_7319934;
++c_7319849.elements[0] = ((closureN)self_7312460)->elements[0];
++c_7319849.elements[1] = ((closureN)self_7312460)->elements[1];
++c_7319849.elements[2] = ((closureN)self_7312460)->elements[2];
++c_7319849.elements[3] = ((closureN)self_7312460)->elements[3];
+
+
+-object c_7321237 = global_set_cps_id(data,(closure)&c_7321149,"__glo__85parameter_91id_85_scheme_base", __glo__85parameter_91id_85_scheme_base, r_736061);
+-return_closcall1(data,(closure)&c_7321149, c_7321237);;
++object c_7319937 = global_set_cps_id(data,(closure)&c_7319849,"__glo__85parameter_91id_85_scheme_base", __glo__85parameter_91id_85_scheme_base, r_735609);
++return_closcall1(data,(closure)&c_7319849, c_7319937);;
+ }
+
+-static void __lambda_715(void *data, object self_7313714, int argc, object *args) /* object self_7313714, object r_736041 */
++static void __lambda_715(void *data, object self_7312461, int argc, object *args) /* object self_7312461, object r_735589 */
+ {
+
+
+-closureN_type c_7321151;
+-object e_7321226 [3];
+-c_7321151.hdr.mark = gc_color_red;
+- c_7321151.hdr.grayed = 0;
+-c_7321151.tag = closureN_tag;
+- c_7321151.fn = (function_type)__lambda_716;
+-c_7321151.num_args = 1;
+-c_7321151.num_elements = 3;
+-c_7321151.elements = (object *)e_7321226;
+-c_7321151.elements[0] = ((closureN)self_7313714)->elements[0];
+-c_7321151.elements[1] = ((closureN)self_7313714)->elements[1];
+-c_7321151.elements[2] = ((closureN)self_7313714)->elements[2];
++closureN_type c_7319851;
++object e_7319926 [3];
++c_7319851.hdr.mark = gc_color_red;
++ c_7319851.hdr.grayed = 0;
++c_7319851.tag = closureN_tag;
++ c_7319851.fn = (function_type)__lambda_716;
++c_7319851.num_args = 1;
++c_7319851.num_elements = 3;
++c_7319851.elements = (object *)e_7319926;
++c_7319851.elements[0] = ((closureN)self_7312461)->elements[0];
++c_7319851.elements[1] = ((closureN)self_7312461)->elements[1];
++c_7319851.elements[2] = ((closureN)self_7312461)->elements[2];
+
+
+-pair_type local_7321229;
++pair_type local_7319929;
+
+
+-return_direct_with_clo2(data, __glo_set_91param_91obj_67_scheme_base, (((closure) __glo_set_91param_91obj_67_scheme_base)->fn), &c_7321151, set_pair_as_expr(&local_7321229, car(((closureN)self_7313714)->elements[2]), ((closureN)self_7313714)->elements[3]));;
++return_direct_with_clo2(data, __glo_set_91param_91obj_67_scheme_base, (((closure) __glo_set_91param_91obj_67_scheme_base)->fn), &c_7319851, set_pair_as_expr(&local_7319929, car(((closureN)self_7312461)->elements[2]), ((closureN)self_7312461)->elements[3]));;
+ }
+
+-static void __lambda_716(void *data, object self_7313715, int argc, object *args) /* object self_7313715, object r_736042 */
++static void __lambda_716(void *data, object self_7312462, int argc, object *args) /* object self_7312462, object r_735590 */
+ {
+
+
+-closureN_type c_7321154;
+-object e_7321225 [2];
+-c_7321154.hdr.mark = gc_color_red;
+- c_7321154.hdr.grayed = 0;
+-c_7321154.tag = closureN_tag;
+- c_7321154.fn = (function_type)__lambda_717;
+-c_7321154.num_args = 0;
+-c_7321154.num_elements = 2;
+-c_7321154.elements = (object *)e_7321225;
+-c_7321154.elements[0] = ((closureN)self_7313715)->elements[0];
+-c_7321154.elements[1] = ((closureN)self_7313715)->elements[2];
++closureN_type c_7319854;
++object e_7319925 [2];
++c_7319854.hdr.mark = gc_color_red;
++ c_7319854.hdr.grayed = 0;
++c_7319854.tag = closureN_tag;
++ c_7319854.fn = (function_type)__lambda_717;
++c_7319854.num_args = 0;
++c_7319854.num_elements = 2;
++c_7319854.elements = (object *)e_7319925;
++c_7319854.elements[0] = ((closureN)self_7312462)->elements[0];
++c_7319854.elements[1] = ((closureN)self_7312462)->elements[2];
+
+-return_direct_with_clo1(data, ((closureN)self_7313715)->elements[1], (((closure) ((closureN)self_7313715)->elements[1])->fn), &c_7321154);;
++return_direct_with_clo1(data, ((closureN)self_7312462)->elements[1], (((closure) ((closureN)self_7312462)->elements[1])->fn), &c_7319854);;
+ }
+
+-static void __lambda_717(void *data, object self_7313716, int argc, object *args) /* object self_7313716, object k_736043, object args_731126_733466_raw, ... */
++static void __lambda_717(void *data, object self_7312463, int argc, object *args) /* object self_7312463, object k_735591, object args_731126_733119_raw, ... */
+ {
+- object k_736043 = args[0];
+-load_varargs(args_731126_733466, args, 1, argc - 1);
++ object k_735591 = args[0];
++load_varargs(args_731126_733119, args, 1, argc - 1);
+
+-if( (boolean_f != Cyc_is_null(args_731126_733466)) ){
++if( (boolean_f != Cyc_is_null(args_731126_733119)) ){
+
+-closureN_type c_7321158;
+-object e_7321171 [2];
+-c_7321158.hdr.mark = gc_color_red;
+- c_7321158.hdr.grayed = 0;
+-c_7321158.tag = closureN_tag;
+- c_7321158.fn = (function_type)__lambda_718;
+-c_7321158.num_args = 1;
+-c_7321158.num_elements = 2;
+-c_7321158.elements = (object *)e_7321171;
+-c_7321158.elements[0] = k_736043;
+-c_7321158.elements[1] = ((closureN)self_7313716)->elements[1];
++closureN_type c_7319858;
++object e_7319871 [2];
++c_7319858.hdr.mark = gc_color_red;
++ c_7319858.hdr.grayed = 0;
++c_7319858.tag = closureN_tag;
++ c_7319858.fn = (function_type)__lambda_718;
++c_7319858.num_args = 1;
++c_7319858.num_elements = 2;
++c_7319858.elements = (object *)e_7319871;
++c_7319858.elements[0] = k_735591;
++c_7319858.elements[1] = ((closureN)self_7312463)->elements[1];
+
+-return_direct_with_clo1(data, __glo_get_91param_91objs_scheme_base, (((closure) __glo_get_91param_91objs_scheme_base)->fn), &c_7321158);
++return_direct_with_clo1(data, __glo_get_91param_91objs_scheme_base, (((closure) __glo_get_91param_91objs_scheme_base)->fn), &c_7319858);
+ } else {
+
+
+-if( (boolean_f != Cyc_eq(Cyc_car(data, args_731126_733466), quote__121param_91set_67_125)) ){
++if( (boolean_f != Cyc_eq(Cyc_car(data, args_731126_733119), quote__121param_91set_67_125)) ){
+
+-closureN_type c_7321177;
+-object e_7321194 [3];
+-c_7321177.hdr.mark = gc_color_red;
+- c_7321177.hdr.grayed = 0;
+-c_7321177.tag = closureN_tag;
+- c_7321177.fn = (function_type)__lambda_720;
+-c_7321177.num_args = 1;
+-c_7321177.num_elements = 3;
+-c_7321177.elements = (object *)e_7321194;
+-c_7321177.elements[0] = args_731126_733466;
+-c_7321177.elements[1] = k_736043;
+-c_7321177.elements[2] = ((closureN)self_7313716)->elements[1];
+-
+-return_direct_with_clo1(data, __glo_get_91param_91objs_scheme_base, (((closure) __glo_get_91param_91objs_scheme_base)->fn), &c_7321177);
++closureN_type c_7319877;
++object e_7319894 [3];
++c_7319877.hdr.mark = gc_color_red;
++ c_7319877.hdr.grayed = 0;
++c_7319877.tag = closureN_tag;
++ c_7319877.fn = (function_type)__lambda_720;
++c_7319877.num_args = 1;
++c_7319877.num_elements = 3;
++c_7319877.elements = (object *)e_7319894;
++c_7319877.elements[0] = args_731126_733119;
++c_7319877.elements[1] = k_735591;
++c_7319877.elements[2] = ((closureN)self_7312463)->elements[1];
++
++return_direct_with_clo1(data, __glo_get_91param_91objs_scheme_base, (((closure) __glo_get_91param_91objs_scheme_base)->fn), &c_7319877);
+ } else {
+
+
+-if( (boolean_f != Cyc_eq(Cyc_car(data, args_731126_733466), quote__121param_91convert_125)) ){
+- return_direct_with_clo1(data, k_736043, (((closure) k_736043)->fn), ((closureN)self_7313716)->elements[0]);
+-} else {
+-
+-closureN_type c_7321202;
+-object e_7321224 [4];
+-c_7321202.hdr.mark = gc_color_red;
+- c_7321202.hdr.grayed = 0;
+-c_7321202.tag = closureN_tag;
+- c_7321202.fn = (function_type)__lambda_722;
+-c_7321202.num_args = 1;
+-c_7321202.num_elements = 4;
+-c_7321202.elements = (object *)e_7321224;
+-c_7321202.elements[0] = args_731126_733466;
+-c_7321202.elements[1] = ((closureN)self_7313716)->elements[0];
+-c_7321202.elements[2] = k_736043;
+-c_7321202.elements[3] = ((closureN)self_7313716)->elements[1];
++if( (boolean_f != Cyc_eq(Cyc_car(data, args_731126_733119), quote__121param_91convert_125)) ){
++ return_direct_with_clo1(data, k_735591, (((closure) k_735591)->fn), ((closureN)self_7312463)->elements[0]);
++} else {
++
++closureN_type c_7319902;
++object e_7319924 [4];
++c_7319902.hdr.mark = gc_color_red;
++ c_7319902.hdr.grayed = 0;
++c_7319902.tag = closureN_tag;
++ c_7319902.fn = (function_type)__lambda_722;
++c_7319902.num_args = 1;
++c_7319902.num_elements = 4;
++c_7319902.elements = (object *)e_7319924;
++c_7319902.elements[0] = args_731126_733119;
++c_7319902.elements[1] = ((closureN)self_7312463)->elements[0];
++c_7319902.elements[2] = k_735591;
++c_7319902.elements[3] = ((closureN)self_7312463)->elements[1];
+
+-return_direct_with_clo1(data, __glo_get_91param_91objs_scheme_base, (((closure) __glo_get_91param_91objs_scheme_base)->fn), &c_7321202);}
++return_direct_with_clo1(data, __glo_get_91param_91objs_scheme_base, (((closure) __glo_get_91param_91objs_scheme_base)->fn), &c_7319902);}
+ ;}
+ ;}
+ ;;
+ }
+
+-static void __lambda_722(void *data, object self_7313721, int argc, object *args) /* object self_7313721, object r_736055 */
++static void __lambda_722(void *data, object self_7312468, int argc, object *args) /* object self_7312468, object r_735603 */
+ {
+- object r_736055 = args[0];
++ object r_735603 = args[0];
+
+-closureN_type c_7321204;
+-object e_7321218 [3];
+-c_7321204.hdr.mark = gc_color_red;
+- c_7321204.hdr.grayed = 0;
+-c_7321204.tag = closureN_tag;
+- c_7321204.fn = (function_type)__lambda_723;
+-c_7321204.num_args = 1;
+-c_7321204.num_elements = 3;
+-c_7321204.elements = (object *)e_7321218;
+-c_7321204.elements[0] = ((closureN)self_7313721)->elements[0];
+-c_7321204.elements[1] = ((closureN)self_7313721)->elements[1];
+-c_7321204.elements[2] = ((closureN)self_7313721)->elements[2];
++closureN_type c_7319904;
++object e_7319918 [3];
++c_7319904.hdr.mark = gc_color_red;
++ c_7319904.hdr.grayed = 0;
++c_7319904.tag = closureN_tag;
++ c_7319904.fn = (function_type)__lambda_723;
++c_7319904.num_args = 1;
++c_7319904.num_elements = 3;
++c_7319904.elements = (object *)e_7319918;
++c_7319904.elements[0] = ((closureN)self_7312468)->elements[0];
++c_7319904.elements[1] = ((closureN)self_7312468)->elements[1];
++c_7319904.elements[2] = ((closureN)self_7312468)->elements[2];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321204,__lambda_723, assoc(data, car(((closureN)self_7313721)->elements[3]), r_736055));;
++return_direct_with_clo1(data,(closure)&c_7319904,__lambda_723, assoc(data, car(((closureN)self_7312468)->elements[3]), r_735603));;
+ }
+
+-static void __lambda_723(void *data, object self_7313722, int argc, object *args) /* object self_7313722, object cell_731139_733469 */
++static void __lambda_723(void *data, object self_7312469, int argc, object *args) /* object self_7312469, object cell_731139_733122 */
+ {
+- object cell_731139_733469 = args[0];
++ object cell_731139_733122 = args[0];
+
+-closureN_type c_7321207;
+-object e_7321214 [2];
+-c_7321207.hdr.mark = gc_color_red;
+- c_7321207.hdr.grayed = 0;
+-c_7321207.tag = closureN_tag;
+- c_7321207.fn = (function_type)__lambda_724;
+-c_7321207.num_args = 1;
+-c_7321207.num_elements = 2;
+-c_7321207.elements = (object *)e_7321214;
+-c_7321207.elements[0] = cell_731139_733469;
+-c_7321207.elements[1] = ((closureN)self_7313722)->elements[2];
++closureN_type c_7319907;
++object e_7319914 [2];
++c_7319907.hdr.mark = gc_color_red;
++ c_7319907.hdr.grayed = 0;
++c_7319907.tag = closureN_tag;
++ c_7319907.fn = (function_type)__lambda_724;
++c_7319907.num_args = 1;
++c_7319907.num_elements = 2;
++c_7319907.elements = (object *)e_7319914;
++c_7319907.elements[0] = cell_731139_733122;
++c_7319907.elements[1] = ((closureN)self_7312469)->elements[2];
+
+
+
+-return_closcall2(data, ((closureN)self_7313722)->elements[1], &c_7321207, Cyc_car(data, ((closureN)self_7313722)->elements[0]));;
++return_closcall2(data, ((closureN)self_7312469)->elements[1], &c_7319907, Cyc_car(data, ((closureN)self_7312469)->elements[0]));;
+ }
+
+-static void __lambda_724(void *data, object self_7313723, int argc, object *args) /* object self_7313723, object r_736053 */
++static void __lambda_724(void *data, object self_7312470, int argc, object *args) /* object self_7312470, object r_735601 */
+ {
+- object r_736053 = args[0];
++ object r_735601 = args[0];
+
+-object c_7321212 = Cyc_set_cdr_cps(data, ((closureN)self_7313723)->elements[1],((closureN)self_7313723)->elements[0], r_736053);
+-return_direct_with_clo1(data, ((closureN)self_7313723)->elements[1], (((closure) ((closureN)self_7313723)->elements[1])->fn), c_7321212);;
++object c_7319912 = Cyc_set_cdr_cps(data, ((closureN)self_7312470)->elements[1],((closureN)self_7312470)->elements[0], r_735601);
++return_direct_with_clo1(data, ((closureN)self_7312470)->elements[1], (((closure) ((closureN)self_7312470)->elements[1])->fn), c_7319912);;
+ }
+
+-static void __lambda_720(void *data, object self_7313719, int argc, object *args) /* object self_7313719, object r_736050 */
++static void __lambda_720(void *data, object self_7312466, int argc, object *args) /* object self_7312466, object r_735598 */
+ {
+- object r_736050 = args[0];
++ object r_735598 = args[0];
+
+-closureN_type c_7321179;
+-object e_7321188 [2];
+-c_7321179.hdr.mark = gc_color_red;
+- c_7321179.hdr.grayed = 0;
+-c_7321179.tag = closureN_tag;
+- c_7321179.fn = (function_type)__lambda_721;
+-c_7321179.num_args = 1;
+-c_7321179.num_elements = 2;
+-c_7321179.elements = (object *)e_7321188;
+-c_7321179.elements[0] = ((closureN)self_7313719)->elements[0];
+-c_7321179.elements[1] = ((closureN)self_7313719)->elements[1];
++closureN_type c_7319879;
++object e_7319888 [2];
++c_7319879.hdr.mark = gc_color_red;
++ c_7319879.hdr.grayed = 0;
++c_7319879.tag = closureN_tag;
++ c_7319879.fn = (function_type)__lambda_721;
++c_7319879.num_args = 1;
++c_7319879.num_elements = 2;
++c_7319879.elements = (object *)e_7319888;
++c_7319879.elements[0] = ((closureN)self_7312466)->elements[0];
++c_7319879.elements[1] = ((closureN)self_7312466)->elements[1];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321179,__lambda_721, assoc(data, car(((closureN)self_7313719)->elements[2]), r_736050));;
++return_direct_with_clo1(data,(closure)&c_7319879,__lambda_721, assoc(data, car(((closureN)self_7312466)->elements[2]), r_735598));;
+ }
+
+-static void __lambda_721(void *data, object self_7313720, int argc, object *args) /* object self_7313720, object cell_731134_733468 */
++static void __lambda_721(void *data, object self_7312467, int argc, object *args) /* object self_7312467, object cell_731134_733121 */
+ {
+- object cell_731134_733468 = args[0];
++ object cell_731134_733121 = args[0];
+
+
+
+-object c_7321184 = Cyc_set_cdr_cps(data, ((closureN)self_7313720)->elements[1],cell_731134_733468, Cyc_cadr(data, ((closureN)self_7313720)->elements[0]));
+-return_direct_with_clo1(data, ((closureN)self_7313720)->elements[1], (((closure) ((closureN)self_7313720)->elements[1])->fn), c_7321184);;
++object c_7319884 = Cyc_set_cdr_cps(data, ((closureN)self_7312467)->elements[1],cell_731134_733121, Cyc_cadr(data, ((closureN)self_7312467)->elements[0]));
++return_direct_with_clo1(data, ((closureN)self_7312467)->elements[1], (((closure) ((closureN)self_7312467)->elements[1])->fn), c_7319884);;
+ }
+
+-static void __lambda_718(void *data, object self_7313717, int argc, object *args) /* object self_7313717, object pobj_731130_733467 */
++static void __lambda_718(void *data, object self_7312464, int argc, object *args) /* object self_7312464, object pobj_731130_733120 */
+ {
+- object pobj_731130_733467 = args[0];
++ object pobj_731130_733120 = args[0];
+
+-closureN_type c_7321160;
+-object e_7321165 [1];
+-c_7321160.hdr.mark = gc_color_red;
+- c_7321160.hdr.grayed = 0;
+-c_7321160.tag = closureN_tag;
+- c_7321160.fn = (function_type)__lambda_719;
+-c_7321160.num_args = 1;
+-c_7321160.num_elements = 1;
+-c_7321160.elements = (object *)e_7321165;
+-c_7321160.elements[0] = ((closureN)self_7313717)->elements[0];
++closureN_type c_7319860;
++object e_7319865 [1];
++c_7319860.hdr.mark = gc_color_red;
++ c_7319860.hdr.grayed = 0;
++c_7319860.tag = closureN_tag;
++ c_7319860.fn = (function_type)__lambda_719;
++c_7319860.num_args = 1;
++c_7319860.num_elements = 1;
++c_7319860.elements = (object *)e_7319865;
++c_7319860.elements[0] = ((closureN)self_7312464)->elements[0];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7321160,__lambda_719, assoc(data, car(((closureN)self_7313717)->elements[1]), pobj_731130_733467));;
++return_direct_with_clo1(data,(closure)&c_7319860,__lambda_719, assoc(data, car(((closureN)self_7312464)->elements[1]), pobj_731130_733120));;
+ }
+
+-static void __lambda_719(void *data, object self_7313718, int argc, object *args) /* object self_7313718, object r_736046 */
++static void __lambda_719(void *data, object self_7312465, int argc, object *args) /* object self_7312465, object r_735594 */
+ {
+- object r_736046 = args[0];
++ object r_735594 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313718)->elements[0], (((closure) ((closureN)self_7313718)->elements[0])->fn), Cyc_cdr(data, r_736046));;
++return_direct_with_clo1(data, ((closureN)self_7312465)->elements[0], (((closure) ((closureN)self_7312465)->elements[0])->fn), Cyc_cdr(data, r_735594));;
+ }
+
+-static void __lambda_708(void *data, object self_7313724, int argc, object *args) /* object self_7313724, object k_736062 */
++static void __lambda_708(void *data, object self_7312471, int argc, object *args) /* object self_7312471, object k_735610 */
+ {
+- object k_736062 = args[0];
++ object k_735610 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313724)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312471)->elements[0])) ){
+
+
+-return_direct_with_clo1(data, k_736062,__lambda_710, Cyc_car(data, ((closureN)self_7313724)->elements[0]));
++return_direct_with_clo1(data, k_735610,__lambda_710, Cyc_car(data, ((closureN)self_7312471)->elements[0]));
+ } else {
+
+-mclosure0(c_7321134, (function_type)__lambda_709);c_7321134.num_args = 1;
+-return_direct_with_clo1(data, k_736062,__lambda_710, &c_7321134);}
+-;;
+-}
+-
+-static void __lambda_709(void *data, object self_7313725, int argc, object *args) /* object self_7313725, object k_736064, object x_731140_733470 */
+- {
+- object k_736064 = args[0]; object x_731140_733470 = args[1];
+- return_direct_with_clo1(data, k_736064, (((closure) k_736064)->fn), x_731140_733470);;
+-}
+-
+-static void __lambda_1465(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
+- make_pair(c, obj, thd->param_objs);
+- thd->param_objs = &c;
+- return_closcall1(data, k, &c); }
+-static void __lambda_1464(void *data, object _, int argc, object *args) {object k = args[0]; gc_thread_data *thd = (gc_thread_data *)data;
+- //Cyc_st_add(data, "scheme/base.sld:get-param-objs");
+- return_closcall1(data, k, thd->param_objs); }
+-static void __lambda_636(void *data, object _, int argc, object *args) /* closure _,object k_735723, object expr_73790_73856_731007_733354, object rename_73791_73857_731008_733355, object compare_73792_73858_731009_733356 */
+- {
+-object k_735723 = args[0]; object expr_73790_73856_731007_733354 = args[1]; object rename_73791_73857_731008_733355 = args[2];
+- Cyc_st_add(data, "scheme/base.sld:parameterize");
+-
+-closureN_type c_7320172;
+-object e_7321118 [3];
+-c_7320172.hdr.mark = gc_color_red;
+- c_7320172.hdr.grayed = 0;
+-c_7320172.tag = closureN_tag;
+- c_7320172.fn = (function_type)__lambda_637;
+-c_7320172.num_args = 1;
+-c_7320172.num_elements = 3;
+-c_7320172.elements = (object *)e_7321118;
+-c_7320172.elements[0] = expr_73790_73856_731007_733354;
+-c_7320172.elements[1] = k_735723;
+-c_7320172.elements[2] = rename_73791_73857_731008_733355;
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7320172,__lambda_637, Cyc_cdr(data, expr_73790_73856_731007_733354));;
+-}
+-
+-static void __lambda_637(void *data, object self_7313636, int argc, object *args) /* object self_7313636, object v_931_73798_73933_731057_733404 */
+- {
+- object v_931_73798_73933_731057_733404 = args[0];
+-
+-closureN_type c_7320174;
+-object e_7320699 [2];
+-c_7320174.hdr.mark = gc_color_red;
+- c_7320174.hdr.grayed = 0;
+-c_7320174.tag = closureN_tag;
+- c_7320174.fn = (function_type)__lambda_638;
+-c_7320174.num_args = 0;
+-c_7320174.num_elements = 2;
+-c_7320174.elements = (object *)e_7320699;
+-c_7320174.elements[0] = ((closureN)self_7313636)->elements[2];
+-c_7320174.elements[1] = v_931_73798_73933_731057_733404;
+-
+-
+-closureN_type c_7320700;
+-object e_7321117 [3];
+-c_7320700.hdr.mark = gc_color_red;
+- c_7320700.hdr.grayed = 0;
+-c_7320700.tag = closureN_tag;
+- c_7320700.fn = (function_type)__lambda_681;
+-c_7320700.num_args = 1;
+-c_7320700.num_elements = 3;
+-c_7320700.elements = (object *)e_7321117;
+-c_7320700.elements[0] = ((closureN)self_7313636)->elements[0];
+-c_7320700.elements[1] = ((closureN)self_7313636)->elements[1];
+-c_7320700.elements[2] = ((closureN)self_7313636)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7320174,__lambda_638, &c_7320700);;
++mclosure0(c_7319834, (function_type)__lambda_709);c_7319834.num_args = 1;
++return_direct_with_clo1(data, k_735610,__lambda_710, &c_7319834);}
++;;
+ }
+
+-static void __lambda_681(void *data, object self_7313637, int argc, object *args) /* object self_7313637, object tmp_73860_73862_731010_733357 */
++static void __lambda_709(void *data, object self_7312472, int argc, object *args) /* object self_7312472, object k_735612, object x_731140_733123 */
+ {
+- object tmp_73860_73862_731010_733357 = args[0];
+-
+-closureN_type c_7320702;
+-object e_7321110 [3];
+-c_7320702.hdr.mark = gc_color_red;
+- c_7320702.hdr.grayed = 0;
+-c_7320702.tag = closureN_tag;
+- c_7320702.fn = (function_type)__lambda_682;
+-c_7320702.num_args = 0;
+-c_7320702.num_elements = 3;
+-c_7320702.elements = (object *)e_7321110;
+-c_7320702.elements[0] = ((closureN)self_7313637)->elements[0];
+-c_7320702.elements[1] = ((closureN)self_7313637)->elements[2];
+-c_7320702.elements[2] = tmp_73860_73862_731010_733357;
++ object k_735612 = args[0]; object x_731140_733123 = args[1];
++ return_direct_with_clo1(data, k_735612, (((closure) k_735612)->fn), x_731140_733123);;
++}
+
++static void __lambda_1418(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
++ make_pair(c, obj, thd->param_objs);
++ thd->param_objs = &c;
++ return_closcall1(data, k, &c); }
++static void __lambda_1417(void *data, object _, int argc, object *args) {object k = args[0]; gc_thread_data *thd = (gc_thread_data *)data;
++ //Cyc_st_add(data, "scheme/base.sld:get-param-objs");
++ return_closcall1(data, k, thd->param_objs); }
++static void __lambda_636(void *data, object _, int argc, object *args) /* closure _,object k_735271, object expr_73790_73856_731007_733007, object rename_73791_73857_731008_733008, object compare_73792_73858_731009_733009 */
++ {
++object k_735271 = args[0]; object expr_73790_73856_731007_733007 = args[1]; object rename_73791_73857_731008_733008 = args[2];
++ Cyc_st_add(data, "scheme/base.sld:parameterize");
+
+-closureN_type c_7321111;
+-object e_7321116 [1];
+-c_7321111.hdr.mark = gc_color_red;
+- c_7321111.hdr.grayed = 0;
+-c_7321111.tag = closureN_tag;
+- c_7321111.fn = (function_type)__lambda_706;
+-c_7321111.num_args = 1;
+-c_7321111.num_elements = 1;
+-c_7321111.elements = (object *)e_7321116;
+-c_7321111.elements[0] = ((closureN)self_7313637)->elements[1];
++closureN_type c_7318872;
++object e_7319818 [3];
++c_7318872.hdr.mark = gc_color_red;
++ c_7318872.hdr.grayed = 0;
++c_7318872.tag = closureN_tag;
++ c_7318872.fn = (function_type)__lambda_637;
++c_7318872.num_args = 1;
++c_7318872.num_elements = 3;
++c_7318872.elements = (object *)e_7319818;
++c_7318872.elements[0] = expr_73790_73856_731007_733007;
++c_7318872.elements[1] = k_735271;
++c_7318872.elements[2] = rename_73791_73857_731008_733008;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7318872,__lambda_637, Cyc_cdr(data, expr_73790_73856_731007_733007));;
++}
++
++static void __lambda_637(void *data, object self_7312383, int argc, object *args) /* object self_7312383, object v_931_73798_73933_731057_733057 */
++ {
++ object v_931_73798_73933_731057_733057 = args[0];
++
++closureN_type c_7318874;
++object e_7319399 [2];
++c_7318874.hdr.mark = gc_color_red;
++ c_7318874.hdr.grayed = 0;
++c_7318874.tag = closureN_tag;
++ c_7318874.fn = (function_type)__lambda_638;
++c_7318874.num_args = 0;
++c_7318874.num_elements = 2;
++c_7318874.elements = (object *)e_7319399;
++c_7318874.elements[0] = ((closureN)self_7312383)->elements[2];
++c_7318874.elements[1] = v_931_73798_73933_731057_733057;
++
++
++closureN_type c_7319400;
++object e_7319817 [3];
++c_7319400.hdr.mark = gc_color_red;
++ c_7319400.hdr.grayed = 0;
++c_7319400.tag = closureN_tag;
++ c_7319400.fn = (function_type)__lambda_681;
++c_7319400.num_args = 1;
++c_7319400.num_elements = 3;
++c_7319400.elements = (object *)e_7319817;
++c_7319400.elements[0] = ((closureN)self_7312383)->elements[0];
++c_7319400.elements[1] = ((closureN)self_7312383)->elements[1];
++c_7319400.elements[2] = ((closureN)self_7312383)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7318874,__lambda_638, &c_7319400);;
++}
++
++static void __lambda_681(void *data, object self_7312384, int argc, object *args) /* object self_7312384, object tmp_73860_73862_731010_733010 */
++ {
++ object tmp_73860_73862_731010_733010 = args[0];
++
++closureN_type c_7319402;
++object e_7319810 [3];
++c_7319402.hdr.mark = gc_color_red;
++ c_7319402.hdr.grayed = 0;
++c_7319402.tag = closureN_tag;
++ c_7319402.fn = (function_type)__lambda_682;
++c_7319402.num_args = 0;
++c_7319402.num_elements = 3;
++c_7319402.elements = (object *)e_7319810;
++c_7319402.elements[0] = ((closureN)self_7312384)->elements[0];
++c_7319402.elements[1] = ((closureN)self_7312384)->elements[2];
++c_7319402.elements[2] = tmp_73860_73862_731010_733010;
++
++
++closureN_type c_7319811;
++object e_7319816 [1];
++c_7319811.hdr.mark = gc_color_red;
++ c_7319811.hdr.grayed = 0;
++c_7319811.tag = closureN_tag;
++ c_7319811.fn = (function_type)__lambda_706;
++c_7319811.num_args = 1;
++c_7319811.num_elements = 1;
++c_7319811.elements = (object *)e_7319816;
++c_7319811.elements[0] = ((closureN)self_7312384)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7320702,__lambda_682, &c_7321111);;
++return_direct_with_clo1(data,(closure)&c_7319402,__lambda_682, &c_7319811);;
+ }
+
+-static void __lambda_706(void *data, object self_7313638, int argc, object *args) /* object self_7313638, object r_735724 */
++static void __lambda_706(void *data, object self_7312385, int argc, object *args) /* object self_7312385, object r_735272 */
+ {
+- object r_735724 = args[0];
++ object r_735272 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313638)->elements[0], (((closure) ((closureN)self_7313638)->elements[0])->fn), Cyc_car(data, r_735724));;
++return_direct_with_clo1(data, ((closureN)self_7312385)->elements[0], (((closure) ((closureN)self_7312385)->elements[0])->fn), Cyc_car(data, r_735272));;
+ }
+
+-static void __lambda_682(void *data, object self_7313639, int argc, object *args) /* object self_7313639, object k_735726 */
++static void __lambda_682(void *data, object self_7312386, int argc, object *args) /* object self_7312386, object k_735274 */
+ {
+- object k_735726 = args[0];
+- if( (boolean_f != ((closureN)self_7313639)->elements[2]) ){
+- return_direct_with_clo1(data, k_735726, (((closure) k_735726)->fn), ((closureN)self_7313639)->elements[2]);
++ object k_735274 = args[0];
++ if( (boolean_f != ((closureN)self_7312386)->elements[2]) ){
++ return_direct_with_clo1(data, k_735274, (((closure) k_735274)->fn), ((closureN)self_7312386)->elements[2]);
+ } else {
+
+-closureN_type c_7320707;
+-object e_7321106 [3];
+-c_7320707.hdr.mark = gc_color_red;
+- c_7320707.hdr.grayed = 0;
+-c_7320707.tag = closureN_tag;
+- c_7320707.fn = (function_type)__lambda_683;
+-c_7320707.num_args = 1;
+-c_7320707.num_elements = 3;
+-c_7320707.elements = (object *)e_7321106;
+-c_7320707.elements[0] = ((closureN)self_7313639)->elements[0];
+-c_7320707.elements[1] = k_735726;
+-c_7320707.elements[2] = ((closureN)self_7313639)->elements[1];
++closureN_type c_7319407;
++object e_7319806 [3];
++c_7319407.hdr.mark = gc_color_red;
++ c_7319407.hdr.grayed = 0;
++c_7319407.tag = closureN_tag;
++ c_7319407.fn = (function_type)__lambda_683;
++c_7319407.num_args = 1;
++c_7319407.num_elements = 3;
++c_7319407.elements = (object *)e_7319806;
++c_7319407.elements[0] = ((closureN)self_7312386)->elements[0];
++c_7319407.elements[1] = k_735274;
++c_7319407.elements[2] = ((closureN)self_7312386)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320707,__lambda_683, Cyc_cdr(data, ((closureN)self_7313639)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7319407,__lambda_683, Cyc_cdr(data, ((closureN)self_7312386)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_683(void *data, object self_7313640, int argc, object *args) /* object self_7313640, object v_9330_73827_73899_731035_733382 */
++static void __lambda_683(void *data, object self_7312387, int argc, object *args) /* object self_7312387, object v_9330_73827_73899_731035_733035 */
+ {
+- object v_9330_73827_73899_731035_733382 = args[0];
++ object v_9330_73827_73899_731035_733035 = args[0];
+
+-closureN_type c_7320709;
+-object e_7320933 [2];
+-c_7320709.hdr.mark = gc_color_red;
+- c_7320709.hdr.grayed = 0;
+-c_7320709.tag = closureN_tag;
+- c_7320709.fn = (function_type)__lambda_684;
+-c_7320709.num_args = 0;
+-c_7320709.num_elements = 2;
+-c_7320709.elements = (object *)e_7320933;
+-c_7320709.elements[0] = ((closureN)self_7313640)->elements[2];
+-c_7320709.elements[1] = v_9330_73827_73899_731035_733382;
++closureN_type c_7319409;
++object e_7319633 [2];
++c_7319409.hdr.mark = gc_color_red;
++ c_7319409.hdr.grayed = 0;
++c_7319409.tag = closureN_tag;
++ c_7319409.fn = (function_type)__lambda_684;
++c_7319409.num_args = 0;
++c_7319409.num_elements = 2;
++c_7319409.elements = (object *)e_7319633;
++c_7319409.elements[0] = ((closureN)self_7312387)->elements[2];
++c_7319409.elements[1] = v_9330_73827_73899_731035_733035;
+
+
+-closureN_type c_7320934;
+-object e_7321105 [3];
+-c_7320934.hdr.mark = gc_color_red;
+- c_7320934.hdr.grayed = 0;
+-c_7320934.tag = closureN_tag;
+- c_7320934.fn = (function_type)__lambda_689;
+-c_7320934.num_args = 1;
+-c_7320934.num_elements = 3;
+-c_7320934.elements = (object *)e_7321105;
+-c_7320934.elements[0] = ((closureN)self_7313640)->elements[0];
+-c_7320934.elements[1] = ((closureN)self_7313640)->elements[1];
+-c_7320934.elements[2] = ((closureN)self_7313640)->elements[2];
++closureN_type c_7319634;
++object e_7319805 [3];
++c_7319634.hdr.mark = gc_color_red;
++ c_7319634.hdr.grayed = 0;
++c_7319634.tag = closureN_tag;
++ c_7319634.fn = (function_type)__lambda_689;
++c_7319634.num_args = 1;
++c_7319634.num_elements = 3;
++c_7319634.elements = (object *)e_7319805;
++c_7319634.elements[0] = ((closureN)self_7312387)->elements[0];
++c_7319634.elements[1] = ((closureN)self_7312387)->elements[1];
++c_7319634.elements[2] = ((closureN)self_7312387)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7320709,__lambda_684, &c_7320934);;
++return_direct_with_clo1(data,(closure)&c_7319409,__lambda_684, &c_7319634);;
+ }
+
+-static void __lambda_689(void *data, object self_7313641, int argc, object *args) /* object self_7313641, object tmp_73864_73866_731011_733358 */
++static void __lambda_689(void *data, object self_7312388, int argc, object *args) /* object self_7312388, object tmp_73864_73866_731011_733011 */
+ {
+- object tmp_73864_73866_731011_733358 = args[0];
+- if( (boolean_f != tmp_73864_73866_731011_733358) ){
+- return_direct_with_clo1(data, ((closureN)self_7313641)->elements[1], (((closure) ((closureN)self_7313641)->elements[1])->fn), tmp_73864_73866_731011_733358);
++ object tmp_73864_73866_731011_733011 = args[0];
++ if( (boolean_f != tmp_73864_73866_731011_733011) ){
++ return_direct_with_clo1(data, ((closureN)self_7312388)->elements[1], (((closure) ((closureN)self_7312388)->elements[1])->fn), tmp_73864_73866_731011_733011);
+ } else {
+
+-closureN_type c_7320938;
+-object e_7321101 [3];
+-c_7320938.hdr.mark = gc_color_red;
+- c_7320938.hdr.grayed = 0;
+-c_7320938.tag = closureN_tag;
+- c_7320938.fn = (function_type)__lambda_690;
+-c_7320938.num_args = 1;
+-c_7320938.num_elements = 3;
+-c_7320938.elements = (object *)e_7321101;
+-c_7320938.elements[0] = ((closureN)self_7313641)->elements[0];
+-c_7320938.elements[1] = ((closureN)self_7313641)->elements[1];
+-c_7320938.elements[2] = ((closureN)self_7313641)->elements[2];
++closureN_type c_7319638;
++object e_7319801 [3];
++c_7319638.hdr.mark = gc_color_red;
++ c_7319638.hdr.grayed = 0;
++c_7319638.tag = closureN_tag;
++ c_7319638.fn = (function_type)__lambda_690;
++c_7319638.num_args = 1;
++c_7319638.num_elements = 3;
++c_7319638.elements = (object *)e_7319801;
++c_7319638.elements[0] = ((closureN)self_7312388)->elements[0];
++c_7319638.elements[1] = ((closureN)self_7312388)->elements[1];
++c_7319638.elements[2] = ((closureN)self_7312388)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320938,__lambda_690, Cyc_cdr(data, ((closureN)self_7313641)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7319638,__lambda_690, Cyc_cdr(data, ((closureN)self_7312388)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_690(void *data, object self_7313642, int argc, object *args) /* object self_7313642, object v_9347_73844_73871_731013_733360 */
++static void __lambda_690(void *data, object self_7312389, int argc, object *args) /* object self_7312389, object v_9347_73844_73871_731013_733013 */
+ {
+- object v_9347_73844_73871_731013_733360 = args[0];
++ object v_9347_73844_73871_731013_733013 = args[0];
+
+-closureN_type c_7320940;
+-object e_7321086 [2];
+-c_7320940.hdr.mark = gc_color_red;
+- c_7320940.hdr.grayed = 0;
+-c_7320940.tag = closureN_tag;
+- c_7320940.fn = (function_type)__lambda_691;
+-c_7320940.num_args = 0;
+-c_7320940.num_elements = 2;
+-c_7320940.elements = (object *)e_7321086;
+-c_7320940.elements[0] = ((closureN)self_7313642)->elements[2];
+-c_7320940.elements[1] = v_9347_73844_73871_731013_733360;
++closureN_type c_7319640;
++object e_7319786 [2];
++c_7319640.hdr.mark = gc_color_red;
++ c_7319640.hdr.grayed = 0;
++c_7319640.tag = closureN_tag;
++ c_7319640.fn = (function_type)__lambda_691;
++c_7319640.num_args = 0;
++c_7319640.num_elements = 2;
++c_7319640.elements = (object *)e_7319786;
++c_7319640.elements[0] = ((closureN)self_7312389)->elements[2];
++c_7319640.elements[1] = v_9347_73844_73871_731013_733013;
+
+
+-closureN_type c_7321087;
+-object e_7321100 [2];
+-c_7321087.hdr.mark = gc_color_red;
+- c_7321087.hdr.grayed = 0;
+-c_7321087.tag = closureN_tag;
+- c_7321087.fn = (function_type)__lambda_704;
+-c_7321087.num_args = 1;
+-c_7321087.num_elements = 2;
+-c_7321087.elements = (object *)e_7321100;
+-c_7321087.elements[0] = ((closureN)self_7313642)->elements[0];
+-c_7321087.elements[1] = ((closureN)self_7313642)->elements[1];
++closureN_type c_7319787;
++object e_7319800 [2];
++c_7319787.hdr.mark = gc_color_red;
++ c_7319787.hdr.grayed = 0;
++c_7319787.tag = closureN_tag;
++ c_7319787.fn = (function_type)__lambda_704;
++c_7319787.num_args = 1;
++c_7319787.num_elements = 2;
++c_7319787.elements = (object *)e_7319800;
++c_7319787.elements[0] = ((closureN)self_7312389)->elements[0];
++c_7319787.elements[1] = ((closureN)self_7312389)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7320940,__lambda_691, &c_7321087);;
++return_direct_with_clo1(data,(closure)&c_7319640,__lambda_691, &c_7319787);;
+ }
+
+-static void __lambda_704(void *data, object self_7313643, int argc, object *args) /* object self_7313643, object tmp_73868_73870_731012_733359 */
++static void __lambda_704(void *data, object self_7312390, int argc, object *args) /* object self_7312390, object tmp_73868_73870_731012_733012 */
+ {
+- object tmp_73868_73870_731012_733359 = args[0];
+- if( (boolean_f != tmp_73868_73870_731012_733359) ){
+- return_direct_with_clo1(data, ((closureN)self_7313643)->elements[1], (((closure) ((closureN)self_7313643)->elements[1])->fn), tmp_73868_73870_731012_733359);
++ object tmp_73868_73870_731012_733012 = args[0];
++ if( (boolean_f != tmp_73868_73870_731012_733012) ){
++ return_direct_with_clo1(data, ((closureN)self_7312390)->elements[1], (((closure) ((closureN)self_7312390)->elements[1])->fn), tmp_73868_73870_731012_733012);
+ } else {
+
+-closureN_type c_7321091;
+-object e_7321097 [1];
+-c_7321091.hdr.mark = gc_color_red;
+- c_7321091.hdr.grayed = 0;
+-c_7321091.tag = closureN_tag;
+- c_7321091.fn = (function_type)__lambda_705;
+-c_7321091.num_args = 1;
+-c_7321091.num_elements = 1;
+-c_7321091.elements = (object *)e_7321097;
+-c_7321091.elements[0] = ((closureN)self_7313643)->elements[1];
++closureN_type c_7319791;
++object e_7319797 [1];
++c_7319791.hdr.mark = gc_color_red;
++ c_7319791.hdr.grayed = 0;
++c_7319791.tag = closureN_tag;
++ c_7319791.fn = (function_type)__lambda_705;
++c_7319791.num_args = 1;
++c_7319791.num_elements = 1;
++c_7319791.elements = (object *)e_7319797;
++c_7319791.elements[0] = ((closureN)self_7312390)->elements[1];
+
+
+-make_utf8_string_with_len(c_7321098, "no expansion for", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7321091, &c_7321098, ((closureN)self_7313643)->elements[0]);}
++make_utf8_string_with_len(c_7319798, "no expansion for", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7319791, &c_7319798, ((closureN)self_7312390)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_705(void *data, object self_7313644, int argc, object *args) /* object self_7313644, object r_735729 */
++static void __lambda_705(void *data, object self_7312391, int argc, object *args) /* object self_7312391, object r_735277 */
+ {
+- object r_735729 = args[0];
++ object r_735277 = args[0];
+
+-pair_type local_7321096;
+-return_direct_with_clo1(data, ((closureN)self_7313644)->elements[0], (((closure) ((closureN)self_7313644)->elements[0])->fn), set_pair_as_expr(&local_7321096, r_735729, boolean_f));;
++pair_type local_7319796;
++return_direct_with_clo1(data, ((closureN)self_7312391)->elements[0], (((closure) ((closureN)self_7312391)->elements[0])->fn), set_pair_as_expr(&local_7319796, r_735277, boolean_f));;
+ }
+
+-static void __lambda_691(void *data, object self_7313645, int argc, object *args) /* object self_7313645, object k_735731 */
++static void __lambda_691(void *data, object self_7312392, int argc, object *args) /* object self_7312392, object k_735279 */
+ {
+- object k_735731 = args[0];
++ object k_735279 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313645)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312392)->elements[1])) ){
+
+-closureN_type c_7320945;
+-object e_7321081 [3];
+-c_7320945.hdr.mark = gc_color_red;
+- c_7320945.hdr.grayed = 0;
+-c_7320945.tag = closureN_tag;
+- c_7320945.fn = (function_type)__lambda_692;
+-c_7320945.num_args = 3;
+-c_7320945.num_elements = 3;
+-c_7320945.elements = (object *)e_7321081;
+-c_7320945.elements[0] = k_735731;
+-c_7320945.elements[1] = ((closureN)self_7313645)->elements[0];
+-c_7320945.elements[2] = ((closureN)self_7313645)->elements[1];
++closureN_type c_7319645;
++object e_7319781 [3];
++c_7319645.hdr.mark = gc_color_red;
++ c_7319645.hdr.grayed = 0;
++c_7319645.tag = closureN_tag;
++ c_7319645.fn = (function_type)__lambda_692;
++c_7319645.num_args = 3;
++c_7319645.num_elements = 3;
++c_7319645.elements = (object *)e_7319781;
++c_7319645.elements[0] = k_735279;
++c_7319645.elements[1] = ((closureN)self_7312392)->elements[0];
++c_7319645.elements[2] = ((closureN)self_7312392)->elements[1];
+
+
+
+-return_direct_with_clo3(data,(closure)&c_7320945,__lambda_692, Cyc_car(data, ((closureN)self_7313645)->elements[1]), NULL, NULL);
++return_direct_with_clo3(data,(closure)&c_7319645,__lambda_692, Cyc_car(data, ((closureN)self_7312392)->elements[1]), NULL, NULL);
+ } else {
+- return_direct_with_clo1(data, k_735731, (((closure) k_735731)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735279, (((closure) k_735279)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_692(void *data, object self_7313646, int argc, object *args) /* object self_7313646, object w_9349_73846_73875_731015_733362, object param_91ls51_73848_73876_731016_733363, object value_91ls52_73849_73877_731017_733364 */
++static void __lambda_692(void *data, object self_7312393, int argc, object *args) /* object self_7312393, object w_9349_73846_73875_731015_733015, object param_91ls51_73848_73876_731016_733016, object value_91ls52_73849_73877_731017_733017 */
+ {
+- object w_9349_73846_73875_731015_733362 = args[0]; object param_91ls51_73848_73876_731016_733363 = args[1]; object value_91ls52_73849_73877_731017_733364 = args[2];
++ object w_9349_73846_73875_731015_733015 = args[0]; object param_91ls51_73848_73876_731016_733016 = args[1]; object value_91ls52_73849_73877_731017_733017 = args[2];
+
+-closureN_type c_7320947;
+-object e_7321080 [6];
+-c_7320947.hdr.mark = gc_color_red;
+- c_7320947.hdr.grayed = 0;
+-c_7320947.tag = closureN_tag;
+- c_7320947.fn = (function_type)__lambda_693;
+-c_7320947.num_args = 1;
+-c_7320947.num_elements = 6;
+-c_7320947.elements = (object *)e_7321080;
+-c_7320947.elements[0] = ((closureN)self_7313646)->elements[0];
+-c_7320947.elements[1] = param_91ls51_73848_73876_731016_733363;
+-c_7320947.elements[2] = ((closureN)self_7313646)->elements[1];
+-c_7320947.elements[3] = ((closureN)self_7313646)->elements[2];
+-c_7320947.elements[4] = value_91ls52_73849_73877_731017_733364;
+-c_7320947.elements[5] = w_9349_73846_73875_731015_733362;
++closureN_type c_7319647;
++object e_7319780 [6];
++c_7319647.hdr.mark = gc_color_red;
++ c_7319647.hdr.grayed = 0;
++c_7319647.tag = closureN_tag;
++ c_7319647.fn = (function_type)__lambda_693;
++c_7319647.num_args = 1;
++c_7319647.num_elements = 6;
++c_7319647.elements = (object *)e_7319780;
++c_7319647.elements[0] = ((closureN)self_7312393)->elements[0];
++c_7319647.elements[1] = param_91ls51_73848_73876_731016_733016;
++c_7319647.elements[2] = ((closureN)self_7312393)->elements[1];
++c_7319647.elements[3] = ((closureN)self_7312393)->elements[2];
++c_7319647.elements[4] = value_91ls52_73849_73877_731017_733017;
++c_7319647.elements[5] = w_9349_73846_73875_731015_733015;
+
+-return_direct_with_clo1(data,(closure)&c_7320947,__lambda_693, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7319647,__lambda_693, boolean_f);;
+ }
+
+-static void __lambda_693(void *data, object self_7313647, int argc, object *args) /* object self_7313647, object lp_9350_73847_73878_731018_733365 */
++static void __lambda_693(void *data, object self_7312394, int argc, object *args) /* object self_7312394, object lp_9350_73847_73878_731018_733018 */
+ {
+- object lp_9350_73847_73878_731018_733365 = args[0];
++ object lp_9350_73847_73878_731018_733018 = args[0];
+
+-closureN_type c_7320949;
+-object e_7321076 [6];
+-c_7320949.hdr.mark = gc_color_red;
+- c_7320949.hdr.grayed = 0;
+-c_7320949.tag = closureN_tag;
+- c_7320949.fn = (function_type)__lambda_1417;
+-c_7320949.num_args = 1;
+-c_7320949.num_elements = 6;
+-c_7320949.elements = (object *)e_7321076;
+-c_7320949.elements[0] = ((closureN)self_7313647)->elements[0];
+-c_7320949.elements[1] = ((closureN)self_7313647)->elements[1];
+-c_7320949.elements[2] = ((closureN)self_7313647)->elements[2];
+-c_7320949.elements[3] = ((closureN)self_7313647)->elements[3];
+-c_7320949.elements[4] = ((closureN)self_7313647)->elements[4];
+-c_7320949.elements[5] = ((closureN)self_7313647)->elements[5];
++closureN_type c_7319649;
++object e_7319776 [6];
++c_7319649.hdr.mark = gc_color_red;
++ c_7319649.hdr.grayed = 0;
++c_7319649.tag = closureN_tag;
++ c_7319649.fn = (function_type)__lambda_1370;
++c_7319649.num_args = 1;
++c_7319649.num_elements = 6;
++c_7319649.elements = (object *)e_7319776;
++c_7319649.elements[0] = ((closureN)self_7312394)->elements[0];
++c_7319649.elements[1] = ((closureN)self_7312394)->elements[1];
++c_7319649.elements[2] = ((closureN)self_7312394)->elements[2];
++c_7319649.elements[3] = ((closureN)self_7312394)->elements[3];
++c_7319649.elements[4] = ((closureN)self_7312394)->elements[4];
++c_7319649.elements[5] = ((closureN)self_7312394)->elements[5];
+
+
+-pair_type local_7321079;
+-return_direct_with_clo1(data,(closure)&c_7320949,__lambda_1417, set_cell_as_expr(&local_7321079, lp_9350_73847_73878_731018_733365));;
++pair_type local_7319779;
++return_direct_with_clo1(data,(closure)&c_7319649,__lambda_1370, set_cell_as_expr(&local_7319779, lp_9350_73847_73878_731018_733018));;
+ }
+
+-static void __lambda_1417(void *data, object self_7313648, int argc, object *args) /* object self_7313648, object lp_9350_73847_73878_731018_733365 */
++static void __lambda_1370(void *data, object self_7312395, int argc, object *args) /* object self_7312395, object lp_9350_73847_73878_731018_733018 */
+ {
+- object lp_9350_73847_73878_731018_733365 = args[0];
++ object lp_9350_73847_73878_731018_733018 = args[0];
+
+-closureN_type c_7320951;
+-object e_7320966 [5];
+-c_7320951.hdr.mark = gc_color_red;
+- c_7320951.hdr.grayed = 0;
+-c_7320951.tag = closureN_tag;
+- c_7320951.fn = (function_type)__lambda_694;
+-c_7320951.num_args = 1;
+-c_7320951.num_elements = 5;
+-c_7320951.elements = (object *)e_7320966;
+-c_7320951.elements[0] = ((closureN)self_7313648)->elements[0];
+-c_7320951.elements[1] = lp_9350_73847_73878_731018_733365;
+-c_7320951.elements[2] = ((closureN)self_7313648)->elements[1];
+-c_7320951.elements[3] = ((closureN)self_7313648)->elements[4];
+-c_7320951.elements[4] = ((closureN)self_7313648)->elements[5];
++closureN_type c_7319651;
++object e_7319666 [5];
++c_7319651.hdr.mark = gc_color_red;
++ c_7319651.hdr.grayed = 0;
++c_7319651.tag = closureN_tag;
++ c_7319651.fn = (function_type)__lambda_694;
++c_7319651.num_args = 1;
++c_7319651.num_elements = 5;
++c_7319651.elements = (object *)e_7319666;
++c_7319651.elements[0] = ((closureN)self_7312395)->elements[0];
++c_7319651.elements[1] = lp_9350_73847_73878_731018_733018;
++c_7319651.elements[2] = ((closureN)self_7312395)->elements[1];
++c_7319651.elements[3] = ((closureN)self_7312395)->elements[4];
++c_7319651.elements[4] = ((closureN)self_7312395)->elements[5];
+
+
+-closureN_type c_7320967;
+-object e_7321075 [3];
+-c_7320967.hdr.mark = gc_color_red;
+- c_7320967.hdr.grayed = 0;
+-c_7320967.tag = closureN_tag;
+- c_7320967.fn = (function_type)__lambda_696;
+-c_7320967.num_args = 3;
+-c_7320967.num_elements = 3;
+-c_7320967.elements = (object *)e_7321075;
+-c_7320967.elements[0] = lp_9350_73847_73878_731018_733365;
+-c_7320967.elements[1] = ((closureN)self_7313648)->elements[2];
+-c_7320967.elements[2] = ((closureN)self_7313648)->elements[3];
++closureN_type c_7319667;
++object e_7319775 [3];
++c_7319667.hdr.mark = gc_color_red;
++ c_7319667.hdr.grayed = 0;
++c_7319667.tag = closureN_tag;
++ c_7319667.fn = (function_type)__lambda_696;
++c_7319667.num_args = 3;
++c_7319667.num_elements = 3;
++c_7319667.elements = (object *)e_7319775;
++c_7319667.elements[0] = lp_9350_73847_73878_731018_733018;
++c_7319667.elements[1] = ((closureN)self_7312395)->elements[2];
++c_7319667.elements[2] = ((closureN)self_7312395)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7320951,__lambda_694, &c_7320967);;
++return_direct_with_clo1(data,(closure)&c_7319651,__lambda_694, &c_7319667);;
+ }
+
+-static void __lambda_696(void *data, object self_7313649, int argc, object *args) /* object self_7313649, object k_735738, object w_9349_73846_73879_731019_733366, object param_91ls51_73848_73880_731020_733367, object value_91ls52_73849_73881_731021_733368 */
++static void __lambda_696(void *data, object self_7312396, int argc, object *args) /* object self_7312396, object k_735286, object w_9349_73846_73879_731019_733019, object param_91ls51_73848_73880_731020_733020, object value_91ls52_73849_73881_731021_733021 */
+ {
+- object k_735738 = args[0]; object w_9349_73846_73879_731019_733366 = args[1]; object param_91ls51_73848_73880_731020_733367 = args[2]; object value_91ls52_73849_73881_731021_733368 = args[3];
++ object k_735286 = args[0]; object w_9349_73846_73879_731019_733019 = args[1]; object param_91ls51_73848_73880_731020_733020 = args[2]; object value_91ls52_73849_73881_731021_733021 = args[3];
+
+-if( (boolean_f != Cyc_is_null(w_9349_73846_73879_731019_733366)) ){
++if( (boolean_f != Cyc_is_null(w_9349_73846_73879_731019_733019)) ){
+
+-closureN_type c_7320971;
+-object e_7321028 [4];
+-c_7320971.hdr.mark = gc_color_red;
+- c_7320971.hdr.grayed = 0;
+-c_7320971.tag = closureN_tag;
+- c_7320971.fn = (function_type)__lambda_697;
+-c_7320971.num_args = 1;
+-c_7320971.num_elements = 4;
+-c_7320971.elements = (object *)e_7321028;
+-c_7320971.elements[0] = k_735738;
+-c_7320971.elements[1] = ((closureN)self_7313649)->elements[1];
+-c_7320971.elements[2] = ((closureN)self_7313649)->elements[2];
+-c_7320971.elements[3] = value_91ls52_73849_73881_731021_733368;
++closureN_type c_7319671;
++object e_7319728 [4];
++c_7319671.hdr.mark = gc_color_red;
++ c_7319671.hdr.grayed = 0;
++c_7319671.tag = closureN_tag;
++ c_7319671.fn = (function_type)__lambda_697;
++c_7319671.num_args = 1;
++c_7319671.num_elements = 4;
++c_7319671.elements = (object *)e_7319728;
++c_7319671.elements[0] = k_735286;
++c_7319671.elements[1] = ((closureN)self_7312396)->elements[1];
++c_7319671.elements[2] = ((closureN)self_7312396)->elements[2];
++c_7319671.elements[3] = value_91ls52_73849_73881_731021_733021;
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320971, primitive_cons, NULL, param_91ls51_73848_73880_731020_733367);
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7319671, primitive_cons, NULL, param_91ls51_73848_73880_731020_733020);
+ } else {
+
+-if( (boolean_f != Cyc_is_pair(w_9349_73846_73879_731019_733366)) ){
++if( (boolean_f != Cyc_is_pair(w_9349_73846_73879_731019_733019)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9349_73846_73879_731019_733366))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9349_73846_73879_731019_733019))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733366)))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733019)))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733366))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733019))))) ){
+
+
+
+
+
+-pair_type local_7321057;
++pair_type local_7319757;
+
+
+
+
+
+-pair_type local_7321064;
++pair_type local_7319764;
+
+
+
+
+
+
+-return_closcall4(data, car(((closureN)self_7313649)->elements[0]), k_735738, Cyc_cdr(data, w_9349_73846_73879_731019_733366), set_pair_as_expr(&local_7321057, Cyc_car(data, Cyc_car(data, w_9349_73846_73879_731019_733366)), param_91ls51_73848_73880_731020_733367), set_pair_as_expr(&local_7321064, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733366))), value_91ls52_73849_73881_731021_733368));
++return_closcall4(data, car(((closureN)self_7312396)->elements[0]), k_735286, Cyc_cdr(data, w_9349_73846_73879_731019_733019), set_pair_as_expr(&local_7319757, Cyc_car(data, Cyc_car(data, w_9349_73846_73879_731019_733019)), param_91ls51_73848_73880_731020_733020), set_pair_as_expr(&local_7319764, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733019))), value_91ls52_73849_73881_731021_733021));
+ } else {
+- return_direct_with_clo1(data, k_735738, (((closure) k_735738)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735286, (((closure) k_735286)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735738, (((closure) k_735738)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735286, (((closure) k_735286)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735738, (((closure) k_735738)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735286, (((closure) k_735286)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735738, (((closure) k_735738)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735286, (((closure) k_735286)->fn), boolean_f);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_697(void *data, object self_7313650, int argc, object *args) /* object self_7313650, object r_735740_7312973 */
++static void __lambda_697(void *data, object self_7312397, int argc, object *args) /* object self_7312397, object r_735288_7311720 */
+ {
+- object r_735740_7312973 = args[0];
++ object r_735288_7311720 = args[0];
+
+-closureN_type c_7320973;
+-object e_7321026 [4];
+-c_7320973.hdr.mark = gc_color_red;
+- c_7320973.hdr.grayed = 0;
+-c_7320973.tag = closureN_tag;
+- c_7320973.fn = (function_type)__lambda_698;
+-c_7320973.num_args = 1;
+-c_7320973.num_elements = 4;
+-c_7320973.elements = (object *)e_7321026;
+-c_7320973.elements[0] = ((closureN)self_7313650)->elements[0];
+-c_7320973.elements[1] = r_735740_7312973;
+-c_7320973.elements[2] = ((closureN)self_7313650)->elements[1];
+-c_7320973.elements[3] = ((closureN)self_7313650)->elements[2];
++closureN_type c_7319673;
++object e_7319726 [4];
++c_7319673.hdr.mark = gc_color_red;
++ c_7319673.hdr.grayed = 0;
++c_7319673.tag = closureN_tag;
++ c_7319673.fn = (function_type)__lambda_698;
++c_7319673.num_args = 1;
++c_7319673.num_elements = 4;
++c_7319673.elements = (object *)e_7319726;
++c_7319673.elements[0] = ((closureN)self_7312397)->elements[0];
++c_7319673.elements[1] = r_735288_7311720;
++c_7319673.elements[2] = ((closureN)self_7312397)->elements[1];
++c_7319673.elements[3] = ((closureN)self_7312397)->elements[2];
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320973, primitive_cons, NULL, ((closureN)self_7313650)->elements[3]);;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7319673, primitive_cons, NULL, ((closureN)self_7312397)->elements[3]);;
+ }
+
+-static void __lambda_698(void *data, object self_7313651, int argc, object *args) /* object self_7313651, object r_735741_7312974_7312983 */
++static void __lambda_698(void *data, object self_7312398, int argc, object *args) /* object self_7312398, object r_735289_7311721_7311730 */
+ {
+- object r_735741_7312974_7312983 = args[0];
++ object r_735289_7311721_7311730 = args[0];
+
+-closureN_type c_7320975;
+-object e_7321024 [3];
+-c_7320975.hdr.mark = gc_color_red;
+- c_7320975.hdr.grayed = 0;
+-c_7320975.tag = closureN_tag;
+- c_7320975.fn = (function_type)__lambda_699;
+-c_7320975.num_args = 2;
+-c_7320975.num_elements = 3;
+-c_7320975.elements = (object *)e_7321024;
+-c_7320975.elements[0] = ((closureN)self_7313651)->elements[0];
+-c_7320975.elements[1] = ((closureN)self_7313651)->elements[2];
+-c_7320975.elements[2] = ((closureN)self_7313651)->elements[3];
++closureN_type c_7319675;
++object e_7319724 [3];
++c_7319675.hdr.mark = gc_color_red;
++ c_7319675.hdr.grayed = 0;
++c_7319675.tag = closureN_tag;
++ c_7319675.fn = (function_type)__lambda_699;
++c_7319675.num_args = 2;
++c_7319675.num_elements = 3;
++c_7319675.elements = (object *)e_7319724;
++c_7319675.elements[0] = ((closureN)self_7312398)->elements[0];
++c_7319675.elements[1] = ((closureN)self_7312398)->elements[2];
++c_7319675.elements[2] = ((closureN)self_7312398)->elements[3];
+
+-return_direct_with_clo2(data,(closure)&c_7320975,__lambda_699, ((closureN)self_7313651)->elements[1], r_735741_7312974_7312983);;
++return_direct_with_clo2(data,(closure)&c_7319675,__lambda_699, ((closureN)self_7312398)->elements[1], r_735289_7311721_7311730);;
+ }
+
+-static void __lambda_699(void *data, object self_7313652, int argc, object *args) /* object self_7313652, object param_73882_731022_733369_7312975_7312984, object value_73883_731023_733370_7312976_7312985 */
++static void __lambda_699(void *data, object self_7312399, int argc, object *args) /* object self_7312399, object param_73882_731022_733022_7311722_7311731, object value_73883_731023_733023_7311723_7311732 */
+ {
+- object param_73882_731022_733369_7312975_7312984 = args[0]; object value_73883_731023_733370_7312976_7312985 = args[1];
++ object param_73882_731022_733022_7311722_7311731 = args[0]; object value_73883_731023_733023_7311723_7311732 = args[1];
+
+-closureN_type c_7320978;
+-object e_7321023 [4];
+-c_7320978.hdr.mark = gc_color_red;
+- c_7320978.hdr.grayed = 0;
+-c_7320978.tag = closureN_tag;
+- c_7320978.fn = (function_type)__lambda_700;
+-c_7320978.num_args = 1;
+-c_7320978.num_elements = 4;
+-c_7320978.elements = (object *)e_7321023;
+-c_7320978.elements[0] = ((closureN)self_7313652)->elements[0];
+-c_7320978.elements[1] = param_73882_731022_733369_7312975_7312984;
+-c_7320978.elements[2] = ((closureN)self_7313652)->elements[2];
+-c_7320978.elements[3] = value_73883_731023_733370_7312976_7312985;
++closureN_type c_7319678;
++object e_7319723 [4];
++c_7319678.hdr.mark = gc_color_red;
++ c_7319678.hdr.grayed = 0;
++c_7319678.tag = closureN_tag;
++ c_7319678.fn = (function_type)__lambda_700;
++c_7319678.num_args = 1;
++c_7319678.num_elements = 4;
++c_7319678.elements = (object *)e_7319723;
++c_7319678.elements[0] = ((closureN)self_7312399)->elements[0];
++c_7319678.elements[1] = param_73882_731022_733022_7311722_7311731;
++c_7319678.elements[2] = ((closureN)self_7312399)->elements[2];
++c_7319678.elements[3] = value_73883_731023_733023_7311723_7311732;
+
+-return_closcall2(data, ((closureN)self_7313652)->elements[1], &c_7320978, quote_parameterize);;
++return_closcall2(data, ((closureN)self_7312399)->elements[1], &c_7319678, quote_parameterize);;
+ }
+
+-static void __lambda_700(void *data, object self_7313653, int argc, object *args) /* object self_7313653, object r_735744_7312977_7312986 */
++static void __lambda_700(void *data, object self_7312400, int argc, object *args) /* object self_7312400, object r_735292_7311724_7311733 */
+ {
+- object r_735744_7312977_7312986 = args[0];
++ object r_735292_7311724_7311733 = args[0];
+
+-closureN_type c_7320980;
+-object e_7321014 [5];
+-c_7320980.hdr.mark = gc_color_red;
+- c_7320980.hdr.grayed = 0;
+-c_7320980.tag = closureN_tag;
+- c_7320980.fn = (function_type)__lambda_701;
+-c_7320980.num_args = 1;
+-c_7320980.num_elements = 5;
+-c_7320980.elements = (object *)e_7321014;
+-c_7320980.elements[0] = ((closureN)self_7313653)->elements[0];
+-c_7320980.elements[1] = ((closureN)self_7313653)->elements[1];
+-c_7320980.elements[2] = r_735744_7312977_7312986;
+-c_7320980.elements[3] = ((closureN)self_7313653)->elements[2];
+-c_7320980.elements[4] = ((closureN)self_7313653)->elements[3];
++closureN_type c_7319680;
++object e_7319714 [5];
++c_7319680.hdr.mark = gc_color_red;
++ c_7319680.hdr.grayed = 0;
++c_7319680.tag = closureN_tag;
++ c_7319680.fn = (function_type)__lambda_701;
++c_7319680.num_args = 1;
++c_7319680.num_elements = 5;
++c_7319680.elements = (object *)e_7319714;
++c_7319680.elements[0] = ((closureN)self_7312400)->elements[0];
++c_7319680.elements[1] = ((closureN)self_7312400)->elements[1];
++c_7319680.elements[2] = r_735292_7311724_7311733;
++c_7319680.elements[3] = ((closureN)self_7312400)->elements[2];
++c_7319680.elements[4] = ((closureN)self_7312400)->elements[3];
+
+
+-mmacro(c_7321015, (function_type)__lambda_703);c_7321015.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7320980,__lambda_701, &c_7321015);;
++mmacro(c_7319715, (function_type)__lambda_703);c_7319715.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7319680,__lambda_701, &c_7319715);;
+ }
+
+-static void __lambda_703(void *data, object self_7313654, int argc, object *args) /* object self_7313654, object k_735759_738751_7312980_7312989, object param_73886_731026_733373_738752_7312981_7312990, object value_73887_731027_733374_738753_7312982_7312991 */
++static void __lambda_703(void *data, object self_7312401, int argc, object *args) /* object self_7312401, object k_735307_737976_7311727_7311736, object param_73886_731026_733026_737977_7311728_7311737, object value_73887_731027_733027_737978_7311729_7311738 */
+ {
+- object k_735759_738751_7312980_7312989 = args[0]; object param_73886_731026_733373_738752_7312981_7312990 = args[1]; object value_73887_731027_733374_738753_7312982_7312991 = args[2];
++ object k_735307_737976_7311727_7311736 = args[0]; object param_73886_731026_733026_737977_7311728_7311737 = args[1]; object value_73887_731027_733027_737978_7311729_7311738 = args[2];
+
+-pair_type local_7321019;
++pair_type local_7319719;
+
+-pair_type local_7321022;
+-return_direct_with_clo1(data, k_735759_738751_7312980_7312989, (((closure) k_735759_738751_7312980_7312989)->fn), set_pair_as_expr(&local_7321019, param_73886_731026_733373_738752_7312981_7312990, set_pair_as_expr(&local_7321022, value_73887_731027_733374_738753_7312982_7312991, NULL)));;
++pair_type local_7319722;
++return_direct_with_clo1(data, k_735307_737976_7311727_7311736, (((closure) k_735307_737976_7311727_7311736)->fn), set_pair_as_expr(&local_7319719, param_73886_731026_733026_737977_7311728_7311737, set_pair_as_expr(&local_7319722, value_73887_731027_733027_737978_7311729_7311738, NULL)));;
+ }
+
+-static void __lambda_701(void *data, object self_7313655, int argc, object *args) /* object self_7313655, object r_735758_738744_7312978_7312987 */
++static void __lambda_701(void *data, object self_7312402, int argc, object *args) /* object self_7312402, object r_735306_737969_7311725_7311734 */
+ {
+- object r_735758_738744_7312978_7312987 = args[0];
++ object r_735306_737969_7311725_7311734 = args[0];
+
+-closureN_type c_7320982;
+-object e_7321011 [3];
+-c_7320982.hdr.mark = gc_color_red;
+- c_7320982.hdr.grayed = 0;
+-c_7320982.tag = closureN_tag;
+- c_7320982.fn = (function_type)__lambda_702;
+-c_7320982.num_args = 1;
+-c_7320982.num_elements = 3;
+-c_7320982.elements = (object *)e_7321011;
+-c_7320982.elements[0] = ((closureN)self_7313655)->elements[0];
+-c_7320982.elements[1] = ((closureN)self_7313655)->elements[2];
+-c_7320982.elements[2] = ((closureN)self_7313655)->elements[3];
++closureN_type c_7319682;
++object e_7319711 [3];
++c_7319682.hdr.mark = gc_color_red;
++ c_7319682.hdr.grayed = 0;
++c_7319682.tag = closureN_tag;
++ c_7319682.fn = (function_type)__lambda_702;
++c_7319682.num_args = 1;
++c_7319682.num_elements = 3;
++c_7319682.elements = (object *)e_7319711;
++c_7319682.elements[0] = ((closureN)self_7312402)->elements[0];
++c_7319682.elements[1] = ((closureN)self_7312402)->elements[2];
++c_7319682.elements[2] = ((closureN)self_7312402)->elements[3];
+
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7320982, r_735758_738744_7312978_7312987, ((closureN)self_7313655)->elements[1], ((closureN)self_7313655)->elements[4]);;
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7319682, r_735306_737969_7311725_7311734, ((closureN)self_7312402)->elements[1], ((closureN)self_7312402)->elements[4]);;
+ }
+
+-static void __lambda_702(void *data, object self_7313656, int argc, object *args) /* object self_7313656, object r_735753_738745_7312979_7312988 */
++static void __lambda_702(void *data, object self_7312403, int argc, object *args) /* object self_7312403, object r_735301_737970_7311726_7311735 */
+ {
+- object r_735753_738745_7312979_7312988 = args[0];
++ object r_735301_737970_7311726_7311735 = args[0];
+
+-pair_type local_7320987;
++pair_type local_7319687;
+
+-pair_type local_7320990;
++pair_type local_7319690;
+
+-pair_type local_7320994;
++pair_type local_7319694;
+
+-pair_type local_7320997;
++pair_type local_7319697;
+
+-make_utf8_string_with_len(c_7320998, "step", 4, 4);
++make_utf8_string_with_len(c_7319698, "step", 4, 4);
+
+-pair_type local_7321001;
++pair_type local_7319701;
+
+-pair_type local_7321004;
++pair_type local_7319704;
+
+-pair_type local_7321007;
++pair_type local_7319707;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313656)->elements[0], (((closure) ((closureN)self_7313656)->elements[0])->fn), set_pair_as_expr(&local_7320987, set_pair_as_expr(&local_7320990, ((closureN)self_7313656)->elements[1], set_pair_as_expr(&local_7320994, set_pair_as_expr(&local_7320997, &c_7320998, NULL), set_pair_as_expr(&local_7321001, NULL, set_pair_as_expr(&local_7321004, r_735753_738745_7312979_7312988, set_pair_as_expr(&local_7321007, Cyc_cdr(data, ((closureN)self_7313656)->elements[2]), NULL))))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312403)->elements[0], (((closure) ((closureN)self_7312403)->elements[0])->fn), set_pair_as_expr(&local_7319687, set_pair_as_expr(&local_7319690, ((closureN)self_7312403)->elements[1], set_pair_as_expr(&local_7319694, set_pair_as_expr(&local_7319697, &c_7319698, NULL), set_pair_as_expr(&local_7319701, NULL, set_pair_as_expr(&local_7319704, r_735301_737970_7311726_7311735, set_pair_as_expr(&local_7319707, Cyc_cdr(data, ((closureN)self_7312403)->elements[2]), NULL))))), boolean_f));;
+ }
+
+-static void __lambda_694(void *data, object self_7313657, int argc, object *args) /* object self_7313657, object r_735737 */
++static void __lambda_694(void *data, object self_7312404, int argc, object *args) /* object self_7312404, object r_735285 */
+ {
+- object r_735737 = args[0];
++ object r_735285 = args[0];
+
+-closureN_type c_7320953;
+-object e_7320962 [5];
+-c_7320953.hdr.mark = gc_color_red;
+- c_7320953.hdr.grayed = 0;
+-c_7320953.tag = closureN_tag;
+- c_7320953.fn = (function_type)__lambda_695;
+-c_7320953.num_args = 1;
+-c_7320953.num_elements = 5;
+-c_7320953.elements = (object *)e_7320962;
+-c_7320953.elements[0] = ((closureN)self_7313657)->elements[0];
+-c_7320953.elements[1] = ((closureN)self_7313657)->elements[1];
+-c_7320953.elements[2] = ((closureN)self_7313657)->elements[2];
+-c_7320953.elements[3] = ((closureN)self_7313657)->elements[3];
+-c_7320953.elements[4] = ((closureN)self_7313657)->elements[4];
++closureN_type c_7319653;
++object e_7319662 [5];
++c_7319653.hdr.mark = gc_color_red;
++ c_7319653.hdr.grayed = 0;
++c_7319653.tag = closureN_tag;
++ c_7319653.fn = (function_type)__lambda_695;
++c_7319653.num_args = 1;
++c_7319653.num_elements = 5;
++c_7319653.elements = (object *)e_7319662;
++c_7319653.elements[0] = ((closureN)self_7312404)->elements[0];
++c_7319653.elements[1] = ((closureN)self_7312404)->elements[1];
++c_7319653.elements[2] = ((closureN)self_7312404)->elements[2];
++c_7319653.elements[3] = ((closureN)self_7312404)->elements[3];
++c_7319653.elements[4] = ((closureN)self_7312404)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320953,__lambda_695, Cyc_set_cell(data, ((closureN)self_7313657)->elements[1], r_735737));;
++return_direct_with_clo1(data,(closure)&c_7319653,__lambda_695, Cyc_set_cell(data, ((closureN)self_7312404)->elements[1], r_735285));;
+ }
+
+-static void __lambda_695(void *data, object self_7313658, int argc, object *args) /* object self_7313658, object r_735736 */
++static void __lambda_695(void *data, object self_7312405, int argc, object *args) /* object self_7312405, object r_735284 */
+ {
+
+
+
+-return_closcall4(data, car(((closureN)self_7313658)->elements[1]), ((closureN)self_7313658)->elements[0], ((closureN)self_7313658)->elements[4], ((closureN)self_7313658)->elements[2], ((closureN)self_7313658)->elements[3]);;
++return_closcall4(data, car(((closureN)self_7312405)->elements[1]), ((closureN)self_7312405)->elements[0], ((closureN)self_7312405)->elements[4], ((closureN)self_7312405)->elements[2], ((closureN)self_7312405)->elements[3]);;
+ }
+
+-static void __lambda_684(void *data, object self_7313659, int argc, object *args) /* object self_7313659, object k_735780 */
++static void __lambda_684(void *data, object self_7312406, int argc, object *args) /* object self_7312406, object k_735328 */
+ {
+- object k_735780 = args[0];
++ object k_735328 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313659)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312406)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313659)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312406)->elements[1]))) ){
+
+
+
+- make_utf8_string_with_len(c_7320725, "step", 4, 4);
+-if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7313659)->elements[1])), &c_7320725)) ){
++ make_utf8_string_with_len(c_7319425, "step", 4, 4);
++if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7312406)->elements[1])), &c_7319425)) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313659)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312406)->elements[1])))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312406)->elements[1]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1]))))) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1])))))) ){
+
+
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1]))))))) ){
+
+
+
+@@ -23459,155 +21662,155 @@ if( (boolean_f != Cyc_is_pair(Cyc_cdr(da
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1])))))))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1]))))) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312406)->elements[1])))))) ){
+
+-closureN_type c_7320815;
+-object e_7320920 [3];
+-c_7320815.hdr.mark = gc_color_red;
+- c_7320815.hdr.grayed = 0;
+-c_7320815.tag = closureN_tag;
+- c_7320815.fn = (function_type)__lambda_685;
+-c_7320815.num_args = 1;
+-c_7320815.num_elements = 3;
+-c_7320815.elements = (object *)e_7320920;
+-c_7320815.elements[0] = k_735780;
+-c_7320815.elements[1] = ((closureN)self_7313659)->elements[0];
+-c_7320815.elements[2] = ((closureN)self_7313659)->elements[1];
++closureN_type c_7319515;
++object e_7319620 [3];
++c_7319515.hdr.mark = gc_color_red;
++ c_7319515.hdr.grayed = 0;
++c_7319515.tag = closureN_tag;
++ c_7319515.fn = (function_type)__lambda_685;
++c_7319515.num_args = 1;
++c_7319515.num_elements = 3;
++c_7319515.elements = (object *)e_7319620;
++c_7319515.elements[0] = k_735328;
++c_7319515.elements[1] = ((closureN)self_7312406)->elements[0];
++c_7319515.elements[2] = ((closureN)self_7312406)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7313659)->elements[0], &c_7320815, quote_parameterize);
++return_closcall2(data, ((closureN)self_7312406)->elements[0], &c_7319515, quote_parameterize);
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735780, (((closure) k_735780)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735328, (((closure) k_735328)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_685(void *data, object self_7313660, int argc, object *args) /* object self_7313660, object r_735810 */
++static void __lambda_685(void *data, object self_7312407, int argc, object *args) /* object self_7312407, object r_735358 */
+ {
+- object r_735810 = args[0];
++ object r_735358 = args[0];
+
+-closureN_type c_7320818;
+-object e_7320919 [4];
+-c_7320818.hdr.mark = gc_color_red;
+- c_7320818.hdr.grayed = 0;
+-c_7320818.tag = closureN_tag;
+- c_7320818.fn = (function_type)__lambda_686;
+-c_7320818.num_args = 1;
+-c_7320818.num_elements = 4;
+-c_7320818.elements = (object *)e_7320919;
+-c_7320818.elements[0] = ((closureN)self_7313660)->elements[0];
+-c_7320818.elements[1] = r_735810;
+-c_7320818.elements[2] = ((closureN)self_7313660)->elements[1];
+-c_7320818.elements[3] = ((closureN)self_7313660)->elements[2];
++closureN_type c_7319518;
++object e_7319619 [4];
++c_7319518.hdr.mark = gc_color_red;
++ c_7319518.hdr.grayed = 0;
++c_7319518.tag = closureN_tag;
++ c_7319518.fn = (function_type)__lambda_686;
++c_7319518.num_args = 1;
++c_7319518.num_elements = 4;
++c_7319518.elements = (object *)e_7319619;
++c_7319518.elements[0] = ((closureN)self_7312407)->elements[0];
++c_7319518.elements[1] = r_735358;
++c_7319518.elements[2] = ((closureN)self_7312407)->elements[1];
++c_7319518.elements[3] = ((closureN)self_7312407)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313660)->elements[1], &c_7320818, quote_p);;
++return_closcall2(data, ((closureN)self_7312407)->elements[1], &c_7319518, quote_p);;
+ }
+
+-static void __lambda_686(void *data, object self_7313661, int argc, object *args) /* object self_7313661, object r_735829_738663 */
++static void __lambda_686(void *data, object self_7312408, int argc, object *args) /* object self_7312408, object r_735377_737888 */
+ {
+- object r_735829_738663 = args[0];
++ object r_735377_737888 = args[0];
+
+-closureN_type c_7320821;
+-object e_7320918 [5];
+-c_7320821.hdr.mark = gc_color_red;
+- c_7320821.hdr.grayed = 0;
+-c_7320821.tag = closureN_tag;
+- c_7320821.fn = (function_type)__lambda_687;
+-c_7320821.num_args = 1;
+-c_7320821.num_elements = 5;
+-c_7320821.elements = (object *)e_7320918;
+-c_7320821.elements[0] = ((closureN)self_7313661)->elements[0];
+-c_7320821.elements[1] = ((closureN)self_7313661)->elements[1];
+-c_7320821.elements[2] = r_735829_738663;
+-c_7320821.elements[3] = ((closureN)self_7313661)->elements[2];
+-c_7320821.elements[4] = ((closureN)self_7313661)->elements[3];
++closureN_type c_7319521;
++object e_7319618 [5];
++c_7319521.hdr.mark = gc_color_red;
++ c_7319521.hdr.grayed = 0;
++c_7319521.tag = closureN_tag;
++ c_7319521.fn = (function_type)__lambda_687;
++c_7319521.num_args = 1;
++c_7319521.num_elements = 5;
++c_7319521.elements = (object *)e_7319618;
++c_7319521.elements[0] = ((closureN)self_7312408)->elements[0];
++c_7319521.elements[1] = ((closureN)self_7312408)->elements[1];
++c_7319521.elements[2] = r_735377_737888;
++c_7319521.elements[3] = ((closureN)self_7312408)->elements[2];
++c_7319521.elements[4] = ((closureN)self_7312408)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313661)->elements[2], &c_7320821, quote_old);;
++return_closcall2(data, ((closureN)self_7312408)->elements[2], &c_7319521, quote_old);;
+ }
+
+-static void __lambda_687(void *data, object self_7313662, int argc, object *args) /* object self_7313662, object r_735832_738664 */
++static void __lambda_687(void *data, object self_7312409, int argc, object *args) /* object self_7312409, object r_735380_737889 */
+ {
+- object r_735832_738664 = args[0];
++ object r_735380_737889 = args[0];
+
+-closureN_type c_7320824;
+-object e_7320917 [5];
+-c_7320824.hdr.mark = gc_color_red;
+- c_7320824.hdr.grayed = 0;
+-c_7320824.tag = closureN_tag;
+- c_7320824.fn = (function_type)__lambda_688;
+-c_7320824.num_args = 1;
+-c_7320824.num_elements = 5;
+-c_7320824.elements = (object *)e_7320917;
+-c_7320824.elements[0] = ((closureN)self_7313662)->elements[0];
+-c_7320824.elements[1] = ((closureN)self_7313662)->elements[1];
+-c_7320824.elements[2] = ((closureN)self_7313662)->elements[2];
+-c_7320824.elements[3] = r_735832_738664;
+-c_7320824.elements[4] = ((closureN)self_7313662)->elements[4];
++closureN_type c_7319524;
++object e_7319617 [5];
++c_7319524.hdr.mark = gc_color_red;
++ c_7319524.hdr.grayed = 0;
++c_7319524.tag = closureN_tag;
++ c_7319524.fn = (function_type)__lambda_688;
++c_7319524.num_args = 1;
++c_7319524.num_elements = 5;
++c_7319524.elements = (object *)e_7319617;
++c_7319524.elements[0] = ((closureN)self_7312409)->elements[0];
++c_7319524.elements[1] = ((closureN)self_7312409)->elements[1];
++c_7319524.elements[2] = ((closureN)self_7312409)->elements[2];
++c_7319524.elements[3] = r_735380_737889;
++c_7319524.elements[4] = ((closureN)self_7312409)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313662)->elements[3], &c_7320824, quote_new);;
++return_closcall2(data, ((closureN)self_7312409)->elements[3], &c_7319524, quote_new);;
+ }
+
+-static void __lambda_688(void *data, object self_7313663, int argc, object *args) /* object self_7313663, object r_735835_738665 */
++static void __lambda_688(void *data, object self_7312410, int argc, object *args) /* object self_7312410, object r_735383_737890 */
+ {
+- object r_735835_738665 = args[0];
++ object r_735383_737890 = args[0];
+
+-pair_type local_7320829;
++pair_type local_7319529;
+
+-pair_type local_7320832;
++pair_type local_7319532;
+
+-pair_type local_7320836;
++pair_type local_7319536;
+
+-pair_type local_7320839;
++pair_type local_7319539;
+
+-make_utf8_string_with_len(c_7320840, "step", 4, 4);
++make_utf8_string_with_len(c_7319540, "step", 4, 4);
+
+-pair_type local_7320843;
++pair_type local_7319543;
+
+-pair_type local_7320846;
++pair_type local_7319546;
+
+-pair_type local_7320849;
++pair_type local_7319549;
+
+
+
+@@ -23619,7 +21822,7 @@ pair_type local_7320849;
+
+
+
+-pair_type local_7320863;
++pair_type local_7319563;
+
+
+
+@@ -23633,17 +21836,17 @@ pair_type local_7320863;
+
+
+
+-pair_type local_7320879;
++pair_type local_7319579;
+
+-pair_type local_7320883;
++pair_type local_7319583;
+
+-pair_type local_7320887;
++pair_type local_7319587;
+
+
+
+
+
+-pair_type local_7320895;
++pair_type local_7319595;
+
+
+
+@@ -23653,7 +21856,7 @@ pair_type local_7320895;
+
+
+
+-pair_type local_7320907;
++pair_type local_7319607;
+
+
+
+@@ -23662,228 +21865,228 @@ pair_type local_7320907;
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313663)->elements[0], (((closure) ((closureN)self_7313663)->elements[0])->fn), set_pair_as_expr(&local_7320829, set_pair_as_expr(&local_7320832, ((closureN)self_7313663)->elements[1], set_pair_as_expr(&local_7320836, set_pair_as_expr(&local_7320839, &c_7320840, NULL), set_pair_as_expr(&local_7320843, set_pair_as_expr(&local_7320846, set_pair_as_expr(&local_7320849, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4]))))), set_pair_as_expr(&local_7320863, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4])))))), set_pair_as_expr(&local_7320879, ((closureN)self_7313663)->elements[2], set_pair_as_expr(&local_7320883, ((closureN)self_7313663)->elements[3], set_pair_as_expr(&local_7320887, r_735835_738665, NULL))))), Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4]))), set_pair_as_expr(&l
ocal_7320895, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4])))), set_pair_as_expr(&local_7320907, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4])))), NULL))))), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7312410)->elements[0], (((closure) ((closureN)self_7312410)->elements[0])->fn), set_pair_as_expr(&local_7319529, set_pair_as_expr(&local_7319532, ((closureN)self_7312410)->elements[1], set_pair_as_expr(&local_7319536, set_pair_as_expr(&local_7319539, &c_7319540, NULL), set_pair_as_expr(&local_7319543, set_pair_as_expr(&local_7319546, set_pair_as_expr(&local_7319549, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312410)->elements[4]))))), set_pair_as_expr(&local_7319563, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312410)->elements[4])))))), set_pair_as_expr(&local_7319579, ((closureN)self_7312410)->elements[2], set_pair_as_expr(&local_7319583, ((closureN)self_7312410)->elements[3], set_pair_as_expr(&local_7319587, r_735383_737890, NULL))))), Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312410)->elements[4]))), set_pair_as_expr(&l
ocal_7319595, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312410)->elements[4])))), set_pair_as_expr(&local_7319607, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312410)->elements[4])))), NULL))))), boolean_f));;
+ }
+
+-static void __lambda_638(void *data, object self_7313664, int argc, object *args) /* object self_7313664, object k_735845 */
++static void __lambda_638(void *data, object self_7312411, int argc, object *args) /* object self_7312411, object k_735393 */
+ {
+- object k_735845 = args[0];
++ object k_735393 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313664)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312411)->elements[1])) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313664)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312411)->elements[1]))) ){
+
+
+
+- make_utf8_string_with_len(c_7320190, "step", 4, 4);
+-if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7313664)->elements[1])), &c_7320190)) ){
++ make_utf8_string_with_len(c_7318890, "step", 4, 4);
++if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7312411)->elements[1])), &c_7318890)) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313664)->elements[1])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312411)->elements[1])))) ){
+
+-closureN_type c_7320199;
+-object e_7320691 [2];
+-c_7320199.hdr.mark = gc_color_red;
+- c_7320199.hdr.grayed = 0;
+-c_7320199.tag = closureN_tag;
+- c_7320199.fn = (function_type)__lambda_639;
+-c_7320199.num_args = 1;
+-c_7320199.num_elements = 2;
+-c_7320199.elements = (object *)e_7320691;
+-c_7320199.elements[0] = k_735845;
+-c_7320199.elements[1] = ((closureN)self_7313664)->elements[0];
++closureN_type c_7318899;
++object e_7319391 [2];
++c_7318899.hdr.mark = gc_color_red;
++ c_7318899.hdr.grayed = 0;
++c_7318899.tag = closureN_tag;
++ c_7318899.fn = (function_type)__lambda_639;
++c_7318899.num_args = 1;
++c_7318899.num_elements = 2;
++c_7318899.elements = (object *)e_7319391;
++c_7318899.elements[0] = k_735393;
++c_7318899.elements[1] = ((closureN)self_7312411)->elements[0];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320199,__lambda_639, Cyc_cdr(data, ((closureN)self_7313664)->elements[1]));
++return_direct_with_clo1(data,(closure)&c_7318899,__lambda_639, Cyc_cdr(data, ((closureN)self_7312411)->elements[1]));
+ } else {
+- return_direct_with_clo1(data, k_735845, (((closure) k_735845)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735393, (((closure) k_735393)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735845, (((closure) k_735845)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735393, (((closure) k_735393)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735845, (((closure) k_735845)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735393, (((closure) k_735393)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735845, (((closure) k_735845)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735393, (((closure) k_735393)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_639(void *data, object self_7313665, int argc, object *args) /* object self_7313665, object v_935_73802_73941_731061_733408 */
++static void __lambda_639(void *data, object self_7312412, int argc, object *args) /* object self_7312412, object v_935_73802_73941_731061_733061 */
+ {
+- object v_935_73802_73941_731061_733408 = args[0];
++ object v_935_73802_73941_731061_733061 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(v_935_73802_73941_731061_733408)) ){
++if( (boolean_f != Cyc_is_pair(v_935_73802_73941_731061_733061)) ){
+
+-closureN_type c_7320203;
+-object e_7320686 [3];
+-c_7320203.hdr.mark = gc_color_red;
+- c_7320203.hdr.grayed = 0;
+-c_7320203.tag = closureN_tag;
+- c_7320203.fn = (function_type)__lambda_640;
+-c_7320203.num_args = 6;
+-c_7320203.num_elements = 3;
+-c_7320203.elements = (object *)e_7320686;
+-c_7320203.elements[0] = ((closureN)self_7313665)->elements[0];
+-c_7320203.elements[1] = ((closureN)self_7313665)->elements[1];
+-c_7320203.elements[2] = v_935_73802_73941_731061_733408;
++closureN_type c_7318903;
++object e_7319386 [3];
++c_7318903.hdr.mark = gc_color_red;
++ c_7318903.hdr.grayed = 0;
++c_7318903.tag = closureN_tag;
++ c_7318903.fn = (function_type)__lambda_640;
++c_7318903.num_args = 6;
++c_7318903.num_elements = 3;
++c_7318903.elements = (object *)e_7319386;
++c_7318903.elements[0] = ((closureN)self_7312412)->elements[0];
++c_7318903.elements[1] = ((closureN)self_7312412)->elements[1];
++c_7318903.elements[2] = v_935_73802_73941_731061_733061;
+
+
+
+-return_direct_with_clo6(data,(closure)&c_7320203,__lambda_640, Cyc_car(data, v_935_73802_73941_731061_733408), NULL, NULL, NULL, NULL, NULL);
++return_direct_with_clo6(data,(closure)&c_7318903,__lambda_640, Cyc_car(data, v_935_73802_73941_731061_733061), NULL, NULL, NULL, NULL, NULL);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313665)->elements[0], (((closure) ((closureN)self_7313665)->elements[0])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312412)->elements[0], (((closure) ((closureN)self_7312412)->elements[0])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_640(void *data, object self_7313666, int argc, object *args) /* object self_7313666, object w_937_73804_73945_731063_733410, object param_91ls9_73806_73946_731064_733411, object value_91ls10_73807_73947_731065_733412, object p_91ls11_73808_73948_731066_733413, object old_91ls12_73809_73949_731067_733414, object new_91ls13_73810_73950_731068_733415 */
++static void __lambda_640(void *data, object self_7312413, int argc, object *args) /* object self_7312413, object w_937_73804_73945_731063_733063, object param_91ls9_73806_73946_731064_733064, object value_91ls10_73807_73947_731065_733065, object p_91ls11_73808_73948_731066_733066, object old_91ls12_73809_73949_731067_733067, object new_91ls13_73810_73950_731068_733068 */
+ {
+- object w_937_73804_73945_731063_733410 = args[0]; object param_91ls9_73806_73946_731064_733411 = args[1]; object value_91ls10_73807_73947_731065_733412 = args[2]; object p_91ls11_73808_73948_731066_733413 = args[3]; object old_91ls12_73809_73949_731067_733414 = args[4]; object new_91ls13_73810_73950_731068_733415 = args[5];
++ object w_937_73804_73945_731063_733063 = args[0]; object param_91ls9_73806_73946_731064_733064 = args[1]; object value_91ls10_73807_73947_731065_733065 = args[2]; object p_91ls11_73808_73948_731066_733066 = args[3]; object old_91ls12_73809_73949_731067_733067 = args[4]; object new_91ls13_73810_73950_731068_733068 = args[5];
+
+-closureN_type c_7320205;
+-object e_7320685 [9];
+-c_7320205.hdr.mark = gc_color_red;
+- c_7320205.hdr.grayed = 0;
+-c_7320205.tag = closureN_tag;
+- c_7320205.fn = (function_type)__lambda_641;
+-c_7320205.num_args = 1;
+-c_7320205.num_elements = 9;
+-c_7320205.elements = (object *)e_7320685;
+-c_7320205.elements[0] = ((closureN)self_7313666)->elements[0];
+-c_7320205.elements[1] = new_91ls13_73810_73950_731068_733415;
+-c_7320205.elements[2] = old_91ls12_73809_73949_731067_733414;
+-c_7320205.elements[3] = p_91ls11_73808_73948_731066_733413;
+-c_7320205.elements[4] = param_91ls9_73806_73946_731064_733411;
+-c_7320205.elements[5] = ((closureN)self_7313666)->elements[1];
+-c_7320205.elements[6] = ((closureN)self_7313666)->elements[2];
+-c_7320205.elements[7] = value_91ls10_73807_73947_731065_733412;
+-c_7320205.elements[8] = w_937_73804_73945_731063_733410;
++closureN_type c_7318905;
++object e_7319385 [9];
++c_7318905.hdr.mark = gc_color_red;
++ c_7318905.hdr.grayed = 0;
++c_7318905.tag = closureN_tag;
++ c_7318905.fn = (function_type)__lambda_641;
++c_7318905.num_args = 1;
++c_7318905.num_elements = 9;
++c_7318905.elements = (object *)e_7319385;
++c_7318905.elements[0] = ((closureN)self_7312413)->elements[0];
++c_7318905.elements[1] = new_91ls13_73810_73950_731068_733068;
++c_7318905.elements[2] = old_91ls12_73809_73949_731067_733067;
++c_7318905.elements[3] = p_91ls11_73808_73948_731066_733066;
++c_7318905.elements[4] = param_91ls9_73806_73946_731064_733064;
++c_7318905.elements[5] = ((closureN)self_7312413)->elements[1];
++c_7318905.elements[6] = ((closureN)self_7312413)->elements[2];
++c_7318905.elements[7] = value_91ls10_73807_73947_731065_733065;
++c_7318905.elements[8] = w_937_73804_73945_731063_733063;
+
+-return_direct_with_clo1(data,(closure)&c_7320205,__lambda_641, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7318905,__lambda_641, boolean_f);;
+ }
+
+-static void __lambda_641(void *data, object self_7313667, int argc, object *args) /* object self_7313667, object lp_938_73805_73951_731069_733416 */
++static void __lambda_641(void *data, object self_7312414, int argc, object *args) /* object self_7312414, object lp_938_73805_73951_731069_733069 */
+ {
+- object lp_938_73805_73951_731069_733416 = args[0];
++ object lp_938_73805_73951_731069_733069 = args[0];
+
+-closureN_type c_7320207;
+-object e_7320681 [9];
+-c_7320207.hdr.mark = gc_color_red;
+- c_7320207.hdr.grayed = 0;
+-c_7320207.tag = closureN_tag;
+- c_7320207.fn = (function_type)__lambda_1416;
+-c_7320207.num_args = 1;
+-c_7320207.num_elements = 9;
+-c_7320207.elements = (object *)e_7320681;
+-c_7320207.elements[0] = ((closureN)self_7313667)->elements[0];
+-c_7320207.elements[1] = ((closureN)self_7313667)->elements[1];
+-c_7320207.elements[2] = ((closureN)self_7313667)->elements[2];
+-c_7320207.elements[3] = ((closureN)self_7313667)->elements[3];
+-c_7320207.elements[4] = ((closureN)self_7313667)->elements[4];
+-c_7320207.elements[5] = ((closureN)self_7313667)->elements[5];
+-c_7320207.elements[6] = ((closureN)self_7313667)->elements[6];
+-c_7320207.elements[7] = ((closureN)self_7313667)->elements[7];
+-c_7320207.elements[8] = ((closureN)self_7313667)->elements[8];
++closureN_type c_7318907;
++object e_7319381 [9];
++c_7318907.hdr.mark = gc_color_red;
++ c_7318907.hdr.grayed = 0;
++c_7318907.tag = closureN_tag;
++ c_7318907.fn = (function_type)__lambda_1369;
++c_7318907.num_args = 1;
++c_7318907.num_elements = 9;
++c_7318907.elements = (object *)e_7319381;
++c_7318907.elements[0] = ((closureN)self_7312414)->elements[0];
++c_7318907.elements[1] = ((closureN)self_7312414)->elements[1];
++c_7318907.elements[2] = ((closureN)self_7312414)->elements[2];
++c_7318907.elements[3] = ((closureN)self_7312414)->elements[3];
++c_7318907.elements[4] = ((closureN)self_7312414)->elements[4];
++c_7318907.elements[5] = ((closureN)self_7312414)->elements[5];
++c_7318907.elements[6] = ((closureN)self_7312414)->elements[6];
++c_7318907.elements[7] = ((closureN)self_7312414)->elements[7];
++c_7318907.elements[8] = ((closureN)self_7312414)->elements[8];
+
+
+-pair_type local_7320684;
+-return_direct_with_clo1(data,(closure)&c_7320207,__lambda_1416, set_cell_as_expr(&local_7320684, lp_938_73805_73951_731069_733416));;
++pair_type local_7319384;
++return_direct_with_clo1(data,(closure)&c_7318907,__lambda_1369, set_cell_as_expr(&local_7319384, lp_938_73805_73951_731069_733069));;
+ }
+
+-static void __lambda_1416(void *data, object self_7313668, int argc, object *args) /* object self_7313668, object lp_938_73805_73951_731069_733416 */
++static void __lambda_1369(void *data, object self_7312415, int argc, object *args) /* object self_7312415, object lp_938_73805_73951_731069_733069 */
+ {
+- object lp_938_73805_73951_731069_733416 = args[0];
++ object lp_938_73805_73951_731069_733069 = args[0];
+
+-closureN_type c_7320209;
+-object e_7320227 [8];
+-c_7320209.hdr.mark = gc_color_red;
+- c_7320209.hdr.grayed = 0;
+-c_7320209.tag = closureN_tag;
+- c_7320209.fn = (function_type)__lambda_642;
+-c_7320209.num_args = 1;
+-c_7320209.num_elements = 8;
+-c_7320209.elements = (object *)e_7320227;
+-c_7320209.elements[0] = ((closureN)self_7313668)->elements[0];
+-c_7320209.elements[1] = lp_938_73805_73951_731069_733416;
+-c_7320209.elements[2] = ((closureN)self_7313668)->elements[1];
+-c_7320209.elements[3] = ((closureN)self_7313668)->elements[2];
+-c_7320209.elements[4] = ((closureN)self_7313668)->elements[3];
+-c_7320209.elements[5] = ((closureN)self_7313668)->elements[4];
+-c_7320209.elements[6] = ((closureN)self_7313668)->elements[7];
+-c_7320209.elements[7] = ((closureN)self_7313668)->elements[8];
++closureN_type c_7318909;
++object e_7318927 [8];
++c_7318909.hdr.mark = gc_color_red;
++ c_7318909.hdr.grayed = 0;
++c_7318909.tag = closureN_tag;
++ c_7318909.fn = (function_type)__lambda_642;
++c_7318909.num_args = 1;
++c_7318909.num_elements = 8;
++c_7318909.elements = (object *)e_7318927;
++c_7318909.elements[0] = ((closureN)self_7312415)->elements[0];
++c_7318909.elements[1] = lp_938_73805_73951_731069_733069;
++c_7318909.elements[2] = ((closureN)self_7312415)->elements[1];
++c_7318909.elements[3] = ((closureN)self_7312415)->elements[2];
++c_7318909.elements[4] = ((closureN)self_7312415)->elements[3];
++c_7318909.elements[5] = ((closureN)self_7312415)->elements[4];
++c_7318909.elements[6] = ((closureN)self_7312415)->elements[7];
++c_7318909.elements[7] = ((closureN)self_7312415)->elements[8];
+
+
+-closureN_type c_7320228;
+-object e_7320680 [3];
+-c_7320228.hdr.mark = gc_color_red;
+- c_7320228.hdr.grayed = 0;
+-c_7320228.tag = closureN_tag;
+- c_7320228.fn = (function_type)__lambda_644;
+-c_7320228.num_args = 6;
+-c_7320228.num_elements = 3;
+-c_7320228.elements = (object *)e_7320680;
+-c_7320228.elements[0] = lp_938_73805_73951_731069_733416;
+-c_7320228.elements[1] = ((closureN)self_7313668)->elements[5];
+-c_7320228.elements[2] = ((closureN)self_7313668)->elements[6];
++closureN_type c_7318928;
++object e_7319380 [3];
++c_7318928.hdr.mark = gc_color_red;
++ c_7318928.hdr.grayed = 0;
++c_7318928.tag = closureN_tag;
++ c_7318928.fn = (function_type)__lambda_644;
++c_7318928.num_args = 6;
++c_7318928.num_elements = 3;
++c_7318928.elements = (object *)e_7319380;
++c_7318928.elements[0] = lp_938_73805_73951_731069_733069;
++c_7318928.elements[1] = ((closureN)self_7312415)->elements[5];
++c_7318928.elements[2] = ((closureN)self_7312415)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7320209,__lambda_642, &c_7320228);;
++return_direct_with_clo1(data,(closure)&c_7318909,__lambda_642, &c_7318928);;
+ }
+
+-static void __lambda_644(void *data, object self_7313669, int argc, object *args) /* object self_7313669, object k_735863, object w_937_73804_73952_731070_733417, object param_91ls9_73806_73953_731071_733418, object value_91ls10_73807_73954_731072_733419, object p_91ls11_73808_73955_731073_733420, object old_91ls12_73809_73956_731074_733421, object new_91ls13_73810_73957_731075_733422 */
++static void __lambda_644(void *data, object self_7312416, int argc, object *args) /* object self_7312416, object k_735411, object w_937_73804_73952_731070_733070, object param_91ls9_73806_73953_731071_733071, object value_91ls10_73807_73954_731072_733072, object p_91ls11_73808_73955_731073_733073, object old_91ls12_73809_73956_731074_733074, object new_91ls13_73810_73957_731075_733075 */
+ {
+- object k_735863 = args[0]; object w_937_73804_73952_731070_733417 = args[1]; object param_91ls9_73806_73953_731071_733418 = args[2]; object value_91ls10_73807_73954_731072_733419 = args[3]; object p_91ls11_73808_73955_731073_733420 = args[4]; object old_91ls12_73809_73956_731074_733421 = args[5]; object new_91ls13_73810_73957_731075_733422 = args[6];
++ object k_735411 = args[0]; object w_937_73804_73952_731070_733070 = args[1]; object param_91ls9_73806_73953_731071_733071 = args[2]; object value_91ls10_73807_73954_731072_733072 = args[3]; object p_91ls11_73808_73955_731073_733073 = args[4]; object old_91ls12_73809_73956_731074_733074 = args[5]; object new_91ls13_73810_73957_731075_733075 = args[6];
+
+-if( (boolean_f != Cyc_is_null(w_937_73804_73952_731070_733417)) ){
++if( (boolean_f != Cyc_is_null(w_937_73804_73952_731070_733070)) ){
+
+-closureN_type c_7320232;
+-object e_7320555 [7];
+-c_7320232.hdr.mark = gc_color_red;
+- c_7320232.hdr.grayed = 0;
+-c_7320232.tag = closureN_tag;
+- c_7320232.fn = (function_type)__lambda_645;
+-c_7320232.num_args = 1;
+-c_7320232.num_elements = 7;
+-c_7320232.elements = (object *)e_7320555;
+-c_7320232.elements[0] = k_735863;
+-c_7320232.elements[1] = new_91ls13_73810_73957_731075_733422;
+-c_7320232.elements[2] = old_91ls12_73809_73956_731074_733421;
+-c_7320232.elements[3] = p_91ls11_73808_73955_731073_733420;
+-c_7320232.elements[4] = ((closureN)self_7313669)->elements[1];
+-c_7320232.elements[5] = ((closureN)self_7313669)->elements[2];
+-c_7320232.elements[6] = value_91ls10_73807_73954_731072_733419;
++closureN_type c_7318932;
++object e_7319255 [7];
++c_7318932.hdr.mark = gc_color_red;
++ c_7318932.hdr.grayed = 0;
++c_7318932.tag = closureN_tag;
++ c_7318932.fn = (function_type)__lambda_645;
++c_7318932.num_args = 1;
++c_7318932.num_elements = 7;
++c_7318932.elements = (object *)e_7319255;
++c_7318932.elements[0] = k_735411;
++c_7318932.elements[1] = new_91ls13_73810_73957_731075_733075;
++c_7318932.elements[2] = old_91ls12_73809_73956_731074_733074;
++c_7318932.elements[3] = p_91ls11_73808_73955_731073_733073;
++c_7318932.elements[4] = ((closureN)self_7312416)->elements[1];
++c_7318932.elements[5] = ((closureN)self_7312416)->elements[2];
++c_7318932.elements[6] = value_91ls10_73807_73954_731072_733072;
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320232, primitive_cons, NULL, param_91ls9_73806_73953_731071_733418);
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7318932, primitive_cons, NULL, param_91ls9_73806_73953_731071_733071);
+ } else {
+
+-if( (boolean_f != Cyc_is_pair(w_937_73804_73952_731070_733417)) ){
++if( (boolean_f != Cyc_is_pair(w_937_73804_73952_731070_733070)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_937_73804_73952_731070_733417))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_937_73804_73952_731070_733070))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070)))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070))))) ){
+
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070)))))) ){
+
+
+
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))))))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070))))))) ){
+
+
+
+@@ -23891,19 +22094,19 @@ if( (boolean_f != Cyc_is_pair(Cyc_cdr(da
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070)))))))) ){
+
+
+
+
+
+-pair_type local_7320620;
++pair_type local_7319320;
+
+
+
+
+
+-pair_type local_7320627;
++pair_type local_7319327;
+
+
+
+@@ -23911,7 +22114,7 @@ pair_type local_7320627;
+
+
+
+-pair_type local_7320636;
++pair_type local_7319336;
+
+
+
+@@ -23921,7 +22124,7 @@ pair_type local_7320636;
+
+
+
+-pair_type local_7320647;
++pair_type local_7319347;
+
+
+
+@@ -23933,7 +22136,7 @@ pair_type local_7320647;
+
+
+
+-pair_type local_7320660;
++pair_type local_7319360;
+
+
+
+@@ -23946,974 +22149,974 @@ pair_type local_7320660;
+
+
+
+-return_closcall7(data, car(((closureN)self_7313669)->elements[0]), k_735863, Cyc_cdr(data, w_937_73804_73952_731070_733417), set_pair_as_expr(&local_7320620, Cyc_car(data, Cyc_car(data, w_937_73804_73952_731070_733417)), param_91ls9_73806_73953_731071_733418), set_pair_as_expr(&local_7320627, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))), value_91ls10_73807_73954_731072_733419), set_pair_as_expr(&local_7320636, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))), p_91ls11_73808_73955_731073_733420), set_pair_as_expr(&local_7320647, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))))), old_91ls12_73809_73956_731074_733421), set_pair_as_expr(&local_7320660, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))))), new_91ls13_73810_73957_731075_733422));
++return_closcall7(data, car(((closureN)self_7312416)->elements[0]), k_735411, Cyc_cdr(data, w_937_73804_73952_731070_733070), set_pair_as_expr(&local_7319320, Cyc_car(data, Cyc_car(data, w_937_73804_73952_731070_733070)), param_91ls9_73806_73953_731071_733071), set_pair_as_expr(&local_7319327, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070))), value_91ls10_73807_73954_731072_733072), set_pair_as_expr(&local_7319336, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070)))), p_91ls11_73808_73955_731073_733073), set_pair_as_expr(&local_7319347, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070))))), old_91ls12_73809_73956_731074_733074), set_pair_as_expr(&local_7319360, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733070)))))), new_91ls13_73810_73957_731075_733075));
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735863, (((closure) k_735863)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_735411, (((closure) k_735411)->fn), boolean_f);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_645(void *data, object self_7313670, int argc, object *args) /* object self_7313670, object r_735865_7312728 */
++static void __lambda_645(void *data, object self_7312417, int argc, object *args) /* object self_7312417, object r_735413_7311475 */
+ {
+- object r_735865_7312728 = args[0];
++ object r_735413_7311475 = args[0];
+
+-closureN_type c_7320234;
+-object e_7320553 [7];
+-c_7320234.hdr.mark = gc_color_red;
+- c_7320234.hdr.grayed = 0;
+-c_7320234.tag = closureN_tag;
+- c_7320234.fn = (function_type)__lambda_646;
+-c_7320234.num_args = 1;
+-c_7320234.num_elements = 7;
+-c_7320234.elements = (object *)e_7320553;
+-c_7320234.elements[0] = ((closureN)self_7313670)->elements[0];
+-c_7320234.elements[1] = ((closureN)self_7313670)->elements[1];
+-c_7320234.elements[2] = ((closureN)self_7313670)->elements[2];
+-c_7320234.elements[3] = ((closureN)self_7313670)->elements[3];
+-c_7320234.elements[4] = r_735865_7312728;
+-c_7320234.elements[5] = ((closureN)self_7313670)->elements[4];
+-c_7320234.elements[6] = ((closureN)self_7313670)->elements[5];
++closureN_type c_7318934;
++object e_7319253 [7];
++c_7318934.hdr.mark = gc_color_red;
++ c_7318934.hdr.grayed = 0;
++c_7318934.tag = closureN_tag;
++ c_7318934.fn = (function_type)__lambda_646;
++c_7318934.num_args = 1;
++c_7318934.num_elements = 7;
++c_7318934.elements = (object *)e_7319253;
++c_7318934.elements[0] = ((closureN)self_7312417)->elements[0];
++c_7318934.elements[1] = ((closureN)self_7312417)->elements[1];
++c_7318934.elements[2] = ((closureN)self_7312417)->elements[2];
++c_7318934.elements[3] = ((closureN)self_7312417)->elements[3];
++c_7318934.elements[4] = r_735413_7311475;
++c_7318934.elements[5] = ((closureN)self_7312417)->elements[4];
++c_7318934.elements[6] = ((closureN)self_7312417)->elements[5];
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320234, primitive_cons, NULL, ((closureN)self_7313670)->elements[6]);;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7318934, primitive_cons, NULL, ((closureN)self_7312417)->elements[6]);;
+ }
+
+-static void __lambda_646(void *data, object self_7313671, int argc, object *args) /* object self_7313671, object r_735866_7312729_7312779 */
++static void __lambda_646(void *data, object self_7312418, int argc, object *args) /* object self_7312418, object r_735414_7311476_7311526 */
+ {
+- object r_735866_7312729_7312779 = args[0];
++ object r_735414_7311476_7311526 = args[0];
+
+-closureN_type c_7320236;
+-object e_7320551 [7];
+-c_7320236.hdr.mark = gc_color_red;
+- c_7320236.hdr.grayed = 0;
+-c_7320236.tag = closureN_tag;
+- c_7320236.fn = (function_type)__lambda_647;
+-c_7320236.num_args = 1;
+-c_7320236.num_elements = 7;
+-c_7320236.elements = (object *)e_7320551;
+-c_7320236.elements[0] = ((closureN)self_7313671)->elements[0];
+-c_7320236.elements[1] = ((closureN)self_7313671)->elements[1];
+-c_7320236.elements[2] = ((closureN)self_7313671)->elements[2];
+-c_7320236.elements[3] = ((closureN)self_7313671)->elements[4];
+-c_7320236.elements[4] = r_735866_7312729_7312779;
+-c_7320236.elements[5] = ((closureN)self_7313671)->elements[5];
+-c_7320236.elements[6] = ((closureN)self_7313671)->elements[6];
++closureN_type c_7318936;
++object e_7319251 [7];
++c_7318936.hdr.mark = gc_color_red;
++ c_7318936.hdr.grayed = 0;
++c_7318936.tag = closureN_tag;
++ c_7318936.fn = (function_type)__lambda_647;
++c_7318936.num_args = 1;
++c_7318936.num_elements = 7;
++c_7318936.elements = (object *)e_7319251;
++c_7318936.elements[0] = ((closureN)self_7312418)->elements[0];
++c_7318936.elements[1] = ((closureN)self_7312418)->elements[1];
++c_7318936.elements[2] = ((closureN)self_7312418)->elements[2];
++c_7318936.elements[3] = ((closureN)self_7312418)->elements[4];
++c_7318936.elements[4] = r_735414_7311476_7311526;
++c_7318936.elements[5] = ((closureN)self_7312418)->elements[5];
++c_7318936.elements[6] = ((closureN)self_7312418)->elements[6];
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320236, primitive_cons, NULL, ((closureN)self_7313671)->elements[3]);;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7318936, primitive_cons, NULL, ((closureN)self_7312418)->elements[3]);;
+ }
+
+-static void __lambda_647(void *data, object self_7313672, int argc, object *args) /* object self_7313672, object r_735867_7312730_7312780_7312829 */
++static void __lambda_647(void *data, object self_7312419, int argc, object *args) /* object self_7312419, object r_735415_7311477_7311527_7311576 */
+ {
+- object r_735867_7312730_7312780_7312829 = args[0];
++ object r_735415_7311477_7311527_7311576 = args[0];
+
+-closureN_type c_7320238;
+-object e_7320549 [7];
+-c_7320238.hdr.mark = gc_color_red;
+- c_7320238.hdr.grayed = 0;
+-c_7320238.tag = closureN_tag;
+- c_7320238.fn = (function_type)__lambda_648;
+-c_7320238.num_args = 1;
+-c_7320238.num_elements = 7;
+-c_7320238.elements = (object *)e_7320549;
+-c_7320238.elements[0] = ((closureN)self_7313672)->elements[0];
+-c_7320238.elements[1] = ((closureN)self_7313672)->elements[1];
+-c_7320238.elements[2] = ((closureN)self_7313672)->elements[3];
+-c_7320238.elements[3] = ((closureN)self_7313672)->elements[4];
+-c_7320238.elements[4] = r_735867_7312730_7312780_7312829;
+-c_7320238.elements[5] = ((closureN)self_7313672)->elements[5];
+-c_7320238.elements[6] = ((closureN)self_7313672)->elements[6];
++closureN_type c_7318938;
++object e_7319249 [7];
++c_7318938.hdr.mark = gc_color_red;
++ c_7318938.hdr.grayed = 0;
++c_7318938.tag = closureN_tag;
++ c_7318938.fn = (function_type)__lambda_648;
++c_7318938.num_args = 1;
++c_7318938.num_elements = 7;
++c_7318938.elements = (object *)e_7319249;
++c_7318938.elements[0] = ((closureN)self_7312419)->elements[0];
++c_7318938.elements[1] = ((closureN)self_7312419)->elements[1];
++c_7318938.elements[2] = ((closureN)self_7312419)->elements[3];
++c_7318938.elements[3] = ((closureN)self_7312419)->elements[4];
++c_7318938.elements[4] = r_735415_7311477_7311527_7311576;
++c_7318938.elements[5] = ((closureN)self_7312419)->elements[5];
++c_7318938.elements[6] = ((closureN)self_7312419)->elements[6];
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320238, primitive_cons, NULL, ((closureN)self_7313672)->elements[2]);;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7318938, primitive_cons, NULL, ((closureN)self_7312419)->elements[2]);;
+ }
+
+-static void __lambda_648(void *data, object self_7313673, int argc, object *args) /* object self_7313673, object r_735868_7312731_7312781_7312830_7312878 */
++static void __lambda_648(void *data, object self_7312420, int argc, object *args) /* object self_7312420, object r_735416_7311478_7311528_7311577_7311625 */
+ {
+- object r_735868_7312731_7312781_7312830_7312878 = args[0];
++ object r_735416_7311478_7311528_7311577_7311625 = args[0];
+
+-closureN_type c_7320240;
+-object e_7320547 [7];
+-c_7320240.hdr.mark = gc_color_red;
+- c_7320240.hdr.grayed = 0;
+-c_7320240.tag = closureN_tag;
+- c_7320240.fn = (function_type)__lambda_649;
+-c_7320240.num_args = 1;
+-c_7320240.num_elements = 7;
+-c_7320240.elements = (object *)e_7320547;
+-c_7320240.elements[0] = ((closureN)self_7313673)->elements[0];
+-c_7320240.elements[1] = ((closureN)self_7313673)->elements[2];
+-c_7320240.elements[2] = ((closureN)self_7313673)->elements[3];
+-c_7320240.elements[3] = ((closureN)self_7313673)->elements[4];
+-c_7320240.elements[4] = r_735868_7312731_7312781_7312830_7312878;
+-c_7320240.elements[5] = ((closureN)self_7313673)->elements[5];
+-c_7320240.elements[6] = ((closureN)self_7313673)->elements[6];
++closureN_type c_7318940;
++object e_7319247 [7];
++c_7318940.hdr.mark = gc_color_red;
++ c_7318940.hdr.grayed = 0;
++c_7318940.tag = closureN_tag;
++ c_7318940.fn = (function_type)__lambda_649;
++c_7318940.num_args = 1;
++c_7318940.num_elements = 7;
++c_7318940.elements = (object *)e_7319247;
++c_7318940.elements[0] = ((closureN)self_7312420)->elements[0];
++c_7318940.elements[1] = ((closureN)self_7312420)->elements[2];
++c_7318940.elements[2] = ((closureN)self_7312420)->elements[3];
++c_7318940.elements[3] = ((closureN)self_7312420)->elements[4];
++c_7318940.elements[4] = r_735416_7311478_7311528_7311577_7311625;
++c_7318940.elements[5] = ((closureN)self_7312420)->elements[5];
++c_7318940.elements[6] = ((closureN)self_7312420)->elements[6];
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7320240, primitive_cons, NULL, ((closureN)self_7313673)->elements[1]);;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7318940, primitive_cons, NULL, ((closureN)self_7312420)->elements[1]);;
+ }
+
+-static void __lambda_649(void *data, object self_7313674, int argc, object *args) /* object self_7313674, object r_735869_7312732_7312782_7312831_7312879_7312926 */
++static void __lambda_649(void *data, object self_7312421, int argc, object *args) /* object self_7312421, object r_735417_7311479_7311529_7311578_7311626_7311673 */
+ {
+- object r_735869_7312732_7312782_7312831_7312879_7312926 = args[0];
++ object r_735417_7311479_7311529_7311578_7311626_7311673 = args[0];
+
+-closureN_type c_7320242;
+-object e_7320542 [3];
+-c_7320242.hdr.mark = gc_color_red;
+- c_7320242.hdr.grayed = 0;
+-c_7320242.tag = closureN_tag;
+- c_7320242.fn = (function_type)__lambda_650;
+-c_7320242.num_args = 5;
+-c_7320242.num_elements = 3;
+-c_7320242.elements = (object *)e_7320542;
+-c_7320242.elements[0] = ((closureN)self_7313674)->elements[0];
+-c_7320242.elements[1] = ((closureN)self_7313674)->elements[5];
+-c_7320242.elements[2] = ((closureN)self_7313674)->elements[6];
++closureN_type c_7318942;
++object e_7319242 [3];
++c_7318942.hdr.mark = gc_color_red;
++ c_7318942.hdr.grayed = 0;
++c_7318942.tag = closureN_tag;
++ c_7318942.fn = (function_type)__lambda_650;
++c_7318942.num_args = 5;
++c_7318942.num_elements = 3;
++c_7318942.elements = (object *)e_7319242;
++c_7318942.elements[0] = ((closureN)self_7312421)->elements[0];
++c_7318942.elements[1] = ((closureN)self_7312421)->elements[5];
++c_7318942.elements[2] = ((closureN)self_7312421)->elements[6];
+
+-return_direct_with_clo5(data,(closure)&c_7320242,__lambda_650, ((closureN)self_7313674)->elements[1], ((closureN)self_7313674)->elements[2], ((closureN)self_7313674)->elements[3], ((closureN)self_7313674)->elements[4], r_735869_7312732_7312782_7312831_7312879_7312926);;
++return_direct_with_clo5(data,(closure)&c_7318942,__lambda_650, ((closureN)self_7312421)->elements[1], ((closureN)self_7312421)->elements[2], ((closureN)self_7312421)->elements[3], ((closureN)self_7312421)->elements[4], r_735417_7311479_7311529_7311578_7311626_7311673);;
+ }
+
+-static void __lambda_650(void *data, object self_7313675, int argc, object *args) /* object self_7313675, object param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927, object value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928, object p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929, object old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930, object new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931 */
++static void __lambda_650(void *data, object self_7312422, int argc, object *args) /* object self_7312422, object param_73958_731076_733076_7311480_7311530_7311579_7311627_7311674, object value_73959_731077_733077_7311481_7311531_7311580_7311628_7311675, object p_73960_731078_733078_7311482_7311532_7311581_7311629_7311676, object old_73961_731079_733079_7311483_7311533_7311582_7311630_7311677, object new_73962_731080_733080_7311484_7311534_7311583_7311631_7311678 */
+ {
+- object param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927 = args[0]; object value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928 = args[1]; object p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929 = args[2]; object old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930 = args[3]; object new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931 = args[4];
++ object param_73958_731076_733076_7311480_7311530_7311579_7311627_7311674 = args[0]; object value_73959_731077_733077_7311481_7311531_7311580_7311628_7311675 = args[1]; object p_73960_731078_733078_7311482_7311532_7311581_7311629_7311676 = args[2]; object old_73961_731079_733079_7311483_7311533_7311582_7311630_7311677 = args[3]; object new_73962_731080_733080_7311484_7311534_7311583_7311631_7311678 = args[4];
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313675)->elements[2]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312422)->elements[2]))) ){
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313675)->elements[2])))) ){
++if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312422)->elements[2])))) ){
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313675)->elements[2])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312422)->elements[2])))) ){
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313675)->elements[2]))))) ){
+-
+-closureN_type c_7320273;
+-object e_7320533 [8];
+-c_7320273.hdr.mark = gc_color_red;
+- c_7320273.hdr.grayed = 0;
+-c_7320273.tag = closureN_tag;
+- c_7320273.fn = (function_type)__lambda_651;
+-c_7320273.num_args = 1;
+-c_7320273.num_elements = 8;
+-c_7320273.elements = (object *)e_7320533;
+-c_7320273.elements[0] = ((closureN)self_7313675)->elements[0];
+-c_7320273.elements[1] = new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931;
+-c_7320273.elements[2] = old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930;
+-c_7320273.elements[3] = p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929;
+-c_7320273.elements[4] = param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927;
+-c_7320273.elements[5] = ((closureN)self_7313675)->elements[1];
+-c_7320273.elements[6] = ((closureN)self_7313675)->elements[2];
+-c_7320273.elements[7] = value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928;
+-
+-return_closcall2(data, ((closureN)self_7313675)->elements[1], &c_7320273, quote_let);
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313675)->elements[0], (((closure) ((closureN)self_7313675)->elements[0])->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313675)->elements[0], (((closure) ((closureN)self_7313675)->elements[0])->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313675)->elements[0], (((closure) ((closureN)self_7313675)->elements[0])->fn), boolean_f);}
+-;
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313675)->elements[0], (((closure) ((closureN)self_7313675)->elements[0])->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_651(void *data, object self_7313676, int argc, object *args) /* object self_7313676, object r_735880_7312738_7312788_7312837_7312885_7312932 */
+- {
+- object r_735880_7312738_7312788_7312837_7312885_7312932 = args[0];
+-
+-closureN_type c_7320275;
+-object e_7320524 [9];
+-c_7320275.hdr.mark = gc_color_red;
+- c_7320275.hdr.grayed = 0;
+-c_7320275.tag = closureN_tag;
+- c_7320275.fn = (function_type)__lambda_652;
+-c_7320275.num_args = 1;
+-c_7320275.num_elements = 9;
+-c_7320275.elements = (object *)e_7320524;
+-c_7320275.elements[0] = ((closureN)self_7313676)->elements[0];
+-c_7320275.elements[1] = ((closureN)self_7313676)->elements[1];
+-c_7320275.elements[2] = ((closureN)self_7313676)->elements[2];
+-c_7320275.elements[3] = ((closureN)self_7313676)->elements[3];
+-c_7320275.elements[4] = ((closureN)self_7313676)->elements[4];
+-c_7320275.elements[5] = r_735880_7312738_7312788_7312837_7312885_7312932;
+-c_7320275.elements[6] = ((closureN)self_7313676)->elements[5];
+-c_7320275.elements[7] = ((closureN)self_7313676)->elements[6];
+-c_7320275.elements[8] = ((closureN)self_7313676)->elements[7];
+-
+-
+-mmacro(c_7320525, (function_type)__lambda_680);c_7320525.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7320275,__lambda_652, &c_7320525);;
+-}
+-
+-static void __lambda_680(void *data, object self_7313677, int argc, object *args) /* object self_7313677, object k_736003_7312776_7312826_7312875_7312923_7312970, object p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971, object param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972 */
+- {
+- object k_736003_7312776_7312826_7312875_7312923_7312970 = args[0]; object p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971 = args[1]; object param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972 = args[2];
+-
+-pair_type local_7320529;
+-
+-pair_type local_7320532;
+-return_direct_with_clo1(data, k_736003_7312776_7312826_7312875_7312923_7312970, (((closure) k_736003_7312776_7312826_7312875_7312923_7312970)->fn), set_pair_as_expr(&local_7320529, p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971, set_pair_as_expr(&local_7320532, param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972, NULL)));;
+-}
+-
+-static void __lambda_652(void *data, object self_7313678, int argc, object *args) /* object self_7313678, object r_736002_7312739_7312789_7312838_7312886_7312933 */
+- {
+- object r_736002_7312739_7312789_7312838_7312886_7312933 = args[0];
+-
+-closureN_type c_7320277;
+-object e_7320521 [8];
+-c_7320277.hdr.mark = gc_color_red;
+- c_7320277.hdr.grayed = 0;
+-c_7320277.tag = closureN_tag;
+- c_7320277.fn = (function_type)__lambda_653;
+-c_7320277.num_args = 1;
+-c_7320277.num_elements = 8;
+-c_7320277.elements = (object *)e_7320521;
+-c_7320277.elements[0] = ((closureN)self_7313678)->elements[0];
+-c_7320277.elements[1] = ((closureN)self_7313678)->elements[1];
+-c_7320277.elements[2] = ((closureN)self_7313678)->elements[2];
+-c_7320277.elements[3] = ((closureN)self_7313678)->elements[3];
+-c_7320277.elements[4] = ((closureN)self_7313678)->elements[5];
+-c_7320277.elements[5] = ((closureN)self_7313678)->elements[6];
+-c_7320277.elements[6] = ((closureN)self_7313678)->elements[7];
+-c_7320277.elements[7] = ((closureN)self_7313678)->elements[8];
+-
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7320277, r_736002_7312739_7312789_7312838_7312886_7312933, ((closureN)self_7313678)->elements[3], ((closureN)self_7313678)->elements[4]);;
+-}
+-
+-static void __lambda_653(void *data, object self_7313679, int argc, object *args) /* object self_7313679, object r_735883_7312740_7312790_7312839_7312887_7312934 */
+- {
+- object r_735883_7312740_7312790_7312839_7312887_7312934 = args[0];
+-
+-closureN_type c_7320280;
+-object e_7320520 [9];
+-c_7320280.hdr.mark = gc_color_red;
+- c_7320280.hdr.grayed = 0;
+-c_7320280.tag = closureN_tag;
+- c_7320280.fn = (function_type)__lambda_654;
+-c_7320280.num_args = 1;
+-c_7320280.num_elements = 9;
+-c_7320280.elements = (object *)e_7320520;
+-c_7320280.elements[0] = ((closureN)self_7313679)->elements[0];
+-c_7320280.elements[1] = ((closureN)self_7313679)->elements[1];
+-c_7320280.elements[2] = ((closureN)self_7313679)->elements[2];
+-c_7320280.elements[3] = ((closureN)self_7313679)->elements[3];
+-c_7320280.elements[4] = ((closureN)self_7313679)->elements[4];
+-c_7320280.elements[5] = r_735883_7312740_7312790_7312839_7312887_7312934;
+-c_7320280.elements[6] = ((closureN)self_7313679)->elements[5];
+-c_7320280.elements[7] = ((closureN)self_7313679)->elements[6];
+-c_7320280.elements[8] = ((closureN)self_7313679)->elements[7];
+-
+-return_closcall2(data, ((closureN)self_7313679)->elements[5], &c_7320280, quote_let);;
+-}
+-
+-static void __lambda_654(void *data, object self_7313680, int argc, object *args) /* object self_7313680, object r_735889_7312741_7312791_7312840_7312888_7312935 */
+- {
+- object r_735889_7312741_7312791_7312840_7312888_7312935 = args[0];
+-
+-closureN_type c_7320282;
+-object e_7320508 [10];
+-c_7320282.hdr.mark = gc_color_red;
+- c_7320282.hdr.grayed = 0;
+-c_7320282.tag = closureN_tag;
+- c_7320282.fn = (function_type)__lambda_655;
+-c_7320282.num_args = 1;
+-c_7320282.num_elements = 10;
+-c_7320282.elements = (object *)e_7320508;
+-c_7320282.elements[0] = ((closureN)self_7313680)->elements[0];
+-c_7320282.elements[1] = ((closureN)self_7313680)->elements[1];
+-c_7320282.elements[2] = ((closureN)self_7313680)->elements[2];
+-c_7320282.elements[3] = ((closureN)self_7313680)->elements[3];
+-c_7320282.elements[4] = ((closureN)self_7313680)->elements[4];
+-c_7320282.elements[5] = ((closureN)self_7313680)->elements[5];
+-c_7320282.elements[6] = r_735889_7312741_7312791_7312840_7312888_7312935;
+-c_7320282.elements[7] = ((closureN)self_7313680)->elements[6];
+-c_7320282.elements[8] = ((closureN)self_7313680)->elements[7];
+-c_7320282.elements[9] = ((closureN)self_7313680)->elements[8];
+-
+-
+-mmacro(c_7320509, (function_type)__lambda_679);c_7320509.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7320282,__lambda_655, &c_7320509);;
+-}
+-
+-static void __lambda_679(void *data, object self_7313681, int argc, object *args) /* object self_7313681, object k_735993_7312773_7312823_7312872_7312920_7312967, object old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968, object p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969 */
+- {
+- object k_735993_7312773_7312823_7312872_7312920_7312967 = args[0]; object old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968 = args[1]; object p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969 = args[2];
+-
+-pair_type local_7320513;
+-
+-pair_type local_7320516;
+-
+-pair_type local_7320519;
+-return_direct_with_clo1(data, k_735993_7312773_7312823_7312872_7312920_7312967, (((closure) k_735993_7312773_7312823_7312872_7312920_7312967)->fn), set_pair_as_expr(&local_7320513, old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968, set_pair_as_expr(&local_7320516, set_pair_as_expr(&local_7320519, p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969, NULL), NULL)));;
+-}
+-
+-static void __lambda_655(void *data, object self_7313682, int argc, object *args) /* object self_7313682, object r_735992_7312742_7312792_7312841_7312889_7312936 */
+- {
+- object r_735992_7312742_7312792_7312841_7312889_7312936 = args[0];
+-
+-closureN_type c_7320284;
+-object e_7320505 [10];
+-c_7320284.hdr.mark = gc_color_red;
+- c_7320284.hdr.grayed = 0;
+-c_7320284.tag = closureN_tag;
+- c_7320284.fn = (function_type)__lambda_656;
+-c_7320284.num_args = 1;
+-c_7320284.num_elements = 10;
+-c_7320284.elements = (object *)e_7320505;
+-c_7320284.elements[0] = ((closureN)self_7313682)->elements[0];
+-c_7320284.elements[1] = ((closureN)self_7313682)->elements[1];
+-c_7320284.elements[2] = ((closureN)self_7313682)->elements[2];
+-c_7320284.elements[3] = ((closureN)self_7313682)->elements[3];
+-c_7320284.elements[4] = ((closureN)self_7313682)->elements[4];
+-c_7320284.elements[5] = ((closureN)self_7313682)->elements[5];
+-c_7320284.elements[6] = ((closureN)self_7313682)->elements[6];
+-c_7320284.elements[7] = ((closureN)self_7313682)->elements[7];
+-c_7320284.elements[8] = ((closureN)self_7313682)->elements[8];
+-c_7320284.elements[9] = ((closureN)self_7313682)->elements[9];
+-
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7320284, r_735992_7312742_7312792_7312841_7312889_7312936, ((closureN)self_7313682)->elements[2], ((closureN)self_7313682)->elements[3]);;
+-}
+-
+-static void __lambda_656(void *data, object self_7313683, int argc, object *args) /* object self_7313683, object r_735965_7312743_7312793_7312842_7312890_7312937 */
+- {
+- object r_735965_7312743_7312793_7312842_7312890_7312937 = args[0];
+-
+-closureN_type c_7320286;
+-object e_7320464 [11];
+-c_7320286.hdr.mark = gc_color_red;
+- c_7320286.hdr.grayed = 0;
+-c_7320286.tag = closureN_tag;
+- c_7320286.fn = (function_type)__lambda_657;
+-c_7320286.num_args = 1;
+-c_7320286.num_elements = 11;
+-c_7320286.elements = (object *)e_7320464;
+-c_7320286.elements[0] = ((closureN)self_7313683)->elements[0];
+-c_7320286.elements[1] = ((closureN)self_7313683)->elements[1];
+-c_7320286.elements[2] = ((closureN)self_7313683)->elements[2];
+-c_7320286.elements[3] = ((closureN)self_7313683)->elements[3];
+-c_7320286.elements[4] = ((closureN)self_7313683)->elements[4];
+-c_7320286.elements[5] = ((closureN)self_7313683)->elements[5];
+-c_7320286.elements[6] = ((closureN)self_7313683)->elements[6];
+-c_7320286.elements[7] = r_735965_7312743_7312793_7312842_7312890_7312937;
+-c_7320286.elements[8] = ((closureN)self_7313683)->elements[7];
+-c_7320286.elements[9] = ((closureN)self_7313683)->elements[8];
+-c_7320286.elements[10] = ((closureN)self_7313683)->elements[9];
+-
+-
+-closureN_type c_7320465;
+-object e_7320504 [1];
+-c_7320465.hdr.mark = gc_color_red;
+- c_7320465.hdr.grayed = 0;
+-c_7320465.tag = closureN_tag;
+- c_7320465.fn = (function_type)__lambda_676;
+-c_7320465.num_args = 3;
+-c_7320465.num_elements = 1;
+-c_7320465.elements = (object *)e_7320504;
+-c_7320465.elements[0] = ((closureN)self_7313683)->elements[7];
+-
+-return_direct_with_clo1(data,(closure)&c_7320286,__lambda_657, &c_7320465);;
+-}
+-
+-static void __lambda_676(void *data, object self_7313684, int argc, object *args) /* object self_7313684, object k_735968_7312767_7312817_7312866_7312914_7312961, object new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962, object p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963, object value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964 */
+- {
+- object k_735968_7312767_7312817_7312866_7312914_7312961 = args[0]; object new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962 = args[1]; object p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963 = args[2]; object value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964 = args[3];
+-
+-closureN_type c_7320468;
+-object e_7320503 [5];
+-c_7320468.hdr.mark = gc_color_red;
+- c_7320468.hdr.grayed = 0;
+-c_7320468.tag = closureN_tag;
+- c_7320468.fn = (function_type)__lambda_677;
+-c_7320468.num_args = 1;
+-c_7320468.num_elements = 5;
+-c_7320468.elements = (object *)e_7320503;
+-c_7320468.elements[0] = k_735968_7312767_7312817_7312866_7312914_7312961;
+-c_7320468.elements[1] = new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962;
+-c_7320468.elements[2] = p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963;
+-c_7320468.elements[3] = ((closureN)self_7313684)->elements[0];
+-c_7320468.elements[4] = value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964;
+-
+-return_closcall2(data, ((closureN)self_7313684)->elements[0], &c_7320468, quote_quote);;
+-}
+-
+-static void __lambda_677(void *data, object self_7313685, int argc, object *args) /* object self_7313685, object r_735984_7312771_7312821_7312870_7312918_7312965 */
+- {
+- object r_735984_7312771_7312821_7312870_7312918_7312965 = args[0];
+-
+-closureN_type c_7320471;
+-object e_7320502 [5];
+-c_7320471.hdr.mark = gc_color_red;
+- c_7320471.hdr.grayed = 0;
+-c_7320471.tag = closureN_tag;
+- c_7320471.fn = (function_type)__lambda_678;
+-c_7320471.num_args = 1;
+-c_7320471.num_elements = 5;
+-c_7320471.elements = (object *)e_7320502;
+-c_7320471.elements[0] = ((closureN)self_7313685)->elements[0];
+-c_7320471.elements[1] = ((closureN)self_7313685)->elements[1];
+-c_7320471.elements[2] = ((closureN)self_7313685)->elements[2];
+-c_7320471.elements[3] = r_735984_7312771_7312821_7312870_7312918_7312965;
+-c_7320471.elements[4] = ((closureN)self_7313685)->elements[4];
+-
+-return_closcall2(data, ((closureN)self_7313685)->elements[3], &c_7320471, quote__121param_91convert_125);;
+-}
+-
+-static void __lambda_678(void *data, object self_7313686, int argc, object *args) /* object self_7313686, object r_735987_7312772_7312822_7312871_7312919_7312966 */
+- {
+- object r_735987_7312772_7312822_7312871_7312919_7312966 = args[0];
+-
+-pair_type local_7320476;
+-
+-pair_type local_7320480;
+-
+-pair_type local_7320483;
+-
+-pair_type local_7320486;
+-
+-pair_type local_7320490;
+-
+-pair_type local_7320493;
+-
+-pair_type local_7320497;
+-
+-pair_type local_7320500;
+-return_direct_with_clo1(data, ((closureN)self_7313686)->elements[0], (((closure) ((closureN)self_7313686)->elements[0])->fn), set_pair_as_expr(&local_7320476, ((closureN)self_7313686)->elements[1], set_pair_as_expr(&local_7320480, set_pair_as_expr(&local_7320483, set_pair_as_expr(&local_7320486, ((closureN)self_7313686)->elements[2], set_pair_as_expr(&local_7320490, set_pair_as_expr(&local_7320493, ((closureN)self_7313686)->elements[3], set_pair_as_expr(&local_7320497, r_735987_7312772_7312822_7312871_7312919_7312966, NULL)), NULL)), set_pair_as_expr(&local_7320500, ((closureN)self_7313686)->elements[4], NULL)), NULL)));;
+-}
+-
+-static void __lambda_657(void *data, object self_7313687, int argc, object *args) /* object self_7313687, object r_735967_7312744_7312794_7312843_7312891_7312938 */
+- {
+- object r_735967_7312744_7312794_7312843_7312891_7312938 = args[0];
+-
+-closureN_type c_7320288;
+-object e_7320460 [10];
+-c_7320288.hdr.mark = gc_color_red;
+- c_7320288.hdr.grayed = 0;
+-c_7320288.tag = closureN_tag;
+- c_7320288.fn = (function_type)__lambda_658;
+-c_7320288.num_args = 1;
+-c_7320288.num_elements = 10;
+-c_7320288.elements = (object *)e_7320460;
+-c_7320288.elements[0] = ((closureN)self_7313687)->elements[0];
+-c_7320288.elements[1] = ((closureN)self_7313687)->elements[1];
+-c_7320288.elements[2] = ((closureN)self_7313687)->elements[2];
+-c_7320288.elements[3] = ((closureN)self_7313687)->elements[3];
+-c_7320288.elements[4] = ((closureN)self_7313687)->elements[4];
+-c_7320288.elements[5] = ((closureN)self_7313687)->elements[5];
+-c_7320288.elements[6] = ((closureN)self_7313687)->elements[6];
+-c_7320288.elements[7] = ((closureN)self_7313687)->elements[7];
+-c_7320288.elements[8] = ((closureN)self_7313687)->elements[8];
+-c_7320288.elements[9] = ((closureN)self_7313687)->elements[9];
+-
+-return_direct_with_clo5(data, __glo_map_scheme_base, (((closure) __glo_map_scheme_base)->fn), &c_7320288, r_735967_7312744_7312794_7312843_7312891_7312938, ((closureN)self_7313687)->elements[1], ((closureN)self_7313687)->elements[3], ((closureN)self_7313687)->elements[10]);;
+-}
+-
+-static void __lambda_658(void *data, object self_7313688, int argc, object *args) /* object self_7313688, object r_735966_7312745_7312795_7312844_7312892_7312939 */
+- {
+- object r_735966_7312745_7312795_7312844_7312892_7312939 = args[0];
+-
+-closureN_type c_7320290;
+-object e_7320458 [9];
+-c_7320290.hdr.mark = gc_color_red;
+- c_7320290.hdr.grayed = 0;
+-c_7320290.tag = closureN_tag;
+- c_7320290.fn = (function_type)__lambda_659;
+-c_7320290.num_args = 1;
+-c_7320290.num_elements = 9;
+-c_7320290.elements = (object *)e_7320458;
+-c_7320290.elements[0] = ((closureN)self_7313688)->elements[0];
+-c_7320290.elements[1] = ((closureN)self_7313688)->elements[1];
+-c_7320290.elements[2] = ((closureN)self_7313688)->elements[2];
+-c_7320290.elements[3] = ((closureN)self_7313688)->elements[3];
+-c_7320290.elements[4] = ((closureN)self_7313688)->elements[4];
+-c_7320290.elements[5] = ((closureN)self_7313688)->elements[5];
+-c_7320290.elements[6] = ((closureN)self_7313688)->elements[6];
+-c_7320290.elements[7] = ((closureN)self_7313688)->elements[8];
+-c_7320290.elements[8] = ((closureN)self_7313688)->elements[9];
+-
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7320290, ((closureN)self_7313688)->elements[7], r_735966_7312745_7312795_7312844_7312892_7312939);;
+-}
+-
+-static void __lambda_659(void *data, object self_7313689, int argc, object *args) /* object self_7313689, object r_735892_7312746_7312796_7312845_7312893_7312940 */
+- {
+- object r_735892_7312746_7312796_7312845_7312893_7312940 = args[0];
+-
+-closureN_type c_7320293;
+-object e_7320457 [10];
+-c_7320293.hdr.mark = gc_color_red;
+- c_7320293.hdr.grayed = 0;
+-c_7320293.tag = closureN_tag;
+- c_7320293.fn = (function_type)__lambda_660;
+-c_7320293.num_args = 1;
+-c_7320293.num_elements = 10;
+-c_7320293.elements = (object *)e_7320457;
+-c_7320293.elements[0] = ((closureN)self_7313689)->elements[0];
+-c_7320293.elements[1] = ((closureN)self_7313689)->elements[1];
+-c_7320293.elements[2] = ((closureN)self_7313689)->elements[2];
+-c_7320293.elements[3] = ((closureN)self_7313689)->elements[3];
+-c_7320293.elements[4] = ((closureN)self_7313689)->elements[4];
+-c_7320293.elements[5] = ((closureN)self_7313689)->elements[5];
+-c_7320293.elements[6] = ((closureN)self_7313689)->elements[6];
+-c_7320293.elements[7] = r_735892_7312746_7312796_7312845_7312893_7312940;
+-c_7320293.elements[8] = ((closureN)self_7313689)->elements[7];
+-c_7320293.elements[9] = ((closureN)self_7313689)->elements[8];
+-
+-return_closcall2(data, ((closureN)self_7313689)->elements[7], &c_7320293, quote_dynamic_91wind);;
+-}
+-
+-static void __lambda_660(void *data, object self_7313690, int argc, object *args) /* object self_7313690, object r_735898_7312747_7312797_7312846_7312894_7312941 */
+- {
+- object r_735898_7312747_7312797_7312846_7312894_7312941 = args[0];
+-
+-closureN_type c_7320296;
+-object e_7320456 [11];
+-c_7320296.hdr.mark = gc_color_red;
+- c_7320296.hdr.grayed = 0;
+-c_7320296.tag = closureN_tag;
+- c_7320296.fn = (function_type)__lambda_661;
+-c_7320296.num_args = 1;
+-c_7320296.num_elements = 11;
+-c_7320296.elements = (object *)e_7320456;
+-c_7320296.elements[0] = ((closureN)self_7313690)->elements[0];
+-c_7320296.elements[1] = ((closureN)self_7313690)->elements[1];
+-c_7320296.elements[2] = ((closureN)self_7313690)->elements[2];
+-c_7320296.elements[3] = ((closureN)self_7313690)->elements[3];
+-c_7320296.elements[4] = ((closureN)self_7313690)->elements[4];
+-c_7320296.elements[5] = ((closureN)self_7313690)->elements[5];
+-c_7320296.elements[6] = ((closureN)self_7313690)->elements[6];
+-c_7320296.elements[7] = ((closureN)self_7313690)->elements[7];
+-c_7320296.elements[8] = r_735898_7312747_7312797_7312846_7312894_7312941;
+-c_7320296.elements[9] = ((closureN)self_7313690)->elements[8];
+-c_7320296.elements[10] = ((closureN)self_7313690)->elements[9];
+-
+-return_closcall2(data, ((closureN)self_7313690)->elements[8], &c_7320296, quote_lambda);;
+-}
+-
+-static void __lambda_661(void *data, object self_7313691, int argc, object *args) /* object self_7313691, object r_735940_7312748_7312798_7312847_7312895_7312942 */
+- {
+- object r_735940_7312748_7312798_7312847_7312895_7312942 = args[0];
+-
+-closureN_type c_7320298;
+-object e_7320425 [12];
+-c_7320298.hdr.mark = gc_color_red;
+- c_7320298.hdr.grayed = 0;
+-c_7320298.tag = closureN_tag;
+- c_7320298.fn = (function_type)__lambda_662;
+-c_7320298.num_args = 1;
+-c_7320298.num_elements = 12;
+-c_7320298.elements = (object *)e_7320425;
+-c_7320298.elements[0] = ((closureN)self_7313691)->elements[0];
+-c_7320298.elements[1] = ((closureN)self_7313691)->elements[1];
+-c_7320298.elements[2] = ((closureN)self_7313691)->elements[2];
+-c_7320298.elements[3] = ((closureN)self_7313691)->elements[3];
+-c_7320298.elements[4] = ((closureN)self_7313691)->elements[4];
+-c_7320298.elements[5] = ((closureN)self_7313691)->elements[5];
+-c_7320298.elements[6] = ((closureN)self_7313691)->elements[6];
+-c_7320298.elements[7] = ((closureN)self_7313691)->elements[7];
+-c_7320298.elements[8] = ((closureN)self_7313691)->elements[8];
+-c_7320298.elements[9] = r_735940_7312748_7312798_7312847_7312895_7312942;
+-c_7320298.elements[10] = ((closureN)self_7313691)->elements[9];
+-c_7320298.elements[11] = ((closureN)self_7313691)->elements[10];
+-
+-
+-closureN_type c_7320426;
+-object e_7320455 [1];
+-c_7320426.hdr.mark = gc_color_red;
+- c_7320426.hdr.grayed = 0;
+-c_7320426.tag = closureN_tag;
+- c_7320426.fn = (function_type)__lambda_673;
+-c_7320426.num_args = 2;
+-c_7320426.num_elements = 1;
+-c_7320426.elements = (object *)e_7320455;
+-c_7320426.elements[0] = ((closureN)self_7313691)->elements[9];
+-
+-return_direct_with_clo1(data,(closure)&c_7320298,__lambda_662, &c_7320426);;
+-}
+-
+-static void __lambda_673(void *data, object self_7313692, int argc, object *args) /* object self_7313692, object k_735947_7312762_7312812_7312861_7312909_7312956, object p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957, object new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958 */
+- {
+- object k_735947_7312762_7312812_7312861_7312909_7312956 = args[0]; object p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957 = args[1]; object new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958 = args[2];
+-
+-closureN_type c_7320429;
+-object e_7320454 [4];
+-c_7320429.hdr.mark = gc_color_red;
+- c_7320429.hdr.grayed = 0;
+-c_7320429.tag = closureN_tag;
+- c_7320429.fn = (function_type)__lambda_674;
+-c_7320429.num_args = 1;
+-c_7320429.num_elements = 4;
+-c_7320429.elements = (object *)e_7320454;
+-c_7320429.elements[0] = k_735947_7312762_7312812_7312861_7312909_7312956;
+-c_7320429.elements[1] = new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958;
+-c_7320429.elements[2] = p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957;
+-c_7320429.elements[3] = ((closureN)self_7313692)->elements[0];
+-
+-return_closcall2(data, ((closureN)self_7313692)->elements[0], &c_7320429, quote_quote);;
+-}
+-
+-static void __lambda_674(void *data, object self_7313693, int argc, object *args) /* object self_7313693, object r_735955_7312765_7312815_7312864_7312912_7312959 */
+- {
+- object r_735955_7312765_7312815_7312864_7312912_7312959 = args[0];
+-
+-closureN_type c_7320432;
+-object e_7320453 [4];
+-c_7320432.hdr.mark = gc_color_red;
+- c_7320432.hdr.grayed = 0;
+-c_7320432.tag = closureN_tag;
+- c_7320432.fn = (function_type)__lambda_675;
+-c_7320432.num_args = 1;
+-c_7320432.num_elements = 4;
+-c_7320432.elements = (object *)e_7320453;
+-c_7320432.elements[0] = ((closureN)self_7313693)->elements[0];
+-c_7320432.elements[1] = ((closureN)self_7313693)->elements[1];
+-c_7320432.elements[2] = ((closureN)self_7313693)->elements[2];
+-c_7320432.elements[3] = r_735955_7312765_7312815_7312864_7312912_7312959;
+-
+-return_closcall2(data, ((closureN)self_7313693)->elements[3], &c_7320432, quote__121param_91set_67_125);;
+-}
+-
+-static void __lambda_675(void *data, object self_7313694, int argc, object *args) /* object self_7313694, object r_735958_7312766_7312816_7312865_7312913_7312960 */
+- {
+- object r_735958_7312766_7312816_7312865_7312913_7312960 = args[0];
+-
+-pair_type local_7320437;
+-
+-pair_type local_7320441;
+-
+-pair_type local_7320444;
+-
+-pair_type local_7320448;
+-
+-pair_type local_7320451;
+-return_direct_with_clo1(data, ((closureN)self_7313694)->elements[0], (((closure) ((closureN)self_7313694)->elements[0])->fn), set_pair_as_expr(&local_7320437, ((closureN)self_7313694)->elements[2], set_pair_as_expr(&local_7320441, set_pair_as_expr(&local_7320444, ((closureN)self_7313694)->elements[3], set_pair_as_expr(&local_7320448, r_735958_7312766_7312816_7312865_7312913_7312960, NULL)), set_pair_as_expr(&local_7320451, ((closureN)self_7313694)->elements[1], NULL))));;
+-}
+-
+-static void __lambda_662(void *data, object self_7313695, int argc, object *args) /* object self_7313695, object r_735946_7312749_7312799_7312848_7312896_7312943 */
+- {
+- object r_735946_7312749_7312799_7312848_7312896_7312943 = args[0];
+-
+-closureN_type c_7320300;
+-object e_7320422 [11];
+-c_7320300.hdr.mark = gc_color_red;
+- c_7320300.hdr.grayed = 0;
+-c_7320300.tag = closureN_tag;
+- c_7320300.fn = (function_type)__lambda_663;
+-c_7320300.num_args = 1;
+-c_7320300.num_elements = 11;
+-c_7320300.elements = (object *)e_7320422;
+-c_7320300.elements[0] = ((closureN)self_7313695)->elements[0];
+-c_7320300.elements[1] = ((closureN)self_7313695)->elements[2];
+-c_7320300.elements[2] = ((closureN)self_7313695)->elements[3];
+-c_7320300.elements[3] = ((closureN)self_7313695)->elements[4];
+-c_7320300.elements[4] = ((closureN)self_7313695)->elements[5];
+-c_7320300.elements[5] = ((closureN)self_7313695)->elements[6];
+-c_7320300.elements[6] = ((closureN)self_7313695)->elements[7];
+-c_7320300.elements[7] = ((closureN)self_7313695)->elements[8];
+-c_7320300.elements[8] = ((closureN)self_7313695)->elements[9];
+-c_7320300.elements[9] = ((closureN)self_7313695)->elements[10];
+-c_7320300.elements[10] = ((closureN)self_7313695)->elements[11];
+-
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7320300, r_735946_7312749_7312799_7312848_7312896_7312943, ((closureN)self_7313695)->elements[3], ((closureN)self_7313695)->elements[1]);;
+-}
+-
+-static void __lambda_663(void *data, object self_7313696, int argc, object *args) /* object self_7313696, object r_735944_7312750_7312800_7312849_7312897_7312944 */
+- {
+- object r_735944_7312750_7312800_7312849_7312897_7312944 = args[0];
+-
+-closureN_type c_7320302;
+-object e_7320418 [11];
+-c_7320302.hdr.mark = gc_color_red;
+- c_7320302.hdr.grayed = 0;
+-c_7320302.tag = closureN_tag;
+- c_7320302.fn = (function_type)__lambda_664;
+-c_7320302.num_args = 1;
+-c_7320302.num_elements = 11;
+-c_7320302.elements = (object *)e_7320418;
+-c_7320302.elements[0] = ((closureN)self_7313696)->elements[0];
+-c_7320302.elements[1] = ((closureN)self_7313696)->elements[1];
+-c_7320302.elements[2] = ((closureN)self_7313696)->elements[2];
+-c_7320302.elements[3] = ((closureN)self_7313696)->elements[3];
+-c_7320302.elements[4] = ((closureN)self_7313696)->elements[4];
+-c_7320302.elements[5] = ((closureN)self_7313696)->elements[5];
+-c_7320302.elements[6] = ((closureN)self_7313696)->elements[6];
+-c_7320302.elements[7] = ((closureN)self_7313696)->elements[7];
+-c_7320302.elements[8] = ((closureN)self_7313696)->elements[8];
+-c_7320302.elements[9] = ((closureN)self_7313696)->elements[9];
+-c_7320302.elements[10] = ((closureN)self_7313696)->elements[10];
+-
+-
+-pair_type local_7320421;
+-return_direct_with_clo1(data,(closure)&c_7320302,__lambda_664, set_pair_as_expr(&local_7320421, NULL, r_735944_7312750_7312800_7312849_7312897_7312944));;
+-}
+-
+-static void __lambda_664(void *data, object self_7313697, int argc, object *args) /* object self_7313697, object r_735941_738424_7312751_7312801_7312850_7312898_7312945 */
+- {
+- object r_735941_738424_7312751_7312801_7312850_7312898_7312945 = args[0];
+-
+-closureN_type c_7320305;
+-object e_7320417 [12];
+-c_7320305.hdr.mark = gc_color_red;
+- c_7320305.hdr.grayed = 0;
+-c_7320305.tag = closureN_tag;
+- c_7320305.fn = (function_type)__lambda_665;
+-c_7320305.num_args = 1;
+-c_7320305.num_elements = 12;
+-c_7320305.elements = (object *)e_7320417;
+-c_7320305.elements[0] = ((closureN)self_7313697)->elements[0];
+-c_7320305.elements[1] = ((closureN)self_7313697)->elements[1];
+-c_7320305.elements[2] = ((closureN)self_7313697)->elements[2];
+-c_7320305.elements[3] = ((closureN)self_7313697)->elements[3];
+-c_7320305.elements[4] = ((closureN)self_7313697)->elements[4];
+-c_7320305.elements[5] = ((closureN)self_7313697)->elements[5];
+-c_7320305.elements[6] = ((closureN)self_7313697)->elements[6];
+-c_7320305.elements[7] = ((closureN)self_7313697)->elements[7];
+-c_7320305.elements[8] = ((closureN)self_7313697)->elements[8];
+-c_7320305.elements[9] = r_735941_738424_7312751_7312801_7312850_7312898_7312945;
+-c_7320305.elements[10] = ((closureN)self_7313697)->elements[9];
+-c_7320305.elements[11] = ((closureN)self_7313697)->elements[10];
+-
+-return_closcall2(data, ((closureN)self_7313697)->elements[9], &c_7320305, quote_lambda);;
+-}
+-
+-static void __lambda_665(void *data, object self_7313698, int argc, object *args) /* object self_7313698, object r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946 */
+- {
+- object r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946 = args[0];
+-
+-closureN_type c_7320308;
+-object e_7320416 [13];
+-c_7320308.hdr.mark = gc_color_red;
+- c_7320308.hdr.grayed = 0;
+-c_7320308.tag = closureN_tag;
+- c_7320308.fn = (function_type)__lambda_666;
+-c_7320308.num_args = 1;
+-c_7320308.num_elements = 13;
+-c_7320308.elements = (object *)e_7320416;
+-c_7320308.elements[0] = ((closureN)self_7313698)->elements[0];
+-c_7320308.elements[1] = ((closureN)self_7313698)->elements[1];
+-c_7320308.elements[2] = ((closureN)self_7313698)->elements[2];
+-c_7320308.elements[3] = ((closureN)self_7313698)->elements[3];
+-c_7320308.elements[4] = ((closureN)self_7313698)->elements[4];
+-c_7320308.elements[5] = ((closureN)self_7313698)->elements[5];
+-c_7320308.elements[6] = ((closureN)self_7313698)->elements[6];
+-c_7320308.elements[7] = ((closureN)self_7313698)->elements[7];
+-c_7320308.elements[8] = r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946;
+-c_7320308.elements[9] = ((closureN)self_7313698)->elements[8];
+-c_7320308.elements[10] = ((closureN)self_7313698)->elements[9];
+-c_7320308.elements[11] = ((closureN)self_7313698)->elements[10];
+-c_7320308.elements[12] = ((closureN)self_7313698)->elements[11];
+-
+-return_closcall2(data, ((closureN)self_7313698)->elements[10], &c_7320308, quote_lambda);;
+-}
+-
+-static void __lambda_666(void *data, object self_7313699, int argc, object *args) /* object self_7313699, object r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947 */
+- {
+- object r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947 = args[0];
+-
+-closureN_type c_7320310;
+-object e_7320385 [13];
+-c_7320310.hdr.mark = gc_color_red;
+- c_7320310.hdr.grayed = 0;
+-c_7320310.tag = closureN_tag;
+- c_7320310.fn = (function_type)__lambda_667;
+-c_7320310.num_args = 1;
+-c_7320310.num_elements = 13;
+-c_7320310.elements = (object *)e_7320385;
+-c_7320310.elements[0] = ((closureN)self_7313699)->elements[0];
+-c_7320310.elements[1] = ((closureN)self_7313699)->elements[1];
+-c_7320310.elements[2] = ((closureN)self_7313699)->elements[2];
+-c_7320310.elements[3] = ((closureN)self_7313699)->elements[3];
+-c_7320310.elements[4] = ((closureN)self_7313699)->elements[4];
+-c_7320310.elements[5] = ((closureN)self_7313699)->elements[5];
+-c_7320310.elements[6] = ((closureN)self_7313699)->elements[6];
+-c_7320310.elements[7] = ((closureN)self_7313699)->elements[7];
+-c_7320310.elements[8] = r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947;
+-c_7320310.elements[9] = ((closureN)self_7313699)->elements[8];
+-c_7320310.elements[10] = ((closureN)self_7313699)->elements[9];
+-c_7320310.elements[11] = ((closureN)self_7313699)->elements[10];
+-c_7320310.elements[12] = ((closureN)self_7313699)->elements[12];
+-
+-
+-closureN_type c_7320386;
+-object e_7320415 [1];
+-c_7320386.hdr.mark = gc_color_red;
+- c_7320386.hdr.grayed = 0;
+-c_7320386.tag = closureN_tag;
+- c_7320386.fn = (function_type)__lambda_670;
+-c_7320386.num_args = 2;
+-c_7320386.num_elements = 1;
+-c_7320386.elements = (object *)e_7320415;
+-c_7320386.elements[0] = ((closureN)self_7313699)->elements[11];
+-
+-return_direct_with_clo1(data,(closure)&c_7320310,__lambda_667, &c_7320386);;
+-}
+-
+-static void __lambda_670(void *data, object self_7313700, int argc, object *args) /* object self_7313700, object k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951, object p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952, object old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953 */
+- {
+- object k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951 = args[0]; object p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952 = args[1]; object old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953 = args[2];
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312422)->elements[2]))))) ){
+
+-closureN_type c_7320389;
+-object e_7320414 [4];
+-c_7320389.hdr.mark = gc_color_red;
+- c_7320389.hdr.grayed = 0;
+-c_7320389.tag = closureN_tag;
+- c_7320389.fn = (function_type)__lambda_671;
+-c_7320389.num_args = 1;
+-c_7320389.num_elements = 4;
+-c_7320389.elements = (object *)e_7320414;
+-c_7320389.elements[0] = k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951;
+-c_7320389.elements[1] = old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953;
+-c_7320389.elements[2] = p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952;
+-c_7320389.elements[3] = ((closureN)self_7313700)->elements[0];
++closureN_type c_7318973;
++object e_7319233 [8];
++c_7318973.hdr.mark = gc_color_red;
++ c_7318973.hdr.grayed = 0;
++c_7318973.tag = closureN_tag;
++ c_7318973.fn = (function_type)__lambda_651;
++c_7318973.num_args = 1;
++c_7318973.num_elements = 8;
++c_7318973.elements = (object *)e_7319233;
++c_7318973.elements[0] = ((closureN)self_7312422)->elements[0];
++c_7318973.elements[1] = new_73962_731080_733080_7311484_7311534_7311583_7311631_7311678;
++c_7318973.elements[2] = old_73961_731079_733079_7311483_7311533_7311582_7311630_7311677;
++c_7318973.elements[3] = p_73960_731078_733078_7311482_7311532_7311581_7311629_7311676;
++c_7318973.elements[4] = param_73958_731076_733076_7311480_7311530_7311579_7311627_7311674;
++c_7318973.elements[5] = ((closureN)self_7312422)->elements[1];
++c_7318973.elements[6] = ((closureN)self_7312422)->elements[2];
++c_7318973.elements[7] = value_73959_731077_733077_7311481_7311531_7311580_7311628_7311675;
++
++return_closcall2(data, ((closureN)self_7312422)->elements[1], &c_7318973, quote_let);
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312422)->elements[0], (((closure) ((closureN)self_7312422)->elements[0])->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312422)->elements[0], (((closure) ((closureN)self_7312422)->elements[0])->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312422)->elements[0], (((closure) ((closureN)self_7312422)->elements[0])->fn), boolean_f);}
++;
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312422)->elements[0], (((closure) ((closureN)self_7312422)->elements[0])->fn), boolean_f);}
++;;
++}
++
++static void __lambda_651(void *data, object self_7312423, int argc, object *args) /* object self_7312423, object r_735428_7311485_7311535_7311584_7311632_7311679 */
++ {
++ object r_735428_7311485_7311535_7311584_7311632_7311679 = args[0];
++
++closureN_type c_7318975;
++object e_7319224 [9];
++c_7318975.hdr.mark = gc_color_red;
++ c_7318975.hdr.grayed = 0;
++c_7318975.tag = closureN_tag;
++ c_7318975.fn = (function_type)__lambda_652;
++c_7318975.num_args = 1;
++c_7318975.num_elements = 9;
++c_7318975.elements = (object *)e_7319224;
++c_7318975.elements[0] = ((closureN)self_7312423)->elements[0];
++c_7318975.elements[1] = ((closureN)self_7312423)->elements[1];
++c_7318975.elements[2] = ((closureN)self_7312423)->elements[2];
++c_7318975.elements[3] = ((closureN)self_7312423)->elements[3];
++c_7318975.elements[4] = ((closureN)self_7312423)->elements[4];
++c_7318975.elements[5] = r_735428_7311485_7311535_7311584_7311632_7311679;
++c_7318975.elements[6] = ((closureN)self_7312423)->elements[5];
++c_7318975.elements[7] = ((closureN)self_7312423)->elements[6];
++c_7318975.elements[8] = ((closureN)self_7312423)->elements[7];
++
++
++mmacro(c_7319225, (function_type)__lambda_680);c_7319225.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7318975,__lambda_652, &c_7319225);;
++}
++
++static void __lambda_680(void *data, object self_7312424, int argc, object *args) /* object self_7312424, object k_735551_7311523_7311573_7311622_7311670_7311717, object p_73973_731087_733087_7311524_7311574_7311623_7311671_7311718, object param_73974_731088_733088_7311525_7311575_7311624_7311672_7311719 */
++ {
++ object k_735551_7311523_7311573_7311622_7311670_7311717 = args[0]; object p_73973_731087_733087_7311524_7311574_7311623_7311671_7311718 = args[1]; object param_73974_731088_733088_7311525_7311575_7311624_7311672_7311719 = args[2];
++
++pair_type local_7319229;
++
++pair_type local_7319232;
++return_direct_with_clo1(data, k_735551_7311523_7311573_7311622_7311670_7311717, (((closure) k_735551_7311523_7311573_7311622_7311670_7311717)->fn), set_pair_as_expr(&local_7319229, p_73973_731087_733087_7311524_7311574_7311623_7311671_7311718, set_pair_as_expr(&local_7319232, param_73974_731088_733088_7311525_7311575_7311624_7311672_7311719, NULL)));;
++}
++
++static void __lambda_652(void *data, object self_7312425, int argc, object *args) /* object self_7312425, object r_735550_7311486_7311536_7311585_7311633_7311680 */
++ {
++ object r_735550_7311486_7311536_7311585_7311633_7311680 = args[0];
++
++closureN_type c_7318977;
++object e_7319221 [8];
++c_7318977.hdr.mark = gc_color_red;
++ c_7318977.hdr.grayed = 0;
++c_7318977.tag = closureN_tag;
++ c_7318977.fn = (function_type)__lambda_653;
++c_7318977.num_args = 1;
++c_7318977.num_elements = 8;
++c_7318977.elements = (object *)e_7319221;
++c_7318977.elements[0] = ((closureN)self_7312425)->elements[0];
++c_7318977.elements[1] = ((closureN)self_7312425)->elements[1];
++c_7318977.elements[2] = ((closureN)self_7312425)->elements[2];
++c_7318977.elements[3] = ((closureN)self_7312425)->elements[3];
++c_7318977.elements[4] = ((closureN)self_7312425)->elements[5];
++c_7318977.elements[5] = ((closureN)self_7312425)->elements[6];
++c_7318977.elements[6] = ((closureN)self_7312425)->elements[7];
++c_7318977.elements[7] = ((closureN)self_7312425)->elements[8];
++
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7318977, r_735550_7311486_7311536_7311585_7311633_7311680, ((closureN)self_7312425)->elements[3], ((closureN)self_7312425)->elements[4]);;
++}
++
++static void __lambda_653(void *data, object self_7312426, int argc, object *args) /* object self_7312426, object r_735431_7311487_7311537_7311586_7311634_7311681 */
++ {
++ object r_735431_7311487_7311537_7311586_7311634_7311681 = args[0];
++
++closureN_type c_7318980;
++object e_7319220 [9];
++c_7318980.hdr.mark = gc_color_red;
++ c_7318980.hdr.grayed = 0;
++c_7318980.tag = closureN_tag;
++ c_7318980.fn = (function_type)__lambda_654;
++c_7318980.num_args = 1;
++c_7318980.num_elements = 9;
++c_7318980.elements = (object *)e_7319220;
++c_7318980.elements[0] = ((closureN)self_7312426)->elements[0];
++c_7318980.elements[1] = ((closureN)self_7312426)->elements[1];
++c_7318980.elements[2] = ((closureN)self_7312426)->elements[2];
++c_7318980.elements[3] = ((closureN)self_7312426)->elements[3];
++c_7318980.elements[4] = ((closureN)self_7312426)->elements[4];
++c_7318980.elements[5] = r_735431_7311487_7311537_7311586_7311634_7311681;
++c_7318980.elements[6] = ((closureN)self_7312426)->elements[5];
++c_7318980.elements[7] = ((closureN)self_7312426)->elements[6];
++c_7318980.elements[8] = ((closureN)self_7312426)->elements[7];
++
++return_closcall2(data, ((closureN)self_7312426)->elements[5], &c_7318980, quote_let);;
++}
++
++static void __lambda_654(void *data, object self_7312427, int argc, object *args) /* object self_7312427, object r_735437_7311488_7311538_7311587_7311635_7311682 */
++ {
++ object r_735437_7311488_7311538_7311587_7311635_7311682 = args[0];
++
++closureN_type c_7318982;
++object e_7319208 [10];
++c_7318982.hdr.mark = gc_color_red;
++ c_7318982.hdr.grayed = 0;
++c_7318982.tag = closureN_tag;
++ c_7318982.fn = (function_type)__lambda_655;
++c_7318982.num_args = 1;
++c_7318982.num_elements = 10;
++c_7318982.elements = (object *)e_7319208;
++c_7318982.elements[0] = ((closureN)self_7312427)->elements[0];
++c_7318982.elements[1] = ((closureN)self_7312427)->elements[1];
++c_7318982.elements[2] = ((closureN)self_7312427)->elements[2];
++c_7318982.elements[3] = ((closureN)self_7312427)->elements[3];
++c_7318982.elements[4] = ((closureN)self_7312427)->elements[4];
++c_7318982.elements[5] = ((closureN)self_7312427)->elements[5];
++c_7318982.elements[6] = r_735437_7311488_7311538_7311587_7311635_7311682;
++c_7318982.elements[7] = ((closureN)self_7312427)->elements[6];
++c_7318982.elements[8] = ((closureN)self_7312427)->elements[7];
++c_7318982.elements[9] = ((closureN)self_7312427)->elements[8];
++
++
++mmacro(c_7319209, (function_type)__lambda_679);c_7319209.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7318982,__lambda_655, &c_7319209);;
++}
++
++static void __lambda_679(void *data, object self_7312428, int argc, object *args) /* object self_7312428, object k_735541_7311520_7311570_7311619_7311667_7311714, object old_73975_731089_733089_7311521_7311571_7311620_7311668_7311715, object p_73976_731090_733090_7311522_7311572_7311621_7311669_7311716 */
++ {
++ object k_735541_7311520_7311570_7311619_7311667_7311714 = args[0]; object old_73975_731089_733089_7311521_7311571_7311620_7311668_7311715 = args[1]; object p_73976_731090_733090_7311522_7311572_7311621_7311669_7311716 = args[2];
++
++pair_type local_7319213;
++
++pair_type local_7319216;
++
++pair_type local_7319219;
++return_direct_with_clo1(data, k_735541_7311520_7311570_7311619_7311667_7311714, (((closure) k_735541_7311520_7311570_7311619_7311667_7311714)->fn), set_pair_as_expr(&local_7319213, old_73975_731089_733089_7311521_7311571_7311620_7311668_7311715, set_pair_as_expr(&local_7319216, set_pair_as_expr(&local_7319219, p_73976_731090_733090_7311522_7311572_7311621_7311669_7311716, NULL), NULL)));;
++}
++
++static void __lambda_655(void *data, object self_7312429, int argc, object *args) /* object self_7312429, object r_735540_7311489_7311539_7311588_7311636_7311683 */
++ {
++ object r_735540_7311489_7311539_7311588_7311636_7311683 = args[0];
++
++closureN_type c_7318984;
++object e_7319205 [10];
++c_7318984.hdr.mark = gc_color_red;
++ c_7318984.hdr.grayed = 0;
++c_7318984.tag = closureN_tag;
++ c_7318984.fn = (function_type)__lambda_656;
++c_7318984.num_args = 1;
++c_7318984.num_elements = 10;
++c_7318984.elements = (object *)e_7319205;
++c_7318984.elements[0] = ((closureN)self_7312429)->elements[0];
++c_7318984.elements[1] = ((closureN)self_7312429)->elements[1];
++c_7318984.elements[2] = ((closureN)self_7312429)->elements[2];
++c_7318984.elements[3] = ((closureN)self_7312429)->elements[3];
++c_7318984.elements[4] = ((closureN)self_7312429)->elements[4];
++c_7318984.elements[5] = ((closureN)self_7312429)->elements[5];
++c_7318984.elements[6] = ((closureN)self_7312429)->elements[6];
++c_7318984.elements[7] = ((closureN)self_7312429)->elements[7];
++c_7318984.elements[8] = ((closureN)self_7312429)->elements[8];
++c_7318984.elements[9] = ((closureN)self_7312429)->elements[9];
++
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7318984, r_735540_7311489_7311539_7311588_7311636_7311683, ((closureN)self_7312429)->elements[2], ((closureN)self_7312429)->elements[3]);;
++}
++
++static void __lambda_656(void *data, object self_7312430, int argc, object *args) /* object self_7312430, object r_735513_7311490_7311540_7311589_7311637_7311684 */
++ {
++ object r_735513_7311490_7311540_7311589_7311637_7311684 = args[0];
++
++closureN_type c_7318986;
++object e_7319164 [11];
++c_7318986.hdr.mark = gc_color_red;
++ c_7318986.hdr.grayed = 0;
++c_7318986.tag = closureN_tag;
++ c_7318986.fn = (function_type)__lambda_657;
++c_7318986.num_args = 1;
++c_7318986.num_elements = 11;
++c_7318986.elements = (object *)e_7319164;
++c_7318986.elements[0] = ((closureN)self_7312430)->elements[0];
++c_7318986.elements[1] = ((closureN)self_7312430)->elements[1];
++c_7318986.elements[2] = ((closureN)self_7312430)->elements[2];
++c_7318986.elements[3] = ((closureN)self_7312430)->elements[3];
++c_7318986.elements[4] = ((closureN)self_7312430)->elements[4];
++c_7318986.elements[5] = ((closureN)self_7312430)->elements[5];
++c_7318986.elements[6] = ((closureN)self_7312430)->elements[6];
++c_7318986.elements[7] = r_735513_7311490_7311540_7311589_7311637_7311684;
++c_7318986.elements[8] = ((closureN)self_7312430)->elements[7];
++c_7318986.elements[9] = ((closureN)self_7312430)->elements[8];
++c_7318986.elements[10] = ((closureN)self_7312430)->elements[9];
++
++
++closureN_type c_7319165;
++object e_7319204 [1];
++c_7319165.hdr.mark = gc_color_red;
++ c_7319165.hdr.grayed = 0;
++c_7319165.tag = closureN_tag;
++ c_7319165.fn = (function_type)__lambda_676;
++c_7319165.num_args = 3;
++c_7319165.num_elements = 1;
++c_7319165.elements = (object *)e_7319204;
++c_7319165.elements[0] = ((closureN)self_7312430)->elements[7];
++
++return_direct_with_clo1(data,(closure)&c_7318986,__lambda_657, &c_7319165);;
++}
++
++static void __lambda_676(void *data, object self_7312431, int argc, object *args) /* object self_7312431, object k_735516_7311514_7311564_7311613_7311661_7311708, object new_73977_731091_733091_7311515_7311565_7311614_7311662_7311709, object p_73978_731092_733092_7311516_7311566_7311615_7311663_7311710, object value_73979_731093_733093_7311517_7311567_7311616_7311664_7311711 */
++ {
++ object k_735516_7311514_7311564_7311613_7311661_7311708 = args[0]; object new_73977_731091_733091_7311515_7311565_7311614_7311662_7311709 = args[1]; object p_73978_731092_733092_7311516_7311566_7311615_7311663_7311710 = args[2]; object value_73979_731093_733093_7311517_7311567_7311616_7311664_7311711 = args[3];
++
++closureN_type c_7319168;
++object e_7319203 [5];
++c_7319168.hdr.mark = gc_color_red;
++ c_7319168.hdr.grayed = 0;
++c_7319168.tag = closureN_tag;
++ c_7319168.fn = (function_type)__lambda_677;
++c_7319168.num_args = 1;
++c_7319168.num_elements = 5;
++c_7319168.elements = (object *)e_7319203;
++c_7319168.elements[0] = k_735516_7311514_7311564_7311613_7311661_7311708;
++c_7319168.elements[1] = new_73977_731091_733091_7311515_7311565_7311614_7311662_7311709;
++c_7319168.elements[2] = p_73978_731092_733092_7311516_7311566_7311615_7311663_7311710;
++c_7319168.elements[3] = ((closureN)self_7312431)->elements[0];
++c_7319168.elements[4] = value_73979_731093_733093_7311517_7311567_7311616_7311664_7311711;
++
++return_closcall2(data, ((closureN)self_7312431)->elements[0], &c_7319168, quote_quote);;
++}
++
++static void __lambda_677(void *data, object self_7312432, int argc, object *args) /* object self_7312432, object r_735532_7311518_7311568_7311617_7311665_7311712 */
++ {
++ object r_735532_7311518_7311568_7311617_7311665_7311712 = args[0];
++
++closureN_type c_7319171;
++object e_7319202 [5];
++c_7319171.hdr.mark = gc_color_red;
++ c_7319171.hdr.grayed = 0;
++c_7319171.tag = closureN_tag;
++ c_7319171.fn = (function_type)__lambda_678;
++c_7319171.num_args = 1;
++c_7319171.num_elements = 5;
++c_7319171.elements = (object *)e_7319202;
++c_7319171.elements[0] = ((closureN)self_7312432)->elements[0];
++c_7319171.elements[1] = ((closureN)self_7312432)->elements[1];
++c_7319171.elements[2] = ((closureN)self_7312432)->elements[2];
++c_7319171.elements[3] = r_735532_7311518_7311568_7311617_7311665_7311712;
++c_7319171.elements[4] = ((closureN)self_7312432)->elements[4];
++
++return_closcall2(data, ((closureN)self_7312432)->elements[3], &c_7319171, quote__121param_91convert_125);;
++}
++
++static void __lambda_678(void *data, object self_7312433, int argc, object *args) /* object self_7312433, object r_735535_7311519_7311569_7311618_7311666_7311713 */
++ {
++ object r_735535_7311519_7311569_7311618_7311666_7311713 = args[0];
++
++pair_type local_7319176;
++
++pair_type local_7319180;
++
++pair_type local_7319183;
++
++pair_type local_7319186;
++
++pair_type local_7319190;
++
++pair_type local_7319193;
++
++pair_type local_7319197;
++
++pair_type local_7319200;
++return_direct_with_clo1(data, ((closureN)self_7312433)->elements[0], (((closure) ((closureN)self_7312433)->elements[0])->fn), set_pair_as_expr(&local_7319176, ((closureN)self_7312433)->elements[1], set_pair_as_expr(&local_7319180, set_pair_as_expr(&local_7319183, set_pair_as_expr(&local_7319186, ((closureN)self_7312433)->elements[2], set_pair_as_expr(&local_7319190, set_pair_as_expr(&local_7319193, ((closureN)self_7312433)->elements[3], set_pair_as_expr(&local_7319197, r_735535_7311519_7311569_7311618_7311666_7311713, NULL)), NULL)), set_pair_as_expr(&local_7319200, ((closureN)self_7312433)->elements[4], NULL)), NULL)));;
++}
++
++static void __lambda_657(void *data, object self_7312434, int argc, object *args) /* object self_7312434, object r_735515_7311491_7311541_7311590_7311638_7311685 */
++ {
++ object r_735515_7311491_7311541_7311590_7311638_7311685 = args[0];
++
++closureN_type c_7318988;
++object e_7319160 [10];
++c_7318988.hdr.mark = gc_color_red;
++ c_7318988.hdr.grayed = 0;
++c_7318988.tag = closureN_tag;
++ c_7318988.fn = (function_type)__lambda_658;
++c_7318988.num_args = 1;
++c_7318988.num_elements = 10;
++c_7318988.elements = (object *)e_7319160;
++c_7318988.elements[0] = ((closureN)self_7312434)->elements[0];
++c_7318988.elements[1] = ((closureN)self_7312434)->elements[1];
++c_7318988.elements[2] = ((closureN)self_7312434)->elements[2];
++c_7318988.elements[3] = ((closureN)self_7312434)->elements[3];
++c_7318988.elements[4] = ((closureN)self_7312434)->elements[4];
++c_7318988.elements[5] = ((closureN)self_7312434)->elements[5];
++c_7318988.elements[6] = ((closureN)self_7312434)->elements[6];
++c_7318988.elements[7] = ((closureN)self_7312434)->elements[7];
++c_7318988.elements[8] = ((closureN)self_7312434)->elements[8];
++c_7318988.elements[9] = ((closureN)self_7312434)->elements[9];
++
++return_direct_with_clo5(data, __glo_map_scheme_base, (((closure) __glo_map_scheme_base)->fn), &c_7318988, r_735515_7311491_7311541_7311590_7311638_7311685, ((closureN)self_7312434)->elements[1], ((closureN)self_7312434)->elements[3], ((closureN)self_7312434)->elements[10]);;
++}
++
++static void __lambda_658(void *data, object self_7312435, int argc, object *args) /* object self_7312435, object r_735514_7311492_7311542_7311591_7311639_7311686 */
++ {
++ object r_735514_7311492_7311542_7311591_7311639_7311686 = args[0];
++
++closureN_type c_7318990;
++object e_7319158 [9];
++c_7318990.hdr.mark = gc_color_red;
++ c_7318990.hdr.grayed = 0;
++c_7318990.tag = closureN_tag;
++ c_7318990.fn = (function_type)__lambda_659;
++c_7318990.num_args = 1;
++c_7318990.num_elements = 9;
++c_7318990.elements = (object *)e_7319158;
++c_7318990.elements[0] = ((closureN)self_7312435)->elements[0];
++c_7318990.elements[1] = ((closureN)self_7312435)->elements[1];
++c_7318990.elements[2] = ((closureN)self_7312435)->elements[2];
++c_7318990.elements[3] = ((closureN)self_7312435)->elements[3];
++c_7318990.elements[4] = ((closureN)self_7312435)->elements[4];
++c_7318990.elements[5] = ((closureN)self_7312435)->elements[5];
++c_7318990.elements[6] = ((closureN)self_7312435)->elements[6];
++c_7318990.elements[7] = ((closureN)self_7312435)->elements[8];
++c_7318990.elements[8] = ((closureN)self_7312435)->elements[9];
++
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7318990, ((closureN)self_7312435)->elements[7], r_735514_7311492_7311542_7311591_7311639_7311686);;
++}
++
++static void __lambda_659(void *data, object self_7312436, int argc, object *args) /* object self_7312436, object r_735440_7311493_7311543_7311592_7311640_7311687 */
++ {
++ object r_735440_7311493_7311543_7311592_7311640_7311687 = args[0];
++
++closureN_type c_7318993;
++object e_7319157 [10];
++c_7318993.hdr.mark = gc_color_red;
++ c_7318993.hdr.grayed = 0;
++c_7318993.tag = closureN_tag;
++ c_7318993.fn = (function_type)__lambda_660;
++c_7318993.num_args = 1;
++c_7318993.num_elements = 10;
++c_7318993.elements = (object *)e_7319157;
++c_7318993.elements[0] = ((closureN)self_7312436)->elements[0];
++c_7318993.elements[1] = ((closureN)self_7312436)->elements[1];
++c_7318993.elements[2] = ((closureN)self_7312436)->elements[2];
++c_7318993.elements[3] = ((closureN)self_7312436)->elements[3];
++c_7318993.elements[4] = ((closureN)self_7312436)->elements[4];
++c_7318993.elements[5] = ((closureN)self_7312436)->elements[5];
++c_7318993.elements[6] = ((closureN)self_7312436)->elements[6];
++c_7318993.elements[7] = r_735440_7311493_7311543_7311592_7311640_7311687;
++c_7318993.elements[8] = ((closureN)self_7312436)->elements[7];
++c_7318993.elements[9] = ((closureN)self_7312436)->elements[8];
++
++return_closcall2(data, ((closureN)self_7312436)->elements[7], &c_7318993, quote_dynamic_91wind);;
++}
++
++static void __lambda_660(void *data, object self_7312437, int argc, object *args) /* object self_7312437, object r_735446_7311494_7311544_7311593_7311641_7311688 */
++ {
++ object r_735446_7311494_7311544_7311593_7311641_7311688 = args[0];
++
++closureN_type c_7318996;
++object e_7319156 [11];
++c_7318996.hdr.mark = gc_color_red;
++ c_7318996.hdr.grayed = 0;
++c_7318996.tag = closureN_tag;
++ c_7318996.fn = (function_type)__lambda_661;
++c_7318996.num_args = 1;
++c_7318996.num_elements = 11;
++c_7318996.elements = (object *)e_7319156;
++c_7318996.elements[0] = ((closureN)self_7312437)->elements[0];
++c_7318996.elements[1] = ((closureN)self_7312437)->elements[1];
++c_7318996.elements[2] = ((closureN)self_7312437)->elements[2];
++c_7318996.elements[3] = ((closureN)self_7312437)->elements[3];
++c_7318996.elements[4] = ((closureN)self_7312437)->elements[4];
++c_7318996.elements[5] = ((closureN)self_7312437)->elements[5];
++c_7318996.elements[6] = ((closureN)self_7312437)->elements[6];
++c_7318996.elements[7] = ((closureN)self_7312437)->elements[7];
++c_7318996.elements[8] = r_735446_7311494_7311544_7311593_7311641_7311688;
++c_7318996.elements[9] = ((closureN)self_7312437)->elements[8];
++c_7318996.elements[10] = ((closureN)self_7312437)->elements[9];
++
++return_closcall2(data, ((closureN)self_7312437)->elements[8], &c_7318996, quote_lambda);;
++}
++
++static void __lambda_661(void *data, object self_7312438, int argc, object *args) /* object self_7312438, object r_735488_7311495_7311545_7311594_7311642_7311689 */
++ {
++ object r_735488_7311495_7311545_7311594_7311642_7311689 = args[0];
++
++closureN_type c_7318998;
++object e_7319125 [12];
++c_7318998.hdr.mark = gc_color_red;
++ c_7318998.hdr.grayed = 0;
++c_7318998.tag = closureN_tag;
++ c_7318998.fn = (function_type)__lambda_662;
++c_7318998.num_args = 1;
++c_7318998.num_elements = 12;
++c_7318998.elements = (object *)e_7319125;
++c_7318998.elements[0] = ((closureN)self_7312438)->elements[0];
++c_7318998.elements[1] = ((closureN)self_7312438)->elements[1];
++c_7318998.elements[2] = ((closureN)self_7312438)->elements[2];
++c_7318998.elements[3] = ((closureN)self_7312438)->elements[3];
++c_7318998.elements[4] = ((closureN)self_7312438)->elements[4];
++c_7318998.elements[5] = ((closureN)self_7312438)->elements[5];
++c_7318998.elements[6] = ((closureN)self_7312438)->elements[6];
++c_7318998.elements[7] = ((closureN)self_7312438)->elements[7];
++c_7318998.elements[8] = ((closureN)self_7312438)->elements[8];
++c_7318998.elements[9] = r_735488_7311495_7311545_7311594_7311642_7311689;
++c_7318998.elements[10] = ((closureN)self_7312438)->elements[9];
++c_7318998.elements[11] = ((closureN)self_7312438)->elements[10];
+
+-return_closcall2(data, ((closureN)self_7313700)->elements[0], &c_7320389, quote_quote);;
+-}
+
+-static void __lambda_671(void *data, object self_7313701, int argc, object *args) /* object self_7313701, object r_735925_738447_738475_738501_738526_7312760_7312810_7312859_7312907_7312954 */
+- {
+- object r_735925_738447_738475_738501_738526_7312760_7312810_7312859_7312907_7312954 = args[0];
+-
+-closureN_type c_7320392;
+-object e_7320413 [4];
+-c_7320392.hdr.mark = gc_color_red;
+- c_7320392.hdr.grayed = 0;
+-c_7320392.tag = closureN_tag;
+- c_7320392.fn = (function_type)__lambda_672;
+-c_7320392.num_args = 1;
+-c_7320392.num_elements = 4;
+-c_7320392.elements = (object *)e_7320413;
+-c_7320392.elements[0] = ((closureN)self_7313701)->elements[0];
+-c_7320392.elements[1] = ((closureN)self_7313701)->elements[1];
+-c_7320392.elements[2] = ((closureN)self_7313701)->elements[2];
+-c_7320392.elements[3] = r_735925_738447_738475_738501_738526_7312760_7312810_7312859_7312907_7312954;
++closureN_type c_7319126;
++object e_7319155 [1];
++c_7319126.hdr.mark = gc_color_red;
++ c_7319126.hdr.grayed = 0;
++c_7319126.tag = closureN_tag;
++ c_7319126.fn = (function_type)__lambda_673;
++c_7319126.num_args = 2;
++c_7319126.num_elements = 1;
++c_7319126.elements = (object *)e_7319155;
++c_7319126.elements[0] = ((closureN)self_7312438)->elements[9];
++
++return_direct_with_clo1(data,(closure)&c_7318998,__lambda_662, &c_7319126);;
++}
++
++static void __lambda_673(void *data, object self_7312439, int argc, object *args) /* object self_7312439, object k_735495_7311509_7311559_7311608_7311656_7311703, object p_73980_731094_733094_7311510_7311560_7311609_7311657_7311704, object new_73981_731095_733095_7311511_7311561_7311610_7311658_7311705 */
++ {
++ object k_735495_7311509_7311559_7311608_7311656_7311703 = args[0]; object p_73980_731094_733094_7311510_7311560_7311609_7311657_7311704 = args[1]; object new_73981_731095_733095_7311511_7311561_7311610_7311658_7311705 = args[2];
++
++closureN_type c_7319129;
++object e_7319154 [4];
++c_7319129.hdr.mark = gc_color_red;
++ c_7319129.hdr.grayed = 0;
++c_7319129.tag = closureN_tag;
++ c_7319129.fn = (function_type)__lambda_674;
++c_7319129.num_args = 1;
++c_7319129.num_elements = 4;
++c_7319129.elements = (object *)e_7319154;
++c_7319129.elements[0] = k_735495_7311509_7311559_7311608_7311656_7311703;
++c_7319129.elements[1] = new_73981_731095_733095_7311511_7311561_7311610_7311658_7311705;
++c_7319129.elements[2] = p_73980_731094_733094_7311510_7311560_7311609_7311657_7311704;
++c_7319129.elements[3] = ((closureN)self_7312439)->elements[0];
++
++return_closcall2(data, ((closureN)self_7312439)->elements[0], &c_7319129, quote_quote);;
++}
++
++static void __lambda_674(void *data, object self_7312440, int argc, object *args) /* object self_7312440, object r_735503_7311512_7311562_7311611_7311659_7311706 */
++ {
++ object r_735503_7311512_7311562_7311611_7311659_7311706 = args[0];
++
++closureN_type c_7319132;
++object e_7319153 [4];
++c_7319132.hdr.mark = gc_color_red;
++ c_7319132.hdr.grayed = 0;
++c_7319132.tag = closureN_tag;
++ c_7319132.fn = (function_type)__lambda_675;
++c_7319132.num_args = 1;
++c_7319132.num_elements = 4;
++c_7319132.elements = (object *)e_7319153;
++c_7319132.elements[0] = ((closureN)self_7312440)->elements[0];
++c_7319132.elements[1] = ((closureN)self_7312440)->elements[1];
++c_7319132.elements[2] = ((closureN)self_7312440)->elements[2];
++c_7319132.elements[3] = r_735503_7311512_7311562_7311611_7311659_7311706;
++
++return_closcall2(data, ((closureN)self_7312440)->elements[3], &c_7319132, quote__121param_91set_67_125);;
++}
++
++static void __lambda_675(void *data, object self_7312441, int argc, object *args) /* object self_7312441, object r_735506_7311513_7311563_7311612_7311660_7311707 */
++ {
++ object r_735506_7311513_7311563_7311612_7311660_7311707 = args[0];
++
++pair_type local_7319137;
++
++pair_type local_7319141;
++
++pair_type local_7319144;
++
++pair_type local_7319148;
++
++pair_type local_7319151;
++return_direct_with_clo1(data, ((closureN)self_7312441)->elements[0], (((closure) ((closureN)self_7312441)->elements[0])->fn), set_pair_as_expr(&local_7319137, ((closureN)self_7312441)->elements[2], set_pair_as_expr(&local_7319141, set_pair_as_expr(&local_7319144, ((closureN)self_7312441)->elements[3], set_pair_as_expr(&local_7319148, r_735506_7311513_7311563_7311612_7311660_7311707, NULL)), set_pair_as_expr(&local_7319151, ((closureN)self_7312441)->elements[1], NULL))));;
++}
++
++static void __lambda_662(void *data, object self_7312442, int argc, object *args) /* object self_7312442, object r_735494_7311496_7311546_7311595_7311643_7311690 */
++ {
++ object r_735494_7311496_7311546_7311595_7311643_7311690 = args[0];
++
++closureN_type c_7319000;
++object e_7319122 [11];
++c_7319000.hdr.mark = gc_color_red;
++ c_7319000.hdr.grayed = 0;
++c_7319000.tag = closureN_tag;
++ c_7319000.fn = (function_type)__lambda_663;
++c_7319000.num_args = 1;
++c_7319000.num_elements = 11;
++c_7319000.elements = (object *)e_7319122;
++c_7319000.elements[0] = ((closureN)self_7312442)->elements[0];
++c_7319000.elements[1] = ((closureN)self_7312442)->elements[2];
++c_7319000.elements[2] = ((closureN)self_7312442)->elements[3];
++c_7319000.elements[3] = ((closureN)self_7312442)->elements[4];
++c_7319000.elements[4] = ((closureN)self_7312442)->elements[5];
++c_7319000.elements[5] = ((closureN)self_7312442)->elements[6];
++c_7319000.elements[6] = ((closureN)self_7312442)->elements[7];
++c_7319000.elements[7] = ((closureN)self_7312442)->elements[8];
++c_7319000.elements[8] = ((closureN)self_7312442)->elements[9];
++c_7319000.elements[9] = ((closureN)self_7312442)->elements[10];
++c_7319000.elements[10] = ((closureN)self_7312442)->elements[11];
++
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7319000, r_735494_7311496_7311546_7311595_7311643_7311690, ((closureN)self_7312442)->elements[3], ((closureN)self_7312442)->elements[1]);;
++}
++
++static void __lambda_663(void *data, object self_7312443, int argc, object *args) /* object self_7312443, object r_735492_7311497_7311547_7311596_7311644_7311691 */
++ {
++ object r_735492_7311497_7311547_7311596_7311644_7311691 = args[0];
++
++closureN_type c_7319002;
++object e_7319118 [11];
++c_7319002.hdr.mark = gc_color_red;
++ c_7319002.hdr.grayed = 0;
++c_7319002.tag = closureN_tag;
++ c_7319002.fn = (function_type)__lambda_664;
++c_7319002.num_args = 1;
++c_7319002.num_elements = 11;
++c_7319002.elements = (object *)e_7319118;
++c_7319002.elements[0] = ((closureN)self_7312443)->elements[0];
++c_7319002.elements[1] = ((closureN)self_7312443)->elements[1];
++c_7319002.elements[2] = ((closureN)self_7312443)->elements[2];
++c_7319002.elements[3] = ((closureN)self_7312443)->elements[3];
++c_7319002.elements[4] = ((closureN)self_7312443)->elements[4];
++c_7319002.elements[5] = ((closureN)self_7312443)->elements[5];
++c_7319002.elements[6] = ((closureN)self_7312443)->elements[6];
++c_7319002.elements[7] = ((closureN)self_7312443)->elements[7];
++c_7319002.elements[8] = ((closureN)self_7312443)->elements[8];
++c_7319002.elements[9] = ((closureN)self_7312443)->elements[9];
++c_7319002.elements[10] = ((closureN)self_7312443)->elements[10];
++
++
++pair_type local_7319121;
++return_direct_with_clo1(data,(closure)&c_7319002,__lambda_664, set_pair_as_expr(&local_7319121, NULL, r_735492_7311497_7311547_7311596_7311644_7311691));;
++}
++
++static void __lambda_664(void *data, object self_7312444, int argc, object *args) /* object self_7312444, object r_735489_737649_7311498_7311548_7311597_7311645_7311692 */
++ {
++ object r_735489_737649_7311498_7311548_7311597_7311645_7311692 = args[0];
++
++closureN_type c_7319005;
++object e_7319117 [12];
++c_7319005.hdr.mark = gc_color_red;
++ c_7319005.hdr.grayed = 0;
++c_7319005.tag = closureN_tag;
++ c_7319005.fn = (function_type)__lambda_665;
++c_7319005.num_args = 1;
++c_7319005.num_elements = 12;
++c_7319005.elements = (object *)e_7319117;
++c_7319005.elements[0] = ((closureN)self_7312444)->elements[0];
++c_7319005.elements[1] = ((closureN)self_7312444)->elements[1];
++c_7319005.elements[2] = ((closureN)self_7312444)->elements[2];
++c_7319005.elements[3] = ((closureN)self_7312444)->elements[3];
++c_7319005.elements[4] = ((closureN)self_7312444)->elements[4];
++c_7319005.elements[5] = ((closureN)self_7312444)->elements[5];
++c_7319005.elements[6] = ((closureN)self_7312444)->elements[6];
++c_7319005.elements[7] = ((closureN)self_7312444)->elements[7];
++c_7319005.elements[8] = ((closureN)self_7312444)->elements[8];
++c_7319005.elements[9] = r_735489_737649_7311498_7311548_7311597_7311645_7311692;
++c_7319005.elements[10] = ((closureN)self_7312444)->elements[9];
++c_7319005.elements[11] = ((closureN)self_7312444)->elements[10];
++
++return_closcall2(data, ((closureN)self_7312444)->elements[9], &c_7319005, quote_lambda);;
++}
++
++static void __lambda_665(void *data, object self_7312445, int argc, object *args) /* object self_7312445, object r_735482_737651_737679_7311499_7311549_7311598_7311646_7311693 */
++ {
++ object r_735482_737651_737679_7311499_7311549_7311598_7311646_7311693 = args[0];
++
++closureN_type c_7319008;
++object e_7319116 [13];
++c_7319008.hdr.mark = gc_color_red;
++ c_7319008.hdr.grayed = 0;
++c_7319008.tag = closureN_tag;
++ c_7319008.fn = (function_type)__lambda_666;
++c_7319008.num_args = 1;
++c_7319008.num_elements = 13;
++c_7319008.elements = (object *)e_7319116;
++c_7319008.elements[0] = ((closureN)self_7312445)->elements[0];
++c_7319008.elements[1] = ((closureN)self_7312445)->elements[1];
++c_7319008.elements[2] = ((closureN)self_7312445)->elements[2];
++c_7319008.elements[3] = ((closureN)self_7312445)->elements[3];
++c_7319008.elements[4] = ((closureN)self_7312445)->elements[4];
++c_7319008.elements[5] = ((closureN)self_7312445)->elements[5];
++c_7319008.elements[6] = ((closureN)self_7312445)->elements[6];
++c_7319008.elements[7] = ((closureN)self_7312445)->elements[7];
++c_7319008.elements[8] = r_735482_737651_737679_7311499_7311549_7311598_7311646_7311693;
++c_7319008.elements[9] = ((closureN)self_7312445)->elements[8];
++c_7319008.elements[10] = ((closureN)self_7312445)->elements[9];
++c_7319008.elements[11] = ((closureN)self_7312445)->elements[10];
++c_7319008.elements[12] = ((closureN)self_7312445)->elements[11];
++
++return_closcall2(data, ((closureN)self_7312445)->elements[10], &c_7319008, quote_lambda);;
++}
++
++static void __lambda_666(void *data, object self_7312446, int argc, object *args) /* object self_7312446, object r_735458_737654_737682_737708_737733_7311500_7311550_7311599_7311647_7311694 */
++ {
++ object r_735458_737654_737682_737708_737733_7311500_7311550_7311599_7311647_7311694 = args[0];
++
++closureN_type c_7319010;
++object e_7319085 [13];
++c_7319010.hdr.mark = gc_color_red;
++ c_7319010.hdr.grayed = 0;
++c_7319010.tag = closureN_tag;
++ c_7319010.fn = (function_type)__lambda_667;
++c_7319010.num_args = 1;
++c_7319010.num_elements = 13;
++c_7319010.elements = (object *)e_7319085;
++c_7319010.elements[0] = ((closureN)self_7312446)->elements[0];
++c_7319010.elements[1] = ((closureN)self_7312446)->elements[1];
++c_7319010.elements[2] = ((closureN)self_7312446)->elements[2];
++c_7319010.elements[3] = ((closureN)self_7312446)->elements[3];
++c_7319010.elements[4] = ((closureN)self_7312446)->elements[4];
++c_7319010.elements[5] = ((closureN)self_7312446)->elements[5];
++c_7319010.elements[6] = ((closureN)self_7312446)->elements[6];
++c_7319010.elements[7] = ((closureN)self_7312446)->elements[7];
++c_7319010.elements[8] = r_735458_737654_737682_737708_737733_7311500_7311550_7311599_7311647_7311694;
++c_7319010.elements[9] = ((closureN)self_7312446)->elements[8];
++c_7319010.elements[10] = ((closureN)self_7312446)->elements[9];
++c_7319010.elements[11] = ((closureN)self_7312446)->elements[10];
++c_7319010.elements[12] = ((closureN)self_7312446)->elements[12];
++
++
++closureN_type c_7319086;
++object e_7319115 [1];
++c_7319086.hdr.mark = gc_color_red;
++ c_7319086.hdr.grayed = 0;
++c_7319086.tag = closureN_tag;
++ c_7319086.fn = (function_type)__lambda_670;
++c_7319086.num_args = 2;
++c_7319086.num_elements = 1;
++c_7319086.elements = (object *)e_7319115;
++c_7319086.elements[0] = ((closureN)self_7312446)->elements[11];
++
++return_direct_with_clo1(data,(closure)&c_7319010,__lambda_667, &c_7319086);;
++}
++
++static void __lambda_670(void *data, object self_7312447, int argc, object *args) /* object self_7312447, object k_735465_737669_737697_737723_737748_7311504_7311554_7311603_7311651_7311698, object p_73982_731096_733096_737670_737698_737724_737749_7311505_7311555_7311604_7311652_7311699, object old_73983_731097_733097_737671_737699_737725_737750_7311506_7311556_7311605_7311653_7311700 */
++ {
++ object k_735465_737669_737697_737723_737748_7311504_7311554_7311603_7311651_7311698 = args[0]; object p_73982_731096_733096_737670_737698_737724_737749_7311505_7311555_7311604_7311652_7311699 = args[1]; object old_73983_731097_733097_737671_737699_737725_737750_7311506_7311556_7311605_7311653_7311700 = args[2];
++
++closureN_type c_7319089;
++object e_7319114 [4];
++c_7319089.hdr.mark = gc_color_red;
++ c_7319089.hdr.grayed = 0;
++c_7319089.tag = closureN_tag;
++ c_7319089.fn = (function_type)__lambda_671;
++c_7319089.num_args = 1;
++c_7319089.num_elements = 4;
++c_7319089.elements = (object *)e_7319114;
++c_7319089.elements[0] = k_735465_737669_737697_737723_737748_7311504_7311554_7311603_7311651_7311698;
++c_7319089.elements[1] = old_73983_731097_733097_737671_737699_737725_737750_7311506_7311556_7311605_7311653_7311700;
++c_7319089.elements[2] = p_73982_731096_733096_737670_737698_737724_737749_7311505_7311555_7311604_7311652_7311699;
++c_7319089.elements[3] = ((closureN)self_7312447)->elements[0];
++
++return_closcall2(data, ((closureN)self_7312447)->elements[0], &c_7319089, quote_quote);;
++}
++
++static void __lambda_671(void *data, object self_7312448, int argc, object *args) /* object self_7312448, object r_735473_737672_737700_737726_737751_7311507_7311557_7311606_7311654_7311701 */
++ {
++ object r_735473_737672_737700_737726_737751_7311507_7311557_7311606_7311654_7311701 = args[0];
++
++closureN_type c_7319092;
++object e_7319113 [4];
++c_7319092.hdr.mark = gc_color_red;
++ c_7319092.hdr.grayed = 0;
++c_7319092.tag = closureN_tag;
++ c_7319092.fn = (function_type)__lambda_672;
++c_7319092.num_args = 1;
++c_7319092.num_elements = 4;
++c_7319092.elements = (object *)e_7319113;
++c_7319092.elements[0] = ((closureN)self_7312448)->elements[0];
++c_7319092.elements[1] = ((closureN)self_7312448)->elements[1];
++c_7319092.elements[2] = ((closureN)self_7312448)->elements[2];
++c_7319092.elements[3] = r_735473_737672_737700_737726_737751_7311507_7311557_7311606_7311654_7311701;
+
+-return_closcall2(data, ((closureN)self_7313701)->elements[3], &c_7320392, quote__121param_91set_67_125);;
++return_closcall2(data, ((closureN)self_7312448)->elements[3], &c_7319092, quote__121param_91set_67_125);;
+ }
+
+-static void __lambda_672(void *data, object self_7313702, int argc, object *args) /* object self_7313702, object r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955 */
++static void __lambda_672(void *data, object self_7312449, int argc, object *args) /* object self_7312449, object r_735476_737673_737701_737727_737752_7311508_7311558_7311607_7311655_7311702 */
+ {
+- object r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955 = args[0];
++ object r_735476_737673_737701_737727_737752_7311508_7311558_7311607_7311655_7311702 = args[0];
+
+-pair_type local_7320397;
++pair_type local_7319097;
+
+-pair_type local_7320401;
++pair_type local_7319101;
+
+-pair_type local_7320404;
++pair_type local_7319104;
+
+-pair_type local_7320408;
++pair_type local_7319108;
+
+-pair_type local_7320411;
+-return_direct_with_clo1(data, ((closureN)self_7313702)->elements[0], (((closure) ((closureN)self_7313702)->elements[0])->fn), set_pair_as_expr(&local_7320397, ((closureN)self_7313702)->elements[2], set_pair_as_expr(&local_7320401, set_pair_as_expr(&local_7320404, ((closureN)self_7313702)->elements[3], set_pair_as_expr(&local_7320408, r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955, NULL)), set_pair_as_expr(&local_7320411, ((closureN)self_7313702)->elements[1], NULL))));;
++pair_type local_7319111;
++return_direct_with_clo1(data, ((closureN)self_7312449)->elements[0], (((closure) ((closureN)self_7312449)->elements[0])->fn), set_pair_as_expr(&local_7319097, ((closureN)self_7312449)->elements[2], set_pair_as_expr(&local_7319101, set_pair_as_expr(&local_7319104, ((closureN)self_7312449)->elements[3], set_pair_as_expr(&local_7319108, r_735476_737673_737701_737727_737752_7311508_7311558_7311607_7311655_7311702, NULL)), set_pair_as_expr(&local_7319111, ((closureN)self_7312449)->elements[1], NULL))));;
+ }
+
+-static void __lambda_667(void *data, object self_7313703, int argc, object *args) /* object self_7313703, object r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948 */
++static void __lambda_667(void *data, object self_7312450, int argc, object *args) /* object self_7312450, object r_735464_737655_737683_737709_737734_7311501_7311551_7311600_7311648_7311695 */
+ {
+- object r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948 = args[0];
++ object r_735464_737655_737683_737709_737734_7311501_7311551_7311600_7311648_7311695 = args[0];
+
+-closureN_type c_7320312;
+-object e_7320382 [11];
+-c_7320312.hdr.mark = gc_color_red;
+- c_7320312.hdr.grayed = 0;
+-c_7320312.tag = closureN_tag;
+- c_7320312.fn = (function_type)__lambda_668;
+-c_7320312.num_args = 1;
+-c_7320312.num_elements = 11;
+-c_7320312.elements = (object *)e_7320382;
+-c_7320312.elements[0] = ((closureN)self_7313703)->elements[0];
+-c_7320312.elements[1] = ((closureN)self_7313703)->elements[3];
+-c_7320312.elements[2] = ((closureN)self_7313703)->elements[4];
+-c_7320312.elements[3] = ((closureN)self_7313703)->elements[5];
+-c_7320312.elements[4] = ((closureN)self_7313703)->elements[6];
+-c_7320312.elements[5] = ((closureN)self_7313703)->elements[7];
+-c_7320312.elements[6] = ((closureN)self_7313703)->elements[8];
+-c_7320312.elements[7] = ((closureN)self_7313703)->elements[9];
+-c_7320312.elements[8] = ((closureN)self_7313703)->elements[10];
+-c_7320312.elements[9] = ((closureN)self_7313703)->elements[11];
+-c_7320312.elements[10] = ((closureN)self_7313703)->elements[12];
++closureN_type c_7319012;
++object e_7319082 [11];
++c_7319012.hdr.mark = gc_color_red;
++ c_7319012.hdr.grayed = 0;
++c_7319012.tag = closureN_tag;
++ c_7319012.fn = (function_type)__lambda_668;
++c_7319012.num_args = 1;
++c_7319012.num_elements = 11;
++c_7319012.elements = (object *)e_7319082;
++c_7319012.elements[0] = ((closureN)self_7312450)->elements[0];
++c_7319012.elements[1] = ((closureN)self_7312450)->elements[3];
++c_7319012.elements[2] = ((closureN)self_7312450)->elements[4];
++c_7319012.elements[3] = ((closureN)self_7312450)->elements[5];
++c_7319012.elements[4] = ((closureN)self_7312450)->elements[6];
++c_7319012.elements[5] = ((closureN)self_7312450)->elements[7];
++c_7319012.elements[6] = ((closureN)self_7312450)->elements[8];
++c_7319012.elements[7] = ((closureN)self_7312450)->elements[9];
++c_7319012.elements[8] = ((closureN)self_7312450)->elements[10];
++c_7319012.elements[9] = ((closureN)self_7312450)->elements[11];
++c_7319012.elements[10] = ((closureN)self_7312450)->elements[12];
+
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7320312, r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948, ((closureN)self_7313703)->elements[2], ((closureN)self_7313703)->elements[1]);;
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7319012, r_735464_737655_737683_737709_737734_7311501_7311551_7311600_7311648_7311695, ((closureN)self_7312450)->elements[2], ((closureN)self_7312450)->elements[1]);;
+ }
+
+-static void __lambda_668(void *data, object self_7313704, int argc, object *args) /* object self_7313704, object r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949 */
++static void __lambda_668(void *data, object self_7312451, int argc, object *args) /* object self_7312451, object r_735462_737656_737684_737710_737735_7311502_7311552_7311601_7311649_7311696 */
+ {
+- object r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949 = args[0];
++ object r_735462_737656_737684_737710_737735_7311502_7311552_7311601_7311649_7311696 = args[0];
+
+-closureN_type c_7320314;
+-object e_7320378 [11];
+-c_7320314.hdr.mark = gc_color_red;
+- c_7320314.hdr.grayed = 0;
+-c_7320314.tag = closureN_tag;
+- c_7320314.fn = (function_type)__lambda_669;
+-c_7320314.num_args = 1;
+-c_7320314.num_elements = 11;
+-c_7320314.elements = (object *)e_7320378;
+-c_7320314.elements[0] = ((closureN)self_7313704)->elements[0];
+-c_7320314.elements[1] = ((closureN)self_7313704)->elements[1];
+-c_7320314.elements[2] = ((closureN)self_7313704)->elements[2];
+-c_7320314.elements[3] = ((closureN)self_7313704)->elements[3];
+-c_7320314.elements[4] = ((closureN)self_7313704)->elements[4];
+-c_7320314.elements[5] = ((closureN)self_7313704)->elements[5];
+-c_7320314.elements[6] = ((closureN)self_7313704)->elements[6];
+-c_7320314.elements[7] = ((closureN)self_7313704)->elements[7];
+-c_7320314.elements[8] = ((closureN)self_7313704)->elements[8];
+-c_7320314.elements[9] = ((closureN)self_7313704)->elements[9];
+-c_7320314.elements[10] = ((closureN)self_7313704)->elements[10];
++closureN_type c_7319014;
++object e_7319078 [11];
++c_7319014.hdr.mark = gc_color_red;
++ c_7319014.hdr.grayed = 0;
++c_7319014.tag = closureN_tag;
++ c_7319014.fn = (function_type)__lambda_669;
++c_7319014.num_args = 1;
++c_7319014.num_elements = 11;
++c_7319014.elements = (object *)e_7319078;
++c_7319014.elements[0] = ((closureN)self_7312451)->elements[0];
++c_7319014.elements[1] = ((closureN)self_7312451)->elements[1];
++c_7319014.elements[2] = ((closureN)self_7312451)->elements[2];
++c_7319014.elements[3] = ((closureN)self_7312451)->elements[3];
++c_7319014.elements[4] = ((closureN)self_7312451)->elements[4];
++c_7319014.elements[5] = ((closureN)self_7312451)->elements[5];
++c_7319014.elements[6] = ((closureN)self_7312451)->elements[6];
++c_7319014.elements[7] = ((closureN)self_7312451)->elements[7];
++c_7319014.elements[8] = ((closureN)self_7312451)->elements[8];
++c_7319014.elements[9] = ((closureN)self_7312451)->elements[9];
++c_7319014.elements[10] = ((closureN)self_7312451)->elements[10];
+
+
+-pair_type local_7320381;
+-return_direct_with_clo1(data,(closure)&c_7320314,__lambda_669, set_pair_as_expr(&local_7320381, NULL, r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949));;
++pair_type local_7319081;
++return_direct_with_clo1(data,(closure)&c_7319014,__lambda_669, set_pair_as_expr(&local_7319081, NULL, r_735462_737656_737684_737710_737735_7311502_7311552_7311601_7311649_7311696));;
+ }
+
+-static void __lambda_669(void *data, object self_7313705, int argc, object *args) /* object self_7313705, object r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950 */
++static void __lambda_669(void *data, object self_7312452, int argc, object *args) /* object self_7312452, object r_735459_737657_737685_737711_737736_737757_7311503_7311553_7311602_7311650_7311697 */
+ {
+- object r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950 = args[0];
++ object r_735459_737657_737685_737711_737736_737757_7311503_7311553_7311602_7311650_7311697 = args[0];
+
+-pair_type local_7320319;
++pair_type local_7319019;
+
+-pair_type local_7320322;
++pair_type local_7319022;
+
+-pair_type local_7320326;
++pair_type local_7319026;
+
+-pair_type local_7320330;
++pair_type local_7319030;
+
+-pair_type local_7320333;
++pair_type local_7319033;
+
+-pair_type local_7320337;
++pair_type local_7319037;
+
+-pair_type local_7320341;
++pair_type local_7319041;
+
+-pair_type local_7320344;
++pair_type local_7319044;
+
+-pair_type local_7320348;
++pair_type local_7319048;
+
+-pair_type local_7320351;
++pair_type local_7319051;
+
+-pair_type local_7320356;
++pair_type local_7319056;
+
+-pair_type local_7320359;
++pair_type local_7319059;
+
+-pair_type local_7320363;
++pair_type local_7319063;
+
+
+
+@@ -24921,48 +23124,48 @@ pair_type local_7320363;
+
+
+
+-pair_type local_7320373;
++pair_type local_7319073;
+
+-pair_type local_7320376;
+-return_direct_with_clo1(data, ((closureN)self_7313705)->elements[0], (((closure) ((closureN)self_7313705)->elements[0])->fn), set_pair_as_expr(&local_7320319, set_pair_as_expr(&local_7320322, ((closureN)self_7313705)->elements[1], set_pair_as_expr(&local_7320326, ((closureN)self_7313705)->elements[2], set_pair_as_expr(&local_7320330, set_pair_as_expr(&local_7320333, ((closureN)self_7313705)->elements[3], set_pair_as_expr(&local_7320337, ((closureN)self_7313705)->elements[4], set_pair_as_expr(&local_7320341, set_pair_as_expr(&local_7320344, ((closureN)self_7313705)->elements[5], set_pair_as_expr(&local_7320348, set_pair_as_expr(&local_7320351, ((closureN)self_7313705)->elements[8], ((closureN)self_7313705)->elements[9]), set_pair_as_expr(&local_7320356, set_pair_as_expr(&local_7320359, ((closureN)self_7313705)->elements[7], set_pair_as_expr(&local_7320363, NULL, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313705)->elements[10]))))), set_pair_as_expr(&local_
7320373, set_pair_as_expr(&local_7320376, ((closureN)self_7313705)->elements[6], r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950), NULL)))), NULL))), NULL))), boolean_f));;
++pair_type local_7319076;
++return_direct_with_clo1(data, ((closureN)self_7312452)->elements[0], (((closure) ((closureN)self_7312452)->elements[0])->fn), set_pair_as_expr(&local_7319019, set_pair_as_expr(&local_7319022, ((closureN)self_7312452)->elements[1], set_pair_as_expr(&local_7319026, ((closureN)self_7312452)->elements[2], set_pair_as_expr(&local_7319030, set_pair_as_expr(&local_7319033, ((closureN)self_7312452)->elements[3], set_pair_as_expr(&local_7319037, ((closureN)self_7312452)->elements[4], set_pair_as_expr(&local_7319041, set_pair_as_expr(&local_7319044, ((closureN)self_7312452)->elements[5], set_pair_as_expr(&local_7319048, set_pair_as_expr(&local_7319051, ((closureN)self_7312452)->elements[8], ((closureN)self_7312452)->elements[9]), set_pair_as_expr(&local_7319056, set_pair_as_expr(&local_7319059, ((closureN)self_7312452)->elements[7], set_pair_as_expr(&local_7319063, NULL, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312452)->elements[10]))))), set_pair_as_expr(&local_
7319073, set_pair_as_expr(&local_7319076, ((closureN)self_7312452)->elements[6], r_735459_737657_737685_737711_737736_737757_7311503_7311553_7311602_7311650_7311697), NULL)))), NULL))), NULL))), boolean_f));;
+ }
+
+-static void __lambda_642(void *data, object self_7313706, int argc, object *args) /* object self_7313706, object r_735862 */
++static void __lambda_642(void *data, object self_7312453, int argc, object *args) /* object self_7312453, object r_735410 */
+ {
+- object r_735862 = args[0];
++ object r_735410 = args[0];
+
+-closureN_type c_7320211;
+-object e_7320223 [8];
+-c_7320211.hdr.mark = gc_color_red;
+- c_7320211.hdr.grayed = 0;
+-c_7320211.tag = closureN_tag;
+- c_7320211.fn = (function_type)__lambda_643;
+-c_7320211.num_args = 1;
+-c_7320211.num_elements = 8;
+-c_7320211.elements = (object *)e_7320223;
+-c_7320211.elements[0] = ((closureN)self_7313706)->elements[0];
+-c_7320211.elements[1] = ((closureN)self_7313706)->elements[1];
+-c_7320211.elements[2] = ((closureN)self_7313706)->elements[2];
+-c_7320211.elements[3] = ((closureN)self_7313706)->elements[3];
+-c_7320211.elements[4] = ((closureN)self_7313706)->elements[4];
+-c_7320211.elements[5] = ((closureN)self_7313706)->elements[5];
+-c_7320211.elements[6] = ((closureN)self_7313706)->elements[6];
+-c_7320211.elements[7] = ((closureN)self_7313706)->elements[7];
++closureN_type c_7318911;
++object e_7318923 [8];
++c_7318911.hdr.mark = gc_color_red;
++ c_7318911.hdr.grayed = 0;
++c_7318911.tag = closureN_tag;
++ c_7318911.fn = (function_type)__lambda_643;
++c_7318911.num_args = 1;
++c_7318911.num_elements = 8;
++c_7318911.elements = (object *)e_7318923;
++c_7318911.elements[0] = ((closureN)self_7312453)->elements[0];
++c_7318911.elements[1] = ((closureN)self_7312453)->elements[1];
++c_7318911.elements[2] = ((closureN)self_7312453)->elements[2];
++c_7318911.elements[3] = ((closureN)self_7312453)->elements[3];
++c_7318911.elements[4] = ((closureN)self_7312453)->elements[4];
++c_7318911.elements[5] = ((closureN)self_7312453)->elements[5];
++c_7318911.elements[6] = ((closureN)self_7312453)->elements[6];
++c_7318911.elements[7] = ((closureN)self_7312453)->elements[7];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320211,__lambda_643, Cyc_set_cell(data, ((closureN)self_7313706)->elements[1], r_735862));;
++return_direct_with_clo1(data,(closure)&c_7318911,__lambda_643, Cyc_set_cell(data, ((closureN)self_7312453)->elements[1], r_735410));;
+ }
+
+-static void __lambda_643(void *data, object self_7313707, int argc, object *args) /* object self_7313707, object r_735861 */
++static void __lambda_643(void *data, object self_7312454, int argc, object *args) /* object self_7312454, object r_735409 */
+ {
+
+
+
+-return_closcall7(data, car(((closureN)self_7313707)->elements[1]), ((closureN)self_7313707)->elements[0], ((closureN)self_7313707)->elements[7], ((closureN)self_7313707)->elements[5], ((closureN)self_7313707)->elements[6], ((closureN)self_7313707)->elements[4], ((closureN)self_7313707)->elements[3], ((closureN)self_7313707)->elements[2]);;
++return_closcall7(data, car(((closureN)self_7312454)->elements[1]), ((closureN)self_7312454)->elements[0], ((closureN)self_7312454)->elements[7], ((closureN)self_7312454)->elements[5], ((closureN)self_7312454)->elements[6], ((closureN)self_7312454)->elements[4], ((closureN)self_7312454)->elements[3], ((closureN)self_7312454)->elements[2]);;
+ }
+
+-static void __lambda_1463(void *data, object _, int argc, object *args) {object k = args[0];object count = args[1];object fill = args[2]; object s = NULL;
++static void __lambda_1416(void *data, object _, int argc, object *args) {object k = args[0];object count = args[1];object fill = args[2]; object s = NULL;
+ char ch_buf[5];
+ char_type c;
+ int buflen, num_cp, len;
+@@ -25015,2695 +23218,2695 @@ static void __lambda_1463(void *data, ob
+ ((string_type *)s)->str[len] = '\0';
+ return_closcall1(data, k, s);
+ }
+-static void __lambda_635(void *data, object _, int argc, object *args) /* closure _,object k_735717, object k_73784_733352, object fill_73785_733353_raw, ... */
++static void __lambda_635(void *data, object _, int argc, object *args) /* closure _,object k_735265, object k_73784_733005, object fill_73785_733006_raw, ... */
+ {
+-object k_735717 = args[0]; object k_73784_733352 = args[1];
+-load_varargs(fill_73785_733353, args, 2, argc - 2);
+- object r_735718;
++object k_735265 = args[0]; object k_73784_733005 = args[1];
++load_varargs(fill_73785_733006, args, 2, argc - 2);
++ object r_735266;
+ Cyc_st_add(data, "scheme/base.sld:make-string");
+
+-if( (boolean_f != Cyc_is_null(fill_73785_733353)) ){
+- r_735718 = obj_char2obj(32);
++if( (boolean_f != Cyc_is_null(fill_73785_733006)) ){
++ r_735266 = obj_char2obj(32);
+ } else {
+
+- r_735718 = Cyc_car(data, fill_73785_733353);}
+-;return_direct_with_clo3(data, __glo_Cyc_91make_91string_scheme_base, (((closure) __glo_Cyc_91make_91string_scheme_base)->fn), k_735717, k_73784_733352, r_735718);;
++ r_735266 = Cyc_car(data, fill_73785_733006);}
++;return_direct_with_clo3(data, __glo_Cyc_91make_91string_scheme_base, (((closure) __glo_Cyc_91make_91string_scheme_base)->fn), k_735265, k_73784_733005, r_735266);;
+ }
+
+-static void __lambda_634(void *data, object _, int argc, object *args) /* closure _,object k_735714, object chars_73783_733351_raw, ... */
++static void __lambda_634(void *data, object _, int argc, object *args) /* closure _,object k_735262, object chars_73783_733004_raw, ... */
+ {
+-object k_735714 = args[0];
+-load_varargs(chars_73783_733351, args, 1, argc - 1);
++object k_735262 = args[0];
++load_varargs(chars_73783_733004, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:string");
+
+-object c_7320159 = Cyc_list2string(data, k_735714,chars_73783_733351);
+-return_direct_with_clo1(data, k_735714, (((closure) k_735714)->fn), c_7320159);;
++object c_7318859 = Cyc_list2string(data, k_735262,chars_73783_733004);
++return_direct_with_clo1(data, k_735262, (((closure) k_735262)->fn), c_7318859);;
+ }
+
+-static void __lambda_627(void *data, object _, int argc, object *args) /* closure _,object k_735704, object type_127_73777_733346, object obj_73778_733347, object objs_73779_733348 */
++static void __lambda_627(void *data, object _, int argc, object *args) /* closure _,object k_735252, object type_127_73777_732999, object obj_73778_733000, object objs_73779_733001 */
+ {
+-object k_735704 = args[0]; object type_127_73777_733346 = args[1]; object obj_73778_733347 = args[2]; object objs_73779_733348 = args[3];
++object k_735252 = args[0]; object type_127_73777_732999 = args[1]; object obj_73778_733000 = args[2]; object objs_73779_733001 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-obj=?");
+
+-closureN_type c_7320127;
+-object e_7320154 [3];
+-c_7320127.hdr.mark = gc_color_red;
+- c_7320127.hdr.grayed = 0;
+-c_7320127.tag = closureN_tag;
+- c_7320127.fn = (function_type)__lambda_628;
+-c_7320127.num_args = 1;
+-c_7320127.num_elements = 3;
+-c_7320127.elements = (object *)e_7320154;
+-c_7320127.elements[0] = k_735704;
+-c_7320127.elements[1] = obj_73778_733347;
+-c_7320127.elements[2] = objs_73779_733348;
+-
+-return_closcall2(data, type_127_73777_733346, &c_7320127, obj_73778_733347);;
+-}
+-
+-static void __lambda_628(void *data, object self_7313630, int argc, object *args) /* object self_7313630, object r_735705 */
+- {
+- object r_735705 = args[0];
+- if( (boolean_f != r_735705) ){
+-
+-closureN_type c_7320129;
+-object e_7320132 [1];
+-c_7320129.hdr.mark = gc_color_red;
+- c_7320129.hdr.grayed = 0;
+-c_7320129.tag = closureN_tag;
+- c_7320129.fn = (function_type)__lambda_629;
+-c_7320129.num_args = 1;
+-c_7320129.num_elements = 1;
+-c_7320129.elements = (object *)e_7320132;
+-c_7320129.elements[0] = ((closureN)self_7313630)->elements[0];
+-
+-
+-closureN_type c_7320133;
+-object e_7320151 [2];
+-c_7320133.hdr.mark = gc_color_red;
+- c_7320133.hdr.grayed = 0;
+-c_7320133.tag = closureN_tag;
+- c_7320133.fn = (function_type)__lambda_630;
+-c_7320133.num_args = 1;
+-c_7320133.num_elements = 2;
+-c_7320133.elements = (object *)e_7320151;
+-c_7320133.elements[0] = ((closureN)self_7313630)->elements[1];
+-c_7320133.elements[1] = ((closureN)self_7313630)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7320129,__lambda_629, &c_7320133);
+-} else {
+- return_direct_with_clo1(data, ((closureN)self_7313630)->elements[0], (((closure) ((closureN)self_7313630)->elements[0])->fn), boolean_f);}
+-;;
+-}
+-
+-static void __lambda_630(void *data, object self_7313631, int argc, object *args) /* object self_7313631, object k_735707, object return_73781_733349 */
+- {
+- object k_735707 = args[0]; object return_73781_733349 = args[1];
+-
+-closureN_type c_7320135;
+-object e_7320142 [2];
+-c_7320135.hdr.mark = gc_color_red;
+- c_7320135.hdr.grayed = 0;
+-c_7320135.tag = closureN_tag;
+- c_7320135.fn = (function_type)__lambda_631;
+-c_7320135.num_args = 1;
+-c_7320135.num_elements = 2;
+-c_7320135.elements = (object *)e_7320142;
+-c_7320135.elements[0] = k_735707;
+-c_7320135.elements[1] = ((closureN)self_7313631)->elements[1];
++closureN_type c_7318827;
++object e_7318854 [3];
++c_7318827.hdr.mark = gc_color_red;
++ c_7318827.hdr.grayed = 0;
++c_7318827.tag = closureN_tag;
++ c_7318827.fn = (function_type)__lambda_628;
++c_7318827.num_args = 1;
++c_7318827.num_elements = 3;
++c_7318827.elements = (object *)e_7318854;
++c_7318827.elements[0] = k_735252;
++c_7318827.elements[1] = obj_73778_733000;
++c_7318827.elements[2] = objs_73779_733001;
++
++return_closcall2(data, type_127_73777_732999, &c_7318827, obj_73778_733000);;
++}
++
++static void __lambda_628(void *data, object self_7312377, int argc, object *args) /* object self_7312377, object r_735253 */
++ {
++ object r_735253 = args[0];
++ if( (boolean_f != r_735253) ){
++
++closureN_type c_7318829;
++object e_7318832 [1];
++c_7318829.hdr.mark = gc_color_red;
++ c_7318829.hdr.grayed = 0;
++c_7318829.tag = closureN_tag;
++ c_7318829.fn = (function_type)__lambda_629;
++c_7318829.num_args = 1;
++c_7318829.num_elements = 1;
++c_7318829.elements = (object *)e_7318832;
++c_7318829.elements[0] = ((closureN)self_7312377)->elements[0];
++
++
++closureN_type c_7318833;
++object e_7318851 [2];
++c_7318833.hdr.mark = gc_color_red;
++ c_7318833.hdr.grayed = 0;
++c_7318833.tag = closureN_tag;
++ c_7318833.fn = (function_type)__lambda_630;
++c_7318833.num_args = 1;
++c_7318833.num_elements = 2;
++c_7318833.elements = (object *)e_7318851;
++c_7318833.elements[0] = ((closureN)self_7312377)->elements[1];
++c_7318833.elements[1] = ((closureN)self_7312377)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7318829,__lambda_629, &c_7318833);
++} else {
++ return_direct_with_clo1(data, ((closureN)self_7312377)->elements[0], (((closure) ((closureN)self_7312377)->elements[0])->fn), boolean_f);}
++;;
++}
++
++static void __lambda_630(void *data, object self_7312378, int argc, object *args) /* object self_7312378, object k_735255, object return_73781_733002 */
++ {
++ object k_735255 = args[0]; object return_73781_733002 = args[1];
++
++closureN_type c_7318835;
++object e_7318842 [2];
++c_7318835.hdr.mark = gc_color_red;
++ c_7318835.hdr.grayed = 0;
++c_7318835.tag = closureN_tag;
++ c_7318835.fn = (function_type)__lambda_631;
++c_7318835.num_args = 1;
++c_7318835.num_elements = 2;
++c_7318835.elements = (object *)e_7318842;
++c_7318835.elements[0] = k_735255;
++c_7318835.elements[1] = ((closureN)self_7312378)->elements[1];
+
+
+-closureN_type c_7320143;
+-object e_7320150 [2];
+-c_7320143.hdr.mark = gc_color_red;
+- c_7320143.hdr.grayed = 0;
+-c_7320143.tag = closureN_tag;
+- c_7320143.fn = (function_type)__lambda_633;
+-c_7320143.num_args = 1;
+-c_7320143.num_elements = 2;
+-c_7320143.elements = (object *)e_7320150;
+-c_7320143.elements[0] = ((closureN)self_7313631)->elements[0];
+-c_7320143.elements[1] = return_73781_733349;
++closureN_type c_7318843;
++object e_7318850 [2];
++c_7318843.hdr.mark = gc_color_red;
++ c_7318843.hdr.grayed = 0;
++c_7318843.tag = closureN_tag;
++ c_7318843.fn = (function_type)__lambda_633;
++c_7318843.num_args = 1;
++c_7318843.num_elements = 2;
++c_7318843.elements = (object *)e_7318850;
++c_7318843.elements[0] = ((closureN)self_7312378)->elements[0];
++c_7318843.elements[1] = return_73781_733002;
+
+-return_direct_with_clo1(data,(closure)&c_7320135,__lambda_631, &c_7320143);;
++return_direct_with_clo1(data,(closure)&c_7318835,__lambda_631, &c_7318843);;
+ }
+
+-static void __lambda_633(void *data, object self_7313632, int argc, object *args) /* object self_7313632, object k_735710, object o_73782_733350 */
++static void __lambda_633(void *data, object self_7312379, int argc, object *args) /* object self_7312379, object k_735258, object o_73782_733003 */
+ {
+- object k_735710 = args[0]; object o_73782_733350 = args[1];
++ object k_735258 = args[0]; object o_73782_733003 = args[1];
+
+-if( (boolean_f != Cyc_eq(o_73782_733350, ((closureN)self_7313632)->elements[0])) ){
+- return_direct_with_clo1(data, k_735710, (((closure) k_735710)->fn), Cyc_VOID);
++if( (boolean_f != Cyc_eq(o_73782_733003, ((closureN)self_7312379)->elements[0])) ){
++ return_direct_with_clo1(data, k_735258, (((closure) k_735258)->fn), Cyc_VOID);
+ } else {
+- return_closcall2(data, ((closureN)self_7313632)->elements[1], k_735710, boolean_f);}
++ return_closcall2(data, ((closureN)self_7312379)->elements[1], k_735258, boolean_f);}
+ ;;
+ }
+
+-static void __lambda_631(void *data, object self_7313633, int argc, object *args) /* object self_7313633, object r_735709 */
++static void __lambda_631(void *data, object self_7312380, int argc, object *args) /* object self_7312380, object r_735257 */
+ {
+- object r_735709 = args[0];
++ object r_735257 = args[0];
+
+-closureN_type c_7320137;
+-object e_7320140 [1];
+-c_7320137.hdr.mark = gc_color_red;
+- c_7320137.hdr.grayed = 0;
+-c_7320137.tag = closureN_tag;
+- c_7320137.fn = (function_type)__lambda_632;
+-c_7320137.num_args = 1;
+-c_7320137.num_elements = 1;
+-c_7320137.elements = (object *)e_7320140;
+-c_7320137.elements[0] = ((closureN)self_7313633)->elements[0];
++closureN_type c_7318837;
++object e_7318840 [1];
++c_7318837.hdr.mark = gc_color_red;
++ c_7318837.hdr.grayed = 0;
++c_7318837.tag = closureN_tag;
++ c_7318837.fn = (function_type)__lambda_632;
++c_7318837.num_args = 1;
++c_7318837.num_elements = 1;
++c_7318837.elements = (object *)e_7318840;
++c_7318837.elements[0] = ((closureN)self_7312380)->elements[0];
+
+-return_direct_with_clo3(data, __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure) __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn), &c_7320137, r_735709, ((closureN)self_7313633)->elements[1]);;
++return_direct_with_clo3(data, __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure) __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn), &c_7318837, r_735257, ((closureN)self_7312380)->elements[1]);;
+ }
+
+-static void __lambda_632(void *data, object self_7313634, int argc, object *args) /* object self_7313634, object r_735708 */
++static void __lambda_632(void *data, object self_7312381, int argc, object *args) /* object self_7312381, object r_735256 */
+ {
+
+- return_direct_with_clo1(data, ((closureN)self_7313634)->elements[0], (((closure) ((closureN)self_7313634)->elements[0])->fn), boolean_t);;
++ return_direct_with_clo1(data, ((closureN)self_7312381)->elements[0], (((closure) ((closureN)self_7312381)->elements[0])->fn), boolean_t);;
+ }
+
+-static void __lambda_629(void *data, object self_7313635, int argc, object *args) /* object self_7313635, object r_735706 */
++static void __lambda_629(void *data, object self_7312382, int argc, object *args) /* object self_7312382, object r_735254 */
+ {
+- object r_735706 = args[0];
+- return_direct_with_clo2(data, __glo_call_95cc_scheme_base, (((closure) __glo_call_95cc_scheme_base)->fn), ((closureN)self_7313635)->elements[0], r_735706);;
++ object r_735254 = args[0];
++ return_direct_with_clo2(data, __glo_call_95cc_scheme_base, (((closure) __glo_call_95cc_scheme_base)->fn), ((closureN)self_7312382)->elements[0], r_735254);;
+ }
+
+-static void __lambda_626(void *data, object _, int argc, object *args) /* closure _,object k_735700, object sym1_73774_733343, object sym2_73775_733344, object syms_73776_733345_raw, ... */
++static void __lambda_626(void *data, object _, int argc, object *args) /* closure _,object k_735248, object sym1_73774_732996, object sym2_73775_732997, object syms_73776_732998_raw, ... */
+ {
+-object k_735700 = args[0]; object sym1_73774_733343 = args[1]; object sym2_73775_733344 = args[2];
+-load_varargs(syms_73776_733345, args, 3, argc - 3);
++object k_735248 = args[0]; object sym1_73774_732996 = args[1]; object sym2_73775_732997 = args[2];
++load_varargs(syms_73776_732998, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:symbol=?");
+
+-pair_type local_7320124;
+-return_direct_with_clo4(data, __glo_Cyc_91obj_123_127_scheme_base, (((closure) __glo_Cyc_91obj_123_127_scheme_base)->fn), k_735700, primitive_symbol_127, sym1_73774_733343, set_pair_as_expr(&local_7320124, sym2_73775_733344, syms_73776_733345));;
++pair_type local_7318824;
++return_direct_with_clo4(data, __glo_Cyc_91obj_123_127_scheme_base, (((closure) __glo_Cyc_91obj_123_127_scheme_base)->fn), k_735248, primitive_symbol_127, sym1_73774_732996, set_pair_as_expr(&local_7318824, sym2_73775_732997, syms_73776_732998));;
+ }
+
+-static void __lambda_625(void *data, object _, int argc, object *args) /* closure _,object k_735696, object b1_73771_733340, object b2_73772_733341, object bs_73773_733342_raw, ... */
++static void __lambda_625(void *data, object _, int argc, object *args) /* closure _,object k_735244, object b1_73771_732993, object b2_73772_732994, object bs_73773_732995_raw, ... */
+ {
+-object k_735696 = args[0]; object b1_73771_733340 = args[1]; object b2_73772_733341 = args[2];
+-load_varargs(bs_73773_733342, args, 3, argc - 3);
++object k_735244 = args[0]; object b1_73771_732993 = args[1]; object b2_73772_732994 = args[2];
++load_varargs(bs_73773_732995, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:boolean=?");
+
+-pair_type local_7320119;
+-return_direct_with_clo4(data, __glo_Cyc_91obj_123_127_scheme_base, (((closure) __glo_Cyc_91obj_123_127_scheme_base)->fn), k_735696, primitive_boolean_127, b1_73771_733340, set_pair_as_expr(&local_7320119, b2_73772_733341, bs_73773_733342));;
++pair_type local_7318819;
++return_direct_with_clo4(data, __glo_Cyc_91obj_123_127_scheme_base, (((closure) __glo_Cyc_91obj_123_127_scheme_base)->fn), k_735244, primitive_boolean_127, b1_73771_732993, set_pair_as_expr(&local_7318819, b2_73772_732994, bs_73773_732995));;
+ }
+
+-static void __lambda_612(void *data, object _, int argc, object *args) /* closure _,object k_735675, object vec_73759_733332, object fill_73760_733333, object opts_73761_733334_raw, ... */
++static void __lambda_612(void *data, object _, int argc, object *args) /* closure _,object k_735223, object vec_73759_732985, object fill_73760_732986, object opts_73761_732987_raw, ... */
+ {
+-object k_735675 = args[0]; object vec_73759_733332 = args[1]; object fill_73760_733333 = args[2];
+-load_varargs(opts_73761_733334, args, 3, argc - 3);
++object k_735223 = args[0]; object vec_73759_732985 = args[1]; object fill_73760_732986 = args[2];
++load_varargs(opts_73761_732987, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:vector-fill!");
+
+-closureN_type c_7319985;
+-object e_7320114 [4];
+-c_7319985.hdr.mark = gc_color_red;
+- c_7319985.hdr.grayed = 0;
+-c_7319985.tag = closureN_tag;
+- c_7319985.fn = (function_type)__lambda_613;
+-c_7319985.num_args = 4;
+-c_7319985.num_elements = 4;
+-c_7319985.elements = (object *)e_7320114;
+-c_7319985.elements[0] = fill_73760_733333;
+-c_7319985.elements[1] = k_735675;
+-c_7319985.elements[2] = opts_73761_733334;
+-c_7319985.elements[3] = vec_73759_733332;
++closureN_type c_7318685;
++object e_7318814 [4];
++c_7318685.hdr.mark = gc_color_red;
++ c_7318685.hdr.grayed = 0;
++c_7318685.tag = closureN_tag;
++ c_7318685.fn = (function_type)__lambda_613;
++c_7318685.num_args = 4;
++c_7318685.num_elements = 4;
++c_7318685.elements = (object *)e_7318814;
++c_7318685.elements[0] = fill_73760_732986;
++c_7318685.elements[1] = k_735223;
++c_7318685.elements[2] = opts_73761_732987;
++c_7318685.elements[3] = vec_73759_732985;
+
+-return_direct_with_clo4(data,(closure)&c_7319985,__lambda_613, boolean_f, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo4(data,(closure)&c_7318685,__lambda_613, boolean_f, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_613(void *data, object self_7313614, int argc, object *args) /* object self_7313614, object len_73762_733335, object start_73763_733336, object end_73764_733337, object loop_73765_733338 */
++static void __lambda_613(void *data, object self_7312361, int argc, object *args) /* object self_7312361, object len_73762_732988, object start_73763_732989, object end_73764_732990, object loop_73765_732991 */
+ {
+- object len_73762_733335 = args[0]; object start_73763_733336 = args[1]; object end_73764_733337 = args[2]; object loop_73765_733338 = args[3];
++ object len_73762_732988 = args[0]; object start_73763_732989 = args[1]; object end_73764_732990 = args[2]; object loop_73765_732991 = args[3];
+
+-closureN_type c_7319987;
+-object e_7320110 [7];
+-c_7319987.hdr.mark = gc_color_red;
+- c_7319987.hdr.grayed = 0;
+-c_7319987.tag = closureN_tag;
+- c_7319987.fn = (function_type)__lambda_1415;
+-c_7319987.num_args = 1;
+-c_7319987.num_elements = 7;
+-c_7319987.elements = (object *)e_7320110;
+-c_7319987.elements[0] = end_73764_733337;
+-c_7319987.elements[1] = ((closureN)self_7313614)->elements[0];
+-c_7319987.elements[2] = ((closureN)self_7313614)->elements[1];
+-c_7319987.elements[3] = loop_73765_733338;
+-c_7319987.elements[4] = ((closureN)self_7313614)->elements[2];
+-c_7319987.elements[5] = start_73763_733336;
+-c_7319987.elements[6] = ((closureN)self_7313614)->elements[3];
++closureN_type c_7318687;
++object e_7318810 [7];
++c_7318687.hdr.mark = gc_color_red;
++ c_7318687.hdr.grayed = 0;
++c_7318687.tag = closureN_tag;
++ c_7318687.fn = (function_type)__lambda_1368;
++c_7318687.num_args = 1;
++c_7318687.num_elements = 7;
++c_7318687.elements = (object *)e_7318810;
++c_7318687.elements[0] = end_73764_732990;
++c_7318687.elements[1] = ((closureN)self_7312361)->elements[0];
++c_7318687.elements[2] = ((closureN)self_7312361)->elements[1];
++c_7318687.elements[3] = loop_73765_732991;
++c_7318687.elements[4] = ((closureN)self_7312361)->elements[2];
++c_7318687.elements[5] = start_73763_732989;
++c_7318687.elements[6] = ((closureN)self_7312361)->elements[3];
+
+
+-pair_type local_7320113;
+-return_direct_with_clo1(data,(closure)&c_7319987,__lambda_1415, set_cell_as_expr(&local_7320113, len_73762_733335));;
++pair_type local_7318813;
++return_direct_with_clo1(data,(closure)&c_7318687,__lambda_1368, set_cell_as_expr(&local_7318813, len_73762_732988));;
+ }
+
+-static void __lambda_1415(void *data, object self_7313615, int argc, object *args) /* object self_7313615, object len_73762_733335 */
++static void __lambda_1368(void *data, object self_7312362, int argc, object *args) /* object self_7312362, object len_73762_732988 */
+ {
+- object len_73762_733335 = args[0];
++ object len_73762_732988 = args[0];
+
+-closureN_type c_7319989;
+-object e_7320105 [7];
+-c_7319989.hdr.mark = gc_color_red;
+- c_7319989.hdr.grayed = 0;
+-c_7319989.tag = closureN_tag;
+- c_7319989.fn = (function_type)__lambda_1414;
+-c_7319989.num_args = 1;
+-c_7319989.num_elements = 7;
+-c_7319989.elements = (object *)e_7320105;
+-c_7319989.elements[0] = ((closureN)self_7313615)->elements[0];
+-c_7319989.elements[1] = ((closureN)self_7313615)->elements[1];
+-c_7319989.elements[2] = ((closureN)self_7313615)->elements[2];
+-c_7319989.elements[3] = len_73762_733335;
+-c_7319989.elements[4] = ((closureN)self_7313615)->elements[3];
+-c_7319989.elements[5] = ((closureN)self_7313615)->elements[4];
+-c_7319989.elements[6] = ((closureN)self_7313615)->elements[6];
++closureN_type c_7318689;
++object e_7318805 [7];
++c_7318689.hdr.mark = gc_color_red;
++ c_7318689.hdr.grayed = 0;
++c_7318689.tag = closureN_tag;
++ c_7318689.fn = (function_type)__lambda_1367;
++c_7318689.num_args = 1;
++c_7318689.num_elements = 7;
++c_7318689.elements = (object *)e_7318805;
++c_7318689.elements[0] = ((closureN)self_7312362)->elements[0];
++c_7318689.elements[1] = ((closureN)self_7312362)->elements[1];
++c_7318689.elements[2] = ((closureN)self_7312362)->elements[2];
++c_7318689.elements[3] = len_73762_732988;
++c_7318689.elements[4] = ((closureN)self_7312362)->elements[3];
++c_7318689.elements[5] = ((closureN)self_7312362)->elements[4];
++c_7318689.elements[6] = ((closureN)self_7312362)->elements[6];
+
+
+-pair_type local_7320108;
+-return_direct_with_clo1(data,(closure)&c_7319989,__lambda_1414, set_cell_as_expr(&local_7320108, ((closureN)self_7313615)->elements[5]));;
++pair_type local_7318808;
++return_direct_with_clo1(data,(closure)&c_7318689,__lambda_1367, set_cell_as_expr(&local_7318808, ((closureN)self_7312362)->elements[5]));;
+ }
+
+-static void __lambda_1414(void *data, object self_7313616, int argc, object *args) /* object self_7313616, object start_73763_733336 */
++static void __lambda_1367(void *data, object self_7312363, int argc, object *args) /* object self_7312363, object start_73763_732989 */
+ {
+- object start_73763_733336 = args[0];
++ object start_73763_732989 = args[0];
+
+-closureN_type c_7319991;
+-object e_7320100 [7];
+-c_7319991.hdr.mark = gc_color_red;
+- c_7319991.hdr.grayed = 0;
+-c_7319991.tag = closureN_tag;
+- c_7319991.fn = (function_type)__lambda_1413;
+-c_7319991.num_args = 1;
+-c_7319991.num_elements = 7;
+-c_7319991.elements = (object *)e_7320100;
+-c_7319991.elements[0] = ((closureN)self_7313616)->elements[1];
+-c_7319991.elements[1] = ((closureN)self_7313616)->elements[2];
+-c_7319991.elements[2] = ((closureN)self_7313616)->elements[3];
+-c_7319991.elements[3] = ((closureN)self_7313616)->elements[4];
+-c_7319991.elements[4] = ((closureN)self_7313616)->elements[5];
+-c_7319991.elements[5] = start_73763_733336;
+-c_7319991.elements[6] = ((closureN)self_7313616)->elements[6];
++closureN_type c_7318691;
++object e_7318800 [7];
++c_7318691.hdr.mark = gc_color_red;
++ c_7318691.hdr.grayed = 0;
++c_7318691.tag = closureN_tag;
++ c_7318691.fn = (function_type)__lambda_1366;
++c_7318691.num_args = 1;
++c_7318691.num_elements = 7;
++c_7318691.elements = (object *)e_7318800;
++c_7318691.elements[0] = ((closureN)self_7312363)->elements[1];
++c_7318691.elements[1] = ((closureN)self_7312363)->elements[2];
++c_7318691.elements[2] = ((closureN)self_7312363)->elements[3];
++c_7318691.elements[3] = ((closureN)self_7312363)->elements[4];
++c_7318691.elements[4] = ((closureN)self_7312363)->elements[5];
++c_7318691.elements[5] = start_73763_732989;
++c_7318691.elements[6] = ((closureN)self_7312363)->elements[6];
+
+
+-pair_type local_7320103;
+-return_direct_with_clo1(data,(closure)&c_7319991,__lambda_1413, set_cell_as_expr(&local_7320103, ((closureN)self_7313616)->elements[0]));;
++pair_type local_7318803;
++return_direct_with_clo1(data,(closure)&c_7318691,__lambda_1366, set_cell_as_expr(&local_7318803, ((closureN)self_7312363)->elements[0]));;
+ }
+
+-static void __lambda_1413(void *data, object self_7313617, int argc, object *args) /* object self_7313617, object end_73764_733337 */
++static void __lambda_1366(void *data, object self_7312364, int argc, object *args) /* object self_7312364, object end_73764_732990 */
+ {
+- object end_73764_733337 = args[0];
++ object end_73764_732990 = args[0];
+
+-closureN_type c_7319993;
+-object e_7320095 [7];
+-c_7319993.hdr.mark = gc_color_red;
+- c_7319993.hdr.grayed = 0;
+-c_7319993.tag = closureN_tag;
+- c_7319993.fn = (function_type)__lambda_1412;
+-c_7319993.num_args = 1;
+-c_7319993.num_elements = 7;
+-c_7319993.elements = (object *)e_7320095;
+-c_7319993.elements[0] = end_73764_733337;
+-c_7319993.elements[1] = ((closureN)self_7313617)->elements[0];
+-c_7319993.elements[2] = ((closureN)self_7313617)->elements[1];
+-c_7319993.elements[3] = ((closureN)self_7313617)->elements[2];
+-c_7319993.elements[4] = ((closureN)self_7313617)->elements[4];
+-c_7319993.elements[5] = ((closureN)self_7313617)->elements[5];
+-c_7319993.elements[6] = ((closureN)self_7313617)->elements[6];
++closureN_type c_7318693;
++object e_7318795 [7];
++c_7318693.hdr.mark = gc_color_red;
++ c_7318693.hdr.grayed = 0;
++c_7318693.tag = closureN_tag;
++ c_7318693.fn = (function_type)__lambda_1365;
++c_7318693.num_args = 1;
++c_7318693.num_elements = 7;
++c_7318693.elements = (object *)e_7318795;
++c_7318693.elements[0] = end_73764_732990;
++c_7318693.elements[1] = ((closureN)self_7312364)->elements[0];
++c_7318693.elements[2] = ((closureN)self_7312364)->elements[1];
++c_7318693.elements[3] = ((closureN)self_7312364)->elements[2];
++c_7318693.elements[4] = ((closureN)self_7312364)->elements[4];
++c_7318693.elements[5] = ((closureN)self_7312364)->elements[5];
++c_7318693.elements[6] = ((closureN)self_7312364)->elements[6];
+
+
+-pair_type local_7320098;
+-return_direct_with_clo1(data,(closure)&c_7319993,__lambda_1412, set_cell_as_expr(&local_7320098, ((closureN)self_7313617)->elements[3]));;
++pair_type local_7318798;
++return_direct_with_clo1(data,(closure)&c_7318693,__lambda_1365, set_cell_as_expr(&local_7318798, ((closureN)self_7312364)->elements[3]));;
+ }
+
+-static void __lambda_1412(void *data, object self_7313618, int argc, object *args) /* object self_7313618, object loop_73765_733338 */
++static void __lambda_1365(void *data, object self_7312365, int argc, object *args) /* object self_7312365, object loop_73765_732991 */
+ {
+- object loop_73765_733338 = args[0];
++ object loop_73765_732991 = args[0];
+
+-closureN_type c_7319995;
+-object e_7320091 [8];
+-c_7319995.hdr.mark = gc_color_red;
+- c_7319995.hdr.grayed = 0;
+-c_7319995.tag = closureN_tag;
+- c_7319995.fn = (function_type)__lambda_614;
+-c_7319995.num_args = 1;
+-c_7319995.num_elements = 8;
+-c_7319995.elements = (object *)e_7320091;
+-c_7319995.elements[0] = ((closureN)self_7313618)->elements[0];
+-c_7319995.elements[1] = ((closureN)self_7313618)->elements[1];
+-c_7319995.elements[2] = ((closureN)self_7313618)->elements[2];
+-c_7319995.elements[3] = ((closureN)self_7313618)->elements[3];
+-c_7319995.elements[4] = loop_73765_733338;
+-c_7319995.elements[5] = ((closureN)self_7313618)->elements[4];
+-c_7319995.elements[6] = ((closureN)self_7313618)->elements[5];
+-c_7319995.elements[7] = ((closureN)self_7313618)->elements[6];
++closureN_type c_7318695;
++object e_7318791 [8];
++c_7318695.hdr.mark = gc_color_red;
++ c_7318695.hdr.grayed = 0;
++c_7318695.tag = closureN_tag;
++ c_7318695.fn = (function_type)__lambda_614;
++c_7318695.num_args = 1;
++c_7318695.num_elements = 8;
++c_7318695.elements = (object *)e_7318791;
++c_7318695.elements[0] = ((closureN)self_7312365)->elements[0];
++c_7318695.elements[1] = ((closureN)self_7312365)->elements[1];
++c_7318695.elements[2] = ((closureN)self_7312365)->elements[2];
++c_7318695.elements[3] = ((closureN)self_7312365)->elements[3];
++c_7318695.elements[4] = loop_73765_732991;
++c_7318695.elements[5] = ((closureN)self_7312365)->elements[4];
++c_7318695.elements[6] = ((closureN)self_7312365)->elements[5];
++c_7318695.elements[7] = ((closureN)self_7312365)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319995,__lambda_614, Cyc_vector_length(data, ((closureN)self_7313618)->elements[6]));;
++return_direct_with_clo1(data,(closure)&c_7318695,__lambda_614, Cyc_vector_length(data, ((closureN)self_7312365)->elements[6]));;
+ }
+
+-static void __lambda_614(void *data, object self_7313619, int argc, object *args) /* object self_7313619, object r_735693 */
++static void __lambda_614(void *data, object self_7312366, int argc, object *args) /* object self_7312366, object r_735241 */
+ {
+- object r_735693 = args[0];
++ object r_735241 = args[0];
+
+-closureN_type c_7319997;
+-object e_7320087 [8];
+-c_7319997.hdr.mark = gc_color_red;
+- c_7319997.hdr.grayed = 0;
+-c_7319997.tag = closureN_tag;
+- c_7319997.fn = (function_type)__lambda_615;
+-c_7319997.num_args = 1;
+-c_7319997.num_elements = 8;
+-c_7319997.elements = (object *)e_7320087;
+-c_7319997.elements[0] = ((closureN)self_7313619)->elements[0];
+-c_7319997.elements[1] = ((closureN)self_7313619)->elements[1];
+-c_7319997.elements[2] = ((closureN)self_7313619)->elements[2];
+-c_7319997.elements[3] = ((closureN)self_7313619)->elements[3];
+-c_7319997.elements[4] = ((closureN)self_7313619)->elements[4];
+-c_7319997.elements[5] = ((closureN)self_7313619)->elements[5];
+-c_7319997.elements[6] = ((closureN)self_7313619)->elements[6];
+-c_7319997.elements[7] = ((closureN)self_7313619)->elements[7];
++closureN_type c_7318697;
++object e_7318787 [8];
++c_7318697.hdr.mark = gc_color_red;
++ c_7318697.hdr.grayed = 0;
++c_7318697.tag = closureN_tag;
++ c_7318697.fn = (function_type)__lambda_615;
++c_7318697.num_args = 1;
++c_7318697.num_elements = 8;
++c_7318697.elements = (object *)e_7318787;
++c_7318697.elements[0] = ((closureN)self_7312366)->elements[0];
++c_7318697.elements[1] = ((closureN)self_7312366)->elements[1];
++c_7318697.elements[2] = ((closureN)self_7312366)->elements[2];
++c_7318697.elements[3] = ((closureN)self_7312366)->elements[3];
++c_7318697.elements[4] = ((closureN)self_7312366)->elements[4];
++c_7318697.elements[5] = ((closureN)self_7312366)->elements[5];
++c_7318697.elements[6] = ((closureN)self_7312366)->elements[6];
++c_7318697.elements[7] = ((closureN)self_7312366)->elements[7];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319997,__lambda_615, Cyc_set_cell(data, ((closureN)self_7313619)->elements[3], r_735693));;
++return_direct_with_clo1(data,(closure)&c_7318697,__lambda_615, Cyc_set_cell(data, ((closureN)self_7312366)->elements[3], r_735241));;
+ }
+
+-static void __lambda_615(void *data, object self_7313620, int argc, object *args) /* object self_7313620, object r_735676 */
++static void __lambda_615(void *data, object self_7312367, int argc, object *args) /* object self_7312367, object r_735224 */
+ {
+
+- object r_735689;
++ object r_735237;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313620)->elements[5]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312367)->elements[5]), obj_int2obj(0))) ){
+
+- r_735689 = Cyc_car(data, ((closureN)self_7313620)->elements[5]);
++ r_735237 = Cyc_car(data, ((closureN)self_7312367)->elements[5]);
+ } else {
+- r_735689 = obj_int2obj(0);}
++ r_735237 = obj_int2obj(0);}
+ ;
+-closureN_type c_7320010;
+-object e_7320083 [8];
+-c_7320010.hdr.mark = gc_color_red;
+- c_7320010.hdr.grayed = 0;
+-c_7320010.tag = closureN_tag;
+- c_7320010.fn = (function_type)__lambda_616;
+-c_7320010.num_args = 1;
+-c_7320010.num_elements = 8;
+-c_7320010.elements = (object *)e_7320083;
+-c_7320010.elements[0] = ((closureN)self_7313620)->elements[0];
+-c_7320010.elements[1] = ((closureN)self_7313620)->elements[1];
+-c_7320010.elements[2] = ((closureN)self_7313620)->elements[2];
+-c_7320010.elements[3] = ((closureN)self_7313620)->elements[3];
+-c_7320010.elements[4] = ((closureN)self_7313620)->elements[4];
+-c_7320010.elements[5] = ((closureN)self_7313620)->elements[5];
+-c_7320010.elements[6] = ((closureN)self_7313620)->elements[6];
+-c_7320010.elements[7] = ((closureN)self_7313620)->elements[7];
++closureN_type c_7318710;
++object e_7318783 [8];
++c_7318710.hdr.mark = gc_color_red;
++ c_7318710.hdr.grayed = 0;
++c_7318710.tag = closureN_tag;
++ c_7318710.fn = (function_type)__lambda_616;
++c_7318710.num_args = 1;
++c_7318710.num_elements = 8;
++c_7318710.elements = (object *)e_7318783;
++c_7318710.elements[0] = ((closureN)self_7312367)->elements[0];
++c_7318710.elements[1] = ((closureN)self_7312367)->elements[1];
++c_7318710.elements[2] = ((closureN)self_7312367)->elements[2];
++c_7318710.elements[3] = ((closureN)self_7312367)->elements[3];
++c_7318710.elements[4] = ((closureN)self_7312367)->elements[4];
++c_7318710.elements[5] = ((closureN)self_7312367)->elements[5];
++c_7318710.elements[6] = ((closureN)self_7312367)->elements[6];
++c_7318710.elements[7] = ((closureN)self_7312367)->elements[7];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320010,__lambda_616, Cyc_set_cell(data, ((closureN)self_7313620)->elements[6], r_735689));;
++return_direct_with_clo1(data,(closure)&c_7318710,__lambda_616, Cyc_set_cell(data, ((closureN)self_7312367)->elements[6], r_735237));;
+ }
+
+-static void __lambda_616(void *data, object self_7313621, int argc, object *args) /* object self_7313621, object r_735677 */
++static void __lambda_616(void *data, object self_7312368, int argc, object *args) /* object self_7312368, object r_735225 */
+ {
+
+
+-closureN_type c_7320012;
+-object e_7320026 [2];
+-c_7320012.hdr.mark = gc_color_red;
+- c_7320012.hdr.grayed = 0;
+-c_7320012.tag = closureN_tag;
+- c_7320012.fn = (function_type)__lambda_617;
+-c_7320012.num_args = 0;
+-c_7320012.num_elements = 2;
+-c_7320012.elements = (object *)e_7320026;
+-c_7320012.elements[0] = ((closureN)self_7313621)->elements[3];
+-c_7320012.elements[1] = ((closureN)self_7313621)->elements[5];
++closureN_type c_7318712;
++object e_7318726 [2];
++c_7318712.hdr.mark = gc_color_red;
++ c_7318712.hdr.grayed = 0;
++c_7318712.tag = closureN_tag;
++ c_7318712.fn = (function_type)__lambda_617;
++c_7318712.num_args = 0;
++c_7318712.num_elements = 2;
++c_7318712.elements = (object *)e_7318726;
++c_7318712.elements[0] = ((closureN)self_7312368)->elements[3];
++c_7318712.elements[1] = ((closureN)self_7312368)->elements[5];
+
+
+-closureN_type c_7320027;
+-object e_7320082 [6];
+-c_7320027.hdr.mark = gc_color_red;
+- c_7320027.hdr.grayed = 0;
+-c_7320027.tag = closureN_tag;
+- c_7320027.fn = (function_type)__lambda_618;
+-c_7320027.num_args = 1;
+-c_7320027.num_elements = 6;
+-c_7320027.elements = (object *)e_7320082;
+-c_7320027.elements[0] = ((closureN)self_7313621)->elements[0];
+-c_7320027.elements[1] = ((closureN)self_7313621)->elements[1];
+-c_7320027.elements[2] = ((closureN)self_7313621)->elements[2];
+-c_7320027.elements[3] = ((closureN)self_7313621)->elements[4];
+-c_7320027.elements[4] = ((closureN)self_7313621)->elements[6];
+-c_7320027.elements[5] = ((closureN)self_7313621)->elements[7];
++closureN_type c_7318727;
++object e_7318782 [6];
++c_7318727.hdr.mark = gc_color_red;
++ c_7318727.hdr.grayed = 0;
++c_7318727.tag = closureN_tag;
++ c_7318727.fn = (function_type)__lambda_618;
++c_7318727.num_args = 1;
++c_7318727.num_elements = 6;
++c_7318727.elements = (object *)e_7318782;
++c_7318727.elements[0] = ((closureN)self_7312368)->elements[0];
++c_7318727.elements[1] = ((closureN)self_7312368)->elements[1];
++c_7318727.elements[2] = ((closureN)self_7312368)->elements[2];
++c_7318727.elements[3] = ((closureN)self_7312368)->elements[4];
++c_7318727.elements[4] = ((closureN)self_7312368)->elements[6];
++c_7318727.elements[5] = ((closureN)self_7312368)->elements[7];
+
+-return_direct_with_clo1(data,(closure)&c_7320012,__lambda_617, &c_7320027);;
++return_direct_with_clo1(data,(closure)&c_7318712,__lambda_617, &c_7318727);;
+ }
+
+-static void __lambda_618(void *data, object self_7313622, int argc, object *args) /* object self_7313622, object r_735685 */
++static void __lambda_618(void *data, object self_7312369, int argc, object *args) /* object self_7312369, object r_735233 */
+ {
+- object r_735685 = args[0];
++ object r_735233 = args[0];
+
+-closureN_type c_7320029;
+-object e_7320078 [6];
+-c_7320029.hdr.mark = gc_color_red;
+- c_7320029.hdr.grayed = 0;
+-c_7320029.tag = closureN_tag;
+- c_7320029.fn = (function_type)__lambda_619;
+-c_7320029.num_args = 1;
+-c_7320029.num_elements = 6;
+-c_7320029.elements = (object *)e_7320078;
+-c_7320029.elements[0] = ((closureN)self_7313622)->elements[0];
+-c_7320029.elements[1] = ((closureN)self_7313622)->elements[1];
+-c_7320029.elements[2] = ((closureN)self_7313622)->elements[2];
+-c_7320029.elements[3] = ((closureN)self_7313622)->elements[3];
+-c_7320029.elements[4] = ((closureN)self_7313622)->elements[4];
+-c_7320029.elements[5] = ((closureN)self_7313622)->elements[5];
++closureN_type c_7318729;
++object e_7318778 [6];
++c_7318729.hdr.mark = gc_color_red;
++ c_7318729.hdr.grayed = 0;
++c_7318729.tag = closureN_tag;
++ c_7318729.fn = (function_type)__lambda_619;
++c_7318729.num_args = 1;
++c_7318729.num_elements = 6;
++c_7318729.elements = (object *)e_7318778;
++c_7318729.elements[0] = ((closureN)self_7312369)->elements[0];
++c_7318729.elements[1] = ((closureN)self_7312369)->elements[1];
++c_7318729.elements[2] = ((closureN)self_7312369)->elements[2];
++c_7318729.elements[3] = ((closureN)self_7312369)->elements[3];
++c_7318729.elements[4] = ((closureN)self_7312369)->elements[4];
++c_7318729.elements[5] = ((closureN)self_7312369)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320029,__lambda_619, Cyc_set_cell(data, ((closureN)self_7313622)->elements[0], r_735685));;
++return_direct_with_clo1(data,(closure)&c_7318729,__lambda_619, Cyc_set_cell(data, ((closureN)self_7312369)->elements[0], r_735233));;
+ }
+
+-static void __lambda_619(void *data, object self_7313623, int argc, object *args) /* object self_7313623, object r_735678 */
++static void __lambda_619(void *data, object self_7312370, int argc, object *args) /* object self_7312370, object r_735226 */
+ {
+
+
+-closureN_type c_7320031;
+-object e_7320046 [3];
+-c_7320031.hdr.mark = gc_color_red;
+- c_7320031.hdr.grayed = 0;
+-c_7320031.tag = closureN_tag;
+- c_7320031.fn = (function_type)__lambda_620;
+-c_7320031.num_args = 1;
+-c_7320031.num_elements = 3;
+-c_7320031.elements = (object *)e_7320046;
+-c_7320031.elements[0] = ((closureN)self_7313623)->elements[2];
+-c_7320031.elements[1] = ((closureN)self_7313623)->elements[3];
+-c_7320031.elements[2] = ((closureN)self_7313623)->elements[4];
++closureN_type c_7318731;
++object e_7318746 [3];
++c_7318731.hdr.mark = gc_color_red;
++ c_7318731.hdr.grayed = 0;
++c_7318731.tag = closureN_tag;
++ c_7318731.fn = (function_type)__lambda_620;
++c_7318731.num_args = 1;
++c_7318731.num_elements = 3;
++c_7318731.elements = (object *)e_7318746;
++c_7318731.elements[0] = ((closureN)self_7312370)->elements[2];
++c_7318731.elements[1] = ((closureN)self_7312370)->elements[3];
++c_7318731.elements[2] = ((closureN)self_7312370)->elements[4];
+
+
+-closureN_type c_7320047;
+-object e_7320077 [4];
+-c_7320047.hdr.mark = gc_color_red;
+- c_7320047.hdr.grayed = 0;
+-c_7320047.tag = closureN_tag;
+- c_7320047.fn = (function_type)__lambda_622;
+-c_7320047.num_args = 1;
+-c_7320047.num_elements = 4;
+-c_7320047.elements = (object *)e_7320077;
+-c_7320047.elements[0] = ((closureN)self_7313623)->elements[0];
+-c_7320047.elements[1] = ((closureN)self_7313623)->elements[1];
+-c_7320047.elements[2] = ((closureN)self_7313623)->elements[3];
+-c_7320047.elements[3] = ((closureN)self_7313623)->elements[5];
++closureN_type c_7318747;
++object e_7318777 [4];
++c_7318747.hdr.mark = gc_color_red;
++ c_7318747.hdr.grayed = 0;
++c_7318747.tag = closureN_tag;
++ c_7318747.fn = (function_type)__lambda_622;
++c_7318747.num_args = 1;
++c_7318747.num_elements = 4;
++c_7318747.elements = (object *)e_7318777;
++c_7318747.elements[0] = ((closureN)self_7312370)->elements[0];
++c_7318747.elements[1] = ((closureN)self_7312370)->elements[1];
++c_7318747.elements[2] = ((closureN)self_7312370)->elements[3];
++c_7318747.elements[3] = ((closureN)self_7312370)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7320031,__lambda_620, &c_7320047);;
++return_direct_with_clo1(data,(closure)&c_7318731,__lambda_620, &c_7318747);;
+ }
+
+-static void __lambda_622(void *data, object self_7313624, int argc, object *args) /* object self_7313624, object k_735681, object i_73766_733339 */
++static void __lambda_622(void *data, object self_7312371, int argc, object *args) /* object self_7312371, object k_735229, object i_73766_732992 */
+ {
+- object k_735681 = args[0]; object i_73766_733339 = args[1];
++ object k_735229 = args[0]; object i_73766_732992 = args[1];
+
+-closureN_type c_7320049;
+-object e_7320071 [5];
+-c_7320049.hdr.mark = gc_color_red;
+- c_7320049.hdr.grayed = 0;
+-c_7320049.tag = closureN_tag;
+- c_7320049.fn = (function_type)__lambda_623;
+-c_7320049.num_args = 1;
+-c_7320049.num_elements = 5;
+-c_7320049.elements = (object *)e_7320071;
+-c_7320049.elements[0] = ((closureN)self_7313624)->elements[1];
+-c_7320049.elements[1] = i_73766_733339;
+-c_7320049.elements[2] = k_735681;
+-c_7320049.elements[3] = ((closureN)self_7313624)->elements[2];
+-c_7320049.elements[4] = ((closureN)self_7313624)->elements[3];
++closureN_type c_7318749;
++object e_7318771 [5];
++c_7318749.hdr.mark = gc_color_red;
++ c_7318749.hdr.grayed = 0;
++c_7318749.tag = closureN_tag;
++ c_7318749.fn = (function_type)__lambda_623;
++c_7318749.num_args = 1;
++c_7318749.num_elements = 5;
++c_7318749.elements = (object *)e_7318771;
++c_7318749.elements[0] = ((closureN)self_7312371)->elements[1];
++c_7318749.elements[1] = i_73766_732992;
++c_7318749.elements[2] = k_735229;
++c_7318749.elements[3] = ((closureN)self_7312371)->elements[2];
++c_7318749.elements[4] = ((closureN)self_7312371)->elements[3];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320049,__lambda_623, Cyc_num_fast_eq_op(data, i_73766_733339, car(((closureN)self_7313624)->elements[0])));;
++return_direct_with_clo1(data,(closure)&c_7318749,__lambda_623, Cyc_num_fast_eq_op(data, i_73766_732992, car(((closureN)self_7312371)->elements[0])));;
+ }
+
+-static void __lambda_623(void *data, object self_7313625, int argc, object *args) /* object self_7313625, object r_735682 */
++static void __lambda_623(void *data, object self_7312372, int argc, object *args) /* object self_7312372, object r_735230 */
+ {
+- object r_735682 = args[0];
+- if( (boolean_f != r_735682) ){
+- return_direct_with_clo1(data, ((closureN)self_7313625)->elements[2], (((closure) ((closureN)self_7313625)->elements[2])->fn), ((closureN)self_7313625)->elements[4]);
++ object r_735230 = args[0];
++ if( (boolean_f != r_735230) ){
++ return_direct_with_clo1(data, ((closureN)self_7312372)->elements[2], (((closure) ((closureN)self_7312372)->elements[2])->fn), ((closureN)self_7312372)->elements[4]);
+ } else {
+
+-closureN_type c_7320054;
+-object e_7320064 [3];
+-c_7320054.hdr.mark = gc_color_red;
+- c_7320054.hdr.grayed = 0;
+-c_7320054.tag = closureN_tag;
+- c_7320054.fn = (function_type)__lambda_624;
+-c_7320054.num_args = 1;
+-c_7320054.num_elements = 3;
+-c_7320054.elements = (object *)e_7320064;
+-c_7320054.elements[0] = ((closureN)self_7313625)->elements[1];
+-c_7320054.elements[1] = ((closureN)self_7313625)->elements[2];
+-c_7320054.elements[2] = ((closureN)self_7313625)->elements[3];
++closureN_type c_7318754;
++object e_7318764 [3];
++c_7318754.hdr.mark = gc_color_red;
++ c_7318754.hdr.grayed = 0;
++c_7318754.tag = closureN_tag;
++ c_7318754.fn = (function_type)__lambda_624;
++c_7318754.num_args = 1;
++c_7318754.num_elements = 3;
++c_7318754.elements = (object *)e_7318764;
++c_7318754.elements[0] = ((closureN)self_7312372)->elements[1];
++c_7318754.elements[1] = ((closureN)self_7312372)->elements[2];
++c_7318754.elements[2] = ((closureN)self_7312372)->elements[3];
+
+
+-object c_7320067 = Cyc_vector_set_cps(data,(closure)&c_7320054,((closureN)self_7313625)->elements[4], ((closureN)self_7313625)->elements[1], ((closureN)self_7313625)->elements[0]);
+-return_closcall1(data,(closure)&c_7320054, c_7320067);}
++object c_7318767 = Cyc_vector_set_cps(data,(closure)&c_7318754,((closureN)self_7312372)->elements[4], ((closureN)self_7312372)->elements[1], ((closureN)self_7312372)->elements[0]);
++return_closcall1(data,(closure)&c_7318754, c_7318767);}
+ ;;
+ }
+
+-static void __lambda_624(void *data, object self_7313626, int argc, object *args) /* object self_7313626, object r_735683 */
++static void __lambda_624(void *data, object self_7312373, int argc, object *args) /* object self_7312373, object r_735231 */
+ {
+
+
+
+
+-complex_num_type local_7320062;
+-return_closcall2(data, car(((closureN)self_7313626)->elements[2]), ((closureN)self_7313626)->elements[1], Cyc_fast_sum(data,&local_7320062, ((closureN)self_7313626)->elements[0], obj_int2obj(1)));;
++complex_num_type local_7318762;
++return_closcall2(data, car(((closureN)self_7312373)->elements[2]), ((closureN)self_7312373)->elements[1], Cyc_fast_sum(data,&local_7318762, ((closureN)self_7312373)->elements[0], obj_int2obj(1)));;
+ }
+
+-static void __lambda_620(void *data, object self_7313627, int argc, object *args) /* object self_7313627, object r_735680 */
++static void __lambda_620(void *data, object self_7312374, int argc, object *args) /* object self_7312374, object r_735228 */
+ {
+- object r_735680 = args[0];
++ object r_735228 = args[0];
+
+-closureN_type c_7320033;
+-object e_7320042 [3];
+-c_7320033.hdr.mark = gc_color_red;
+- c_7320033.hdr.grayed = 0;
+-c_7320033.tag = closureN_tag;
+- c_7320033.fn = (function_type)__lambda_621;
+-c_7320033.num_args = 1;
+-c_7320033.num_elements = 3;
+-c_7320033.elements = (object *)e_7320042;
+-c_7320033.elements[0] = ((closureN)self_7313627)->elements[0];
+-c_7320033.elements[1] = ((closureN)self_7313627)->elements[1];
+-c_7320033.elements[2] = ((closureN)self_7313627)->elements[2];
++closureN_type c_7318733;
++object e_7318742 [3];
++c_7318733.hdr.mark = gc_color_red;
++ c_7318733.hdr.grayed = 0;
++c_7318733.tag = closureN_tag;
++ c_7318733.fn = (function_type)__lambda_621;
++c_7318733.num_args = 1;
++c_7318733.num_elements = 3;
++c_7318733.elements = (object *)e_7318742;
++c_7318733.elements[0] = ((closureN)self_7312374)->elements[0];
++c_7318733.elements[1] = ((closureN)self_7312374)->elements[1];
++c_7318733.elements[2] = ((closureN)self_7312374)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7320033,__lambda_621, Cyc_set_cell(data, ((closureN)self_7313627)->elements[1], r_735680));;
++return_direct_with_clo1(data,(closure)&c_7318733,__lambda_621, Cyc_set_cell(data, ((closureN)self_7312374)->elements[1], r_735228));;
+ }
+
+-static void __lambda_621(void *data, object self_7313628, int argc, object *args) /* object self_7313628, object r_735679 */
++static void __lambda_621(void *data, object self_7312375, int argc, object *args) /* object self_7312375, object r_735227 */
+ {
+
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313628)->elements[1]), ((closureN)self_7313628)->elements[0], car(((closureN)self_7313628)->elements[2]));;
++return_closcall2(data, car(((closureN)self_7312375)->elements[1]), ((closureN)self_7312375)->elements[0], car(((closureN)self_7312375)->elements[2]));;
+ }
+
+-static void __lambda_617(void *data, object self_7313629, int argc, object *args) /* object self_7313629, object k_735686 */
++static void __lambda_617(void *data, object self_7312376, int argc, object *args) /* object self_7312376, object k_735234 */
+ {
+- object k_735686 = args[0];
++ object k_735234 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313629)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312376)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735686,__lambda_618, Cyc_cadr(data, ((closureN)self_7313629)->elements[1]));
++return_direct_with_clo1(data, k_735234,__lambda_618, Cyc_cadr(data, ((closureN)self_7312376)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735686,__lambda_618, car(((closureN)self_7313629)->elements[0]));}
++return_direct_with_clo1(data, k_735234,__lambda_618, car(((closureN)self_7312376)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_601(void *data, object _, int argc, object *args) /* closure _,object k_735652, object to_73745_733322, object at_73746_733323, object from_73747_733324, object opts_73748_733325_raw, ... */
++static void __lambda_601(void *data, object _, int argc, object *args) /* closure _,object k_735200, object to_73745_732975, object at_73746_732976, object from_73747_732977, object opts_73748_732978_raw, ... */
+ {
+-object k_735652 = args[0]; object to_73745_733322 = args[1]; object at_73746_733323 = args[2]; object from_73747_733324 = args[3];
+-load_varargs(opts_73748_733325, args, 4, argc - 4);
++object k_735200 = args[0]; object to_73745_732975 = args[1]; object at_73746_732976 = args[2]; object from_73747_732977 = args[3];
++load_varargs(opts_73748_732978, args, 4, argc - 4);
+ Cyc_st_add(data, "scheme/base.sld:vector-copy!");
+
+-closureN_type c_7319854;
+-object e_7319982 [5];
+-c_7319854.hdr.mark = gc_color_red;
+- c_7319854.hdr.grayed = 0;
+-c_7319854.tag = closureN_tag;
+- c_7319854.fn = (function_type)__lambda_602;
+-c_7319854.num_args = 4;
+-c_7319854.num_elements = 5;
+-c_7319854.elements = (object *)e_7319982;
+-c_7319854.elements[0] = at_73746_733323;
+-c_7319854.elements[1] = from_73747_733324;
+-c_7319854.elements[2] = k_735652;
+-c_7319854.elements[3] = opts_73748_733325;
+-c_7319854.elements[4] = to_73745_733322;
+-
+-return_direct_with_clo4(data,(closure)&c_7319854,__lambda_602, boolean_f, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_602(void *data, object self_7313600, int argc, object *args) /* object self_7313600, object len_73749_733326, object start_73750_733327, object end_73751_733328, object loop_73752_733329 */
+- {
+- object len_73749_733326 = args[0]; object start_73750_733327 = args[1]; object end_73751_733328 = args[2]; object loop_73752_733329 = args[3];
+-
+-closureN_type c_7319856;
+-object e_7319978 [8];
+-c_7319856.hdr.mark = gc_color_red;
+- c_7319856.hdr.grayed = 0;
+-c_7319856.tag = closureN_tag;
+- c_7319856.fn = (function_type)__lambda_1411;
+-c_7319856.num_args = 1;
+-c_7319856.num_elements = 8;
+-c_7319856.elements = (object *)e_7319978;
+-c_7319856.elements[0] = ((closureN)self_7313600)->elements[0];
+-c_7319856.elements[1] = end_73751_733328;
+-c_7319856.elements[2] = ((closureN)self_7313600)->elements[1];
+-c_7319856.elements[3] = ((closureN)self_7313600)->elements[2];
+-c_7319856.elements[4] = loop_73752_733329;
+-c_7319856.elements[5] = ((closureN)self_7313600)->elements[3];
+-c_7319856.elements[6] = start_73750_733327;
+-c_7319856.elements[7] = ((closureN)self_7313600)->elements[4];
+-
+-
+-pair_type local_7319981;
+-return_direct_with_clo1(data,(closure)&c_7319856,__lambda_1411, set_cell_as_expr(&local_7319981, len_73749_733326));;
+-}
+-
+-static void __lambda_1411(void *data, object self_7313601, int argc, object *args) /* object self_7313601, object len_73749_733326 */
+- {
+- object len_73749_733326 = args[0];
+-
+-closureN_type c_7319858;
+-object e_7319973 [8];
+-c_7319858.hdr.mark = gc_color_red;
+- c_7319858.hdr.grayed = 0;
+-c_7319858.tag = closureN_tag;
+- c_7319858.fn = (function_type)__lambda_1410;
+-c_7319858.num_args = 1;
+-c_7319858.num_elements = 8;
+-c_7319858.elements = (object *)e_7319973;
+-c_7319858.elements[0] = ((closureN)self_7313601)->elements[0];
+-c_7319858.elements[1] = ((closureN)self_7313601)->elements[1];
+-c_7319858.elements[2] = ((closureN)self_7313601)->elements[2];
+-c_7319858.elements[3] = ((closureN)self_7313601)->elements[3];
+-c_7319858.elements[4] = len_73749_733326;
+-c_7319858.elements[5] = ((closureN)self_7313601)->elements[4];
+-c_7319858.elements[6] = ((closureN)self_7313601)->elements[5];
+-c_7319858.elements[7] = ((closureN)self_7313601)->elements[7];
+-
+-
+-pair_type local_7319976;
+-return_direct_with_clo1(data,(closure)&c_7319858,__lambda_1410, set_cell_as_expr(&local_7319976, ((closureN)self_7313601)->elements[6]));;
+-}
+-
+-static void __lambda_1410(void *data, object self_7313602, int argc, object *args) /* object self_7313602, object start_73750_733327 */
+- {
+- object start_73750_733327 = args[0];
+-
+-closureN_type c_7319860;
+-object e_7319968 [8];
+-c_7319860.hdr.mark = gc_color_red;
+- c_7319860.hdr.grayed = 0;
+-c_7319860.tag = closureN_tag;
+- c_7319860.fn = (function_type)__lambda_1409;
+-c_7319860.num_args = 1;
+-c_7319860.num_elements = 8;
+-c_7319860.elements = (object *)e_7319968;
+-c_7319860.elements[0] = ((closureN)self_7313602)->elements[0];
+-c_7319860.elements[1] = ((closureN)self_7313602)->elements[2];
+-c_7319860.elements[2] = ((closureN)self_7313602)->elements[3];
+-c_7319860.elements[3] = ((closureN)self_7313602)->elements[4];
+-c_7319860.elements[4] = ((closureN)self_7313602)->elements[5];
+-c_7319860.elements[5] = ((closureN)self_7313602)->elements[6];
+-c_7319860.elements[6] = start_73750_733327;
+-c_7319860.elements[7] = ((closureN)self_7313602)->elements[7];
+-
+-
+-pair_type local_7319971;
+-return_direct_with_clo1(data,(closure)&c_7319860,__lambda_1409, set_cell_as_expr(&local_7319971, ((closureN)self_7313602)->elements[1]));;
+-}
+-
+-static void __lambda_1409(void *data, object self_7313603, int argc, object *args) /* object self_7313603, object end_73751_733328 */
+- {
+- object end_73751_733328 = args[0];
+-
+-closureN_type c_7319862;
+-object e_7319963 [8];
+-c_7319862.hdr.mark = gc_color_red;
+- c_7319862.hdr.grayed = 0;
+-c_7319862.tag = closureN_tag;
+- c_7319862.fn = (function_type)__lambda_1408;
+-c_7319862.num_args = 1;
+-c_7319862.num_elements = 8;
+-c_7319862.elements = (object *)e_7319963;
+-c_7319862.elements[0] = ((closureN)self_7313603)->elements[0];
+-c_7319862.elements[1] = end_73751_733328;
+-c_7319862.elements[2] = ((closureN)self_7313603)->elements[1];
+-c_7319862.elements[3] = ((closureN)self_7313603)->elements[2];
+-c_7319862.elements[4] = ((closureN)self_7313603)->elements[3];
+-c_7319862.elements[5] = ((closureN)self_7313603)->elements[5];
+-c_7319862.elements[6] = ((closureN)self_7313603)->elements[6];
+-c_7319862.elements[7] = ((closureN)self_7313603)->elements[7];
+-
+-
+-pair_type local_7319966;
+-return_direct_with_clo1(data,(closure)&c_7319862,__lambda_1408, set_cell_as_expr(&local_7319966, ((closureN)self_7313603)->elements[4]));;
+-}
+-
+-static void __lambda_1408(void *data, object self_7313604, int argc, object *args) /* object self_7313604, object loop_73752_733329 */
+- {
+- object loop_73752_733329 = args[0];
+-
+-closureN_type c_7319864;
+-object e_7319956 [9];
+-c_7319864.hdr.mark = gc_color_red;
+- c_7319864.hdr.grayed = 0;
+-c_7319864.tag = closureN_tag;
+- c_7319864.fn = (function_type)__lambda_603;
+-c_7319864.num_args = 1;
+-c_7319864.num_elements = 9;
+-c_7319864.elements = (object *)e_7319956;
+-c_7319864.elements[0] = ((closureN)self_7313604)->elements[0];
+-c_7319864.elements[1] = ((closureN)self_7313604)->elements[1];
+-c_7319864.elements[2] = ((closureN)self_7313604)->elements[2];
+-c_7319864.elements[3] = ((closureN)self_7313604)->elements[3];
+-c_7319864.elements[4] = ((closureN)self_7313604)->elements[4];
+-c_7319864.elements[5] = loop_73752_733329;
+-c_7319864.elements[6] = ((closureN)self_7313604)->elements[5];
+-c_7319864.elements[7] = ((closureN)self_7313604)->elements[6];
+-c_7319864.elements[8] = ((closureN)self_7313604)->elements[7];
+-
+-
+-
+-
+-
+-return_direct_with_clo1(data,(closure)&c_7319864,__lambda_603, Cyc_set_cell(data, ((closureN)self_7313604)->elements[4], Cyc_vector_length(data, ((closureN)self_7313604)->elements[2])));;
+-}
+-
+-static void __lambda_603(void *data, object self_7313605, int argc, object *args) /* object self_7313605, object r_735653 */
+- {
+-
+- object r_735668;
+-
+-
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313605)->elements[6]), obj_int2obj(0))) ){
+-
+- r_735668 = Cyc_car(data, ((closureN)self_7313605)->elements[6]);
+-} else {
+- r_735668 = obj_int2obj(0);}
+-;
+-closureN_type c_7319877;
+-object e_7319952 [9];
+-c_7319877.hdr.mark = gc_color_red;
+- c_7319877.hdr.grayed = 0;
+-c_7319877.tag = closureN_tag;
+- c_7319877.fn = (function_type)__lambda_604;
+-c_7319877.num_args = 1;
+-c_7319877.num_elements = 9;
+-c_7319877.elements = (object *)e_7319952;
+-c_7319877.elements[0] = ((closureN)self_7313605)->elements[0];
+-c_7319877.elements[1] = ((closureN)self_7313605)->elements[1];
+-c_7319877.elements[2] = ((closureN)self_7313605)->elements[2];
+-c_7319877.elements[3] = ((closureN)self_7313605)->elements[3];
+-c_7319877.elements[4] = ((closureN)self_7313605)->elements[4];
+-c_7319877.elements[5] = ((closureN)self_7313605)->elements[5];
+-c_7319877.elements[6] = ((closureN)self_7313605)->elements[6];
+-c_7319877.elements[7] = ((closureN)self_7313605)->elements[7];
+-c_7319877.elements[8] = ((closureN)self_7313605)->elements[8];
+-
++closureN_type c_7318554;
++object e_7318682 [5];
++c_7318554.hdr.mark = gc_color_red;
++ c_7318554.hdr.grayed = 0;
++c_7318554.tag = closureN_tag;
++ c_7318554.fn = (function_type)__lambda_602;
++c_7318554.num_args = 4;
++c_7318554.num_elements = 5;
++c_7318554.elements = (object *)e_7318682;
++c_7318554.elements[0] = at_73746_732976;
++c_7318554.elements[1] = from_73747_732977;
++c_7318554.elements[2] = k_735200;
++c_7318554.elements[3] = opts_73748_732978;
++c_7318554.elements[4] = to_73745_732975;
++
++return_direct_with_clo4(data,(closure)&c_7318554,__lambda_602, boolean_f, boolean_f, boolean_f, boolean_f);;
++}
++
++static void __lambda_602(void *data, object self_7312347, int argc, object *args) /* object self_7312347, object len_73749_732979, object start_73750_732980, object end_73751_732981, object loop_73752_732982 */
++ {
++ object len_73749_732979 = args[0]; object start_73750_732980 = args[1]; object end_73751_732981 = args[2]; object loop_73752_732982 = args[3];
++
++closureN_type c_7318556;
++object e_7318678 [8];
++c_7318556.hdr.mark = gc_color_red;
++ c_7318556.hdr.grayed = 0;
++c_7318556.tag = closureN_tag;
++ c_7318556.fn = (function_type)__lambda_1364;
++c_7318556.num_args = 1;
++c_7318556.num_elements = 8;
++c_7318556.elements = (object *)e_7318678;
++c_7318556.elements[0] = ((closureN)self_7312347)->elements[0];
++c_7318556.elements[1] = end_73751_732981;
++c_7318556.elements[2] = ((closureN)self_7312347)->elements[1];
++c_7318556.elements[3] = ((closureN)self_7312347)->elements[2];
++c_7318556.elements[4] = loop_73752_732982;
++c_7318556.elements[5] = ((closureN)self_7312347)->elements[3];
++c_7318556.elements[6] = start_73750_732980;
++c_7318556.elements[7] = ((closureN)self_7312347)->elements[4];
++
++
++pair_type local_7318681;
++return_direct_with_clo1(data,(closure)&c_7318556,__lambda_1364, set_cell_as_expr(&local_7318681, len_73749_732979));;
++}
++
++static void __lambda_1364(void *data, object self_7312348, int argc, object *args) /* object self_7312348, object len_73749_732979 */
++ {
++ object len_73749_732979 = args[0];
++
++closureN_type c_7318558;
++object e_7318673 [8];
++c_7318558.hdr.mark = gc_color_red;
++ c_7318558.hdr.grayed = 0;
++c_7318558.tag = closureN_tag;
++ c_7318558.fn = (function_type)__lambda_1363;
++c_7318558.num_args = 1;
++c_7318558.num_elements = 8;
++c_7318558.elements = (object *)e_7318673;
++c_7318558.elements[0] = ((closureN)self_7312348)->elements[0];
++c_7318558.elements[1] = ((closureN)self_7312348)->elements[1];
++c_7318558.elements[2] = ((closureN)self_7312348)->elements[2];
++c_7318558.elements[3] = ((closureN)self_7312348)->elements[3];
++c_7318558.elements[4] = len_73749_732979;
++c_7318558.elements[5] = ((closureN)self_7312348)->elements[4];
++c_7318558.elements[6] = ((closureN)self_7312348)->elements[5];
++c_7318558.elements[7] = ((closureN)self_7312348)->elements[7];
++
++
++pair_type local_7318676;
++return_direct_with_clo1(data,(closure)&c_7318558,__lambda_1363, set_cell_as_expr(&local_7318676, ((closureN)self_7312348)->elements[6]));;
++}
++
++static void __lambda_1363(void *data, object self_7312349, int argc, object *args) /* object self_7312349, object start_73750_732980 */
++ {
++ object start_73750_732980 = args[0];
++
++closureN_type c_7318560;
++object e_7318668 [8];
++c_7318560.hdr.mark = gc_color_red;
++ c_7318560.hdr.grayed = 0;
++c_7318560.tag = closureN_tag;
++ c_7318560.fn = (function_type)__lambda_1362;
++c_7318560.num_args = 1;
++c_7318560.num_elements = 8;
++c_7318560.elements = (object *)e_7318668;
++c_7318560.elements[0] = ((closureN)self_7312349)->elements[0];
++c_7318560.elements[1] = ((closureN)self_7312349)->elements[2];
++c_7318560.elements[2] = ((closureN)self_7312349)->elements[3];
++c_7318560.elements[3] = ((closureN)self_7312349)->elements[4];
++c_7318560.elements[4] = ((closureN)self_7312349)->elements[5];
++c_7318560.elements[5] = ((closureN)self_7312349)->elements[6];
++c_7318560.elements[6] = start_73750_732980;
++c_7318560.elements[7] = ((closureN)self_7312349)->elements[7];
++
++
++pair_type local_7318671;
++return_direct_with_clo1(data,(closure)&c_7318560,__lambda_1362, set_cell_as_expr(&local_7318671, ((closureN)self_7312349)->elements[1]));;
++}
++
++static void __lambda_1362(void *data, object self_7312350, int argc, object *args) /* object self_7312350, object end_73751_732981 */
++ {
++ object end_73751_732981 = args[0];
++
++closureN_type c_7318562;
++object e_7318663 [8];
++c_7318562.hdr.mark = gc_color_red;
++ c_7318562.hdr.grayed = 0;
++c_7318562.tag = closureN_tag;
++ c_7318562.fn = (function_type)__lambda_1361;
++c_7318562.num_args = 1;
++c_7318562.num_elements = 8;
++c_7318562.elements = (object *)e_7318663;
++c_7318562.elements[0] = ((closureN)self_7312350)->elements[0];
++c_7318562.elements[1] = end_73751_732981;
++c_7318562.elements[2] = ((closureN)self_7312350)->elements[1];
++c_7318562.elements[3] = ((closureN)self_7312350)->elements[2];
++c_7318562.elements[4] = ((closureN)self_7312350)->elements[3];
++c_7318562.elements[5] = ((closureN)self_7312350)->elements[5];
++c_7318562.elements[6] = ((closureN)self_7312350)->elements[6];
++c_7318562.elements[7] = ((closureN)self_7312350)->elements[7];
++
++
++pair_type local_7318666;
++return_direct_with_clo1(data,(closure)&c_7318562,__lambda_1361, set_cell_as_expr(&local_7318666, ((closureN)self_7312350)->elements[4]));;
++}
++
++static void __lambda_1361(void *data, object self_7312351, int argc, object *args) /* object self_7312351, object loop_73752_732982 */
++ {
++ object loop_73752_732982 = args[0];
++
++closureN_type c_7318564;
++object e_7318656 [9];
++c_7318564.hdr.mark = gc_color_red;
++ c_7318564.hdr.grayed = 0;
++c_7318564.tag = closureN_tag;
++ c_7318564.fn = (function_type)__lambda_603;
++c_7318564.num_args = 1;
++c_7318564.num_elements = 9;
++c_7318564.elements = (object *)e_7318656;
++c_7318564.elements[0] = ((closureN)self_7312351)->elements[0];
++c_7318564.elements[1] = ((closureN)self_7312351)->elements[1];
++c_7318564.elements[2] = ((closureN)self_7312351)->elements[2];
++c_7318564.elements[3] = ((closureN)self_7312351)->elements[3];
++c_7318564.elements[4] = ((closureN)self_7312351)->elements[4];
++c_7318564.elements[5] = loop_73752_732982;
++c_7318564.elements[6] = ((closureN)self_7312351)->elements[5];
++c_7318564.elements[7] = ((closureN)self_7312351)->elements[6];
++c_7318564.elements[8] = ((closureN)self_7312351)->elements[7];
+
+
+-return_direct_with_clo1(data,(closure)&c_7319877,__lambda_604, Cyc_set_cell(data, ((closureN)self_7313605)->elements[7], r_735668));;
+-}
+-
+-static void __lambda_604(void *data, object self_7313606, int argc, object *args) /* object self_7313606, object r_735654 */
+- {
+
+-
+-closureN_type c_7319879;
+-object e_7319893 [2];
+-c_7319879.hdr.mark = gc_color_red;
+- c_7319879.hdr.grayed = 0;
+-c_7319879.tag = closureN_tag;
+- c_7319879.fn = (function_type)__lambda_605;
+-c_7319879.num_args = 0;
+-c_7319879.num_elements = 2;
+-c_7319879.elements = (object *)e_7319893;
+-c_7319879.elements[0] = ((closureN)self_7313606)->elements[4];
+-c_7319879.elements[1] = ((closureN)self_7313606)->elements[6];
+
+
+-closureN_type c_7319894;
+-object e_7319951 [7];
+-c_7319894.hdr.mark = gc_color_red;
+- c_7319894.hdr.grayed = 0;
+-c_7319894.tag = closureN_tag;
+- c_7319894.fn = (function_type)__lambda_606;
+-c_7319894.num_args = 1;
+-c_7319894.num_elements = 7;
+-c_7319894.elements = (object *)e_7319951;
+-c_7319894.elements[0] = ((closureN)self_7313606)->elements[0];
+-c_7319894.elements[1] = ((closureN)self_7313606)->elements[1];
+-c_7319894.elements[2] = ((closureN)self_7313606)->elements[2];
+-c_7319894.elements[3] = ((closureN)self_7313606)->elements[3];
+-c_7319894.elements[4] = ((closureN)self_7313606)->elements[5];
+-c_7319894.elements[5] = ((closureN)self_7313606)->elements[7];
+-c_7319894.elements[6] = ((closureN)self_7313606)->elements[8];
++return_direct_with_clo1(data,(closure)&c_7318564,__lambda_603, Cyc_set_cell(data, ((closureN)self_7312351)->elements[4], Cyc_vector_length(data, ((closureN)self_7312351)->elements[2])));;
++}
++
++static void __lambda_603(void *data, object self_7312352, int argc, object *args) /* object self_7312352, object r_735201 */
++ {
++
++ object r_735216;
++
++
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312352)->elements[6]), obj_int2obj(0))) ){
++
++ r_735216 = Cyc_car(data, ((closureN)self_7312352)->elements[6]);
++} else {
++ r_735216 = obj_int2obj(0);}
++;
++closureN_type c_7318577;
++object e_7318652 [9];
++c_7318577.hdr.mark = gc_color_red;
++ c_7318577.hdr.grayed = 0;
++c_7318577.tag = closureN_tag;
++ c_7318577.fn = (function_type)__lambda_604;
++c_7318577.num_args = 1;
++c_7318577.num_elements = 9;
++c_7318577.elements = (object *)e_7318652;
++c_7318577.elements[0] = ((closureN)self_7312352)->elements[0];
++c_7318577.elements[1] = ((closureN)self_7312352)->elements[1];
++c_7318577.elements[2] = ((closureN)self_7312352)->elements[2];
++c_7318577.elements[3] = ((closureN)self_7312352)->elements[3];
++c_7318577.elements[4] = ((closureN)self_7312352)->elements[4];
++c_7318577.elements[5] = ((closureN)self_7312352)->elements[5];
++c_7318577.elements[6] = ((closureN)self_7312352)->elements[6];
++c_7318577.elements[7] = ((closureN)self_7312352)->elements[7];
++c_7318577.elements[8] = ((closureN)self_7312352)->elements[8];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7318577,__lambda_604, Cyc_set_cell(data, ((closureN)self_7312352)->elements[7], r_735216));;
++}
++
++static void __lambda_604(void *data, object self_7312353, int argc, object *args) /* object self_7312353, object r_735202 */
++ {
++
++
++closureN_type c_7318579;
++object e_7318593 [2];
++c_7318579.hdr.mark = gc_color_red;
++ c_7318579.hdr.grayed = 0;
++c_7318579.tag = closureN_tag;
++ c_7318579.fn = (function_type)__lambda_605;
++c_7318579.num_args = 0;
++c_7318579.num_elements = 2;
++c_7318579.elements = (object *)e_7318593;
++c_7318579.elements[0] = ((closureN)self_7312353)->elements[4];
++c_7318579.elements[1] = ((closureN)self_7312353)->elements[6];
++
++
++closureN_type c_7318594;
++object e_7318651 [7];
++c_7318594.hdr.mark = gc_color_red;
++ c_7318594.hdr.grayed = 0;
++c_7318594.tag = closureN_tag;
++ c_7318594.fn = (function_type)__lambda_606;
++c_7318594.num_args = 1;
++c_7318594.num_elements = 7;
++c_7318594.elements = (object *)e_7318651;
++c_7318594.elements[0] = ((closureN)self_7312353)->elements[0];
++c_7318594.elements[1] = ((closureN)self_7312353)->elements[1];
++c_7318594.elements[2] = ((closureN)self_7312353)->elements[2];
++c_7318594.elements[3] = ((closureN)self_7312353)->elements[3];
++c_7318594.elements[4] = ((closureN)self_7312353)->elements[5];
++c_7318594.elements[5] = ((closureN)self_7312353)->elements[7];
++c_7318594.elements[6] = ((closureN)self_7312353)->elements[8];
+
+-return_direct_with_clo1(data,(closure)&c_7319879,__lambda_605, &c_7319894);;
++return_direct_with_clo1(data,(closure)&c_7318579,__lambda_605, &c_7318594);;
+ }
+
+-static void __lambda_606(void *data, object self_7313607, int argc, object *args) /* object self_7313607, object r_735664 */
++static void __lambda_606(void *data, object self_7312354, int argc, object *args) /* object self_7312354, object r_735212 */
+ {
+- object r_735664 = args[0];
++ object r_735212 = args[0];
+
+-closureN_type c_7319896;
+-object e_7319947 [7];
+-c_7319896.hdr.mark = gc_color_red;
+- c_7319896.hdr.grayed = 0;
+-c_7319896.tag = closureN_tag;
+- c_7319896.fn = (function_type)__lambda_607;
+-c_7319896.num_args = 1;
+-c_7319896.num_elements = 7;
+-c_7319896.elements = (object *)e_7319947;
+-c_7319896.elements[0] = ((closureN)self_7313607)->elements[0];
+-c_7319896.elements[1] = ((closureN)self_7313607)->elements[1];
+-c_7319896.elements[2] = ((closureN)self_7313607)->elements[2];
+-c_7319896.elements[3] = ((closureN)self_7313607)->elements[3];
+-c_7319896.elements[4] = ((closureN)self_7313607)->elements[4];
+-c_7319896.elements[5] = ((closureN)self_7313607)->elements[5];
+-c_7319896.elements[6] = ((closureN)self_7313607)->elements[6];
++closureN_type c_7318596;
++object e_7318647 [7];
++c_7318596.hdr.mark = gc_color_red;
++ c_7318596.hdr.grayed = 0;
++c_7318596.tag = closureN_tag;
++ c_7318596.fn = (function_type)__lambda_607;
++c_7318596.num_args = 1;
++c_7318596.num_elements = 7;
++c_7318596.elements = (object *)e_7318647;
++c_7318596.elements[0] = ((closureN)self_7312354)->elements[0];
++c_7318596.elements[1] = ((closureN)self_7312354)->elements[1];
++c_7318596.elements[2] = ((closureN)self_7312354)->elements[2];
++c_7318596.elements[3] = ((closureN)self_7312354)->elements[3];
++c_7318596.elements[4] = ((closureN)self_7312354)->elements[4];
++c_7318596.elements[5] = ((closureN)self_7312354)->elements[5];
++c_7318596.elements[6] = ((closureN)self_7312354)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319896,__lambda_607, Cyc_set_cell(data, ((closureN)self_7313607)->elements[1], r_735664));;
++return_direct_with_clo1(data,(closure)&c_7318596,__lambda_607, Cyc_set_cell(data, ((closureN)self_7312354)->elements[1], r_735212));;
+ }
+
+-static void __lambda_607(void *data, object self_7313608, int argc, object *args) /* object self_7313608, object r_735655 */
++static void __lambda_607(void *data, object self_7312355, int argc, object *args) /* object self_7312355, object r_735203 */
+ {
+
+
+-closureN_type c_7319898;
+-object e_7319914 [4];
+-c_7319898.hdr.mark = gc_color_red;
+- c_7319898.hdr.grayed = 0;
+-c_7319898.tag = closureN_tag;
+- c_7319898.fn = (function_type)__lambda_608;
+-c_7319898.num_args = 1;
+-c_7319898.num_elements = 4;
+-c_7319898.elements = (object *)e_7319914;
+-c_7319898.elements[0] = ((closureN)self_7313608)->elements[0];
+-c_7319898.elements[1] = ((closureN)self_7313608)->elements[3];
+-c_7319898.elements[2] = ((closureN)self_7313608)->elements[4];
+-c_7319898.elements[3] = ((closureN)self_7313608)->elements[5];
++closureN_type c_7318598;
++object e_7318614 [4];
++c_7318598.hdr.mark = gc_color_red;
++ c_7318598.hdr.grayed = 0;
++c_7318598.tag = closureN_tag;
++ c_7318598.fn = (function_type)__lambda_608;
++c_7318598.num_args = 1;
++c_7318598.num_elements = 4;
++c_7318598.elements = (object *)e_7318614;
++c_7318598.elements[0] = ((closureN)self_7312355)->elements[0];
++c_7318598.elements[1] = ((closureN)self_7312355)->elements[3];
++c_7318598.elements[2] = ((closureN)self_7312355)->elements[4];
++c_7318598.elements[3] = ((closureN)self_7312355)->elements[5];
+
+
+-closureN_type c_7319915;
+-object e_7319946 [4];
+-c_7319915.hdr.mark = gc_color_red;
+- c_7319915.hdr.grayed = 0;
+-c_7319915.tag = closureN_tag;
+- c_7319915.fn = (function_type)__lambda_610;
+-c_7319915.num_args = 2;
+-c_7319915.num_elements = 4;
+-c_7319915.elements = (object *)e_7319946;
+-c_7319915.elements[0] = ((closureN)self_7313608)->elements[1];
+-c_7319915.elements[1] = ((closureN)self_7313608)->elements[2];
+-c_7319915.elements[2] = ((closureN)self_7313608)->elements[4];
+-c_7319915.elements[3] = ((closureN)self_7313608)->elements[6];
++closureN_type c_7318615;
++object e_7318646 [4];
++c_7318615.hdr.mark = gc_color_red;
++ c_7318615.hdr.grayed = 0;
++c_7318615.tag = closureN_tag;
++ c_7318615.fn = (function_type)__lambda_610;
++c_7318615.num_args = 2;
++c_7318615.num_elements = 4;
++c_7318615.elements = (object *)e_7318646;
++c_7318615.elements[0] = ((closureN)self_7312355)->elements[1];
++c_7318615.elements[1] = ((closureN)self_7312355)->elements[2];
++c_7318615.elements[2] = ((closureN)self_7312355)->elements[4];
++c_7318615.elements[3] = ((closureN)self_7312355)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7319898,__lambda_608, &c_7319915);;
++return_direct_with_clo1(data,(closure)&c_7318598,__lambda_608, &c_7318615);;
+ }
+
+-static void __lambda_610(void *data, object self_7313609, int argc, object *args) /* object self_7313609, object k_735658, object i_91at_73753_733330, object i_91from_73754_733331 */
++static void __lambda_610(void *data, object self_7312356, int argc, object *args) /* object self_7312356, object k_735206, object i_91at_73753_732983, object i_91from_73754_732984 */
+ {
+- object k_735658 = args[0]; object i_91at_73753_733330 = args[1]; object i_91from_73754_733331 = args[2];
++ object k_735206 = args[0]; object i_91at_73753_732983 = args[1]; object i_91from_73754_732984 = args[2];
+
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73754_733331, car(((closureN)self_7313609)->elements[0]))) ){
+- return_direct_with_clo1(data, k_735658, (((closure) k_735658)->fn), ((closureN)self_7313609)->elements[3]);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73754_732984, car(((closureN)self_7312356)->elements[0]))) ){
++ return_direct_with_clo1(data, k_735206, (((closure) k_735206)->fn), ((closureN)self_7312356)->elements[3]);
+ } else {
+
+-closureN_type c_7319924;
+-object e_7319938 [4];
+-c_7319924.hdr.mark = gc_color_red;
+- c_7319924.hdr.grayed = 0;
+-c_7319924.tag = closureN_tag;
+- c_7319924.fn = (function_type)__lambda_611;
+-c_7319924.num_args = 1;
+-c_7319924.num_elements = 4;
+-c_7319924.elements = (object *)e_7319938;
+-c_7319924.elements[0] = i_91at_73753_733330;
+-c_7319924.elements[1] = i_91from_73754_733331;
+-c_7319924.elements[2] = k_735658;
+-c_7319924.elements[3] = ((closureN)self_7313609)->elements[2];
++closureN_type c_7318624;
++object e_7318638 [4];
++c_7318624.hdr.mark = gc_color_red;
++ c_7318624.hdr.grayed = 0;
++c_7318624.tag = closureN_tag;
++ c_7318624.fn = (function_type)__lambda_611;
++c_7318624.num_args = 1;
++c_7318624.num_elements = 4;
++c_7318624.elements = (object *)e_7318638;
++c_7318624.elements[0] = i_91at_73753_732983;
++c_7318624.elements[1] = i_91from_73754_732984;
++c_7318624.elements[2] = k_735206;
++c_7318624.elements[3] = ((closureN)self_7312356)->elements[2];
+
+
+
+
+-object c_7319941 = Cyc_vector_set_cps(data,(closure)&c_7319924,((closureN)self_7313609)->elements[3], i_91at_73753_733330, Cyc_vector_ref(data, ((closureN)self_7313609)->elements[1], i_91from_73754_733331));
+-return_closcall1(data,(closure)&c_7319924, c_7319941);}
++object c_7318641 = Cyc_vector_set_cps(data,(closure)&c_7318624,((closureN)self_7312356)->elements[3], i_91at_73753_732983, Cyc_vector_ref(data, ((closureN)self_7312356)->elements[1], i_91from_73754_732984));
++return_closcall1(data,(closure)&c_7318624, c_7318641);}
+ ;;
+ }
+
+-static void __lambda_611(void *data, object self_7313610, int argc, object *args) /* object self_7313610, object r_735660 */
++static void __lambda_611(void *data, object self_7312357, int argc, object *args) /* object self_7312357, object r_735208 */
+ {
+
+
+
+
+-complex_num_type local_7319932;
++complex_num_type local_7318632;
+
+-complex_num_type local_7319936;
+-return_closcall3(data, car(((closureN)self_7313610)->elements[3]), ((closureN)self_7313610)->elements[2], Cyc_fast_sum(data,&local_7319932, ((closureN)self_7313610)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7319936, ((closureN)self_7313610)->elements[1], obj_int2obj(1)));;
++complex_num_type local_7318636;
++return_closcall3(data, car(((closureN)self_7312357)->elements[3]), ((closureN)self_7312357)->elements[2], Cyc_fast_sum(data,&local_7318632, ((closureN)self_7312357)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7318636, ((closureN)self_7312357)->elements[1], obj_int2obj(1)));;
+ }
+
+-static void __lambda_608(void *data, object self_7313611, int argc, object *args) /* object self_7313611, object r_735657 */
++static void __lambda_608(void *data, object self_7312358, int argc, object *args) /* object self_7312358, object r_735205 */
+ {
+- object r_735657 = args[0];
++ object r_735205 = args[0];
+
+-closureN_type c_7319900;
+-object e_7319910 [4];
+-c_7319900.hdr.mark = gc_color_red;
+- c_7319900.hdr.grayed = 0;
+-c_7319900.tag = closureN_tag;
+- c_7319900.fn = (function_type)__lambda_609;
+-c_7319900.num_args = 1;
+-c_7319900.num_elements = 4;
+-c_7319900.elements = (object *)e_7319910;
+-c_7319900.elements[0] = ((closureN)self_7313611)->elements[0];
+-c_7319900.elements[1] = ((closureN)self_7313611)->elements[1];
+-c_7319900.elements[2] = ((closureN)self_7313611)->elements[2];
+-c_7319900.elements[3] = ((closureN)self_7313611)->elements[3];
++closureN_type c_7318600;
++object e_7318610 [4];
++c_7318600.hdr.mark = gc_color_red;
++ c_7318600.hdr.grayed = 0;
++c_7318600.tag = closureN_tag;
++ c_7318600.fn = (function_type)__lambda_609;
++c_7318600.num_args = 1;
++c_7318600.num_elements = 4;
++c_7318600.elements = (object *)e_7318610;
++c_7318600.elements[0] = ((closureN)self_7312358)->elements[0];
++c_7318600.elements[1] = ((closureN)self_7312358)->elements[1];
++c_7318600.elements[2] = ((closureN)self_7312358)->elements[2];
++c_7318600.elements[3] = ((closureN)self_7312358)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319900,__lambda_609, Cyc_set_cell(data, ((closureN)self_7313611)->elements[2], r_735657));;
++return_direct_with_clo1(data,(closure)&c_7318600,__lambda_609, Cyc_set_cell(data, ((closureN)self_7312358)->elements[2], r_735205));;
+ }
+
+-static void __lambda_609(void *data, object self_7313612, int argc, object *args) /* object self_7313612, object r_735656 */
++static void __lambda_609(void *data, object self_7312359, int argc, object *args) /* object self_7312359, object r_735204 */
+ {
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313612)->elements[2]), ((closureN)self_7313612)->elements[1], ((closureN)self_7313612)->elements[0], car(((closureN)self_7313612)->elements[3]));;
++return_closcall3(data, car(((closureN)self_7312359)->elements[2]), ((closureN)self_7312359)->elements[1], ((closureN)self_7312359)->elements[0], car(((closureN)self_7312359)->elements[3]));;
+ }
+
+-static void __lambda_605(void *data, object self_7313613, int argc, object *args) /* object self_7313613, object k_735665 */
++static void __lambda_605(void *data, object self_7312360, int argc, object *args) /* object self_7312360, object k_735213 */
+ {
+- object k_735665 = args[0];
++ object k_735213 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313613)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312360)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735665,__lambda_606, Cyc_cadr(data, ((closureN)self_7313613)->elements[1]));
++return_direct_with_clo1(data, k_735213,__lambda_606, Cyc_cadr(data, ((closureN)self_7312360)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735665,__lambda_606, car(((closureN)self_7313613)->elements[0]));}
++return_direct_with_clo1(data, k_735213,__lambda_606, car(((closureN)self_7312360)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_588(void *data, object _, int argc, object *args) /* closure _,object k_735627, object vec_73733_733314, object opts_73734_733315_raw, ... */
++static void __lambda_588(void *data, object _, int argc, object *args) /* closure _,object k_735175, object vec_73733_732967, object opts_73734_732968_raw, ... */
+ {
+-object k_735627 = args[0]; object vec_73733_733314 = args[1];
+-load_varargs(opts_73734_733315, args, 2, argc - 2);
++object k_735175 = args[0]; object vec_73733_732967 = args[1];
++load_varargs(opts_73734_732968, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:vector-copy");
+
+-closureN_type c_7319705;
+-object e_7319851 [3];
+-c_7319705.hdr.mark = gc_color_red;
+- c_7319705.hdr.grayed = 0;
+-c_7319705.tag = closureN_tag;
+- c_7319705.fn = (function_type)__lambda_589;
+-c_7319705.num_args = 4;
+-c_7319705.num_elements = 3;
+-c_7319705.elements = (object *)e_7319851;
+-c_7319705.elements[0] = k_735627;
+-c_7319705.elements[1] = opts_73734_733315;
+-c_7319705.elements[2] = vec_73733_733314;
++closureN_type c_7318405;
++object e_7318551 [3];
++c_7318405.hdr.mark = gc_color_red;
++ c_7318405.hdr.grayed = 0;
++c_7318405.tag = closureN_tag;
++ c_7318405.fn = (function_type)__lambda_589;
++c_7318405.num_args = 4;
++c_7318405.num_elements = 3;
++c_7318405.elements = (object *)e_7318551;
++c_7318405.elements[0] = k_735175;
++c_7318405.elements[1] = opts_73734_732968;
++c_7318405.elements[2] = vec_73733_732967;
+
+-return_direct_with_clo4(data,(closure)&c_7319705,__lambda_589, boolean_f, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo4(data,(closure)&c_7318405,__lambda_589, boolean_f, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_589(void *data, object self_7313584, int argc, object *args) /* object self_7313584, object len_73735_733316, object start_73736_733317, object end_73737_733318, object loop_73738_733319 */
++static void __lambda_589(void *data, object self_7312331, int argc, object *args) /* object self_7312331, object len_73735_732969, object start_73736_732970, object end_73737_732971, object loop_73738_732972 */
+ {
+- object len_73735_733316 = args[0]; object start_73736_733317 = args[1]; object end_73737_733318 = args[2]; object loop_73738_733319 = args[3];
++ object len_73735_732969 = args[0]; object start_73736_732970 = args[1]; object end_73737_732971 = args[2]; object loop_73738_732972 = args[3];
+
+-closureN_type c_7319707;
+-object e_7319847 [6];
+-c_7319707.hdr.mark = gc_color_red;
+- c_7319707.hdr.grayed = 0;
+-c_7319707.tag = closureN_tag;
+- c_7319707.fn = (function_type)__lambda_1407;
+-c_7319707.num_args = 1;
+-c_7319707.num_elements = 6;
+-c_7319707.elements = (object *)e_7319847;
+-c_7319707.elements[0] = end_73737_733318;
+-c_7319707.elements[1] = ((closureN)self_7313584)->elements[0];
+-c_7319707.elements[2] = loop_73738_733319;
+-c_7319707.elements[3] = ((closureN)self_7313584)->elements[1];
+-c_7319707.elements[4] = start_73736_733317;
+-c_7319707.elements[5] = ((closureN)self_7313584)->elements[2];
++closureN_type c_7318407;
++object e_7318547 [6];
++c_7318407.hdr.mark = gc_color_red;
++ c_7318407.hdr.grayed = 0;
++c_7318407.tag = closureN_tag;
++ c_7318407.fn = (function_type)__lambda_1360;
++c_7318407.num_args = 1;
++c_7318407.num_elements = 6;
++c_7318407.elements = (object *)e_7318547;
++c_7318407.elements[0] = end_73737_732971;
++c_7318407.elements[1] = ((closureN)self_7312331)->elements[0];
++c_7318407.elements[2] = loop_73738_732972;
++c_7318407.elements[3] = ((closureN)self_7312331)->elements[1];
++c_7318407.elements[4] = start_73736_732970;
++c_7318407.elements[5] = ((closureN)self_7312331)->elements[2];
+
+
+-pair_type local_7319850;
+-return_direct_with_clo1(data,(closure)&c_7319707,__lambda_1407, set_cell_as_expr(&local_7319850, len_73735_733316));;
++pair_type local_7318550;
++return_direct_with_clo1(data,(closure)&c_7318407,__lambda_1360, set_cell_as_expr(&local_7318550, len_73735_732969));;
+ }
+
+-static void __lambda_1407(void *data, object self_7313585, int argc, object *args) /* object self_7313585, object len_73735_733316 */
++static void __lambda_1360(void *data, object self_7312332, int argc, object *args) /* object self_7312332, object len_73735_732969 */
+ {
+- object len_73735_733316 = args[0];
++ object len_73735_732969 = args[0];
+
+-closureN_type c_7319709;
+-object e_7319842 [6];
+-c_7319709.hdr.mark = gc_color_red;
+- c_7319709.hdr.grayed = 0;
+-c_7319709.tag = closureN_tag;
+- c_7319709.fn = (function_type)__lambda_1406;
+-c_7319709.num_args = 1;
+-c_7319709.num_elements = 6;
+-c_7319709.elements = (object *)e_7319842;
+-c_7319709.elements[0] = ((closureN)self_7313585)->elements[0];
+-c_7319709.elements[1] = ((closureN)self_7313585)->elements[1];
+-c_7319709.elements[2] = len_73735_733316;
+-c_7319709.elements[3] = ((closureN)self_7313585)->elements[2];
+-c_7319709.elements[4] = ((closureN)self_7313585)->elements[3];
+-c_7319709.elements[5] = ((closureN)self_7313585)->elements[5];
++closureN_type c_7318409;
++object e_7318542 [6];
++c_7318409.hdr.mark = gc_color_red;
++ c_7318409.hdr.grayed = 0;
++c_7318409.tag = closureN_tag;
++ c_7318409.fn = (function_type)__lambda_1359;
++c_7318409.num_args = 1;
++c_7318409.num_elements = 6;
++c_7318409.elements = (object *)e_7318542;
++c_7318409.elements[0] = ((closureN)self_7312332)->elements[0];
++c_7318409.elements[1] = ((closureN)self_7312332)->elements[1];
++c_7318409.elements[2] = len_73735_732969;
++c_7318409.elements[3] = ((closureN)self_7312332)->elements[2];
++c_7318409.elements[4] = ((closureN)self_7312332)->elements[3];
++c_7318409.elements[5] = ((closureN)self_7312332)->elements[5];
+
+
+-pair_type local_7319845;
+-return_direct_with_clo1(data,(closure)&c_7319709,__lambda_1406, set_cell_as_expr(&local_7319845, ((closureN)self_7313585)->elements[4]));;
++pair_type local_7318545;
++return_direct_with_clo1(data,(closure)&c_7318409,__lambda_1359, set_cell_as_expr(&local_7318545, ((closureN)self_7312332)->elements[4]));;
+ }
+
+-static void __lambda_1406(void *data, object self_7313586, int argc, object *args) /* object self_7313586, object start_73736_733317 */
++static void __lambda_1359(void *data, object self_7312333, int argc, object *args) /* object self_7312333, object start_73736_732970 */
+ {
+- object start_73736_733317 = args[0];
++ object start_73736_732970 = args[0];
+
+-closureN_type c_7319711;
+-object e_7319837 [6];
+-c_7319711.hdr.mark = gc_color_red;
+- c_7319711.hdr.grayed = 0;
+-c_7319711.tag = closureN_tag;
+- c_7319711.fn = (function_type)__lambda_1405;
+-c_7319711.num_args = 1;
+-c_7319711.num_elements = 6;
+-c_7319711.elements = (object *)e_7319837;
+-c_7319711.elements[0] = ((closureN)self_7313586)->elements[1];
+-c_7319711.elements[1] = ((closureN)self_7313586)->elements[2];
+-c_7319711.elements[2] = ((closureN)self_7313586)->elements[3];
+-c_7319711.elements[3] = ((closureN)self_7313586)->elements[4];
+-c_7319711.elements[4] = start_73736_733317;
+-c_7319711.elements[5] = ((closureN)self_7313586)->elements[5];
++closureN_type c_7318411;
++object e_7318537 [6];
++c_7318411.hdr.mark = gc_color_red;
++ c_7318411.hdr.grayed = 0;
++c_7318411.tag = closureN_tag;
++ c_7318411.fn = (function_type)__lambda_1358;
++c_7318411.num_args = 1;
++c_7318411.num_elements = 6;
++c_7318411.elements = (object *)e_7318537;
++c_7318411.elements[0] = ((closureN)self_7312333)->elements[1];
++c_7318411.elements[1] = ((closureN)self_7312333)->elements[2];
++c_7318411.elements[2] = ((closureN)self_7312333)->elements[3];
++c_7318411.elements[3] = ((closureN)self_7312333)->elements[4];
++c_7318411.elements[4] = start_73736_732970;
++c_7318411.elements[5] = ((closureN)self_7312333)->elements[5];
+
+
+-pair_type local_7319840;
+-return_direct_with_clo1(data,(closure)&c_7319711,__lambda_1405, set_cell_as_expr(&local_7319840, ((closureN)self_7313586)->elements[0]));;
++pair_type local_7318540;
++return_direct_with_clo1(data,(closure)&c_7318411,__lambda_1358, set_cell_as_expr(&local_7318540, ((closureN)self_7312333)->elements[0]));;
+ }
+
+-static void __lambda_1405(void *data, object self_7313587, int argc, object *args) /* object self_7313587, object end_73737_733318 */
++static void __lambda_1358(void *data, object self_7312334, int argc, object *args) /* object self_7312334, object end_73737_732971 */
+ {
+- object end_73737_733318 = args[0];
++ object end_73737_732971 = args[0];
+
+-closureN_type c_7319713;
+-object e_7319832 [6];
+-c_7319713.hdr.mark = gc_color_red;
+- c_7319713.hdr.grayed = 0;
+-c_7319713.tag = closureN_tag;
+- c_7319713.fn = (function_type)__lambda_1404;
+-c_7319713.num_args = 1;
+-c_7319713.num_elements = 6;
+-c_7319713.elements = (object *)e_7319832;
+-c_7319713.elements[0] = end_73737_733318;
+-c_7319713.elements[1] = ((closureN)self_7313587)->elements[0];
+-c_7319713.elements[2] = ((closureN)self_7313587)->elements[1];
+-c_7319713.elements[3] = ((closureN)self_7313587)->elements[3];
+-c_7319713.elements[4] = ((closureN)self_7313587)->elements[4];
+-c_7319713.elements[5] = ((closureN)self_7313587)->elements[5];
++closureN_type c_7318413;
++object e_7318532 [6];
++c_7318413.hdr.mark = gc_color_red;
++ c_7318413.hdr.grayed = 0;
++c_7318413.tag = closureN_tag;
++ c_7318413.fn = (function_type)__lambda_1357;
++c_7318413.num_args = 1;
++c_7318413.num_elements = 6;
++c_7318413.elements = (object *)e_7318532;
++c_7318413.elements[0] = end_73737_732971;
++c_7318413.elements[1] = ((closureN)self_7312334)->elements[0];
++c_7318413.elements[2] = ((closureN)self_7312334)->elements[1];
++c_7318413.elements[3] = ((closureN)self_7312334)->elements[3];
++c_7318413.elements[4] = ((closureN)self_7312334)->elements[4];
++c_7318413.elements[5] = ((closureN)self_7312334)->elements[5];
+
+
+-pair_type local_7319835;
+-return_direct_with_clo1(data,(closure)&c_7319713,__lambda_1404, set_cell_as_expr(&local_7319835, ((closureN)self_7313587)->elements[2]));;
++pair_type local_7318535;
++return_direct_with_clo1(data,(closure)&c_7318413,__lambda_1357, set_cell_as_expr(&local_7318535, ((closureN)self_7312334)->elements[2]));;
+ }
+
+-static void __lambda_1404(void *data, object self_7313588, int argc, object *args) /* object self_7313588, object loop_73738_733319 */
++static void __lambda_1357(void *data, object self_7312335, int argc, object *args) /* object self_7312335, object loop_73738_732972 */
+ {
+- object loop_73738_733319 = args[0];
++ object loop_73738_732972 = args[0];
+
+-closureN_type c_7319715;
+-object e_7319825 [7];
+-c_7319715.hdr.mark = gc_color_red;
+- c_7319715.hdr.grayed = 0;
+-c_7319715.tag = closureN_tag;
+- c_7319715.fn = (function_type)__lambda_590;
+-c_7319715.num_args = 1;
+-c_7319715.num_elements = 7;
+-c_7319715.elements = (object *)e_7319825;
+-c_7319715.elements[0] = ((closureN)self_7313588)->elements[0];
+-c_7319715.elements[1] = ((closureN)self_7313588)->elements[1];
+-c_7319715.elements[2] = ((closureN)self_7313588)->elements[2];
+-c_7319715.elements[3] = loop_73738_733319;
+-c_7319715.elements[4] = ((closureN)self_7313588)->elements[3];
+-c_7319715.elements[5] = ((closureN)self_7313588)->elements[4];
+-c_7319715.elements[6] = ((closureN)self_7313588)->elements[5];
++closureN_type c_7318415;
++object e_7318525 [7];
++c_7318415.hdr.mark = gc_color_red;
++ c_7318415.hdr.grayed = 0;
++c_7318415.tag = closureN_tag;
++ c_7318415.fn = (function_type)__lambda_590;
++c_7318415.num_args = 1;
++c_7318415.num_elements = 7;
++c_7318415.elements = (object *)e_7318525;
++c_7318415.elements[0] = ((closureN)self_7312335)->elements[0];
++c_7318415.elements[1] = ((closureN)self_7312335)->elements[1];
++c_7318415.elements[2] = ((closureN)self_7312335)->elements[2];
++c_7318415.elements[3] = loop_73738_732972;
++c_7318415.elements[4] = ((closureN)self_7312335)->elements[3];
++c_7318415.elements[5] = ((closureN)self_7312335)->elements[4];
++c_7318415.elements[6] = ((closureN)self_7312335)->elements[5];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319715,__lambda_590, Cyc_set_cell(data, ((closureN)self_7313588)->elements[2], Cyc_vector_length(data, ((closureN)self_7313588)->elements[5])));;
++return_direct_with_clo1(data,(closure)&c_7318415,__lambda_590, Cyc_set_cell(data, ((closureN)self_7312335)->elements[2], Cyc_vector_length(data, ((closureN)self_7312335)->elements[5])));;
+ }
+
+-static void __lambda_590(void *data, object self_7313589, int argc, object *args) /* object self_7313589, object r_735628 */
++static void __lambda_590(void *data, object self_7312336, int argc, object *args) /* object self_7312336, object r_735176 */
+ {
+
+- object r_735645;
++ object r_735193;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313589)->elements[4]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312336)->elements[4]), obj_int2obj(0))) ){
+
+- r_735645 = Cyc_car(data, ((closureN)self_7313589)->elements[4]);
++ r_735193 = Cyc_car(data, ((closureN)self_7312336)->elements[4]);
+ } else {
+- r_735645 = obj_int2obj(0);}
++ r_735193 = obj_int2obj(0);}
+ ;
+-closureN_type c_7319728;
+-object e_7319821 [7];
+-c_7319728.hdr.mark = gc_color_red;
+- c_7319728.hdr.grayed = 0;
+-c_7319728.tag = closureN_tag;
+- c_7319728.fn = (function_type)__lambda_591;
+-c_7319728.num_args = 1;
+-c_7319728.num_elements = 7;
+-c_7319728.elements = (object *)e_7319821;
+-c_7319728.elements[0] = ((closureN)self_7313589)->elements[0];
+-c_7319728.elements[1] = ((closureN)self_7313589)->elements[1];
+-c_7319728.elements[2] = ((closureN)self_7313589)->elements[2];
+-c_7319728.elements[3] = ((closureN)self_7313589)->elements[3];
+-c_7319728.elements[4] = ((closureN)self_7313589)->elements[4];
+-c_7319728.elements[5] = ((closureN)self_7313589)->elements[5];
+-c_7319728.elements[6] = ((closureN)self_7313589)->elements[6];
++closureN_type c_7318428;
++object e_7318521 [7];
++c_7318428.hdr.mark = gc_color_red;
++ c_7318428.hdr.grayed = 0;
++c_7318428.tag = closureN_tag;
++ c_7318428.fn = (function_type)__lambda_591;
++c_7318428.num_args = 1;
++c_7318428.num_elements = 7;
++c_7318428.elements = (object *)e_7318521;
++c_7318428.elements[0] = ((closureN)self_7312336)->elements[0];
++c_7318428.elements[1] = ((closureN)self_7312336)->elements[1];
++c_7318428.elements[2] = ((closureN)self_7312336)->elements[2];
++c_7318428.elements[3] = ((closureN)self_7312336)->elements[3];
++c_7318428.elements[4] = ((closureN)self_7312336)->elements[4];
++c_7318428.elements[5] = ((closureN)self_7312336)->elements[5];
++c_7318428.elements[6] = ((closureN)self_7312336)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319728,__lambda_591, Cyc_set_cell(data, ((closureN)self_7313589)->elements[5], r_735645));;
++return_direct_with_clo1(data,(closure)&c_7318428,__lambda_591, Cyc_set_cell(data, ((closureN)self_7312336)->elements[5], r_735193));;
+ }
+
+-static void __lambda_591(void *data, object self_7313590, int argc, object *args) /* object self_7313590, object r_735629 */
++static void __lambda_591(void *data, object self_7312337, int argc, object *args) /* object self_7312337, object r_735177 */
+ {
+
+
+-closureN_type c_7319730;
+-object e_7319744 [2];
+-c_7319730.hdr.mark = gc_color_red;
+- c_7319730.hdr.grayed = 0;
+-c_7319730.tag = closureN_tag;
+- c_7319730.fn = (function_type)__lambda_592;
+-c_7319730.num_args = 0;
+-c_7319730.num_elements = 2;
+-c_7319730.elements = (object *)e_7319744;
+-c_7319730.elements[0] = ((closureN)self_7313590)->elements[2];
+-c_7319730.elements[1] = ((closureN)self_7313590)->elements[4];
++closureN_type c_7318430;
++object e_7318444 [2];
++c_7318430.hdr.mark = gc_color_red;
++ c_7318430.hdr.grayed = 0;
++c_7318430.tag = closureN_tag;
++ c_7318430.fn = (function_type)__lambda_592;
++c_7318430.num_args = 0;
++c_7318430.num_elements = 2;
++c_7318430.elements = (object *)e_7318444;
++c_7318430.elements[0] = ((closureN)self_7312337)->elements[2];
++c_7318430.elements[1] = ((closureN)self_7312337)->elements[4];
+
+
+-closureN_type c_7319745;
+-object e_7319820 [5];
+-c_7319745.hdr.mark = gc_color_red;
+- c_7319745.hdr.grayed = 0;
+-c_7319745.tag = closureN_tag;
+- c_7319745.fn = (function_type)__lambda_593;
+-c_7319745.num_args = 1;
+-c_7319745.num_elements = 5;
+-c_7319745.elements = (object *)e_7319820;
+-c_7319745.elements[0] = ((closureN)self_7313590)->elements[0];
+-c_7319745.elements[1] = ((closureN)self_7313590)->elements[1];
+-c_7319745.elements[2] = ((closureN)self_7313590)->elements[3];
+-c_7319745.elements[3] = ((closureN)self_7313590)->elements[5];
+-c_7319745.elements[4] = ((closureN)self_7313590)->elements[6];
++closureN_type c_7318445;
++object e_7318520 [5];
++c_7318445.hdr.mark = gc_color_red;
++ c_7318445.hdr.grayed = 0;
++c_7318445.tag = closureN_tag;
++ c_7318445.fn = (function_type)__lambda_593;
++c_7318445.num_args = 1;
++c_7318445.num_elements = 5;
++c_7318445.elements = (object *)e_7318520;
++c_7318445.elements[0] = ((closureN)self_7312337)->elements[0];
++c_7318445.elements[1] = ((closureN)self_7312337)->elements[1];
++c_7318445.elements[2] = ((closureN)self_7312337)->elements[3];
++c_7318445.elements[3] = ((closureN)self_7312337)->elements[5];
++c_7318445.elements[4] = ((closureN)self_7312337)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7319730,__lambda_592, &c_7319745);;
++return_direct_with_clo1(data,(closure)&c_7318430,__lambda_592, &c_7318445);;
+ }
+
+-static void __lambda_593(void *data, object self_7313591, int argc, object *args) /* object self_7313591, object r_735641 */
++static void __lambda_593(void *data, object self_7312338, int argc, object *args) /* object self_7312338, object r_735189 */
+ {
+- object r_735641 = args[0];
++ object r_735189 = args[0];
+
+-closureN_type c_7319747;
+-object e_7319816 [5];
+-c_7319747.hdr.mark = gc_color_red;
+- c_7319747.hdr.grayed = 0;
+-c_7319747.tag = closureN_tag;
+- c_7319747.fn = (function_type)__lambda_594;
+-c_7319747.num_args = 1;
+-c_7319747.num_elements = 5;
+-c_7319747.elements = (object *)e_7319816;
+-c_7319747.elements[0] = ((closureN)self_7313591)->elements[0];
+-c_7319747.elements[1] = ((closureN)self_7313591)->elements[1];
+-c_7319747.elements[2] = ((closureN)self_7313591)->elements[2];
+-c_7319747.elements[3] = ((closureN)self_7313591)->elements[3];
+-c_7319747.elements[4] = ((closureN)self_7313591)->elements[4];
++closureN_type c_7318447;
++object e_7318516 [5];
++c_7318447.hdr.mark = gc_color_red;
++ c_7318447.hdr.grayed = 0;
++c_7318447.tag = closureN_tag;
++ c_7318447.fn = (function_type)__lambda_594;
++c_7318447.num_args = 1;
++c_7318447.num_elements = 5;
++c_7318447.elements = (object *)e_7318516;
++c_7318447.elements[0] = ((closureN)self_7312338)->elements[0];
++c_7318447.elements[1] = ((closureN)self_7312338)->elements[1];
++c_7318447.elements[2] = ((closureN)self_7312338)->elements[2];
++c_7318447.elements[3] = ((closureN)self_7312338)->elements[3];
++c_7318447.elements[4] = ((closureN)self_7312338)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319747,__lambda_594, Cyc_set_cell(data, ((closureN)self_7313591)->elements[0], r_735641));;
++return_direct_with_clo1(data,(closure)&c_7318447,__lambda_594, Cyc_set_cell(data, ((closureN)self_7312338)->elements[0], r_735189));;
+ }
+
+-static void __lambda_594(void *data, object self_7313592, int argc, object *args) /* object self_7313592, object r_735630 */
++static void __lambda_594(void *data, object self_7312339, int argc, object *args) /* object self_7312339, object r_735178 */
+ {
+
+
+-closureN_type c_7319749;
+-object e_7319782 [4];
+-c_7319749.hdr.mark = gc_color_red;
+- c_7319749.hdr.grayed = 0;
+-c_7319749.tag = closureN_tag;
+- c_7319749.fn = (function_type)__lambda_595;
+-c_7319749.num_args = 1;
+-c_7319749.num_elements = 4;
+-c_7319749.elements = (object *)e_7319782;
+-c_7319749.elements[0] = ((closureN)self_7313592)->elements[0];
+-c_7319749.elements[1] = ((closureN)self_7313592)->elements[1];
+-c_7319749.elements[2] = ((closureN)self_7313592)->elements[2];
+-c_7319749.elements[3] = ((closureN)self_7313592)->elements[3];
++closureN_type c_7318449;
++object e_7318482 [4];
++c_7318449.hdr.mark = gc_color_red;
++ c_7318449.hdr.grayed = 0;
++c_7318449.tag = closureN_tag;
++ c_7318449.fn = (function_type)__lambda_595;
++c_7318449.num_args = 1;
++c_7318449.num_elements = 4;
++c_7318449.elements = (object *)e_7318482;
++c_7318449.elements[0] = ((closureN)self_7312339)->elements[0];
++c_7318449.elements[1] = ((closureN)self_7312339)->elements[1];
++c_7318449.elements[2] = ((closureN)self_7312339)->elements[2];
++c_7318449.elements[3] = ((closureN)self_7312339)->elements[3];
+
+
+-closureN_type c_7319783;
+-object e_7319815 [4];
+-c_7319783.hdr.mark = gc_color_red;
+- c_7319783.hdr.grayed = 0;
+-c_7319783.tag = closureN_tag;
+- c_7319783.fn = (function_type)__lambda_599;
+-c_7319783.num_args = 2;
+-c_7319783.num_elements = 4;
+-c_7319783.elements = (object *)e_7319815;
+-c_7319783.elements[0] = ((closureN)self_7313592)->elements[0];
+-c_7319783.elements[1] = ((closureN)self_7313592)->elements[2];
+-c_7319783.elements[2] = ((closureN)self_7313592)->elements[3];
+-c_7319783.elements[3] = ((closureN)self_7313592)->elements[4];
++closureN_type c_7318483;
++object e_7318515 [4];
++c_7318483.hdr.mark = gc_color_red;
++ c_7318483.hdr.grayed = 0;
++c_7318483.tag = closureN_tag;
++ c_7318483.fn = (function_type)__lambda_599;
++c_7318483.num_args = 2;
++c_7318483.num_elements = 4;
++c_7318483.elements = (object *)e_7318515;
++c_7318483.elements[0] = ((closureN)self_7312339)->elements[0];
++c_7318483.elements[1] = ((closureN)self_7312339)->elements[2];
++c_7318483.elements[2] = ((closureN)self_7312339)->elements[3];
++c_7318483.elements[3] = ((closureN)self_7312339)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7319749,__lambda_595, &c_7319783);;
++return_direct_with_clo1(data,(closure)&c_7318449,__lambda_595, &c_7318483);;
+ }
+
+-static void __lambda_599(void *data, object self_7313593, int argc, object *args) /* object self_7313593, object k_735635, object i_73739_733320, object new_91vec_73740_733321 */
++static void __lambda_599(void *data, object self_7312340, int argc, object *args) /* object self_7312340, object k_735183, object i_73739_732973, object new_91vec_73740_732974 */
+ {
+- object k_735635 = args[0]; object i_73739_733320 = args[1]; object new_91vec_73740_733321 = args[2];
++ object k_735183 = args[0]; object i_73739_732973 = args[1]; object new_91vec_73740_732974 = args[2];
+
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, i_73739_733320, car(((closureN)self_7313593)->elements[0]))) ){
+- return_direct_with_clo1(data, k_735635, (((closure) k_735635)->fn), new_91vec_73740_733321);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73739_732973, car(((closureN)self_7312340)->elements[0]))) ){
++ return_direct_with_clo1(data, k_735183, (((closure) k_735183)->fn), new_91vec_73740_732974);
+ } else {
+
+-closureN_type c_7319791;
+-object e_7319802 [4];
+-c_7319791.hdr.mark = gc_color_red;
+- c_7319791.hdr.grayed = 0;
+-c_7319791.tag = closureN_tag;
+- c_7319791.fn = (function_type)__lambda_600;
+-c_7319791.num_args = 1;
+-c_7319791.num_elements = 4;
+-c_7319791.elements = (object *)e_7319802;
+-c_7319791.elements[0] = i_73739_733320;
+-c_7319791.elements[1] = k_735635;
+-c_7319791.elements[2] = ((closureN)self_7313593)->elements[1];
+-c_7319791.elements[3] = new_91vec_73740_733321;
++closureN_type c_7318491;
++object e_7318502 [4];
++c_7318491.hdr.mark = gc_color_red;
++ c_7318491.hdr.grayed = 0;
++c_7318491.tag = closureN_tag;
++ c_7318491.fn = (function_type)__lambda_600;
++c_7318491.num_args = 1;
++c_7318491.num_elements = 4;
++c_7318491.elements = (object *)e_7318502;
++c_7318491.elements[0] = i_73739_732973;
++c_7318491.elements[1] = k_735183;
++c_7318491.elements[2] = ((closureN)self_7312340)->elements[1];
++c_7318491.elements[3] = new_91vec_73740_732974;
+
+
+-complex_num_type local_7319808;
++complex_num_type local_7318508;
+
+
+
+
+
+-object c_7319805 = Cyc_vector_set_cps(data,(closure)&c_7319791,new_91vec_73740_733321, Cyc_fast_sub(data,&local_7319808, i_73739_733320, car(((closureN)self_7313593)->elements[2])), Cyc_vector_ref(data, ((closureN)self_7313593)->elements[3], i_73739_733320));
+-return_closcall1(data,(closure)&c_7319791, c_7319805);}
++object c_7318505 = Cyc_vector_set_cps(data,(closure)&c_7318491,new_91vec_73740_732974, Cyc_fast_sub(data,&local_7318508, i_73739_732973, car(((closureN)self_7312340)->elements[2])), Cyc_vector_ref(data, ((closureN)self_7312340)->elements[3], i_73739_732973));
++return_closcall1(data,(closure)&c_7318491, c_7318505);}
+ ;;
+ }
+
+-static void __lambda_600(void *data, object self_7313594, int argc, object *args) /* object self_7313594, object r_735637 */
++static void __lambda_600(void *data, object self_7312341, int argc, object *args) /* object self_7312341, object r_735185 */
+ {
+
+
+
+
+-complex_num_type local_7319799;
+-return_closcall3(data, car(((closureN)self_7313594)->elements[2]), ((closureN)self_7313594)->elements[1], Cyc_fast_sum(data,&local_7319799, ((closureN)self_7313594)->elements[0], obj_int2obj(1)), ((closureN)self_7313594)->elements[3]);;
++complex_num_type local_7318499;
++return_closcall3(data, car(((closureN)self_7312341)->elements[2]), ((closureN)self_7312341)->elements[1], Cyc_fast_sum(data,&local_7318499, ((closureN)self_7312341)->elements[0], obj_int2obj(1)), ((closureN)self_7312341)->elements[3]);;
+ }
+
+-static void __lambda_595(void *data, object self_7313595, int argc, object *args) /* object self_7313595, object r_735634 */
++static void __lambda_595(void *data, object self_7312342, int argc, object *args) /* object self_7312342, object r_735182 */
+ {
+- object r_735634 = args[0];
++ object r_735182 = args[0];
+
+-closureN_type c_7319751;
+-object e_7319778 [4];
+-c_7319751.hdr.mark = gc_color_red;
+- c_7319751.hdr.grayed = 0;
+-c_7319751.tag = closureN_tag;
+- c_7319751.fn = (function_type)__lambda_596;
+-c_7319751.num_args = 1;
+-c_7319751.num_elements = 4;
+-c_7319751.elements = (object *)e_7319778;
+-c_7319751.elements[0] = ((closureN)self_7313595)->elements[0];
+-c_7319751.elements[1] = ((closureN)self_7313595)->elements[1];
+-c_7319751.elements[2] = ((closureN)self_7313595)->elements[2];
+-c_7319751.elements[3] = ((closureN)self_7313595)->elements[3];
++closureN_type c_7318451;
++object e_7318478 [4];
++c_7318451.hdr.mark = gc_color_red;
++ c_7318451.hdr.grayed = 0;
++c_7318451.tag = closureN_tag;
++ c_7318451.fn = (function_type)__lambda_596;
++c_7318451.num_args = 1;
++c_7318451.num_elements = 4;
++c_7318451.elements = (object *)e_7318478;
++c_7318451.elements[0] = ((closureN)self_7312342)->elements[0];
++c_7318451.elements[1] = ((closureN)self_7312342)->elements[1];
++c_7318451.elements[2] = ((closureN)self_7312342)->elements[2];
++c_7318451.elements[3] = ((closureN)self_7312342)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319751,__lambda_596, Cyc_set_cell(data, ((closureN)self_7313595)->elements[2], r_735634));;
++return_direct_with_clo1(data,(closure)&c_7318451,__lambda_596, Cyc_set_cell(data, ((closureN)self_7312342)->elements[2], r_735182));;
+ }
+
+-static void __lambda_596(void *data, object self_7313596, int argc, object *args) /* object self_7313596, object r_735631 */
++static void __lambda_596(void *data, object self_7312343, int argc, object *args) /* object self_7312343, object r_735179 */
+ {
+
+
+-closureN_type c_7319753;
+-object e_7319768 [3];
+-c_7319753.hdr.mark = gc_color_red;
+- c_7319753.hdr.grayed = 0;
+-c_7319753.tag = closureN_tag;
+- c_7319753.fn = (function_type)__lambda_597;
+-c_7319753.num_args = 1;
+-c_7319753.num_elements = 3;
+-c_7319753.elements = (object *)e_7319768;
+-c_7319753.elements[0] = ((closureN)self_7313596)->elements[1];
+-c_7319753.elements[1] = ((closureN)self_7313596)->elements[2];
+-c_7319753.elements[2] = ((closureN)self_7313596)->elements[3];
++closureN_type c_7318453;
++object e_7318468 [3];
++c_7318453.hdr.mark = gc_color_red;
++ c_7318453.hdr.grayed = 0;
++c_7318453.tag = closureN_tag;
++ c_7318453.fn = (function_type)__lambda_597;
++c_7318453.num_args = 1;
++c_7318453.num_elements = 3;
++c_7318453.elements = (object *)e_7318468;
++c_7318453.elements[0] = ((closureN)self_7312343)->elements[1];
++c_7318453.elements[1] = ((closureN)self_7312343)->elements[2];
++c_7318453.elements[2] = ((closureN)self_7312343)->elements[3];
+
+
+-complex_num_type local_7319771;
++complex_num_type local_7318471;
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319753,__lambda_597, Cyc_fast_sub(data,&local_7319771, car(((closureN)self_7313596)->elements[0]), car(((closureN)self_7313596)->elements[3])));;
++return_direct_with_clo1(data,(closure)&c_7318453,__lambda_597, Cyc_fast_sub(data,&local_7318471, car(((closureN)self_7312343)->elements[0]), car(((closureN)self_7312343)->elements[3])));;
+ }
+
+-static void __lambda_597(void *data, object self_7313597, int argc, object *args) /* object self_7313597, object r_735633 */
++static void __lambda_597(void *data, object self_7312344, int argc, object *args) /* object self_7312344, object r_735181 */
+ {
+- object r_735633 = args[0];
++ object r_735181 = args[0];
+
+-closureN_type c_7319755;
+-object e_7319764 [3];
+-c_7319755.hdr.mark = gc_color_red;
+- c_7319755.hdr.grayed = 0;
+-c_7319755.tag = closureN_tag;
+- c_7319755.fn = (function_type)__lambda_598;
+-c_7319755.num_args = 1;
+-c_7319755.num_elements = 3;
+-c_7319755.elements = (object *)e_7319764;
+-c_7319755.elements[0] = ((closureN)self_7313597)->elements[0];
+-c_7319755.elements[1] = ((closureN)self_7313597)->elements[1];
+-c_7319755.elements[2] = ((closureN)self_7313597)->elements[2];
++closureN_type c_7318455;
++object e_7318464 [3];
++c_7318455.hdr.mark = gc_color_red;
++ c_7318455.hdr.grayed = 0;
++c_7318455.tag = closureN_tag;
++ c_7318455.fn = (function_type)__lambda_598;
++c_7318455.num_args = 1;
++c_7318455.num_elements = 3;
++c_7318455.elements = (object *)e_7318464;
++c_7318455.elements[0] = ((closureN)self_7312344)->elements[0];
++c_7318455.elements[1] = ((closureN)self_7312344)->elements[1];
++c_7318455.elements[2] = ((closureN)self_7312344)->elements[2];
+
+
+-object c_7319767 = Cyc_make_vector(data,(closure)&c_7319755,2,r_735633, boolean_f);
+-return_closcall1(data,(closure)&c_7319755, c_7319767);;
++object c_7318467 = Cyc_make_vector(data,(closure)&c_7318455,2,r_735181, boolean_f);
++return_closcall1(data,(closure)&c_7318455, c_7318467);;
+ }
+
+-static void __lambda_598(void *data, object self_7313598, int argc, object *args) /* object self_7313598, object r_735632 */
++static void __lambda_598(void *data, object self_7312345, int argc, object *args) /* object self_7312345, object r_735180 */
+ {
+- object r_735632 = args[0];
++ object r_735180 = args[0];
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313598)->elements[1]), ((closureN)self_7313598)->elements[0], car(((closureN)self_7313598)->elements[2]), r_735632);;
++return_closcall3(data, car(((closureN)self_7312345)->elements[1]), ((closureN)self_7312345)->elements[0], car(((closureN)self_7312345)->elements[2]), r_735180);;
+ }
+
+-static void __lambda_592(void *data, object self_7313599, int argc, object *args) /* object self_7313599, object k_735642 */
++static void __lambda_592(void *data, object self_7312346, int argc, object *args) /* object self_7312346, object k_735190 */
+ {
+- object k_735642 = args[0];
++ object k_735190 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313599)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312346)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735642,__lambda_593, Cyc_cadr(data, ((closureN)self_7313599)->elements[1]));
++return_direct_with_clo1(data, k_735190,__lambda_593, Cyc_cadr(data, ((closureN)self_7312346)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735642,__lambda_593, car(((closureN)self_7313599)->elements[0]));}
++return_direct_with_clo1(data, k_735190,__lambda_593, car(((closureN)self_7312346)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_585(void *data, object _, int argc, object *args) /* closure _,object k_735622, object vecs_73732_733313_raw, ... */
++static void __lambda_585(void *data, object _, int argc, object *args) /* closure _,object k_735170, object vecs_73732_732966_raw, ... */
+ {
+-object k_735622 = args[0];
+-load_varargs(vecs_73732_733313, args, 1, argc - 1);
++object k_735170 = args[0];
++load_varargs(vecs_73732_732966, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:vector-append");
+
+-closureN_type c_7319690;
+-object e_7319702 [1];
+-c_7319690.hdr.mark = gc_color_red;
+- c_7319690.hdr.grayed = 0;
+-c_7319690.tag = closureN_tag;
+- c_7319690.fn = (function_type)__lambda_586;
+-c_7319690.num_args = 1;
+-c_7319690.num_elements = 1;
+-c_7319690.elements = (object *)e_7319702;
+-c_7319690.elements[0] = k_735622;
++closureN_type c_7318390;
++object e_7318402 [1];
++c_7318390.hdr.mark = gc_color_red;
++ c_7318390.hdr.grayed = 0;
++c_7318390.tag = closureN_tag;
++ c_7318390.fn = (function_type)__lambda_586;
++c_7318390.num_args = 1;
++c_7318390.num_elements = 1;
++c_7318390.elements = (object *)e_7318402;
++c_7318390.elements[0] = k_735170;
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7319690, __glo_vector_91_125list_scheme_base, vecs_73732_733313);;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7318390, __glo_vector_91_125list_scheme_base, vecs_73732_732966);;
+ }
+
+-static void __lambda_586(void *data, object self_7313582, int argc, object *args) /* object self_7313582, object r_735624 */
++static void __lambda_586(void *data, object self_7312329, int argc, object *args) /* object self_7312329, object r_735172 */
+ {
+- object r_735624 = args[0];
++ object r_735172 = args[0];
+
+-closureN_type c_7319692;
+-object e_7319698 [1];
+-c_7319692.hdr.mark = gc_color_red;
+- c_7319692.hdr.grayed = 0;
+-c_7319692.tag = closureN_tag;
+- c_7319692.fn = (function_type)__lambda_587;
+-c_7319692.num_args = 1;
+-c_7319692.num_elements = 1;
+-c_7319692.elements = (object *)e_7319698;
+-c_7319692.elements[0] = ((closureN)self_7313582)->elements[0];
++closureN_type c_7318392;
++object e_7318398 [1];
++c_7318392.hdr.mark = gc_color_red;
++ c_7318392.hdr.grayed = 0;
++c_7318392.tag = closureN_tag;
++ c_7318392.fn = (function_type)__lambda_587;
++c_7318392.num_args = 1;
++c_7318392.num_elements = 1;
++c_7318392.elements = (object *)e_7318398;
++c_7318392.elements[0] = ((closureN)self_7312329)->elements[0];
+
+
+-object c_7319701 = apply(data,(closure)&c_7319692,__glo_append_scheme_base, r_735624);
+-return_closcall1(data,(closure)&c_7319692, c_7319701);;
++object c_7318401 = apply(data,(closure)&c_7318392,__glo_append_scheme_base, r_735172);
++return_closcall1(data,(closure)&c_7318392, c_7318401);;
+ }
+
+-static void __lambda_587(void *data, object self_7313583, int argc, object *args) /* object self_7313583, object r_735623 */
++static void __lambda_587(void *data, object self_7312330, int argc, object *args) /* object self_7312330, object r_735171 */
+ {
+- object r_735623 = args[0];
++ object r_735171 = args[0];
+
+-object c_7319697 = Cyc_list2vector(data, ((closureN)self_7313583)->elements[0],r_735623);
+-return_direct_with_clo1(data, ((closureN)self_7313583)->elements[0], (((closure) ((closureN)self_7313583)->elements[0])->fn), c_7319697);;
++object c_7318397 = Cyc_list2vector(data, ((closureN)self_7312330)->elements[0],r_735171);
++return_direct_with_clo1(data, ((closureN)self_7312330)->elements[0], (((closure) ((closureN)self_7312330)->elements[0])->fn), c_7318397);;
+ }
+
+-static void __lambda_582(void *data, object _, int argc, object *args) /* closure _,object k_735615, object func_73726_733310, object vec1_73727_733311, object vecs_73728_733312_raw, ... */
++static void __lambda_582(void *data, object _, int argc, object *args) /* closure _,object k_735163, object func_73726_732963, object vec1_73727_732964, object vecs_73728_732965_raw, ... */
+ {
+-object k_735615 = args[0]; object func_73726_733310 = args[1]; object vec1_73727_733311 = args[2];
+-load_varargs(vecs_73728_733312, args, 3, argc - 3);
++object k_735163 = args[0]; object func_73726_732963 = args[1]; object vec1_73727_732964 = args[2];
++load_varargs(vecs_73728_732965, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:vector-for-each");
+
+-closureN_type c_7319669;
+-object e_7319687 [3];
+-c_7319669.hdr.mark = gc_color_red;
+- c_7319669.hdr.grayed = 0;
+-c_7319669.tag = closureN_tag;
+- c_7319669.fn = (function_type)__lambda_583;
+-c_7319669.num_args = 1;
+-c_7319669.num_elements = 3;
+-c_7319669.elements = (object *)e_7319687;
+-c_7319669.elements[0] = func_73726_733310;
+-c_7319669.elements[1] = k_735615;
+-c_7319669.elements[2] = vecs_73728_733312;
++closureN_type c_7318369;
++object e_7318387 [3];
++c_7318369.hdr.mark = gc_color_red;
++ c_7318369.hdr.grayed = 0;
++c_7318369.tag = closureN_tag;
++ c_7318369.fn = (function_type)__lambda_583;
++c_7318369.num_args = 1;
++c_7318369.num_elements = 3;
++c_7318369.elements = (object *)e_7318387;
++c_7318369.elements[0] = func_73726_732963;
++c_7318369.elements[1] = k_735163;
++c_7318369.elements[2] = vecs_73728_732965;
+
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7319669, vec1_73727_733311);;
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7318369, vec1_73727_732964);;
+ }
+
+-static void __lambda_583(void *data, object self_7313580, int argc, object *args) /* object self_7313580, object r_735618 */
++static void __lambda_583(void *data, object self_7312327, int argc, object *args) /* object self_7312327, object r_735166 */
+ {
+- object r_735618 = args[0];
++ object r_735166 = args[0];
+
+-closureN_type c_7319671;
+-object e_7319685 [3];
+-c_7319671.hdr.mark = gc_color_red;
+- c_7319671.hdr.grayed = 0;
+-c_7319671.tag = closureN_tag;
+- c_7319671.fn = (function_type)__lambda_584;
+-c_7319671.num_args = 1;
+-c_7319671.num_elements = 3;
+-c_7319671.elements = (object *)e_7319685;
+-c_7319671.elements[0] = ((closureN)self_7313580)->elements[0];
+-c_7319671.elements[1] = ((closureN)self_7313580)->elements[1];
+-c_7319671.elements[2] = r_735618;
++closureN_type c_7318371;
++object e_7318385 [3];
++c_7318371.hdr.mark = gc_color_red;
++ c_7318371.hdr.grayed = 0;
++c_7318371.tag = closureN_tag;
++ c_7318371.fn = (function_type)__lambda_584;
++c_7318371.num_args = 1;
++c_7318371.num_elements = 3;
++c_7318371.elements = (object *)e_7318385;
++c_7318371.elements[0] = ((closureN)self_7312327)->elements[0];
++c_7318371.elements[1] = ((closureN)self_7312327)->elements[1];
++c_7318371.elements[2] = r_735166;
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7319671, __glo_vector_91_125list_scheme_base, ((closureN)self_7313580)->elements[2]);;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7318371, __glo_vector_91_125list_scheme_base, ((closureN)self_7312327)->elements[2]);;
+ }
+
+-static void __lambda_584(void *data, object self_7313581, int argc, object *args) /* object self_7313581, object r_735619 */
++static void __lambda_584(void *data, object self_7312328, int argc, object *args) /* object self_7312328, object r_735167 */
+ {
+- object r_735619 = args[0];
++ object r_735167 = args[0];
+
+-pair_type local_7319679;
++pair_type local_7318379;
+
+-pair_type local_7319683;
++pair_type local_7318383;
+
+-object c_7319676 = apply(data, ((closureN)self_7313581)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7319679, ((closureN)self_7313581)->elements[0], set_pair_as_expr(&local_7319683, ((closureN)self_7313581)->elements[2], r_735619)));
+-return_direct_with_clo1(data, ((closureN)self_7313581)->elements[1], (((closure) ((closureN)self_7313581)->elements[1])->fn), c_7319676);;
++object c_7318376 = apply(data, ((closureN)self_7312328)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7318379, ((closureN)self_7312328)->elements[0], set_pair_as_expr(&local_7318383, ((closureN)self_7312328)->elements[2], r_735167)));
++return_direct_with_clo1(data, ((closureN)self_7312328)->elements[1], (((closure) ((closureN)self_7312328)->elements[1])->fn), c_7318376);;
+ }
+
+-static void __lambda_578(void *data, object _, int argc, object *args) /* closure _,object k_735607, object func_73720_733307, object vec1_73721_733308, object vecs_73722_733309_raw, ... */
++static void __lambda_578(void *data, object _, int argc, object *args) /* closure _,object k_735155, object func_73720_732960, object vec1_73721_732961, object vecs_73722_732962_raw, ... */
+ {
+-object k_735607 = args[0]; object func_73720_733307 = args[1]; object vec1_73721_733308 = args[2];
+-load_varargs(vecs_73722_733309, args, 3, argc - 3);
++object k_735155 = args[0]; object func_73720_732960 = args[1]; object vec1_73721_732961 = args[2];
++load_varargs(vecs_73722_732962, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:vector-map");
+
+-closureN_type c_7319642;
+-object e_7319666 [3];
+-c_7319642.hdr.mark = gc_color_red;
+- c_7319642.hdr.grayed = 0;
+-c_7319642.tag = closureN_tag;
+- c_7319642.fn = (function_type)__lambda_579;
+-c_7319642.num_args = 1;
+-c_7319642.num_elements = 3;
+-c_7319642.elements = (object *)e_7319666;
+-c_7319642.elements[0] = func_73720_733307;
+-c_7319642.elements[1] = k_735607;
+-c_7319642.elements[2] = vecs_73722_733309;
++closureN_type c_7318342;
++object e_7318366 [3];
++c_7318342.hdr.mark = gc_color_red;
++ c_7318342.hdr.grayed = 0;
++c_7318342.tag = closureN_tag;
++ c_7318342.fn = (function_type)__lambda_579;
++c_7318342.num_args = 1;
++c_7318342.num_elements = 3;
++c_7318342.elements = (object *)e_7318366;
++c_7318342.elements[0] = func_73720_732960;
++c_7318342.elements[1] = k_735155;
++c_7318342.elements[2] = vecs_73722_732962;
+
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7319642, vec1_73721_733308);;
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7318342, vec1_73721_732961);;
+ }
+
+-static void __lambda_579(void *data, object self_7313577, int argc, object *args) /* object self_7313577, object r_735611 */
++static void __lambda_579(void *data, object self_7312324, int argc, object *args) /* object self_7312324, object r_735159 */
+ {
+- object r_735611 = args[0];
++ object r_735159 = args[0];
+
+-closureN_type c_7319644;
+-object e_7319664 [3];
+-c_7319644.hdr.mark = gc_color_red;
+- c_7319644.hdr.grayed = 0;
+-c_7319644.tag = closureN_tag;
+- c_7319644.fn = (function_type)__lambda_580;
+-c_7319644.num_args = 1;
+-c_7319644.num_elements = 3;
+-c_7319644.elements = (object *)e_7319664;
+-c_7319644.elements[0] = ((closureN)self_7313577)->elements[0];
+-c_7319644.elements[1] = ((closureN)self_7313577)->elements[1];
+-c_7319644.elements[2] = r_735611;
++closureN_type c_7318344;
++object e_7318364 [3];
++c_7318344.hdr.mark = gc_color_red;
++ c_7318344.hdr.grayed = 0;
++c_7318344.tag = closureN_tag;
++ c_7318344.fn = (function_type)__lambda_580;
++c_7318344.num_args = 1;
++c_7318344.num_elements = 3;
++c_7318344.elements = (object *)e_7318364;
++c_7318344.elements[0] = ((closureN)self_7312324)->elements[0];
++c_7318344.elements[1] = ((closureN)self_7312324)->elements[1];
++c_7318344.elements[2] = r_735159;
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7319644, __glo_vector_91_125list_scheme_base, ((closureN)self_7313577)->elements[2]);;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7318344, __glo_vector_91_125list_scheme_base, ((closureN)self_7312324)->elements[2]);;
+ }
+
+-static void __lambda_580(void *data, object self_7313578, int argc, object *args) /* object self_7313578, object r_735612 */
++static void __lambda_580(void *data, object self_7312325, int argc, object *args) /* object self_7312325, object r_735160 */
+ {
+- object r_735612 = args[0];
++ object r_735160 = args[0];
+
+-closureN_type c_7319646;
+-object e_7319652 [1];
+-c_7319646.hdr.mark = gc_color_red;
+- c_7319646.hdr.grayed = 0;
+-c_7319646.tag = closureN_tag;
+- c_7319646.fn = (function_type)__lambda_581;
+-c_7319646.num_args = 1;
+-c_7319646.num_elements = 1;
+-c_7319646.elements = (object *)e_7319652;
+-c_7319646.elements[0] = ((closureN)self_7313578)->elements[1];
++closureN_type c_7318346;
++object e_7318352 [1];
++c_7318346.hdr.mark = gc_color_red;
++ c_7318346.hdr.grayed = 0;
++c_7318346.tag = closureN_tag;
++ c_7318346.fn = (function_type)__lambda_581;
++c_7318346.num_args = 1;
++c_7318346.num_elements = 1;
++c_7318346.elements = (object *)e_7318352;
++c_7318346.elements[0] = ((closureN)self_7312325)->elements[1];
+
+
+-pair_type local_7319658;
++pair_type local_7318358;
+
+-pair_type local_7319662;
++pair_type local_7318362;
+
+-object c_7319655 = apply(data,(closure)&c_7319646,__glo_map_scheme_base, set_pair_as_expr(&local_7319658, ((closureN)self_7313578)->elements[0], set_pair_as_expr(&local_7319662, ((closureN)self_7313578)->elements[2], r_735612)));
+-return_closcall1(data,(closure)&c_7319646, c_7319655);;
++object c_7318355 = apply(data,(closure)&c_7318346,__glo_map_scheme_base, set_pair_as_expr(&local_7318358, ((closureN)self_7312325)->elements[0], set_pair_as_expr(&local_7318362, ((closureN)self_7312325)->elements[2], r_735160)));
++return_closcall1(data,(closure)&c_7318346, c_7318355);;
+ }
+
+-static void __lambda_581(void *data, object self_7313579, int argc, object *args) /* object self_7313579, object r_735608 */
++static void __lambda_581(void *data, object self_7312326, int argc, object *args) /* object self_7312326, object r_735156 */
+ {
+- object r_735608 = args[0];
++ object r_735156 = args[0];
+
+-object c_7319651 = Cyc_list2vector(data, ((closureN)self_7313579)->elements[0],r_735608);
+-return_direct_with_clo1(data, ((closureN)self_7313579)->elements[0], (((closure) ((closureN)self_7313579)->elements[0])->fn), c_7319651);;
++object c_7318351 = Cyc_list2vector(data, ((closureN)self_7312326)->elements[0],r_735156);
++return_direct_with_clo1(data, ((closureN)self_7312326)->elements[0], (((closure) ((closureN)self_7312326)->elements[0])->fn), c_7318351);;
+ }
+
+-static void __lambda_575(void *data, object _, int argc, object *args) /* closure _,object k_735600, object func_73714_733304, object str1_73715_733305, object strs_73716_733306_raw, ... */
++static void __lambda_575(void *data, object _, int argc, object *args) /* closure _,object k_735148, object func_73714_732957, object str1_73715_732958, object strs_73716_732959_raw, ... */
+ {
+-object k_735600 = args[0]; object func_73714_733304 = args[1]; object str1_73715_733305 = args[2];
+-load_varargs(strs_73716_733306, args, 3, argc - 3);
++object k_735148 = args[0]; object func_73714_732957 = args[1]; object str1_73715_732958 = args[2];
++load_varargs(strs_73716_732959, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string-for-each");
+
+-closureN_type c_7319621;
+-object e_7319639 [3];
+-c_7319621.hdr.mark = gc_color_red;
+- c_7319621.hdr.grayed = 0;
+-c_7319621.tag = closureN_tag;
+- c_7319621.fn = (function_type)__lambda_576;
+-c_7319621.num_args = 1;
+-c_7319621.num_elements = 3;
+-c_7319621.elements = (object *)e_7319639;
+-c_7319621.elements[0] = func_73714_733304;
+-c_7319621.elements[1] = k_735600;
+-c_7319621.elements[2] = strs_73716_733306;
++closureN_type c_7318321;
++object e_7318339 [3];
++c_7318321.hdr.mark = gc_color_red;
++ c_7318321.hdr.grayed = 0;
++c_7318321.tag = closureN_tag;
++ c_7318321.fn = (function_type)__lambda_576;
++c_7318321.num_args = 1;
++c_7318321.num_elements = 3;
++c_7318321.elements = (object *)e_7318339;
++c_7318321.elements[0] = func_73714_732957;
++c_7318321.elements[1] = k_735148;
++c_7318321.elements[2] = strs_73716_732959;
+
+-return_direct_with_clo2(data, __glo_string_91_125list_scheme_base, (((closure) __glo_string_91_125list_scheme_base)->fn), &c_7319621, str1_73715_733305);;
++return_direct_with_clo2(data, __glo_string_91_125list_scheme_base, (((closure) __glo_string_91_125list_scheme_base)->fn), &c_7318321, str1_73715_732958);;
+ }
+
+-static void __lambda_576(void *data, object self_7313575, int argc, object *args) /* object self_7313575, object r_735603 */
++static void __lambda_576(void *data, object self_7312322, int argc, object *args) /* object self_7312322, object r_735151 */
+ {
+- object r_735603 = args[0];
++ object r_735151 = args[0];
+
+-closureN_type c_7319623;
+-object e_7319637 [3];
+-c_7319623.hdr.mark = gc_color_red;
+- c_7319623.hdr.grayed = 0;
+-c_7319623.tag = closureN_tag;
+- c_7319623.fn = (function_type)__lambda_577;
+-c_7319623.num_args = 1;
+-c_7319623.num_elements = 3;
+-c_7319623.elements = (object *)e_7319637;
+-c_7319623.elements[0] = ((closureN)self_7313575)->elements[0];
+-c_7319623.elements[1] = ((closureN)self_7313575)->elements[1];
+-c_7319623.elements[2] = r_735603;
++closureN_type c_7318323;
++object e_7318337 [3];
++c_7318323.hdr.mark = gc_color_red;
++ c_7318323.hdr.grayed = 0;
++c_7318323.tag = closureN_tag;
++ c_7318323.fn = (function_type)__lambda_577;
++c_7318323.num_args = 1;
++c_7318323.num_elements = 3;
++c_7318323.elements = (object *)e_7318337;
++c_7318323.elements[0] = ((closureN)self_7312322)->elements[0];
++c_7318323.elements[1] = ((closureN)self_7312322)->elements[1];
++c_7318323.elements[2] = r_735151;
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7319623, __glo_string_91_125list_scheme_base, ((closureN)self_7313575)->elements[2]);;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7318323, __glo_string_91_125list_scheme_base, ((closureN)self_7312322)->elements[2]);;
+ }
+
+-static void __lambda_577(void *data, object self_7313576, int argc, object *args) /* object self_7313576, object r_735604 */
++static void __lambda_577(void *data, object self_7312323, int argc, object *args) /* object self_7312323, object r_735152 */
+ {
+- object r_735604 = args[0];
++ object r_735152 = args[0];
+
+-pair_type local_7319631;
++pair_type local_7318331;
+
+-pair_type local_7319635;
++pair_type local_7318335;
+
+-object c_7319628 = apply(data, ((closureN)self_7313576)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7319631, ((closureN)self_7313576)->elements[0], set_pair_as_expr(&local_7319635, ((closureN)self_7313576)->elements[2], r_735604)));
+-return_direct_with_clo1(data, ((closureN)self_7313576)->elements[1], (((closure) ((closureN)self_7313576)->elements[1])->fn), c_7319628);;
++object c_7318328 = apply(data, ((closureN)self_7312323)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7318331, ((closureN)self_7312323)->elements[0], set_pair_as_expr(&local_7318335, ((closureN)self_7312323)->elements[2], r_735152)));
++return_direct_with_clo1(data, ((closureN)self_7312323)->elements[1], (((closure) ((closureN)self_7312323)->elements[1])->fn), c_7318328);;
+ }
+
+-static void __lambda_571(void *data, object _, int argc, object *args) /* closure _,object k_735592, object func_73708_733301, object str1_73709_733302, object strs_73710_733303_raw, ... */
++static void __lambda_571(void *data, object _, int argc, object *args) /* closure _,object k_735140, object func_73708_732954, object str1_73709_732955, object strs_73710_732956_raw, ... */
+ {
+-object k_735592 = args[0]; object func_73708_733301 = args[1]; object str1_73709_733302 = args[2];
+-load_varargs(strs_73710_733303, args, 3, argc - 3);
++object k_735140 = args[0]; object func_73708_732954 = args[1]; object str1_73709_732955 = args[2];
++load_varargs(strs_73710_732956, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string-map");
+
+-closureN_type c_7319594;
+-object e_7319618 [3];
+-c_7319594.hdr.mark = gc_color_red;
+- c_7319594.hdr.grayed = 0;
+-c_7319594.tag = closureN_tag;
+- c_7319594.fn = (function_type)__lambda_572;
+-c_7319594.num_args = 1;
+-c_7319594.num_elements = 3;
+-c_7319594.elements = (object *)e_7319618;
+-c_7319594.elements[0] = func_73708_733301;
+-c_7319594.elements[1] = k_735592;
+-c_7319594.elements[2] = strs_73710_733303;
++closureN_type c_7318294;
++object e_7318318 [3];
++c_7318294.hdr.mark = gc_color_red;
++ c_7318294.hdr.grayed = 0;
++c_7318294.tag = closureN_tag;
++ c_7318294.fn = (function_type)__lambda_572;
++c_7318294.num_args = 1;
++c_7318294.num_elements = 3;
++c_7318294.elements = (object *)e_7318318;
++c_7318294.elements[0] = func_73708_732954;
++c_7318294.elements[1] = k_735140;
++c_7318294.elements[2] = strs_73710_732956;
+
+-return_direct_with_clo2(data, __glo_string_91_125list_scheme_base, (((closure) __glo_string_91_125list_scheme_base)->fn), &c_7319594, str1_73709_733302);;
++return_direct_with_clo2(data, __glo_string_91_125list_scheme_base, (((closure) __glo_string_91_125list_scheme_base)->fn), &c_7318294, str1_73709_732955);;
+ }
+
+-static void __lambda_572(void *data, object self_7313572, int argc, object *args) /* object self_7313572, object r_735596 */
++static void __lambda_572(void *data, object self_7312319, int argc, object *args) /* object self_7312319, object r_735144 */
+ {
+- object r_735596 = args[0];
++ object r_735144 = args[0];
+
+-closureN_type c_7319596;
+-object e_7319616 [3];
+-c_7319596.hdr.mark = gc_color_red;
+- c_7319596.hdr.grayed = 0;
+-c_7319596.tag = closureN_tag;
+- c_7319596.fn = (function_type)__lambda_573;
+-c_7319596.num_args = 1;
+-c_7319596.num_elements = 3;
+-c_7319596.elements = (object *)e_7319616;
+-c_7319596.elements[0] = ((closureN)self_7313572)->elements[0];
+-c_7319596.elements[1] = ((closureN)self_7313572)->elements[1];
+-c_7319596.elements[2] = r_735596;
++closureN_type c_7318296;
++object e_7318316 [3];
++c_7318296.hdr.mark = gc_color_red;
++ c_7318296.hdr.grayed = 0;
++c_7318296.tag = closureN_tag;
++ c_7318296.fn = (function_type)__lambda_573;
++c_7318296.num_args = 1;
++c_7318296.num_elements = 3;
++c_7318296.elements = (object *)e_7318316;
++c_7318296.elements[0] = ((closureN)self_7312319)->elements[0];
++c_7318296.elements[1] = ((closureN)self_7312319)->elements[1];
++c_7318296.elements[2] = r_735144;
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7319596, __glo_string_91_125list_scheme_base, ((closureN)self_7313572)->elements[2]);;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7318296, __glo_string_91_125list_scheme_base, ((closureN)self_7312319)->elements[2]);;
+ }
+
+-static void __lambda_573(void *data, object self_7313573, int argc, object *args) /* object self_7313573, object r_735597 */
++static void __lambda_573(void *data, object self_7312320, int argc, object *args) /* object self_7312320, object r_735145 */
+ {
+- object r_735597 = args[0];
++ object r_735145 = args[0];
+
+-closureN_type c_7319598;
+-object e_7319604 [1];
+-c_7319598.hdr.mark = gc_color_red;
+- c_7319598.hdr.grayed = 0;
+-c_7319598.tag = closureN_tag;
+- c_7319598.fn = (function_type)__lambda_574;
+-c_7319598.num_args = 1;
+-c_7319598.num_elements = 1;
+-c_7319598.elements = (object *)e_7319604;
+-c_7319598.elements[0] = ((closureN)self_7313573)->elements[1];
++closureN_type c_7318298;
++object e_7318304 [1];
++c_7318298.hdr.mark = gc_color_red;
++ c_7318298.hdr.grayed = 0;
++c_7318298.tag = closureN_tag;
++ c_7318298.fn = (function_type)__lambda_574;
++c_7318298.num_args = 1;
++c_7318298.num_elements = 1;
++c_7318298.elements = (object *)e_7318304;
++c_7318298.elements[0] = ((closureN)self_7312320)->elements[1];
+
+
+-pair_type local_7319610;
++pair_type local_7318310;
+
+-pair_type local_7319614;
++pair_type local_7318314;
+
+-object c_7319607 = apply(data,(closure)&c_7319598,__glo_map_scheme_base, set_pair_as_expr(&local_7319610, ((closureN)self_7313573)->elements[0], set_pair_as_expr(&local_7319614, ((closureN)self_7313573)->elements[2], r_735597)));
+-return_closcall1(data,(closure)&c_7319598, c_7319607);;
++object c_7318307 = apply(data,(closure)&c_7318298,__glo_map_scheme_base, set_pair_as_expr(&local_7318310, ((closureN)self_7312320)->elements[0], set_pair_as_expr(&local_7318314, ((closureN)self_7312320)->elements[2], r_735145)));
++return_closcall1(data,(closure)&c_7318298, c_7318307);;
+ }
+
+-static void __lambda_574(void *data, object self_7313574, int argc, object *args) /* object self_7313574, object r_735593 */
++static void __lambda_574(void *data, object self_7312321, int argc, object *args) /* object self_7312321, object r_735141 */
+ {
+- object r_735593 = args[0];
++ object r_735141 = args[0];
+
+-object c_7319603 = Cyc_list2string(data, ((closureN)self_7313574)->elements[0],r_735593);
+-return_direct_with_clo1(data, ((closureN)self_7313574)->elements[0], (((closure) ((closureN)self_7313574)->elements[0])->fn), c_7319603);;
++object c_7318303 = Cyc_list2string(data, ((closureN)self_7312321)->elements[0],r_735141);
++return_direct_with_clo1(data, ((closureN)self_7312321)->elements[0], (((closure) ((closureN)self_7312321)->elements[0])->fn), c_7318303);;
+ }
+
+-static void __lambda_559(void *data, object _, int argc, object *args) /* closure _,object k_735571, object str_73696_733293, object fill_73697_733294, object opts_73698_733295_raw, ... */
++static void __lambda_559(void *data, object _, int argc, object *args) /* closure _,object k_735119, object str_73696_732946, object fill_73697_732947, object opts_73698_732948_raw, ... */
+ {
+-object k_735571 = args[0]; object str_73696_733293 = args[1]; object fill_73697_733294 = args[2];
+-load_varargs(opts_73698_733295, args, 3, argc - 3);
++object k_735119 = args[0]; object str_73696_732946 = args[1]; object fill_73697_732947 = args[2];
++load_varargs(opts_73698_732948, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string-fill!");
+
+-closureN_type c_7319465;
+-object e_7319591 [4];
+-c_7319465.hdr.mark = gc_color_red;
+- c_7319465.hdr.grayed = 0;
+-c_7319465.tag = closureN_tag;
+- c_7319465.fn = (function_type)__lambda_560;
+-c_7319465.num_args = 4;
+-c_7319465.num_elements = 4;
+-c_7319465.elements = (object *)e_7319591;
+-c_7319465.elements[0] = fill_73697_733294;
+-c_7319465.elements[1] = k_735571;
+-c_7319465.elements[2] = opts_73698_733295;
+-c_7319465.elements[3] = str_73696_733293;
++closureN_type c_7318165;
++object e_7318291 [4];
++c_7318165.hdr.mark = gc_color_red;
++ c_7318165.hdr.grayed = 0;
++c_7318165.tag = closureN_tag;
++ c_7318165.fn = (function_type)__lambda_560;
++c_7318165.num_args = 4;
++c_7318165.num_elements = 4;
++c_7318165.elements = (object *)e_7318291;
++c_7318165.elements[0] = fill_73697_732947;
++c_7318165.elements[1] = k_735119;
++c_7318165.elements[2] = opts_73698_732948;
++c_7318165.elements[3] = str_73696_732946;
+
+-return_direct_with_clo4(data,(closure)&c_7319465,__lambda_560, boolean_f, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo4(data,(closure)&c_7318165,__lambda_560, boolean_f, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_560(void *data, object self_7313557, int argc, object *args) /* object self_7313557, object len_73699_733296, object start_73700_733297, object end_73701_733298, object loop_73702_733299 */
++static void __lambda_560(void *data, object self_7312304, int argc, object *args) /* object self_7312304, object len_73699_732949, object start_73700_732950, object end_73701_732951, object loop_73702_732952 */
+ {
+- object len_73699_733296 = args[0]; object start_73700_733297 = args[1]; object end_73701_733298 = args[2]; object loop_73702_733299 = args[3];
++ object len_73699_732949 = args[0]; object start_73700_732950 = args[1]; object end_73701_732951 = args[2]; object loop_73702_732952 = args[3];
+
+-closureN_type c_7319467;
+-object e_7319587 [7];
+-c_7319467.hdr.mark = gc_color_red;
+- c_7319467.hdr.grayed = 0;
+-c_7319467.tag = closureN_tag;
+- c_7319467.fn = (function_type)__lambda_1403;
+-c_7319467.num_args = 1;
+-c_7319467.num_elements = 7;
+-c_7319467.elements = (object *)e_7319587;
+-c_7319467.elements[0] = end_73701_733298;
+-c_7319467.elements[1] = ((closureN)self_7313557)->elements[0];
+-c_7319467.elements[2] = ((closureN)self_7313557)->elements[1];
+-c_7319467.elements[3] = loop_73702_733299;
+-c_7319467.elements[4] = ((closureN)self_7313557)->elements[2];
+-c_7319467.elements[5] = start_73700_733297;
+-c_7319467.elements[6] = ((closureN)self_7313557)->elements[3];
++closureN_type c_7318167;
++object e_7318287 [7];
++c_7318167.hdr.mark = gc_color_red;
++ c_7318167.hdr.grayed = 0;
++c_7318167.tag = closureN_tag;
++ c_7318167.fn = (function_type)__lambda_1356;
++c_7318167.num_args = 1;
++c_7318167.num_elements = 7;
++c_7318167.elements = (object *)e_7318287;
++c_7318167.elements[0] = end_73701_732951;
++c_7318167.elements[1] = ((closureN)self_7312304)->elements[0];
++c_7318167.elements[2] = ((closureN)self_7312304)->elements[1];
++c_7318167.elements[3] = loop_73702_732952;
++c_7318167.elements[4] = ((closureN)self_7312304)->elements[2];
++c_7318167.elements[5] = start_73700_732950;
++c_7318167.elements[6] = ((closureN)self_7312304)->elements[3];
+
+
+-pair_type local_7319590;
+-return_direct_with_clo1(data,(closure)&c_7319467,__lambda_1403, set_cell_as_expr(&local_7319590, len_73699_733296));;
++pair_type local_7318290;
++return_direct_with_clo1(data,(closure)&c_7318167,__lambda_1356, set_cell_as_expr(&local_7318290, len_73699_732949));;
+ }
+
+-static void __lambda_1403(void *data, object self_7313558, int argc, object *args) /* object self_7313558, object len_73699_733296 */
++static void __lambda_1356(void *data, object self_7312305, int argc, object *args) /* object self_7312305, object len_73699_732949 */
+ {
+- object len_73699_733296 = args[0];
++ object len_73699_732949 = args[0];
+
+-closureN_type c_7319469;
+-object e_7319582 [7];
+-c_7319469.hdr.mark = gc_color_red;
+- c_7319469.hdr.grayed = 0;
+-c_7319469.tag = closureN_tag;
+- c_7319469.fn = (function_type)__lambda_1402;
+-c_7319469.num_args = 1;
+-c_7319469.num_elements = 7;
+-c_7319469.elements = (object *)e_7319582;
+-c_7319469.elements[0] = ((closureN)self_7313558)->elements[0];
+-c_7319469.elements[1] = ((closureN)self_7313558)->elements[1];
+-c_7319469.elements[2] = ((closureN)self_7313558)->elements[2];
+-c_7319469.elements[3] = len_73699_733296;
+-c_7319469.elements[4] = ((closureN)self_7313558)->elements[3];
+-c_7319469.elements[5] = ((closureN)self_7313558)->elements[4];
+-c_7319469.elements[6] = ((closureN)self_7313558)->elements[6];
++closureN_type c_7318169;
++object e_7318282 [7];
++c_7318169.hdr.mark = gc_color_red;
++ c_7318169.hdr.grayed = 0;
++c_7318169.tag = closureN_tag;
++ c_7318169.fn = (function_type)__lambda_1355;
++c_7318169.num_args = 1;
++c_7318169.num_elements = 7;
++c_7318169.elements = (object *)e_7318282;
++c_7318169.elements[0] = ((closureN)self_7312305)->elements[0];
++c_7318169.elements[1] = ((closureN)self_7312305)->elements[1];
++c_7318169.elements[2] = ((closureN)self_7312305)->elements[2];
++c_7318169.elements[3] = len_73699_732949;
++c_7318169.elements[4] = ((closureN)self_7312305)->elements[3];
++c_7318169.elements[5] = ((closureN)self_7312305)->elements[4];
++c_7318169.elements[6] = ((closureN)self_7312305)->elements[6];
+
+
+-pair_type local_7319585;
+-return_direct_with_clo1(data,(closure)&c_7319469,__lambda_1402, set_cell_as_expr(&local_7319585, ((closureN)self_7313558)->elements[5]));;
++pair_type local_7318285;
++return_direct_with_clo1(data,(closure)&c_7318169,__lambda_1355, set_cell_as_expr(&local_7318285, ((closureN)self_7312305)->elements[5]));;
+ }
+
+-static void __lambda_1402(void *data, object self_7313559, int argc, object *args) /* object self_7313559, object start_73700_733297 */
++static void __lambda_1355(void *data, object self_7312306, int argc, object *args) /* object self_7312306, object start_73700_732950 */
+ {
+- object start_73700_733297 = args[0];
++ object start_73700_732950 = args[0];
+
+-closureN_type c_7319471;
+-object e_7319577 [7];
+-c_7319471.hdr.mark = gc_color_red;
+- c_7319471.hdr.grayed = 0;
+-c_7319471.tag = closureN_tag;
+- c_7319471.fn = (function_type)__lambda_1401;
+-c_7319471.num_args = 1;
+-c_7319471.num_elements = 7;
+-c_7319471.elements = (object *)e_7319577;
+-c_7319471.elements[0] = ((closureN)self_7313559)->elements[1];
+-c_7319471.elements[1] = ((closureN)self_7313559)->elements[2];
+-c_7319471.elements[2] = ((closureN)self_7313559)->elements[3];
+-c_7319471.elements[3] = ((closureN)self_7313559)->elements[4];
+-c_7319471.elements[4] = ((closureN)self_7313559)->elements[5];
+-c_7319471.elements[5] = start_73700_733297;
+-c_7319471.elements[6] = ((closureN)self_7313559)->elements[6];
++closureN_type c_7318171;
++object e_7318277 [7];
++c_7318171.hdr.mark = gc_color_red;
++ c_7318171.hdr.grayed = 0;
++c_7318171.tag = closureN_tag;
++ c_7318171.fn = (function_type)__lambda_1354;
++c_7318171.num_args = 1;
++c_7318171.num_elements = 7;
++c_7318171.elements = (object *)e_7318277;
++c_7318171.elements[0] = ((closureN)self_7312306)->elements[1];
++c_7318171.elements[1] = ((closureN)self_7312306)->elements[2];
++c_7318171.elements[2] = ((closureN)self_7312306)->elements[3];
++c_7318171.elements[3] = ((closureN)self_7312306)->elements[4];
++c_7318171.elements[4] = ((closureN)self_7312306)->elements[5];
++c_7318171.elements[5] = start_73700_732950;
++c_7318171.elements[6] = ((closureN)self_7312306)->elements[6];
+
+
+-pair_type local_7319580;
+-return_direct_with_clo1(data,(closure)&c_7319471,__lambda_1401, set_cell_as_expr(&local_7319580, ((closureN)self_7313559)->elements[0]));;
++pair_type local_7318280;
++return_direct_with_clo1(data,(closure)&c_7318171,__lambda_1354, set_cell_as_expr(&local_7318280, ((closureN)self_7312306)->elements[0]));;
+ }
+
+-static void __lambda_1401(void *data, object self_7313560, int argc, object *args) /* object self_7313560, object end_73701_733298 */
++static void __lambda_1354(void *data, object self_7312307, int argc, object *args) /* object self_7312307, object end_73701_732951 */
+ {
+- object end_73701_733298 = args[0];
++ object end_73701_732951 = args[0];
+
+-closureN_type c_7319473;
+-object e_7319572 [7];
+-c_7319473.hdr.mark = gc_color_red;
+- c_7319473.hdr.grayed = 0;
+-c_7319473.tag = closureN_tag;
+- c_7319473.fn = (function_type)__lambda_1400;
+-c_7319473.num_args = 1;
+-c_7319473.num_elements = 7;
+-c_7319473.elements = (object *)e_7319572;
+-c_7319473.elements[0] = end_73701_733298;
+-c_7319473.elements[1] = ((closureN)self_7313560)->elements[0];
+-c_7319473.elements[2] = ((closureN)self_7313560)->elements[1];
+-c_7319473.elements[3] = ((closureN)self_7313560)->elements[2];
+-c_7319473.elements[4] = ((closureN)self_7313560)->elements[4];
+-c_7319473.elements[5] = ((closureN)self_7313560)->elements[5];
+-c_7319473.elements[6] = ((closureN)self_7313560)->elements[6];
++closureN_type c_7318173;
++object e_7318272 [7];
++c_7318173.hdr.mark = gc_color_red;
++ c_7318173.hdr.grayed = 0;
++c_7318173.tag = closureN_tag;
++ c_7318173.fn = (function_type)__lambda_1353;
++c_7318173.num_args = 1;
++c_7318173.num_elements = 7;
++c_7318173.elements = (object *)e_7318272;
++c_7318173.elements[0] = end_73701_732951;
++c_7318173.elements[1] = ((closureN)self_7312307)->elements[0];
++c_7318173.elements[2] = ((closureN)self_7312307)->elements[1];
++c_7318173.elements[3] = ((closureN)self_7312307)->elements[2];
++c_7318173.elements[4] = ((closureN)self_7312307)->elements[4];
++c_7318173.elements[5] = ((closureN)self_7312307)->elements[5];
++c_7318173.elements[6] = ((closureN)self_7312307)->elements[6];
+
+
+-pair_type local_7319575;
+-return_direct_with_clo1(data,(closure)&c_7319473,__lambda_1400, set_cell_as_expr(&local_7319575, ((closureN)self_7313560)->elements[3]));;
++pair_type local_7318275;
++return_direct_with_clo1(data,(closure)&c_7318173,__lambda_1353, set_cell_as_expr(&local_7318275, ((closureN)self_7312307)->elements[3]));;
+ }
+
+-static void __lambda_1400(void *data, object self_7313561, int argc, object *args) /* object self_7313561, object loop_73702_733299 */
++static void __lambda_1353(void *data, object self_7312308, int argc, object *args) /* object self_7312308, object loop_73702_732952 */
+ {
+- object loop_73702_733299 = args[0];
++ object loop_73702_732952 = args[0];
+
+-closureN_type c_7319475;
+-object e_7319568 [8];
+-c_7319475.hdr.mark = gc_color_red;
+- c_7319475.hdr.grayed = 0;
+-c_7319475.tag = closureN_tag;
+- c_7319475.fn = (function_type)__lambda_561;
+-c_7319475.num_args = 1;
+-c_7319475.num_elements = 8;
+-c_7319475.elements = (object *)e_7319568;
+-c_7319475.elements[0] = ((closureN)self_7313561)->elements[0];
+-c_7319475.elements[1] = ((closureN)self_7313561)->elements[1];
+-c_7319475.elements[2] = ((closureN)self_7313561)->elements[2];
+-c_7319475.elements[3] = ((closureN)self_7313561)->elements[3];
+-c_7319475.elements[4] = loop_73702_733299;
+-c_7319475.elements[5] = ((closureN)self_7313561)->elements[4];
+-c_7319475.elements[6] = ((closureN)self_7313561)->elements[5];
+-c_7319475.elements[7] = ((closureN)self_7313561)->elements[6];
++closureN_type c_7318175;
++object e_7318268 [8];
++c_7318175.hdr.mark = gc_color_red;
++ c_7318175.hdr.grayed = 0;
++c_7318175.tag = closureN_tag;
++ c_7318175.fn = (function_type)__lambda_561;
++c_7318175.num_args = 1;
++c_7318175.num_elements = 8;
++c_7318175.elements = (object *)e_7318268;
++c_7318175.elements[0] = ((closureN)self_7312308)->elements[0];
++c_7318175.elements[1] = ((closureN)self_7312308)->elements[1];
++c_7318175.elements[2] = ((closureN)self_7312308)->elements[2];
++c_7318175.elements[3] = ((closureN)self_7312308)->elements[3];
++c_7318175.elements[4] = loop_73702_732952;
++c_7318175.elements[5] = ((closureN)self_7312308)->elements[4];
++c_7318175.elements[6] = ((closureN)self_7312308)->elements[5];
++c_7318175.elements[7] = ((closureN)self_7312308)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319475,__lambda_561, Cyc_string_length(data, ((closureN)self_7313561)->elements[6]));;
++return_direct_with_clo1(data,(closure)&c_7318175,__lambda_561, Cyc_string_length(data, ((closureN)self_7312308)->elements[6]));;
+ }
+
+-static void __lambda_561(void *data, object self_7313562, int argc, object *args) /* object self_7313562, object r_735589 */
++static void __lambda_561(void *data, object self_7312309, int argc, object *args) /* object self_7312309, object r_735137 */
+ {
+- object r_735589 = args[0];
++ object r_735137 = args[0];
+
+-closureN_type c_7319477;
+-object e_7319564 [8];
+-c_7319477.hdr.mark = gc_color_red;
+- c_7319477.hdr.grayed = 0;
+-c_7319477.tag = closureN_tag;
+- c_7319477.fn = (function_type)__lambda_562;
+-c_7319477.num_args = 1;
+-c_7319477.num_elements = 8;
+-c_7319477.elements = (object *)e_7319564;
+-c_7319477.elements[0] = ((closureN)self_7313562)->elements[0];
+-c_7319477.elements[1] = ((closureN)self_7313562)->elements[1];
+-c_7319477.elements[2] = ((closureN)self_7313562)->elements[2];
+-c_7319477.elements[3] = ((closureN)self_7313562)->elements[3];
+-c_7319477.elements[4] = ((closureN)self_7313562)->elements[4];
+-c_7319477.elements[5] = ((closureN)self_7313562)->elements[5];
+-c_7319477.elements[6] = ((closureN)self_7313562)->elements[6];
+-c_7319477.elements[7] = ((closureN)self_7313562)->elements[7];
++closureN_type c_7318177;
++object e_7318264 [8];
++c_7318177.hdr.mark = gc_color_red;
++ c_7318177.hdr.grayed = 0;
++c_7318177.tag = closureN_tag;
++ c_7318177.fn = (function_type)__lambda_562;
++c_7318177.num_args = 1;
++c_7318177.num_elements = 8;
++c_7318177.elements = (object *)e_7318264;
++c_7318177.elements[0] = ((closureN)self_7312309)->elements[0];
++c_7318177.elements[1] = ((closureN)self_7312309)->elements[1];
++c_7318177.elements[2] = ((closureN)self_7312309)->elements[2];
++c_7318177.elements[3] = ((closureN)self_7312309)->elements[3];
++c_7318177.elements[4] = ((closureN)self_7312309)->elements[4];
++c_7318177.elements[5] = ((closureN)self_7312309)->elements[5];
++c_7318177.elements[6] = ((closureN)self_7312309)->elements[6];
++c_7318177.elements[7] = ((closureN)self_7312309)->elements[7];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319477,__lambda_562, Cyc_set_cell(data, ((closureN)self_7313562)->elements[3], r_735589));;
++return_direct_with_clo1(data,(closure)&c_7318177,__lambda_562, Cyc_set_cell(data, ((closureN)self_7312309)->elements[3], r_735137));;
+ }
+
+-static void __lambda_562(void *data, object self_7313563, int argc, object *args) /* object self_7313563, object r_735572 */
++static void __lambda_562(void *data, object self_7312310, int argc, object *args) /* object self_7312310, object r_735120 */
+ {
+
+- object r_735585;
++ object r_735133;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313563)->elements[5]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312310)->elements[5]), obj_int2obj(0))) ){
+
+- r_735585 = Cyc_car(data, ((closureN)self_7313563)->elements[5]);
++ r_735133 = Cyc_car(data, ((closureN)self_7312310)->elements[5]);
+ } else {
+- r_735585 = obj_int2obj(0);}
++ r_735133 = obj_int2obj(0);}
+ ;
+-closureN_type c_7319490;
+-object e_7319560 [8];
+-c_7319490.hdr.mark = gc_color_red;
+- c_7319490.hdr.grayed = 0;
+-c_7319490.tag = closureN_tag;
+- c_7319490.fn = (function_type)__lambda_563;
+-c_7319490.num_args = 1;
+-c_7319490.num_elements = 8;
+-c_7319490.elements = (object *)e_7319560;
+-c_7319490.elements[0] = ((closureN)self_7313563)->elements[0];
+-c_7319490.elements[1] = ((closureN)self_7313563)->elements[1];
+-c_7319490.elements[2] = ((closureN)self_7313563)->elements[2];
+-c_7319490.elements[3] = ((closureN)self_7313563)->elements[3];
+-c_7319490.elements[4] = ((closureN)self_7313563)->elements[4];
+-c_7319490.elements[5] = ((closureN)self_7313563)->elements[5];
+-c_7319490.elements[6] = ((closureN)self_7313563)->elements[6];
+-c_7319490.elements[7] = ((closureN)self_7313563)->elements[7];
++closureN_type c_7318190;
++object e_7318260 [8];
++c_7318190.hdr.mark = gc_color_red;
++ c_7318190.hdr.grayed = 0;
++c_7318190.tag = closureN_tag;
++ c_7318190.fn = (function_type)__lambda_563;
++c_7318190.num_args = 1;
++c_7318190.num_elements = 8;
++c_7318190.elements = (object *)e_7318260;
++c_7318190.elements[0] = ((closureN)self_7312310)->elements[0];
++c_7318190.elements[1] = ((closureN)self_7312310)->elements[1];
++c_7318190.elements[2] = ((closureN)self_7312310)->elements[2];
++c_7318190.elements[3] = ((closureN)self_7312310)->elements[3];
++c_7318190.elements[4] = ((closureN)self_7312310)->elements[4];
++c_7318190.elements[5] = ((closureN)self_7312310)->elements[5];
++c_7318190.elements[6] = ((closureN)self_7312310)->elements[6];
++c_7318190.elements[7] = ((closureN)self_7312310)->elements[7];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319490,__lambda_563, Cyc_set_cell(data, ((closureN)self_7313563)->elements[6], r_735585));;
++return_direct_with_clo1(data,(closure)&c_7318190,__lambda_563, Cyc_set_cell(data, ((closureN)self_7312310)->elements[6], r_735133));;
+ }
+
+-static void __lambda_563(void *data, object self_7313564, int argc, object *args) /* object self_7313564, object r_735573 */
++static void __lambda_563(void *data, object self_7312311, int argc, object *args) /* object self_7312311, object r_735121 */
+ {
+
+
+-closureN_type c_7319492;
+-object e_7319506 [2];
+-c_7319492.hdr.mark = gc_color_red;
+- c_7319492.hdr.grayed = 0;
+-c_7319492.tag = closureN_tag;
+- c_7319492.fn = (function_type)__lambda_564;
+-c_7319492.num_args = 0;
+-c_7319492.num_elements = 2;
+-c_7319492.elements = (object *)e_7319506;
+-c_7319492.elements[0] = ((closureN)self_7313564)->elements[3];
+-c_7319492.elements[1] = ((closureN)self_7313564)->elements[5];
++closureN_type c_7318192;
++object e_7318206 [2];
++c_7318192.hdr.mark = gc_color_red;
++ c_7318192.hdr.grayed = 0;
++c_7318192.tag = closureN_tag;
++ c_7318192.fn = (function_type)__lambda_564;
++c_7318192.num_args = 0;
++c_7318192.num_elements = 2;
++c_7318192.elements = (object *)e_7318206;
++c_7318192.elements[0] = ((closureN)self_7312311)->elements[3];
++c_7318192.elements[1] = ((closureN)self_7312311)->elements[5];
+
+
+-closureN_type c_7319507;
+-object e_7319559 [6];
+-c_7319507.hdr.mark = gc_color_red;
+- c_7319507.hdr.grayed = 0;
+-c_7319507.tag = closureN_tag;
+- c_7319507.fn = (function_type)__lambda_565;
+-c_7319507.num_args = 1;
+-c_7319507.num_elements = 6;
+-c_7319507.elements = (object *)e_7319559;
+-c_7319507.elements[0] = ((closureN)self_7313564)->elements[0];
+-c_7319507.elements[1] = ((closureN)self_7313564)->elements[1];
+-c_7319507.elements[2] = ((closureN)self_7313564)->elements[2];
+-c_7319507.elements[3] = ((closureN)self_7313564)->elements[4];
+-c_7319507.elements[4] = ((closureN)self_7313564)->elements[6];
+-c_7319507.elements[5] = ((closureN)self_7313564)->elements[7];
++closureN_type c_7318207;
++object e_7318259 [6];
++c_7318207.hdr.mark = gc_color_red;
++ c_7318207.hdr.grayed = 0;
++c_7318207.tag = closureN_tag;
++ c_7318207.fn = (function_type)__lambda_565;
++c_7318207.num_args = 1;
++c_7318207.num_elements = 6;
++c_7318207.elements = (object *)e_7318259;
++c_7318207.elements[0] = ((closureN)self_7312311)->elements[0];
++c_7318207.elements[1] = ((closureN)self_7312311)->elements[1];
++c_7318207.elements[2] = ((closureN)self_7312311)->elements[2];
++c_7318207.elements[3] = ((closureN)self_7312311)->elements[4];
++c_7318207.elements[4] = ((closureN)self_7312311)->elements[6];
++c_7318207.elements[5] = ((closureN)self_7312311)->elements[7];
+
+-return_direct_with_clo1(data,(closure)&c_7319492,__lambda_564, &c_7319507);;
++return_direct_with_clo1(data,(closure)&c_7318192,__lambda_564, &c_7318207);;
+ }
+
+-static void __lambda_565(void *data, object self_7313565, int argc, object *args) /* object self_7313565, object r_735581 */
++static void __lambda_565(void *data, object self_7312312, int argc, object *args) /* object self_7312312, object r_735129 */
+ {
+- object r_735581 = args[0];
++ object r_735129 = args[0];
+
+-closureN_type c_7319509;
+-object e_7319555 [6];
+-c_7319509.hdr.mark = gc_color_red;
+- c_7319509.hdr.grayed = 0;
+-c_7319509.tag = closureN_tag;
+- c_7319509.fn = (function_type)__lambda_566;
+-c_7319509.num_args = 1;
+-c_7319509.num_elements = 6;
+-c_7319509.elements = (object *)e_7319555;
+-c_7319509.elements[0] = ((closureN)self_7313565)->elements[0];
+-c_7319509.elements[1] = ((closureN)self_7313565)->elements[1];
+-c_7319509.elements[2] = ((closureN)self_7313565)->elements[2];
+-c_7319509.elements[3] = ((closureN)self_7313565)->elements[3];
+-c_7319509.elements[4] = ((closureN)self_7313565)->elements[4];
+-c_7319509.elements[5] = ((closureN)self_7313565)->elements[5];
++closureN_type c_7318209;
++object e_7318255 [6];
++c_7318209.hdr.mark = gc_color_red;
++ c_7318209.hdr.grayed = 0;
++c_7318209.tag = closureN_tag;
++ c_7318209.fn = (function_type)__lambda_566;
++c_7318209.num_args = 1;
++c_7318209.num_elements = 6;
++c_7318209.elements = (object *)e_7318255;
++c_7318209.elements[0] = ((closureN)self_7312312)->elements[0];
++c_7318209.elements[1] = ((closureN)self_7312312)->elements[1];
++c_7318209.elements[2] = ((closureN)self_7312312)->elements[2];
++c_7318209.elements[3] = ((closureN)self_7312312)->elements[3];
++c_7318209.elements[4] = ((closureN)self_7312312)->elements[4];
++c_7318209.elements[5] = ((closureN)self_7312312)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319509,__lambda_566, Cyc_set_cell(data, ((closureN)self_7313565)->elements[0], r_735581));;
++return_direct_with_clo1(data,(closure)&c_7318209,__lambda_566, Cyc_set_cell(data, ((closureN)self_7312312)->elements[0], r_735129));;
+ }
+
+-static void __lambda_566(void *data, object self_7313566, int argc, object *args) /* object self_7313566, object r_735574 */
++static void __lambda_566(void *data, object self_7312313, int argc, object *args) /* object self_7312313, object r_735122 */
+ {
+
+
+-closureN_type c_7319511;
+-object e_7319526 [3];
+-c_7319511.hdr.mark = gc_color_red;
+- c_7319511.hdr.grayed = 0;
+-c_7319511.tag = closureN_tag;
+- c_7319511.fn = (function_type)__lambda_567;
+-c_7319511.num_args = 1;
+-c_7319511.num_elements = 3;
+-c_7319511.elements = (object *)e_7319526;
+-c_7319511.elements[0] = ((closureN)self_7313566)->elements[2];
+-c_7319511.elements[1] = ((closureN)self_7313566)->elements[3];
+-c_7319511.elements[2] = ((closureN)self_7313566)->elements[4];
++closureN_type c_7318211;
++object e_7318226 [3];
++c_7318211.hdr.mark = gc_color_red;
++ c_7318211.hdr.grayed = 0;
++c_7318211.tag = closureN_tag;
++ c_7318211.fn = (function_type)__lambda_567;
++c_7318211.num_args = 1;
++c_7318211.num_elements = 3;
++c_7318211.elements = (object *)e_7318226;
++c_7318211.elements[0] = ((closureN)self_7312313)->elements[2];
++c_7318211.elements[1] = ((closureN)self_7312313)->elements[3];
++c_7318211.elements[2] = ((closureN)self_7312313)->elements[4];
+
+
+-closureN_type c_7319527;
+-object e_7319554 [4];
+-c_7319527.hdr.mark = gc_color_red;
+- c_7319527.hdr.grayed = 0;
+-c_7319527.tag = closureN_tag;
+- c_7319527.fn = (function_type)__lambda_569;
+-c_7319527.num_args = 1;
+-c_7319527.num_elements = 4;
+-c_7319527.elements = (object *)e_7319554;
+-c_7319527.elements[0] = ((closureN)self_7313566)->elements[0];
+-c_7319527.elements[1] = ((closureN)self_7313566)->elements[1];
+-c_7319527.elements[2] = ((closureN)self_7313566)->elements[3];
+-c_7319527.elements[3] = ((closureN)self_7313566)->elements[5];
++closureN_type c_7318227;
++object e_7318254 [4];
++c_7318227.hdr.mark = gc_color_red;
++ c_7318227.hdr.grayed = 0;
++c_7318227.tag = closureN_tag;
++ c_7318227.fn = (function_type)__lambda_569;
++c_7318227.num_args = 1;
++c_7318227.num_elements = 4;
++c_7318227.elements = (object *)e_7318254;
++c_7318227.elements[0] = ((closureN)self_7312313)->elements[0];
++c_7318227.elements[1] = ((closureN)self_7312313)->elements[1];
++c_7318227.elements[2] = ((closureN)self_7312313)->elements[3];
++c_7318227.elements[3] = ((closureN)self_7312313)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7319511,__lambda_567, &c_7319527);;
++return_direct_with_clo1(data,(closure)&c_7318211,__lambda_567, &c_7318227);;
+ }
+
+-static void __lambda_569(void *data, object self_7313567, int argc, object *args) /* object self_7313567, object k_735577, object i_73703_733300 */
++static void __lambda_569(void *data, object self_7312314, int argc, object *args) /* object self_7312314, object k_735125, object i_73703_732953 */
+ {
+- object k_735577 = args[0]; object i_73703_733300 = args[1];
++ object k_735125 = args[0]; object i_73703_732953 = args[1];
+
+-closureN_type c_7319529;
+-object e_7319548 [5];
+-c_7319529.hdr.mark = gc_color_red;
+- c_7319529.hdr.grayed = 0;
+-c_7319529.tag = closureN_tag;
+- c_7319529.fn = (function_type)__lambda_570;
+-c_7319529.num_args = 1;
+-c_7319529.num_elements = 5;
+-c_7319529.elements = (object *)e_7319548;
+-c_7319529.elements[0] = ((closureN)self_7313567)->elements[1];
+-c_7319529.elements[1] = i_73703_733300;
+-c_7319529.elements[2] = k_735577;
+-c_7319529.elements[3] = ((closureN)self_7313567)->elements[2];
+-c_7319529.elements[4] = ((closureN)self_7313567)->elements[3];
++closureN_type c_7318229;
++object e_7318248 [5];
++c_7318229.hdr.mark = gc_color_red;
++ c_7318229.hdr.grayed = 0;
++c_7318229.tag = closureN_tag;
++ c_7318229.fn = (function_type)__lambda_570;
++c_7318229.num_args = 1;
++c_7318229.num_elements = 5;
++c_7318229.elements = (object *)e_7318248;
++c_7318229.elements[0] = ((closureN)self_7312314)->elements[1];
++c_7318229.elements[1] = i_73703_732953;
++c_7318229.elements[2] = k_735125;
++c_7318229.elements[3] = ((closureN)self_7312314)->elements[2];
++c_7318229.elements[4] = ((closureN)self_7312314)->elements[3];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319529,__lambda_570, Cyc_num_fast_eq_op(data, i_73703_733300, car(((closureN)self_7313567)->elements[0])));;
++return_direct_with_clo1(data,(closure)&c_7318229,__lambda_570, Cyc_num_fast_eq_op(data, i_73703_732953, car(((closureN)self_7312314)->elements[0])));;
+ }
+
+-static void __lambda_570(void *data, object self_7313568, int argc, object *args) /* object self_7313568, object r_735578 */
++static void __lambda_570(void *data, object self_7312315, int argc, object *args) /* object self_7312315, object r_735126 */
+ {
+- object r_735578 = args[0];
+- if( (boolean_f != r_735578) ){
+- return_direct_with_clo1(data, ((closureN)self_7313568)->elements[2], (((closure) ((closureN)self_7313568)->elements[2])->fn), ((closureN)self_7313568)->elements[4]);
++ object r_735126 = args[0];
++ if( (boolean_f != r_735126) ){
++ return_direct_with_clo1(data, ((closureN)self_7312315)->elements[2], (((closure) ((closureN)self_7312315)->elements[2])->fn), ((closureN)self_7312315)->elements[4]);
+ } else {
+
+- Cyc_string_set(data, ((closureN)self_7313568)->elements[4], ((closureN)self_7313568)->elements[1], ((closureN)self_7313568)->elements[0]);
++ Cyc_string_set(data, ((closureN)self_7312315)->elements[4], ((closureN)self_7312315)->elements[1], ((closureN)self_7312315)->elements[0]);
+
+
+-complex_num_type local_7319541;
+-return_closcall2(data, car(((closureN)self_7313568)->elements[3]), ((closureN)self_7313568)->elements[2], Cyc_fast_sum(data,&local_7319541, ((closureN)self_7313568)->elements[1], obj_int2obj(1)));;}
++complex_num_type local_7318241;
++return_closcall2(data, car(((closureN)self_7312315)->elements[3]), ((closureN)self_7312315)->elements[2], Cyc_fast_sum(data,&local_7318241, ((closureN)self_7312315)->elements[1], obj_int2obj(1)));;}
+ ;;
+ }
+
+-static void __lambda_567(void *data, object self_7313569, int argc, object *args) /* object self_7313569, object r_735576 */
++static void __lambda_567(void *data, object self_7312316, int argc, object *args) /* object self_7312316, object r_735124 */
+ {
+- object r_735576 = args[0];
++ object r_735124 = args[0];
+
+-closureN_type c_7319513;
+-object e_7319522 [3];
+-c_7319513.hdr.mark = gc_color_red;
+- c_7319513.hdr.grayed = 0;
+-c_7319513.tag = closureN_tag;
+- c_7319513.fn = (function_type)__lambda_568;
+-c_7319513.num_args = 1;
+-c_7319513.num_elements = 3;
+-c_7319513.elements = (object *)e_7319522;
+-c_7319513.elements[0] = ((closureN)self_7313569)->elements[0];
+-c_7319513.elements[1] = ((closureN)self_7313569)->elements[1];
+-c_7319513.elements[2] = ((closureN)self_7313569)->elements[2];
++closureN_type c_7318213;
++object e_7318222 [3];
++c_7318213.hdr.mark = gc_color_red;
++ c_7318213.hdr.grayed = 0;
++c_7318213.tag = closureN_tag;
++ c_7318213.fn = (function_type)__lambda_568;
++c_7318213.num_args = 1;
++c_7318213.num_elements = 3;
++c_7318213.elements = (object *)e_7318222;
++c_7318213.elements[0] = ((closureN)self_7312316)->elements[0];
++c_7318213.elements[1] = ((closureN)self_7312316)->elements[1];
++c_7318213.elements[2] = ((closureN)self_7312316)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319513,__lambda_568, Cyc_set_cell(data, ((closureN)self_7313569)->elements[1], r_735576));;
++return_direct_with_clo1(data,(closure)&c_7318213,__lambda_568, Cyc_set_cell(data, ((closureN)self_7312316)->elements[1], r_735124));;
+ }
+
+-static void __lambda_568(void *data, object self_7313570, int argc, object *args) /* object self_7313570, object r_735575 */
++static void __lambda_568(void *data, object self_7312317, int argc, object *args) /* object self_7312317, object r_735123 */
+ {
+
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313570)->elements[1]), ((closureN)self_7313570)->elements[0], car(((closureN)self_7313570)->elements[2]));;
++return_closcall2(data, car(((closureN)self_7312317)->elements[1]), ((closureN)self_7312317)->elements[0], car(((closureN)self_7312317)->elements[2]));;
+ }
+
+-static void __lambda_564(void *data, object self_7313571, int argc, object *args) /* object self_7313571, object k_735582 */
++static void __lambda_564(void *data, object self_7312318, int argc, object *args) /* object self_7312318, object k_735130 */
+ {
+- object k_735582 = args[0];
++ object k_735130 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313571)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312318)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735582,__lambda_565, Cyc_cadr(data, ((closureN)self_7313571)->elements[1]));
++return_direct_with_clo1(data, k_735130,__lambda_565, Cyc_cadr(data, ((closureN)self_7312318)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735582,__lambda_565, car(((closureN)self_7313571)->elements[0]));}
++return_direct_with_clo1(data, k_735130,__lambda_565, car(((closureN)self_7312318)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_549(void *data, object _, int argc, object *args) /* closure _,object k_735548, object to_73682_733283, object at_73683_733284, object from_73684_733285, object opts_73685_733286_raw, ... */
++static void __lambda_549(void *data, object _, int argc, object *args) /* closure _,object k_735096, object to_73682_732936, object at_73683_732937, object from_73684_732938, object opts_73685_732939_raw, ... */
+ {
+-object k_735548 = args[0]; object to_73682_733283 = args[1]; object at_73683_733284 = args[2]; object from_73684_733285 = args[3];
+-load_varargs(opts_73685_733286, args, 4, argc - 4);
++object k_735096 = args[0]; object to_73682_732936 = args[1]; object at_73683_732937 = args[2]; object from_73684_732938 = args[3];
++load_varargs(opts_73685_732939, args, 4, argc - 4);
+ Cyc_st_add(data, "scheme/base.sld:string-copy!");
+
+-closureN_type c_7319340;
+-object e_7319462 [5];
+-c_7319340.hdr.mark = gc_color_red;
+- c_7319340.hdr.grayed = 0;
+-c_7319340.tag = closureN_tag;
+- c_7319340.fn = (function_type)__lambda_550;
+-c_7319340.num_args = 4;
+-c_7319340.num_elements = 5;
+-c_7319340.elements = (object *)e_7319462;
+-c_7319340.elements[0] = at_73683_733284;
+-c_7319340.elements[1] = from_73684_733285;
+-c_7319340.elements[2] = k_735548;
+-c_7319340.elements[3] = opts_73685_733286;
+-c_7319340.elements[4] = to_73682_733283;
+-
+-return_direct_with_clo4(data,(closure)&c_7319340,__lambda_550, boolean_f, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_550(void *data, object self_7313544, int argc, object *args) /* object self_7313544, object len_73686_733287, object start_73687_733288, object end_73688_733289, object loop_73689_733290 */
+- {
+- object len_73686_733287 = args[0]; object start_73687_733288 = args[1]; object end_73688_733289 = args[2]; object loop_73689_733290 = args[3];
+-
+-closureN_type c_7319342;
+-object e_7319458 [8];
+-c_7319342.hdr.mark = gc_color_red;
+- c_7319342.hdr.grayed = 0;
+-c_7319342.tag = closureN_tag;
+- c_7319342.fn = (function_type)__lambda_1399;
+-c_7319342.num_args = 1;
+-c_7319342.num_elements = 8;
+-c_7319342.elements = (object *)e_7319458;
+-c_7319342.elements[0] = ((closureN)self_7313544)->elements[0];
+-c_7319342.elements[1] = end_73688_733289;
+-c_7319342.elements[2] = ((closureN)self_7313544)->elements[1];
+-c_7319342.elements[3] = ((closureN)self_7313544)->elements[2];
+-c_7319342.elements[4] = loop_73689_733290;
+-c_7319342.elements[5] = ((closureN)self_7313544)->elements[3];
+-c_7319342.elements[6] = start_73687_733288;
+-c_7319342.elements[7] = ((closureN)self_7313544)->elements[4];
++closureN_type c_7318040;
++object e_7318162 [5];
++c_7318040.hdr.mark = gc_color_red;
++ c_7318040.hdr.grayed = 0;
++c_7318040.tag = closureN_tag;
++ c_7318040.fn = (function_type)__lambda_550;
++c_7318040.num_args = 4;
++c_7318040.num_elements = 5;
++c_7318040.elements = (object *)e_7318162;
++c_7318040.elements[0] = at_73683_732937;
++c_7318040.elements[1] = from_73684_732938;
++c_7318040.elements[2] = k_735096;
++c_7318040.elements[3] = opts_73685_732939;
++c_7318040.elements[4] = to_73682_732936;
++
++return_direct_with_clo4(data,(closure)&c_7318040,__lambda_550, boolean_f, boolean_f, boolean_f, boolean_f);;
++}
++
++static void __lambda_550(void *data, object self_7312291, int argc, object *args) /* object self_7312291, object len_73686_732940, object start_73687_732941, object end_73688_732942, object loop_73689_732943 */
++ {
++ object len_73686_732940 = args[0]; object start_73687_732941 = args[1]; object end_73688_732942 = args[2]; object loop_73689_732943 = args[3];
++
++closureN_type c_7318042;
++object e_7318158 [8];
++c_7318042.hdr.mark = gc_color_red;
++ c_7318042.hdr.grayed = 0;
++c_7318042.tag = closureN_tag;
++ c_7318042.fn = (function_type)__lambda_1352;
++c_7318042.num_args = 1;
++c_7318042.num_elements = 8;
++c_7318042.elements = (object *)e_7318158;
++c_7318042.elements[0] = ((closureN)self_7312291)->elements[0];
++c_7318042.elements[1] = end_73688_732942;
++c_7318042.elements[2] = ((closureN)self_7312291)->elements[1];
++c_7318042.elements[3] = ((closureN)self_7312291)->elements[2];
++c_7318042.elements[4] = loop_73689_732943;
++c_7318042.elements[5] = ((closureN)self_7312291)->elements[3];
++c_7318042.elements[6] = start_73687_732941;
++c_7318042.elements[7] = ((closureN)self_7312291)->elements[4];
+
+
+-pair_type local_7319461;
+-return_direct_with_clo1(data,(closure)&c_7319342,__lambda_1399, set_cell_as_expr(&local_7319461, len_73686_733287));;
++pair_type local_7318161;
++return_direct_with_clo1(data,(closure)&c_7318042,__lambda_1352, set_cell_as_expr(&local_7318161, len_73686_732940));;
+ }
+
+-static void __lambda_1399(void *data, object self_7313545, int argc, object *args) /* object self_7313545, object len_73686_733287 */
++static void __lambda_1352(void *data, object self_7312292, int argc, object *args) /* object self_7312292, object len_73686_732940 */
+ {
+- object len_73686_733287 = args[0];
++ object len_73686_732940 = args[0];
+
+-closureN_type c_7319344;
+-object e_7319453 [8];
+-c_7319344.hdr.mark = gc_color_red;
+- c_7319344.hdr.grayed = 0;
+-c_7319344.tag = closureN_tag;
+- c_7319344.fn = (function_type)__lambda_1398;
+-c_7319344.num_args = 1;
+-c_7319344.num_elements = 8;
+-c_7319344.elements = (object *)e_7319453;
+-c_7319344.elements[0] = ((closureN)self_7313545)->elements[0];
+-c_7319344.elements[1] = ((closureN)self_7313545)->elements[1];
+-c_7319344.elements[2] = ((closureN)self_7313545)->elements[2];
+-c_7319344.elements[3] = ((closureN)self_7313545)->elements[3];
+-c_7319344.elements[4] = len_73686_733287;
+-c_7319344.elements[5] = ((closureN)self_7313545)->elements[4];
+-c_7319344.elements[6] = ((closureN)self_7313545)->elements[5];
+-c_7319344.elements[7] = ((closureN)self_7313545)->elements[7];
++closureN_type c_7318044;
++object e_7318153 [8];
++c_7318044.hdr.mark = gc_color_red;
++ c_7318044.hdr.grayed = 0;
++c_7318044.tag = closureN_tag;
++ c_7318044.fn = (function_type)__lambda_1351;
++c_7318044.num_args = 1;
++c_7318044.num_elements = 8;
++c_7318044.elements = (object *)e_7318153;
++c_7318044.elements[0] = ((closureN)self_7312292)->elements[0];
++c_7318044.elements[1] = ((closureN)self_7312292)->elements[1];
++c_7318044.elements[2] = ((closureN)self_7312292)->elements[2];
++c_7318044.elements[3] = ((closureN)self_7312292)->elements[3];
++c_7318044.elements[4] = len_73686_732940;
++c_7318044.elements[5] = ((closureN)self_7312292)->elements[4];
++c_7318044.elements[6] = ((closureN)self_7312292)->elements[5];
++c_7318044.elements[7] = ((closureN)self_7312292)->elements[7];
+
+
+-pair_type local_7319456;
+-return_direct_with_clo1(data,(closure)&c_7319344,__lambda_1398, set_cell_as_expr(&local_7319456, ((closureN)self_7313545)->elements[6]));;
++pair_type local_7318156;
++return_direct_with_clo1(data,(closure)&c_7318044,__lambda_1351, set_cell_as_expr(&local_7318156, ((closureN)self_7312292)->elements[6]));;
+ }
+
+-static void __lambda_1398(void *data, object self_7313546, int argc, object *args) /* object self_7313546, object start_73687_733288 */
++static void __lambda_1351(void *data, object self_7312293, int argc, object *args) /* object self_7312293, object start_73687_732941 */
+ {
+- object start_73687_733288 = args[0];
++ object start_73687_732941 = args[0];
+
+-closureN_type c_7319346;
+-object e_7319448 [8];
+-c_7319346.hdr.mark = gc_color_red;
+- c_7319346.hdr.grayed = 0;
+-c_7319346.tag = closureN_tag;
+- c_7319346.fn = (function_type)__lambda_1397;
+-c_7319346.num_args = 1;
+-c_7319346.num_elements = 8;
+-c_7319346.elements = (object *)e_7319448;
+-c_7319346.elements[0] = ((closureN)self_7313546)->elements[0];
+-c_7319346.elements[1] = ((closureN)self_7313546)->elements[2];
+-c_7319346.elements[2] = ((closureN)self_7313546)->elements[3];
+-c_7319346.elements[3] = ((closureN)self_7313546)->elements[4];
+-c_7319346.elements[4] = ((closureN)self_7313546)->elements[5];
+-c_7319346.elements[5] = ((closureN)self_7313546)->elements[6];
+-c_7319346.elements[6] = start_73687_733288;
+-c_7319346.elements[7] = ((closureN)self_7313546)->elements[7];
++closureN_type c_7318046;
++object e_7318148 [8];
++c_7318046.hdr.mark = gc_color_red;
++ c_7318046.hdr.grayed = 0;
++c_7318046.tag = closureN_tag;
++ c_7318046.fn = (function_type)__lambda_1350;
++c_7318046.num_args = 1;
++c_7318046.num_elements = 8;
++c_7318046.elements = (object *)e_7318148;
++c_7318046.elements[0] = ((closureN)self_7312293)->elements[0];
++c_7318046.elements[1] = ((closureN)self_7312293)->elements[2];
++c_7318046.elements[2] = ((closureN)self_7312293)->elements[3];
++c_7318046.elements[3] = ((closureN)self_7312293)->elements[4];
++c_7318046.elements[4] = ((closureN)self_7312293)->elements[5];
++c_7318046.elements[5] = ((closureN)self_7312293)->elements[6];
++c_7318046.elements[6] = start_73687_732941;
++c_7318046.elements[7] = ((closureN)self_7312293)->elements[7];
+
+
+-pair_type local_7319451;
+-return_direct_with_clo1(data,(closure)&c_7319346,__lambda_1397, set_cell_as_expr(&local_7319451, ((closureN)self_7313546)->elements[1]));;
++pair_type local_7318151;
++return_direct_with_clo1(data,(closure)&c_7318046,__lambda_1350, set_cell_as_expr(&local_7318151, ((closureN)self_7312293)->elements[1]));;
+ }
+
+-static void __lambda_1397(void *data, object self_7313547, int argc, object *args) /* object self_7313547, object end_73688_733289 */
++static void __lambda_1350(void *data, object self_7312294, int argc, object *args) /* object self_7312294, object end_73688_732942 */
+ {
+- object end_73688_733289 = args[0];
++ object end_73688_732942 = args[0];
+
+-closureN_type c_7319348;
+-object e_7319443 [8];
+-c_7319348.hdr.mark = gc_color_red;
+- c_7319348.hdr.grayed = 0;
+-c_7319348.tag = closureN_tag;
+- c_7319348.fn = (function_type)__lambda_1396;
+-c_7319348.num_args = 1;
+-c_7319348.num_elements = 8;
+-c_7319348.elements = (object *)e_7319443;
+-c_7319348.elements[0] = ((closureN)self_7313547)->elements[0];
+-c_7319348.elements[1] = end_73688_733289;
+-c_7319348.elements[2] = ((closureN)self_7313547)->elements[1];
+-c_7319348.elements[3] = ((closureN)self_7313547)->elements[2];
+-c_7319348.elements[4] = ((closureN)self_7313547)->elements[3];
+-c_7319348.elements[5] = ((closureN)self_7313547)->elements[5];
+-c_7319348.elements[6] = ((closureN)self_7313547)->elements[6];
+-c_7319348.elements[7] = ((closureN)self_7313547)->elements[7];
++closureN_type c_7318048;
++object e_7318143 [8];
++c_7318048.hdr.mark = gc_color_red;
++ c_7318048.hdr.grayed = 0;
++c_7318048.tag = closureN_tag;
++ c_7318048.fn = (function_type)__lambda_1349;
++c_7318048.num_args = 1;
++c_7318048.num_elements = 8;
++c_7318048.elements = (object *)e_7318143;
++c_7318048.elements[0] = ((closureN)self_7312294)->elements[0];
++c_7318048.elements[1] = end_73688_732942;
++c_7318048.elements[2] = ((closureN)self_7312294)->elements[1];
++c_7318048.elements[3] = ((closureN)self_7312294)->elements[2];
++c_7318048.elements[4] = ((closureN)self_7312294)->elements[3];
++c_7318048.elements[5] = ((closureN)self_7312294)->elements[5];
++c_7318048.elements[6] = ((closureN)self_7312294)->elements[6];
++c_7318048.elements[7] = ((closureN)self_7312294)->elements[7];
+
+
+-pair_type local_7319446;
+-return_direct_with_clo1(data,(closure)&c_7319348,__lambda_1396, set_cell_as_expr(&local_7319446, ((closureN)self_7313547)->elements[4]));;
++pair_type local_7318146;
++return_direct_with_clo1(data,(closure)&c_7318048,__lambda_1349, set_cell_as_expr(&local_7318146, ((closureN)self_7312294)->elements[4]));;
+ }
+
+-static void __lambda_1396(void *data, object self_7313548, int argc, object *args) /* object self_7313548, object loop_73689_733290 */
++static void __lambda_1349(void *data, object self_7312295, int argc, object *args) /* object self_7312295, object loop_73689_732943 */
+ {
+- object loop_73689_733290 = args[0];
++ object loop_73689_732943 = args[0];
+
+-closureN_type c_7319350;
+-object e_7319436 [9];
+-c_7319350.hdr.mark = gc_color_red;
+- c_7319350.hdr.grayed = 0;
+-c_7319350.tag = closureN_tag;
+- c_7319350.fn = (function_type)__lambda_551;
+-c_7319350.num_args = 1;
+-c_7319350.num_elements = 9;
+-c_7319350.elements = (object *)e_7319436;
+-c_7319350.elements[0] = ((closureN)self_7313548)->elements[0];
+-c_7319350.elements[1] = ((closureN)self_7313548)->elements[1];
+-c_7319350.elements[2] = ((closureN)self_7313548)->elements[2];
+-c_7319350.elements[3] = ((closureN)self_7313548)->elements[3];
+-c_7319350.elements[4] = ((closureN)self_7313548)->elements[4];
+-c_7319350.elements[5] = loop_73689_733290;
+-c_7319350.elements[6] = ((closureN)self_7313548)->elements[5];
+-c_7319350.elements[7] = ((closureN)self_7313548)->elements[6];
+-c_7319350.elements[8] = ((closureN)self_7313548)->elements[7];
++closureN_type c_7318050;
++object e_7318136 [9];
++c_7318050.hdr.mark = gc_color_red;
++ c_7318050.hdr.grayed = 0;
++c_7318050.tag = closureN_tag;
++ c_7318050.fn = (function_type)__lambda_551;
++c_7318050.num_args = 1;
++c_7318050.num_elements = 9;
++c_7318050.elements = (object *)e_7318136;
++c_7318050.elements[0] = ((closureN)self_7312295)->elements[0];
++c_7318050.elements[1] = ((closureN)self_7312295)->elements[1];
++c_7318050.elements[2] = ((closureN)self_7312295)->elements[2];
++c_7318050.elements[3] = ((closureN)self_7312295)->elements[3];
++c_7318050.elements[4] = ((closureN)self_7312295)->elements[4];
++c_7318050.elements[5] = loop_73689_732943;
++c_7318050.elements[6] = ((closureN)self_7312295)->elements[5];
++c_7318050.elements[7] = ((closureN)self_7312295)->elements[6];
++c_7318050.elements[8] = ((closureN)self_7312295)->elements[7];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319350,__lambda_551, Cyc_set_cell(data, ((closureN)self_7313548)->elements[4], Cyc_string_length(data, ((closureN)self_7313548)->elements[2])));;
++return_direct_with_clo1(data,(closure)&c_7318050,__lambda_551, Cyc_set_cell(data, ((closureN)self_7312295)->elements[4], Cyc_string_length(data, ((closureN)self_7312295)->elements[2])));;
+ }
+
+-static void __lambda_551(void *data, object self_7313549, int argc, object *args) /* object self_7313549, object r_735549 */
++static void __lambda_551(void *data, object self_7312296, int argc, object *args) /* object self_7312296, object r_735097 */
+ {
+
+- object r_735564;
++ object r_735112;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313549)->elements[6]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312296)->elements[6]), obj_int2obj(0))) ){
+
+- r_735564 = Cyc_car(data, ((closureN)self_7313549)->elements[6]);
++ r_735112 = Cyc_car(data, ((closureN)self_7312296)->elements[6]);
+ } else {
+- r_735564 = obj_int2obj(0);}
++ r_735112 = obj_int2obj(0);}
+ ;
+-closureN_type c_7319363;
+-object e_7319432 [9];
+-c_7319363.hdr.mark = gc_color_red;
+- c_7319363.hdr.grayed = 0;
+-c_7319363.tag = closureN_tag;
+- c_7319363.fn = (function_type)__lambda_552;
+-c_7319363.num_args = 1;
+-c_7319363.num_elements = 9;
+-c_7319363.elements = (object *)e_7319432;
+-c_7319363.elements[0] = ((closureN)self_7313549)->elements[0];
+-c_7319363.elements[1] = ((closureN)self_7313549)->elements[1];
+-c_7319363.elements[2] = ((closureN)self_7313549)->elements[2];
+-c_7319363.elements[3] = ((closureN)self_7313549)->elements[3];
+-c_7319363.elements[4] = ((closureN)self_7313549)->elements[4];
+-c_7319363.elements[5] = ((closureN)self_7313549)->elements[5];
+-c_7319363.elements[6] = ((closureN)self_7313549)->elements[6];
+-c_7319363.elements[7] = ((closureN)self_7313549)->elements[7];
+-c_7319363.elements[8] = ((closureN)self_7313549)->elements[8];
++closureN_type c_7318063;
++object e_7318132 [9];
++c_7318063.hdr.mark = gc_color_red;
++ c_7318063.hdr.grayed = 0;
++c_7318063.tag = closureN_tag;
++ c_7318063.fn = (function_type)__lambda_552;
++c_7318063.num_args = 1;
++c_7318063.num_elements = 9;
++c_7318063.elements = (object *)e_7318132;
++c_7318063.elements[0] = ((closureN)self_7312296)->elements[0];
++c_7318063.elements[1] = ((closureN)self_7312296)->elements[1];
++c_7318063.elements[2] = ((closureN)self_7312296)->elements[2];
++c_7318063.elements[3] = ((closureN)self_7312296)->elements[3];
++c_7318063.elements[4] = ((closureN)self_7312296)->elements[4];
++c_7318063.elements[5] = ((closureN)self_7312296)->elements[5];
++c_7318063.elements[6] = ((closureN)self_7312296)->elements[6];
++c_7318063.elements[7] = ((closureN)self_7312296)->elements[7];
++c_7318063.elements[8] = ((closureN)self_7312296)->elements[8];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319363,__lambda_552, Cyc_set_cell(data, ((closureN)self_7313549)->elements[7], r_735564));;
++return_direct_with_clo1(data,(closure)&c_7318063,__lambda_552, Cyc_set_cell(data, ((closureN)self_7312296)->elements[7], r_735112));;
+ }
+
+-static void __lambda_552(void *data, object self_7313550, int argc, object *args) /* object self_7313550, object r_735550 */
++static void __lambda_552(void *data, object self_7312297, int argc, object *args) /* object self_7312297, object r_735098 */
+ {
+
+
+-closureN_type c_7319365;
+-object e_7319379 [2];
+-c_7319365.hdr.mark = gc_color_red;
+- c_7319365.hdr.grayed = 0;
+-c_7319365.tag = closureN_tag;
+- c_7319365.fn = (function_type)__lambda_553;
+-c_7319365.num_args = 0;
+-c_7319365.num_elements = 2;
+-c_7319365.elements = (object *)e_7319379;
+-c_7319365.elements[0] = ((closureN)self_7313550)->elements[4];
+-c_7319365.elements[1] = ((closureN)self_7313550)->elements[6];
++closureN_type c_7318065;
++object e_7318079 [2];
++c_7318065.hdr.mark = gc_color_red;
++ c_7318065.hdr.grayed = 0;
++c_7318065.tag = closureN_tag;
++ c_7318065.fn = (function_type)__lambda_553;
++c_7318065.num_args = 0;
++c_7318065.num_elements = 2;
++c_7318065.elements = (object *)e_7318079;
++c_7318065.elements[0] = ((closureN)self_7312297)->elements[4];
++c_7318065.elements[1] = ((closureN)self_7312297)->elements[6];
+
+
+-closureN_type c_7319380;
+-object e_7319431 [7];
+-c_7319380.hdr.mark = gc_color_red;
+- c_7319380.hdr.grayed = 0;
+-c_7319380.tag = closureN_tag;
+- c_7319380.fn = (function_type)__lambda_554;
+-c_7319380.num_args = 1;
+-c_7319380.num_elements = 7;
+-c_7319380.elements = (object *)e_7319431;
+-c_7319380.elements[0] = ((closureN)self_7313550)->elements[0];
+-c_7319380.elements[1] = ((closureN)self_7313550)->elements[1];
+-c_7319380.elements[2] = ((closureN)self_7313550)->elements[2];
+-c_7319380.elements[3] = ((closureN)self_7313550)->elements[3];
+-c_7319380.elements[4] = ((closureN)self_7313550)->elements[5];
+-c_7319380.elements[5] = ((closureN)self_7313550)->elements[7];
+-c_7319380.elements[6] = ((closureN)self_7313550)->elements[8];
++closureN_type c_7318080;
++object e_7318131 [7];
++c_7318080.hdr.mark = gc_color_red;
++ c_7318080.hdr.grayed = 0;
++c_7318080.tag = closureN_tag;
++ c_7318080.fn = (function_type)__lambda_554;
++c_7318080.num_args = 1;
++c_7318080.num_elements = 7;
++c_7318080.elements = (object *)e_7318131;
++c_7318080.elements[0] = ((closureN)self_7312297)->elements[0];
++c_7318080.elements[1] = ((closureN)self_7312297)->elements[1];
++c_7318080.elements[2] = ((closureN)self_7312297)->elements[2];
++c_7318080.elements[3] = ((closureN)self_7312297)->elements[3];
++c_7318080.elements[4] = ((closureN)self_7312297)->elements[5];
++c_7318080.elements[5] = ((closureN)self_7312297)->elements[7];
++c_7318080.elements[6] = ((closureN)self_7312297)->elements[8];
+
+-return_direct_with_clo1(data,(closure)&c_7319365,__lambda_553, &c_7319380);;
++return_direct_with_clo1(data,(closure)&c_7318065,__lambda_553, &c_7318080);;
+ }
+
+-static void __lambda_554(void *data, object self_7313551, int argc, object *args) /* object self_7313551, object r_735560 */
++static void __lambda_554(void *data, object self_7312298, int argc, object *args) /* object self_7312298, object r_735108 */
+ {
+- object r_735560 = args[0];
++ object r_735108 = args[0];
+
+-closureN_type c_7319382;
+-object e_7319427 [7];
+-c_7319382.hdr.mark = gc_color_red;
+- c_7319382.hdr.grayed = 0;
+-c_7319382.tag = closureN_tag;
+- c_7319382.fn = (function_type)__lambda_555;
+-c_7319382.num_args = 1;
+-c_7319382.num_elements = 7;
+-c_7319382.elements = (object *)e_7319427;
+-c_7319382.elements[0] = ((closureN)self_7313551)->elements[0];
+-c_7319382.elements[1] = ((closureN)self_7313551)->elements[1];
+-c_7319382.elements[2] = ((closureN)self_7313551)->elements[2];
+-c_7319382.elements[3] = ((closureN)self_7313551)->elements[3];
+-c_7319382.elements[4] = ((closureN)self_7313551)->elements[4];
+-c_7319382.elements[5] = ((closureN)self_7313551)->elements[5];
+-c_7319382.elements[6] = ((closureN)self_7313551)->elements[6];
++closureN_type c_7318082;
++object e_7318127 [7];
++c_7318082.hdr.mark = gc_color_red;
++ c_7318082.hdr.grayed = 0;
++c_7318082.tag = closureN_tag;
++ c_7318082.fn = (function_type)__lambda_555;
++c_7318082.num_args = 1;
++c_7318082.num_elements = 7;
++c_7318082.elements = (object *)e_7318127;
++c_7318082.elements[0] = ((closureN)self_7312298)->elements[0];
++c_7318082.elements[1] = ((closureN)self_7312298)->elements[1];
++c_7318082.elements[2] = ((closureN)self_7312298)->elements[2];
++c_7318082.elements[3] = ((closureN)self_7312298)->elements[3];
++c_7318082.elements[4] = ((closureN)self_7312298)->elements[4];
++c_7318082.elements[5] = ((closureN)self_7312298)->elements[5];
++c_7318082.elements[6] = ((closureN)self_7312298)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319382,__lambda_555, Cyc_set_cell(data, ((closureN)self_7313551)->elements[1], r_735560));;
++return_direct_with_clo1(data,(closure)&c_7318082,__lambda_555, Cyc_set_cell(data, ((closureN)self_7312298)->elements[1], r_735108));;
+ }
+
+-static void __lambda_555(void *data, object self_7313552, int argc, object *args) /* object self_7313552, object r_735551 */
++static void __lambda_555(void *data, object self_7312299, int argc, object *args) /* object self_7312299, object r_735099 */
+ {
+
+
+-closureN_type c_7319384;
+-object e_7319400 [4];
+-c_7319384.hdr.mark = gc_color_red;
+- c_7319384.hdr.grayed = 0;
+-c_7319384.tag = closureN_tag;
+- c_7319384.fn = (function_type)__lambda_556;
+-c_7319384.num_args = 1;
+-c_7319384.num_elements = 4;
+-c_7319384.elements = (object *)e_7319400;
+-c_7319384.elements[0] = ((closureN)self_7313552)->elements[0];
+-c_7319384.elements[1] = ((closureN)self_7313552)->elements[3];
+-c_7319384.elements[2] = ((closureN)self_7313552)->elements[4];
+-c_7319384.elements[3] = ((closureN)self_7313552)->elements[5];
++closureN_type c_7318084;
++object e_7318100 [4];
++c_7318084.hdr.mark = gc_color_red;
++ c_7318084.hdr.grayed = 0;
++c_7318084.tag = closureN_tag;
++ c_7318084.fn = (function_type)__lambda_556;
++c_7318084.num_args = 1;
++c_7318084.num_elements = 4;
++c_7318084.elements = (object *)e_7318100;
++c_7318084.elements[0] = ((closureN)self_7312299)->elements[0];
++c_7318084.elements[1] = ((closureN)self_7312299)->elements[3];
++c_7318084.elements[2] = ((closureN)self_7312299)->elements[4];
++c_7318084.elements[3] = ((closureN)self_7312299)->elements[5];
+
+
+-closureN_type c_7319401;
+-object e_7319426 [4];
+-c_7319401.hdr.mark = gc_color_red;
+- c_7319401.hdr.grayed = 0;
+-c_7319401.tag = closureN_tag;
+- c_7319401.fn = (function_type)__lambda_558;
+-c_7319401.num_args = 2;
+-c_7319401.num_elements = 4;
+-c_7319401.elements = (object *)e_7319426;
+-c_7319401.elements[0] = ((closureN)self_7313552)->elements[1];
+-c_7319401.elements[1] = ((closureN)self_7313552)->elements[2];
+-c_7319401.elements[2] = ((closureN)self_7313552)->elements[4];
+-c_7319401.elements[3] = ((closureN)self_7313552)->elements[6];
++closureN_type c_7318101;
++object e_7318126 [4];
++c_7318101.hdr.mark = gc_color_red;
++ c_7318101.hdr.grayed = 0;
++c_7318101.tag = closureN_tag;
++ c_7318101.fn = (function_type)__lambda_558;
++c_7318101.num_args = 2;
++c_7318101.num_elements = 4;
++c_7318101.elements = (object *)e_7318126;
++c_7318101.elements[0] = ((closureN)self_7312299)->elements[1];
++c_7318101.elements[1] = ((closureN)self_7312299)->elements[2];
++c_7318101.elements[2] = ((closureN)self_7312299)->elements[4];
++c_7318101.elements[3] = ((closureN)self_7312299)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7319384,__lambda_556, &c_7319401);;
++return_direct_with_clo1(data,(closure)&c_7318084,__lambda_556, &c_7318101);;
+ }
+
+-static void __lambda_558(void *data, object self_7313553, int argc, object *args) /* object self_7313553, object k_735554, object i_91at_73690_733291, object i_91from_73691_733292 */
++static void __lambda_558(void *data, object self_7312300, int argc, object *args) /* object self_7312300, object k_735102, object i_91at_73690_732944, object i_91from_73691_732945 */
+ {
+- object k_735554 = args[0]; object i_91at_73690_733291 = args[1]; object i_91from_73691_733292 = args[2];
++ object k_735102 = args[0]; object i_91at_73690_732944 = args[1]; object i_91from_73691_732945 = args[2];
+
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73691_733292, car(((closureN)self_7313553)->elements[0]))) ){
+- return_direct_with_clo1(data, k_735554, (((closure) k_735554)->fn), ((closureN)self_7313553)->elements[3]);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73691_732945, car(((closureN)self_7312300)->elements[0]))) ){
++ return_direct_with_clo1(data, k_735102, (((closure) k_735102)->fn), ((closureN)self_7312300)->elements[3]);
+ } else {
+
+
+- Cyc_string_set(data, ((closureN)self_7313553)->elements[3], i_91at_73690_733291, Cyc_string_ref(data, ((closureN)self_7313553)->elements[1], i_91from_73691_733292));
++ Cyc_string_set(data, ((closureN)self_7312300)->elements[3], i_91at_73690_732944, Cyc_string_ref(data, ((closureN)self_7312300)->elements[1], i_91from_73691_732945));
+
+
+-complex_num_type local_7319416;
++complex_num_type local_7318116;
+
+-complex_num_type local_7319419;
+-return_closcall3(data, car(((closureN)self_7313553)->elements[2]), k_735554, Cyc_fast_sum(data,&local_7319416, i_91at_73690_733291, obj_int2obj(1)), Cyc_fast_sum(data,&local_7319419, i_91from_73691_733292, obj_int2obj(1)));;}
++complex_num_type local_7318119;
++return_closcall3(data, car(((closureN)self_7312300)->elements[2]), k_735102, Cyc_fast_sum(data,&local_7318116, i_91at_73690_732944, obj_int2obj(1)), Cyc_fast_sum(data,&local_7318119, i_91from_73691_732945, obj_int2obj(1)));;}
+ ;;
+ }
+
+-static void __lambda_556(void *data, object self_7313554, int argc, object *args) /* object self_7313554, object r_735553 */
++static void __lambda_556(void *data, object self_7312301, int argc, object *args) /* object self_7312301, object r_735101 */
+ {
+- object r_735553 = args[0];
++ object r_735101 = args[0];
+
+-closureN_type c_7319386;
+-object e_7319396 [4];
+-c_7319386.hdr.mark = gc_color_red;
+- c_7319386.hdr.grayed = 0;
+-c_7319386.tag = closureN_tag;
+- c_7319386.fn = (function_type)__lambda_557;
+-c_7319386.num_args = 1;
+-c_7319386.num_elements = 4;
+-c_7319386.elements = (object *)e_7319396;
+-c_7319386.elements[0] = ((closureN)self_7313554)->elements[0];
+-c_7319386.elements[1] = ((closureN)self_7313554)->elements[1];
+-c_7319386.elements[2] = ((closureN)self_7313554)->elements[2];
+-c_7319386.elements[3] = ((closureN)self_7313554)->elements[3];
++closureN_type c_7318086;
++object e_7318096 [4];
++c_7318086.hdr.mark = gc_color_red;
++ c_7318086.hdr.grayed = 0;
++c_7318086.tag = closureN_tag;
++ c_7318086.fn = (function_type)__lambda_557;
++c_7318086.num_args = 1;
++c_7318086.num_elements = 4;
++c_7318086.elements = (object *)e_7318096;
++c_7318086.elements[0] = ((closureN)self_7312301)->elements[0];
++c_7318086.elements[1] = ((closureN)self_7312301)->elements[1];
++c_7318086.elements[2] = ((closureN)self_7312301)->elements[2];
++c_7318086.elements[3] = ((closureN)self_7312301)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319386,__lambda_557, Cyc_set_cell(data, ((closureN)self_7313554)->elements[2], r_735553));;
++return_direct_with_clo1(data,(closure)&c_7318086,__lambda_557, Cyc_set_cell(data, ((closureN)self_7312301)->elements[2], r_735101));;
+ }
+
+-static void __lambda_557(void *data, object self_7313555, int argc, object *args) /* object self_7313555, object r_735552 */
++static void __lambda_557(void *data, object self_7312302, int argc, object *args) /* object self_7312302, object r_735100 */
+ {
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313555)->elements[2]), ((closureN)self_7313555)->elements[1], ((closureN)self_7313555)->elements[0], car(((closureN)self_7313555)->elements[3]));;
++return_closcall3(data, car(((closureN)self_7312302)->elements[2]), ((closureN)self_7312302)->elements[1], ((closureN)self_7312302)->elements[0], car(((closureN)self_7312302)->elements[3]));;
+ }
+
+-static void __lambda_553(void *data, object self_7313556, int argc, object *args) /* object self_7313556, object k_735561 */
++static void __lambda_553(void *data, object self_7312303, int argc, object *args) /* object self_7312303, object k_735109 */
+ {
+- object k_735561 = args[0];
++ object k_735109 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313556)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312303)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735561,__lambda_554, Cyc_cadr(data, ((closureN)self_7313556)->elements[1]));
++return_direct_with_clo1(data, k_735109,__lambda_554, Cyc_cadr(data, ((closureN)self_7312303)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735561,__lambda_554, car(((closureN)self_7313556)->elements[0]));}
++return_direct_with_clo1(data, k_735109,__lambda_554, car(((closureN)self_7312303)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_542(void *data, object _, int argc, object *args) /* closure _,object k_735533, object str_73677_733278, object opts_73678_733279_raw, ... */
++static void __lambda_542(void *data, object _, int argc, object *args) /* closure _,object k_735081, object str_73677_732931, object opts_73678_732932_raw, ... */
+ {
+-object k_735533 = args[0]; object str_73677_733278 = args[1];
+-load_varargs(opts_73678_733279, args, 2, argc - 2);
++object k_735081 = args[0]; object str_73677_732931 = args[1];
++load_varargs(opts_73678_732932, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:string-copy");
+
+-closureN_type c_7319254;
+-object e_7319337 [3];
+-c_7319254.hdr.mark = gc_color_red;
+- c_7319254.hdr.grayed = 0;
+-c_7319254.tag = closureN_tag;
+- c_7319254.fn = (function_type)__lambda_543;
+-c_7319254.num_args = 3;
+-c_7319254.num_elements = 3;
+-c_7319254.elements = (object *)e_7319337;
+-c_7319254.elements[0] = k_735533;
+-c_7319254.elements[1] = opts_73678_733279;
+-c_7319254.elements[2] = str_73677_733278;
+-
+-return_direct_with_clo3(data,(closure)&c_7319254,__lambda_543, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_543(void *data, object self_7313535, int argc, object *args) /* object self_7313535, object len_73679_733280, object start_73680_733281, object end_73681_733282 */
+- {
+- object len_73679_733280 = args[0]; object start_73680_733281 = args[1]; object end_73681_733282 = args[2];
+-
+-closureN_type c_7319256;
+-object e_7319333 [5];
+-c_7319256.hdr.mark = gc_color_red;
+- c_7319256.hdr.grayed = 0;
+-c_7319256.tag = closureN_tag;
+- c_7319256.fn = (function_type)__lambda_1395;
+-c_7319256.num_args = 1;
+-c_7319256.num_elements = 5;
+-c_7319256.elements = (object *)e_7319333;
+-c_7319256.elements[0] = end_73681_733282;
+-c_7319256.elements[1] = ((closureN)self_7313535)->elements[0];
+-c_7319256.elements[2] = ((closureN)self_7313535)->elements[1];
+-c_7319256.elements[3] = start_73680_733281;
+-c_7319256.elements[4] = ((closureN)self_7313535)->elements[2];
++closureN_type c_7317954;
++object e_7318037 [3];
++c_7317954.hdr.mark = gc_color_red;
++ c_7317954.hdr.grayed = 0;
++c_7317954.tag = closureN_tag;
++ c_7317954.fn = (function_type)__lambda_543;
++c_7317954.num_args = 3;
++c_7317954.num_elements = 3;
++c_7317954.elements = (object *)e_7318037;
++c_7317954.elements[0] = k_735081;
++c_7317954.elements[1] = opts_73678_732932;
++c_7317954.elements[2] = str_73677_732931;
+
++return_direct_with_clo3(data,(closure)&c_7317954,__lambda_543, boolean_f, boolean_f, boolean_f);;
++}
+
+-pair_type local_7319336;
+-return_direct_with_clo1(data,(closure)&c_7319256,__lambda_1395, set_cell_as_expr(&local_7319336, len_73679_733280));;
++static void __lambda_543(void *data, object self_7312282, int argc, object *args) /* object self_7312282, object len_73679_732933, object start_73680_732934, object end_73681_732935 */
++ {
++ object len_73679_732933 = args[0]; object start_73680_732934 = args[1]; object end_73681_732935 = args[2];
++
++closureN_type c_7317956;
++object e_7318033 [5];
++c_7317956.hdr.mark = gc_color_red;
++ c_7317956.hdr.grayed = 0;
++c_7317956.tag = closureN_tag;
++ c_7317956.fn = (function_type)__lambda_1348;
++c_7317956.num_args = 1;
++c_7317956.num_elements = 5;
++c_7317956.elements = (object *)e_7318033;
++c_7317956.elements[0] = end_73681_732935;
++c_7317956.elements[1] = ((closureN)self_7312282)->elements[0];
++c_7317956.elements[2] = ((closureN)self_7312282)->elements[1];
++c_7317956.elements[3] = start_73680_732934;
++c_7317956.elements[4] = ((closureN)self_7312282)->elements[2];
++
++
++pair_type local_7318036;
++return_direct_with_clo1(data,(closure)&c_7317956,__lambda_1348, set_cell_as_expr(&local_7318036, len_73679_732933));;
+ }
+
+-static void __lambda_1395(void *data, object self_7313536, int argc, object *args) /* object self_7313536, object len_73679_733280 */
++static void __lambda_1348(void *data, object self_7312283, int argc, object *args) /* object self_7312283, object len_73679_732933 */
+ {
+- object len_73679_733280 = args[0];
++ object len_73679_732933 = args[0];
+
+-closureN_type c_7319258;
+-object e_7319328 [5];
+-c_7319258.hdr.mark = gc_color_red;
+- c_7319258.hdr.grayed = 0;
+-c_7319258.tag = closureN_tag;
+- c_7319258.fn = (function_type)__lambda_1394;
+-c_7319258.num_args = 1;
+-c_7319258.num_elements = 5;
+-c_7319258.elements = (object *)e_7319328;
+-c_7319258.elements[0] = ((closureN)self_7313536)->elements[0];
+-c_7319258.elements[1] = ((closureN)self_7313536)->elements[1];
+-c_7319258.elements[2] = len_73679_733280;
+-c_7319258.elements[3] = ((closureN)self_7313536)->elements[2];
+-c_7319258.elements[4] = ((closureN)self_7313536)->elements[4];
++closureN_type c_7317958;
++object e_7318028 [5];
++c_7317958.hdr.mark = gc_color_red;
++ c_7317958.hdr.grayed = 0;
++c_7317958.tag = closureN_tag;
++ c_7317958.fn = (function_type)__lambda_1347;
++c_7317958.num_args = 1;
++c_7317958.num_elements = 5;
++c_7317958.elements = (object *)e_7318028;
++c_7317958.elements[0] = ((closureN)self_7312283)->elements[0];
++c_7317958.elements[1] = ((closureN)self_7312283)->elements[1];
++c_7317958.elements[2] = len_73679_732933;
++c_7317958.elements[3] = ((closureN)self_7312283)->elements[2];
++c_7317958.elements[4] = ((closureN)self_7312283)->elements[4];
+
+
+-pair_type local_7319331;
+-return_direct_with_clo1(data,(closure)&c_7319258,__lambda_1394, set_cell_as_expr(&local_7319331, ((closureN)self_7313536)->elements[3]));;
++pair_type local_7318031;
++return_direct_with_clo1(data,(closure)&c_7317958,__lambda_1347, set_cell_as_expr(&local_7318031, ((closureN)self_7312283)->elements[3]));;
+ }
+
+-static void __lambda_1394(void *data, object self_7313537, int argc, object *args) /* object self_7313537, object start_73680_733281 */
++static void __lambda_1347(void *data, object self_7312284, int argc, object *args) /* object self_7312284, object start_73680_732934 */
+ {
+- object start_73680_733281 = args[0];
++ object start_73680_732934 = args[0];
+
+-closureN_type c_7319260;
+-object e_7319323 [5];
+-c_7319260.hdr.mark = gc_color_red;
+- c_7319260.hdr.grayed = 0;
+-c_7319260.tag = closureN_tag;
+- c_7319260.fn = (function_type)__lambda_1393;
+-c_7319260.num_args = 1;
+-c_7319260.num_elements = 5;
+-c_7319260.elements = (object *)e_7319323;
+-c_7319260.elements[0] = ((closureN)self_7313537)->elements[1];
+-c_7319260.elements[1] = ((closureN)self_7313537)->elements[2];
+-c_7319260.elements[2] = ((closureN)self_7313537)->elements[3];
+-c_7319260.elements[3] = start_73680_733281;
+-c_7319260.elements[4] = ((closureN)self_7313537)->elements[4];
++closureN_type c_7317960;
++object e_7318023 [5];
++c_7317960.hdr.mark = gc_color_red;
++ c_7317960.hdr.grayed = 0;
++c_7317960.tag = closureN_tag;
++ c_7317960.fn = (function_type)__lambda_1346;
++c_7317960.num_args = 1;
++c_7317960.num_elements = 5;
++c_7317960.elements = (object *)e_7318023;
++c_7317960.elements[0] = ((closureN)self_7312284)->elements[1];
++c_7317960.elements[1] = ((closureN)self_7312284)->elements[2];
++c_7317960.elements[2] = ((closureN)self_7312284)->elements[3];
++c_7317960.elements[3] = start_73680_732934;
++c_7317960.elements[4] = ((closureN)self_7312284)->elements[4];
+
+
+-pair_type local_7319326;
+-return_direct_with_clo1(data,(closure)&c_7319260,__lambda_1393, set_cell_as_expr(&local_7319326, ((closureN)self_7313537)->elements[0]));;
++pair_type local_7318026;
++return_direct_with_clo1(data,(closure)&c_7317960,__lambda_1346, set_cell_as_expr(&local_7318026, ((closureN)self_7312284)->elements[0]));;
+ }
+
+-static void __lambda_1393(void *data, object self_7313538, int argc, object *args) /* object self_7313538, object end_73681_733282 */
++static void __lambda_1346(void *data, object self_7312285, int argc, object *args) /* object self_7312285, object end_73681_732935 */
+ {
+- object end_73681_733282 = args[0];
++ object end_73681_732935 = args[0];
+
+-closureN_type c_7319262;
+-object e_7319316 [6];
+-c_7319262.hdr.mark = gc_color_red;
+- c_7319262.hdr.grayed = 0;
+-c_7319262.tag = closureN_tag;
+- c_7319262.fn = (function_type)__lambda_544;
+-c_7319262.num_args = 1;
+-c_7319262.num_elements = 6;
+-c_7319262.elements = (object *)e_7319316;
+-c_7319262.elements[0] = end_73681_733282;
+-c_7319262.elements[1] = ((closureN)self_7313538)->elements[0];
+-c_7319262.elements[2] = ((closureN)self_7313538)->elements[1];
+-c_7319262.elements[3] = ((closureN)self_7313538)->elements[2];
+-c_7319262.elements[4] = ((closureN)self_7313538)->elements[3];
+-c_7319262.elements[5] = ((closureN)self_7313538)->elements[4];
++closureN_type c_7317962;
++object e_7318016 [6];
++c_7317962.hdr.mark = gc_color_red;
++ c_7317962.hdr.grayed = 0;
++c_7317962.tag = closureN_tag;
++ c_7317962.fn = (function_type)__lambda_544;
++c_7317962.num_args = 1;
++c_7317962.num_elements = 6;
++c_7317962.elements = (object *)e_7318016;
++c_7317962.elements[0] = end_73681_732935;
++c_7317962.elements[1] = ((closureN)self_7312285)->elements[0];
++c_7317962.elements[2] = ((closureN)self_7312285)->elements[1];
++c_7317962.elements[3] = ((closureN)self_7312285)->elements[2];
++c_7317962.elements[4] = ((closureN)self_7312285)->elements[3];
++c_7317962.elements[5] = ((closureN)self_7312285)->elements[4];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319262,__lambda_544, Cyc_set_cell(data, ((closureN)self_7313538)->elements[1], Cyc_string_length(data, ((closureN)self_7313538)->elements[4])));;
++return_direct_with_clo1(data,(closure)&c_7317962,__lambda_544, Cyc_set_cell(data, ((closureN)self_7312285)->elements[1], Cyc_string_length(data, ((closureN)self_7312285)->elements[4])));;
+ }
+
+-static void __lambda_544(void *data, object self_7313539, int argc, object *args) /* object self_7313539, object r_735534 */
++static void __lambda_544(void *data, object self_7312286, int argc, object *args) /* object self_7312286, object r_735082 */
+ {
+
+- object r_735541;
++ object r_735089;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313539)->elements[3]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312286)->elements[3]), obj_int2obj(0))) ){
+
+- r_735541 = Cyc_car(data, ((closureN)self_7313539)->elements[3]);
++ r_735089 = Cyc_car(data, ((closureN)self_7312286)->elements[3]);
+ } else {
+- r_735541 = obj_int2obj(0);}
++ r_735089 = obj_int2obj(0);}
+ ;
+-closureN_type c_7319275;
+-object e_7319312 [6];
+-c_7319275.hdr.mark = gc_color_red;
+- c_7319275.hdr.grayed = 0;
+-c_7319275.tag = closureN_tag;
+- c_7319275.fn = (function_type)__lambda_545;
+-c_7319275.num_args = 1;
+-c_7319275.num_elements = 6;
+-c_7319275.elements = (object *)e_7319312;
+-c_7319275.elements[0] = ((closureN)self_7313539)->elements[0];
+-c_7319275.elements[1] = ((closureN)self_7313539)->elements[1];
+-c_7319275.elements[2] = ((closureN)self_7313539)->elements[2];
+-c_7319275.elements[3] = ((closureN)self_7313539)->elements[3];
+-c_7319275.elements[4] = ((closureN)self_7313539)->elements[4];
+-c_7319275.elements[5] = ((closureN)self_7313539)->elements[5];
++closureN_type c_7317975;
++object e_7318012 [6];
++c_7317975.hdr.mark = gc_color_red;
++ c_7317975.hdr.grayed = 0;
++c_7317975.tag = closureN_tag;
++ c_7317975.fn = (function_type)__lambda_545;
++c_7317975.num_args = 1;
++c_7317975.num_elements = 6;
++c_7317975.elements = (object *)e_7318012;
++c_7317975.elements[0] = ((closureN)self_7312286)->elements[0];
++c_7317975.elements[1] = ((closureN)self_7312286)->elements[1];
++c_7317975.elements[2] = ((closureN)self_7312286)->elements[2];
++c_7317975.elements[3] = ((closureN)self_7312286)->elements[3];
++c_7317975.elements[4] = ((closureN)self_7312286)->elements[4];
++c_7317975.elements[5] = ((closureN)self_7312286)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319275,__lambda_545, Cyc_set_cell(data, ((closureN)self_7313539)->elements[4], r_735541));;
++return_direct_with_clo1(data,(closure)&c_7317975,__lambda_545, Cyc_set_cell(data, ((closureN)self_7312286)->elements[4], r_735089));;
+ }
+
+-static void __lambda_545(void *data, object self_7313540, int argc, object *args) /* object self_7313540, object r_735535 */
++static void __lambda_545(void *data, object self_7312287, int argc, object *args) /* object self_7312287, object r_735083 */
+ {
+
+
+-closureN_type c_7319277;
+-object e_7319291 [2];
+-c_7319277.hdr.mark = gc_color_red;
+- c_7319277.hdr.grayed = 0;
+-c_7319277.tag = closureN_tag;
+- c_7319277.fn = (function_type)__lambda_546;
+-c_7319277.num_args = 0;
+-c_7319277.num_elements = 2;
+-c_7319277.elements = (object *)e_7319291;
+-c_7319277.elements[0] = ((closureN)self_7313540)->elements[2];
+-c_7319277.elements[1] = ((closureN)self_7313540)->elements[3];
++closureN_type c_7317977;
++object e_7317991 [2];
++c_7317977.hdr.mark = gc_color_red;
++ c_7317977.hdr.grayed = 0;
++c_7317977.tag = closureN_tag;
++ c_7317977.fn = (function_type)__lambda_546;
++c_7317977.num_args = 0;
++c_7317977.num_elements = 2;
++c_7317977.elements = (object *)e_7317991;
++c_7317977.elements[0] = ((closureN)self_7312287)->elements[2];
++c_7317977.elements[1] = ((closureN)self_7312287)->elements[3];
+
+
+-closureN_type c_7319292;
+-object e_7319311 [4];
+-c_7319292.hdr.mark = gc_color_red;
+- c_7319292.hdr.grayed = 0;
+-c_7319292.tag = closureN_tag;
+- c_7319292.fn = (function_type)__lambda_547;
+-c_7319292.num_args = 1;
+-c_7319292.num_elements = 4;
+-c_7319292.elements = (object *)e_7319311;
+-c_7319292.elements[0] = ((closureN)self_7313540)->elements[0];
+-c_7319292.elements[1] = ((closureN)self_7313540)->elements[1];
+-c_7319292.elements[2] = ((closureN)self_7313540)->elements[4];
+-c_7319292.elements[3] = ((closureN)self_7313540)->elements[5];
++closureN_type c_7317992;
++object e_7318011 [4];
++c_7317992.hdr.mark = gc_color_red;
++ c_7317992.hdr.grayed = 0;
++c_7317992.tag = closureN_tag;
++ c_7317992.fn = (function_type)__lambda_547;
++c_7317992.num_args = 1;
++c_7317992.num_elements = 4;
++c_7317992.elements = (object *)e_7318011;
++c_7317992.elements[0] = ((closureN)self_7312287)->elements[0];
++c_7317992.elements[1] = ((closureN)self_7312287)->elements[1];
++c_7317992.elements[2] = ((closureN)self_7312287)->elements[4];
++c_7317992.elements[3] = ((closureN)self_7312287)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7319277,__lambda_546, &c_7319292);;
++return_direct_with_clo1(data,(closure)&c_7317977,__lambda_546, &c_7317992);;
+ }
+
+-static void __lambda_547(void *data, object self_7313541, int argc, object *args) /* object self_7313541, object r_735537 */
++static void __lambda_547(void *data, object self_7312288, int argc, object *args) /* object self_7312288, object r_735085 */
+ {
+- object r_735537 = args[0];
++ object r_735085 = args[0];
+
+-closureN_type c_7319294;
+-object e_7319307 [4];
+-c_7319294.hdr.mark = gc_color_red;
+- c_7319294.hdr.grayed = 0;
+-c_7319294.tag = closureN_tag;
+- c_7319294.fn = (function_type)__lambda_548;
+-c_7319294.num_args = 1;
+-c_7319294.num_elements = 4;
+-c_7319294.elements = (object *)e_7319307;
+-c_7319294.elements[0] = ((closureN)self_7313541)->elements[0];
+-c_7319294.elements[1] = ((closureN)self_7313541)->elements[1];
+-c_7319294.elements[2] = ((closureN)self_7313541)->elements[2];
+-c_7319294.elements[3] = ((closureN)self_7313541)->elements[3];
++closureN_type c_7317994;
++object e_7318007 [4];
++c_7317994.hdr.mark = gc_color_red;
++ c_7317994.hdr.grayed = 0;
++c_7317994.tag = closureN_tag;
++ c_7317994.fn = (function_type)__lambda_548;
++c_7317994.num_args = 1;
++c_7317994.num_elements = 4;
++c_7317994.elements = (object *)e_7318007;
++c_7317994.elements[0] = ((closureN)self_7312288)->elements[0];
++c_7317994.elements[1] = ((closureN)self_7312288)->elements[1];
++c_7317994.elements[2] = ((closureN)self_7312288)->elements[2];
++c_7317994.elements[3] = ((closureN)self_7312288)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319294,__lambda_548, Cyc_set_cell(data, ((closureN)self_7313541)->elements[0], r_735537));;
++return_direct_with_clo1(data,(closure)&c_7317994,__lambda_548, Cyc_set_cell(data, ((closureN)self_7312288)->elements[0], r_735085));;
+ }
+
+-static void __lambda_548(void *data, object self_7313542, int argc, object *args) /* object self_7313542, object r_735536 */
++static void __lambda_548(void *data, object self_7312289, int argc, object *args) /* object self_7312289, object r_735084 */
+ {
+
+
+@@ -27711,647 +25914,647 @@ static void __lambda_548(void *data, obj
+
+
+
+-object c_7319299 = Cyc_substring(data, ((closureN)self_7313542)->elements[1],((closureN)self_7313542)->elements[3], car(((closureN)self_7313542)->elements[2]), car(((closureN)self_7313542)->elements[0]));
+-return_direct_with_clo1(data, ((closureN)self_7313542)->elements[1], (((closure) ((closureN)self_7313542)->elements[1])->fn), c_7319299);;
++object c_7317999 = Cyc_substring(data, ((closureN)self_7312289)->elements[1],((closureN)self_7312289)->elements[3], car(((closureN)self_7312289)->elements[2]), car(((closureN)self_7312289)->elements[0]));
++return_direct_with_clo1(data, ((closureN)self_7312289)->elements[1], (((closure) ((closureN)self_7312289)->elements[1])->fn), c_7317999);;
+ }
+
+-static void __lambda_546(void *data, object self_7313543, int argc, object *args) /* object self_7313543, object k_735538 */
++static void __lambda_546(void *data, object self_7312290, int argc, object *args) /* object self_7312290, object k_735086 */
+ {
+- object k_735538 = args[0];
++ object k_735086 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313543)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312290)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735538,__lambda_547, Cyc_cadr(data, ((closureN)self_7313543)->elements[1]));
++return_direct_with_clo1(data, k_735086,__lambda_547, Cyc_cadr(data, ((closureN)self_7312290)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735538,__lambda_547, car(((closureN)self_7313543)->elements[0]));}
++return_direct_with_clo1(data, k_735086,__lambda_547, car(((closureN)self_7312290)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_540(void *data, object _, int argc, object *args) /* closure _,object k_735528, object str_73675_733276, object opts_73676_733277_raw, ... */
++static void __lambda_540(void *data, object _, int argc, object *args) /* closure _,object k_735076, object str_73675_732929, object opts_73676_732930_raw, ... */
+ {
+-object k_735528 = args[0]; object str_73675_733276 = args[1];
+-load_varargs(opts_73676_733277, args, 2, argc - 2);
++object k_735076 = args[0]; object str_73675_732929 = args[1];
++load_varargs(opts_73676_732930, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:string->vector");
+
+-closureN_type c_7319239;
+-object e_7319245 [1];
+-c_7319239.hdr.mark = gc_color_red;
+- c_7319239.hdr.grayed = 0;
+-c_7319239.tag = closureN_tag;
+- c_7319239.fn = (function_type)__lambda_541;
+-c_7319239.num_args = 1;
+-c_7319239.num_elements = 1;
+-c_7319239.elements = (object *)e_7319245;
+-c_7319239.elements[0] = k_735528;
++closureN_type c_7317939;
++object e_7317945 [1];
++c_7317939.hdr.mark = gc_color_red;
++ c_7317939.hdr.grayed = 0;
++c_7317939.tag = closureN_tag;
++ c_7317939.fn = (function_type)__lambda_541;
++c_7317939.num_args = 1;
++c_7317939.num_elements = 1;
++c_7317939.elements = (object *)e_7317945;
++c_7317939.elements[0] = k_735076;
+
+
+-pair_type local_7319251;
++pair_type local_7317951;
+
+-object c_7319248 = apply(data,(closure)&c_7319239,__glo_string_91_125list_scheme_base, set_pair_as_expr(&local_7319251, str_73675_733276, opts_73676_733277));
+-return_closcall1(data,(closure)&c_7319239, c_7319248);;
++object c_7317948 = apply(data,(closure)&c_7317939,__glo_string_91_125list_scheme_base, set_pair_as_expr(&local_7317951, str_73675_732929, opts_73676_732930));
++return_closcall1(data,(closure)&c_7317939, c_7317948);;
+ }
+
+-static void __lambda_541(void *data, object self_7313534, int argc, object *args) /* object self_7313534, object r_735529 */
++static void __lambda_541(void *data, object self_7312281, int argc, object *args) /* object self_7312281, object r_735077 */
+ {
+- object r_735529 = args[0];
++ object r_735077 = args[0];
+
+-object c_7319244 = Cyc_list2vector(data, ((closureN)self_7313534)->elements[0],r_735529);
+-return_direct_with_clo1(data, ((closureN)self_7313534)->elements[0], (((closure) ((closureN)self_7313534)->elements[0])->fn), c_7319244);;
++object c_7317944 = Cyc_list2vector(data, ((closureN)self_7312281)->elements[0],r_735077);
++return_direct_with_clo1(data, ((closureN)self_7312281)->elements[0], (((closure) ((closureN)self_7312281)->elements[0])->fn), c_7317944);;
+ }
+
+-static void __lambda_530(void *data, object _, int argc, object *args) /* closure _,object k_735505, object str_73667_733268, object opts_73668_733269_raw, ... */
++static void __lambda_530(void *data, object _, int argc, object *args) /* closure _,object k_735053, object str_73667_732921, object opts_73668_732922_raw, ... */
+ {
+-object k_735505 = args[0]; object str_73667_733268 = args[1];
+-load_varargs(opts_73668_733269, args, 2, argc - 2);
++object k_735053 = args[0]; object str_73667_732921 = args[1];
++load_varargs(opts_73668_732922, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:string->list");
+
+-closureN_type c_7319120;
+-object e_7319236 [3];
+-c_7319120.hdr.mark = gc_color_red;
+- c_7319120.hdr.grayed = 0;
+-c_7319120.tag = closureN_tag;
+- c_7319120.fn = (function_type)__lambda_531;
+-c_7319120.num_args = 4;
+-c_7319120.num_elements = 3;
+-c_7319120.elements = (object *)e_7319236;
+-c_7319120.elements[0] = k_735505;
+-c_7319120.elements[1] = opts_73668_733269;
+-c_7319120.elements[2] = str_73667_733268;
+-
+-return_direct_with_clo4(data,(closure)&c_7319120,__lambda_531, boolean_f, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_531(void *data, object self_7313521, int argc, object *args) /* object self_7313521, object len_73669_733270, object start_73670_733271, object end_73671_733272, object loop_73672_733273 */
+- {
+- object len_73669_733270 = args[0]; object start_73670_733271 = args[1]; object end_73671_733272 = args[2]; object loop_73672_733273 = args[3];
+-
+-closureN_type c_7319122;
+-object e_7319232 [6];
+-c_7319122.hdr.mark = gc_color_red;
+- c_7319122.hdr.grayed = 0;
+-c_7319122.tag = closureN_tag;
+- c_7319122.fn = (function_type)__lambda_1392;
+-c_7319122.num_args = 1;
+-c_7319122.num_elements = 6;
+-c_7319122.elements = (object *)e_7319232;
+-c_7319122.elements[0] = end_73671_733272;
+-c_7319122.elements[1] = ((closureN)self_7313521)->elements[0];
+-c_7319122.elements[2] = loop_73672_733273;
+-c_7319122.elements[3] = ((closureN)self_7313521)->elements[1];
+-c_7319122.elements[4] = start_73670_733271;
+-c_7319122.elements[5] = ((closureN)self_7313521)->elements[2];
+-
+-
+-pair_type local_7319235;
+-return_direct_with_clo1(data,(closure)&c_7319122,__lambda_1392, set_cell_as_expr(&local_7319235, len_73669_733270));;
+-}
+-
+-static void __lambda_1392(void *data, object self_7313522, int argc, object *args) /* object self_7313522, object len_73669_733270 */
+- {
+- object len_73669_733270 = args[0];
+-
+-closureN_type c_7319124;
+-object e_7319227 [6];
+-c_7319124.hdr.mark = gc_color_red;
+- c_7319124.hdr.grayed = 0;
+-c_7319124.tag = closureN_tag;
+- c_7319124.fn = (function_type)__lambda_1391;
+-c_7319124.num_args = 1;
+-c_7319124.num_elements = 6;
+-c_7319124.elements = (object *)e_7319227;
+-c_7319124.elements[0] = ((closureN)self_7313522)->elements[0];
+-c_7319124.elements[1] = ((closureN)self_7313522)->elements[1];
+-c_7319124.elements[2] = len_73669_733270;
+-c_7319124.elements[3] = ((closureN)self_7313522)->elements[2];
+-c_7319124.elements[4] = ((closureN)self_7313522)->elements[3];
+-c_7319124.elements[5] = ((closureN)self_7313522)->elements[5];
++closureN_type c_7317820;
++object e_7317936 [3];
++c_7317820.hdr.mark = gc_color_red;
++ c_7317820.hdr.grayed = 0;
++c_7317820.tag = closureN_tag;
++ c_7317820.fn = (function_type)__lambda_531;
++c_7317820.num_args = 4;
++c_7317820.num_elements = 3;
++c_7317820.elements = (object *)e_7317936;
++c_7317820.elements[0] = k_735053;
++c_7317820.elements[1] = opts_73668_732922;
++c_7317820.elements[2] = str_73667_732921;
++
++return_direct_with_clo4(data,(closure)&c_7317820,__lambda_531, boolean_f, boolean_f, boolean_f, boolean_f);;
++}
++
++static void __lambda_531(void *data, object self_7312268, int argc, object *args) /* object self_7312268, object len_73669_732923, object start_73670_732924, object end_73671_732925, object loop_73672_732926 */
++ {
++ object len_73669_732923 = args[0]; object start_73670_732924 = args[1]; object end_73671_732925 = args[2]; object loop_73672_732926 = args[3];
++
++closureN_type c_7317822;
++object e_7317932 [6];
++c_7317822.hdr.mark = gc_color_red;
++ c_7317822.hdr.grayed = 0;
++c_7317822.tag = closureN_tag;
++ c_7317822.fn = (function_type)__lambda_1345;
++c_7317822.num_args = 1;
++c_7317822.num_elements = 6;
++c_7317822.elements = (object *)e_7317932;
++c_7317822.elements[0] = end_73671_732925;
++c_7317822.elements[1] = ((closureN)self_7312268)->elements[0];
++c_7317822.elements[2] = loop_73672_732926;
++c_7317822.elements[3] = ((closureN)self_7312268)->elements[1];
++c_7317822.elements[4] = start_73670_732924;
++c_7317822.elements[5] = ((closureN)self_7312268)->elements[2];
+
+
+-pair_type local_7319230;
+-return_direct_with_clo1(data,(closure)&c_7319124,__lambda_1391, set_cell_as_expr(&local_7319230, ((closureN)self_7313522)->elements[4]));;
++pair_type local_7317935;
++return_direct_with_clo1(data,(closure)&c_7317822,__lambda_1345, set_cell_as_expr(&local_7317935, len_73669_732923));;
+ }
+
+-static void __lambda_1391(void *data, object self_7313523, int argc, object *args) /* object self_7313523, object start_73670_733271 */
++static void __lambda_1345(void *data, object self_7312269, int argc, object *args) /* object self_7312269, object len_73669_732923 */
+ {
+- object start_73670_733271 = args[0];
++ object len_73669_732923 = args[0];
+
+-closureN_type c_7319126;
+-object e_7319222 [6];
+-c_7319126.hdr.mark = gc_color_red;
+- c_7319126.hdr.grayed = 0;
+-c_7319126.tag = closureN_tag;
+- c_7319126.fn = (function_type)__lambda_1390;
+-c_7319126.num_args = 1;
+-c_7319126.num_elements = 6;
+-c_7319126.elements = (object *)e_7319222;
+-c_7319126.elements[0] = ((closureN)self_7313523)->elements[1];
+-c_7319126.elements[1] = ((closureN)self_7313523)->elements[2];
+-c_7319126.elements[2] = ((closureN)self_7313523)->elements[3];
+-c_7319126.elements[3] = ((closureN)self_7313523)->elements[4];
+-c_7319126.elements[4] = start_73670_733271;
+-c_7319126.elements[5] = ((closureN)self_7313523)->elements[5];
++closureN_type c_7317824;
++object e_7317927 [6];
++c_7317824.hdr.mark = gc_color_red;
++ c_7317824.hdr.grayed = 0;
++c_7317824.tag = closureN_tag;
++ c_7317824.fn = (function_type)__lambda_1344;
++c_7317824.num_args = 1;
++c_7317824.num_elements = 6;
++c_7317824.elements = (object *)e_7317927;
++c_7317824.elements[0] = ((closureN)self_7312269)->elements[0];
++c_7317824.elements[1] = ((closureN)self_7312269)->elements[1];
++c_7317824.elements[2] = len_73669_732923;
++c_7317824.elements[3] = ((closureN)self_7312269)->elements[2];
++c_7317824.elements[4] = ((closureN)self_7312269)->elements[3];
++c_7317824.elements[5] = ((closureN)self_7312269)->elements[5];
++
++
++pair_type local_7317930;
++return_direct_with_clo1(data,(closure)&c_7317824,__lambda_1344, set_cell_as_expr(&local_7317930, ((closureN)self_7312269)->elements[4]));;
++}
+
++static void __lambda_1344(void *data, object self_7312270, int argc, object *args) /* object self_7312270, object start_73670_732924 */
++ {
++ object start_73670_732924 = args[0];
++
++closureN_type c_7317826;
++object e_7317922 [6];
++c_7317826.hdr.mark = gc_color_red;
++ c_7317826.hdr.grayed = 0;
++c_7317826.tag = closureN_tag;
++ c_7317826.fn = (function_type)__lambda_1343;
++c_7317826.num_args = 1;
++c_7317826.num_elements = 6;
++c_7317826.elements = (object *)e_7317922;
++c_7317826.elements[0] = ((closureN)self_7312270)->elements[1];
++c_7317826.elements[1] = ((closureN)self_7312270)->elements[2];
++c_7317826.elements[2] = ((closureN)self_7312270)->elements[3];
++c_7317826.elements[3] = ((closureN)self_7312270)->elements[4];
++c_7317826.elements[4] = start_73670_732924;
++c_7317826.elements[5] = ((closureN)self_7312270)->elements[5];
+
+-pair_type local_7319225;
+-return_direct_with_clo1(data,(closure)&c_7319126,__lambda_1390, set_cell_as_expr(&local_7319225, ((closureN)self_7313523)->elements[0]));;
++
++pair_type local_7317925;
++return_direct_with_clo1(data,(closure)&c_7317826,__lambda_1343, set_cell_as_expr(&local_7317925, ((closureN)self_7312270)->elements[0]));;
+ }
+
+-static void __lambda_1390(void *data, object self_7313524, int argc, object *args) /* object self_7313524, object end_73671_733272 */
++static void __lambda_1343(void *data, object self_7312271, int argc, object *args) /* object self_7312271, object end_73671_732925 */
+ {
+- object end_73671_733272 = args[0];
++ object end_73671_732925 = args[0];
+
+-closureN_type c_7319128;
+-object e_7319217 [6];
+-c_7319128.hdr.mark = gc_color_red;
+- c_7319128.hdr.grayed = 0;
+-c_7319128.tag = closureN_tag;
+- c_7319128.fn = (function_type)__lambda_1389;
+-c_7319128.num_args = 1;
+-c_7319128.num_elements = 6;
+-c_7319128.elements = (object *)e_7319217;
+-c_7319128.elements[0] = end_73671_733272;
+-c_7319128.elements[1] = ((closureN)self_7313524)->elements[0];
+-c_7319128.elements[2] = ((closureN)self_7313524)->elements[1];
+-c_7319128.elements[3] = ((closureN)self_7313524)->elements[3];
+-c_7319128.elements[4] = ((closureN)self_7313524)->elements[4];
+-c_7319128.elements[5] = ((closureN)self_7313524)->elements[5];
++closureN_type c_7317828;
++object e_7317917 [6];
++c_7317828.hdr.mark = gc_color_red;
++ c_7317828.hdr.grayed = 0;
++c_7317828.tag = closureN_tag;
++ c_7317828.fn = (function_type)__lambda_1342;
++c_7317828.num_args = 1;
++c_7317828.num_elements = 6;
++c_7317828.elements = (object *)e_7317917;
++c_7317828.elements[0] = end_73671_732925;
++c_7317828.elements[1] = ((closureN)self_7312271)->elements[0];
++c_7317828.elements[2] = ((closureN)self_7312271)->elements[1];
++c_7317828.elements[3] = ((closureN)self_7312271)->elements[3];
++c_7317828.elements[4] = ((closureN)self_7312271)->elements[4];
++c_7317828.elements[5] = ((closureN)self_7312271)->elements[5];
+
+
+-pair_type local_7319220;
+-return_direct_with_clo1(data,(closure)&c_7319128,__lambda_1389, set_cell_as_expr(&local_7319220, ((closureN)self_7313524)->elements[2]));;
++pair_type local_7317920;
++return_direct_with_clo1(data,(closure)&c_7317828,__lambda_1342, set_cell_as_expr(&local_7317920, ((closureN)self_7312271)->elements[2]));;
+ }
+
+-static void __lambda_1389(void *data, object self_7313525, int argc, object *args) /* object self_7313525, object loop_73672_733273 */
++static void __lambda_1342(void *data, object self_7312272, int argc, object *args) /* object self_7312272, object loop_73672_732926 */
+ {
+- object loop_73672_733273 = args[0];
++ object loop_73672_732926 = args[0];
+
+-closureN_type c_7319130;
+-object e_7319210 [7];
+-c_7319130.hdr.mark = gc_color_red;
+- c_7319130.hdr.grayed = 0;
+-c_7319130.tag = closureN_tag;
+- c_7319130.fn = (function_type)__lambda_532;
+-c_7319130.num_args = 1;
+-c_7319130.num_elements = 7;
+-c_7319130.elements = (object *)e_7319210;
+-c_7319130.elements[0] = ((closureN)self_7313525)->elements[0];
+-c_7319130.elements[1] = ((closureN)self_7313525)->elements[1];
+-c_7319130.elements[2] = ((closureN)self_7313525)->elements[2];
+-c_7319130.elements[3] = loop_73672_733273;
+-c_7319130.elements[4] = ((closureN)self_7313525)->elements[3];
+-c_7319130.elements[5] = ((closureN)self_7313525)->elements[4];
+-c_7319130.elements[6] = ((closureN)self_7313525)->elements[5];
++closureN_type c_7317830;
++object e_7317910 [7];
++c_7317830.hdr.mark = gc_color_red;
++ c_7317830.hdr.grayed = 0;
++c_7317830.tag = closureN_tag;
++ c_7317830.fn = (function_type)__lambda_532;
++c_7317830.num_args = 1;
++c_7317830.num_elements = 7;
++c_7317830.elements = (object *)e_7317910;
++c_7317830.elements[0] = ((closureN)self_7312272)->elements[0];
++c_7317830.elements[1] = ((closureN)self_7312272)->elements[1];
++c_7317830.elements[2] = ((closureN)self_7312272)->elements[2];
++c_7317830.elements[3] = loop_73672_732926;
++c_7317830.elements[4] = ((closureN)self_7312272)->elements[3];
++c_7317830.elements[5] = ((closureN)self_7312272)->elements[4];
++c_7317830.elements[6] = ((closureN)self_7312272)->elements[5];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319130,__lambda_532, Cyc_set_cell(data, ((closureN)self_7313525)->elements[2], Cyc_string_length(data, ((closureN)self_7313525)->elements[5])));;
++return_direct_with_clo1(data,(closure)&c_7317830,__lambda_532, Cyc_set_cell(data, ((closureN)self_7312272)->elements[2], Cyc_string_length(data, ((closureN)self_7312272)->elements[5])));;
+ }
+
+-static void __lambda_532(void *data, object self_7313526, int argc, object *args) /* object self_7313526, object r_735506 */
++static void __lambda_532(void *data, object self_7312273, int argc, object *args) /* object self_7312273, object r_735054 */
+ {
+
+- object r_735521;
++ object r_735069;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313526)->elements[4]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312273)->elements[4]), obj_int2obj(0))) ){
+
+- r_735521 = Cyc_car(data, ((closureN)self_7313526)->elements[4]);
++ r_735069 = Cyc_car(data, ((closureN)self_7312273)->elements[4]);
+ } else {
+- r_735521 = obj_int2obj(0);}
++ r_735069 = obj_int2obj(0);}
+ ;
+-closureN_type c_7319143;
+-object e_7319206 [7];
+-c_7319143.hdr.mark = gc_color_red;
+- c_7319143.hdr.grayed = 0;
+-c_7319143.tag = closureN_tag;
+- c_7319143.fn = (function_type)__lambda_533;
+-c_7319143.num_args = 1;
+-c_7319143.num_elements = 7;
+-c_7319143.elements = (object *)e_7319206;
+-c_7319143.elements[0] = ((closureN)self_7313526)->elements[0];
+-c_7319143.elements[1] = ((closureN)self_7313526)->elements[1];
+-c_7319143.elements[2] = ((closureN)self_7313526)->elements[2];
+-c_7319143.elements[3] = ((closureN)self_7313526)->elements[3];
+-c_7319143.elements[4] = ((closureN)self_7313526)->elements[4];
+-c_7319143.elements[5] = ((closureN)self_7313526)->elements[5];
+-c_7319143.elements[6] = ((closureN)self_7313526)->elements[6];
++closureN_type c_7317843;
++object e_7317906 [7];
++c_7317843.hdr.mark = gc_color_red;
++ c_7317843.hdr.grayed = 0;
++c_7317843.tag = closureN_tag;
++ c_7317843.fn = (function_type)__lambda_533;
++c_7317843.num_args = 1;
++c_7317843.num_elements = 7;
++c_7317843.elements = (object *)e_7317906;
++c_7317843.elements[0] = ((closureN)self_7312273)->elements[0];
++c_7317843.elements[1] = ((closureN)self_7312273)->elements[1];
++c_7317843.elements[2] = ((closureN)self_7312273)->elements[2];
++c_7317843.elements[3] = ((closureN)self_7312273)->elements[3];
++c_7317843.elements[4] = ((closureN)self_7312273)->elements[4];
++c_7317843.elements[5] = ((closureN)self_7312273)->elements[5];
++c_7317843.elements[6] = ((closureN)self_7312273)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319143,__lambda_533, Cyc_set_cell(data, ((closureN)self_7313526)->elements[5], r_735521));;
++return_direct_with_clo1(data,(closure)&c_7317843,__lambda_533, Cyc_set_cell(data, ((closureN)self_7312273)->elements[5], r_735069));;
+ }
+
+-static void __lambda_533(void *data, object self_7313527, int argc, object *args) /* object self_7313527, object r_735507 */
++static void __lambda_533(void *data, object self_7312274, int argc, object *args) /* object self_7312274, object r_735055 */
+ {
+
+
+-closureN_type c_7319145;
+-object e_7319159 [2];
+-c_7319145.hdr.mark = gc_color_red;
+- c_7319145.hdr.grayed = 0;
+-c_7319145.tag = closureN_tag;
+- c_7319145.fn = (function_type)__lambda_534;
+-c_7319145.num_args = 0;
+-c_7319145.num_elements = 2;
+-c_7319145.elements = (object *)e_7319159;
+-c_7319145.elements[0] = ((closureN)self_7313527)->elements[2];
+-c_7319145.elements[1] = ((closureN)self_7313527)->elements[4];
++closureN_type c_7317845;
++object e_7317859 [2];
++c_7317845.hdr.mark = gc_color_red;
++ c_7317845.hdr.grayed = 0;
++c_7317845.tag = closureN_tag;
++ c_7317845.fn = (function_type)__lambda_534;
++c_7317845.num_args = 0;
++c_7317845.num_elements = 2;
++c_7317845.elements = (object *)e_7317859;
++c_7317845.elements[0] = ((closureN)self_7312274)->elements[2];
++c_7317845.elements[1] = ((closureN)self_7312274)->elements[4];
+
+
+-closureN_type c_7319160;
+-object e_7319205 [5];
+-c_7319160.hdr.mark = gc_color_red;
+- c_7319160.hdr.grayed = 0;
+-c_7319160.tag = closureN_tag;
+- c_7319160.fn = (function_type)__lambda_535;
+-c_7319160.num_args = 1;
+-c_7319160.num_elements = 5;
+-c_7319160.elements = (object *)e_7319205;
+-c_7319160.elements[0] = ((closureN)self_7313527)->elements[0];
+-c_7319160.elements[1] = ((closureN)self_7313527)->elements[1];
+-c_7319160.elements[2] = ((closureN)self_7313527)->elements[3];
+-c_7319160.elements[3] = ((closureN)self_7313527)->elements[5];
+-c_7319160.elements[4] = ((closureN)self_7313527)->elements[6];
++closureN_type c_7317860;
++object e_7317905 [5];
++c_7317860.hdr.mark = gc_color_red;
++ c_7317860.hdr.grayed = 0;
++c_7317860.tag = closureN_tag;
++ c_7317860.fn = (function_type)__lambda_535;
++c_7317860.num_args = 1;
++c_7317860.num_elements = 5;
++c_7317860.elements = (object *)e_7317905;
++c_7317860.elements[0] = ((closureN)self_7312274)->elements[0];
++c_7317860.elements[1] = ((closureN)self_7312274)->elements[1];
++c_7317860.elements[2] = ((closureN)self_7312274)->elements[3];
++c_7317860.elements[3] = ((closureN)self_7312274)->elements[5];
++c_7317860.elements[4] = ((closureN)self_7312274)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7319145,__lambda_534, &c_7319160);;
++return_direct_with_clo1(data,(closure)&c_7317845,__lambda_534, &c_7317860);;
+ }
+
+-static void __lambda_535(void *data, object self_7313528, int argc, object *args) /* object self_7313528, object r_735517 */
++static void __lambda_535(void *data, object self_7312275, int argc, object *args) /* object self_7312275, object r_735065 */
+ {
+- object r_735517 = args[0];
++ object r_735065 = args[0];
+
+-closureN_type c_7319162;
+-object e_7319201 [5];
+-c_7319162.hdr.mark = gc_color_red;
+- c_7319162.hdr.grayed = 0;
+-c_7319162.tag = closureN_tag;
+- c_7319162.fn = (function_type)__lambda_536;
+-c_7319162.num_args = 1;
+-c_7319162.num_elements = 5;
+-c_7319162.elements = (object *)e_7319201;
+-c_7319162.elements[0] = ((closureN)self_7313528)->elements[0];
+-c_7319162.elements[1] = ((closureN)self_7313528)->elements[1];
+-c_7319162.elements[2] = ((closureN)self_7313528)->elements[2];
+-c_7319162.elements[3] = ((closureN)self_7313528)->elements[3];
+-c_7319162.elements[4] = ((closureN)self_7313528)->elements[4];
++closureN_type c_7317862;
++object e_7317901 [5];
++c_7317862.hdr.mark = gc_color_red;
++ c_7317862.hdr.grayed = 0;
++c_7317862.tag = closureN_tag;
++ c_7317862.fn = (function_type)__lambda_536;
++c_7317862.num_args = 1;
++c_7317862.num_elements = 5;
++c_7317862.elements = (object *)e_7317901;
++c_7317862.elements[0] = ((closureN)self_7312275)->elements[0];
++c_7317862.elements[1] = ((closureN)self_7312275)->elements[1];
++c_7317862.elements[2] = ((closureN)self_7312275)->elements[2];
++c_7317862.elements[3] = ((closureN)self_7312275)->elements[3];
++c_7317862.elements[4] = ((closureN)self_7312275)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319162,__lambda_536, Cyc_set_cell(data, ((closureN)self_7313528)->elements[0], r_735517));;
++return_direct_with_clo1(data,(closure)&c_7317862,__lambda_536, Cyc_set_cell(data, ((closureN)self_7312275)->elements[0], r_735065));;
+ }
+
+-static void __lambda_536(void *data, object self_7313529, int argc, object *args) /* object self_7313529, object r_735508 */
++static void __lambda_536(void *data, object self_7312276, int argc, object *args) /* object self_7312276, object r_735056 */
+ {
+
+
+-closureN_type c_7319164;
+-object e_7319179 [3];
+-c_7319164.hdr.mark = gc_color_red;
+- c_7319164.hdr.grayed = 0;
+-c_7319164.tag = closureN_tag;
+- c_7319164.fn = (function_type)__lambda_537;
+-c_7319164.num_args = 1;
+-c_7319164.num_elements = 3;
+-c_7319164.elements = (object *)e_7319179;
+-c_7319164.elements[0] = ((closureN)self_7313529)->elements[1];
+-c_7319164.elements[1] = ((closureN)self_7313529)->elements[2];
+-c_7319164.elements[2] = ((closureN)self_7313529)->elements[3];
++closureN_type c_7317864;
++object e_7317879 [3];
++c_7317864.hdr.mark = gc_color_red;
++ c_7317864.hdr.grayed = 0;
++c_7317864.tag = closureN_tag;
++ c_7317864.fn = (function_type)__lambda_537;
++c_7317864.num_args = 1;
++c_7317864.num_elements = 3;
++c_7317864.elements = (object *)e_7317879;
++c_7317864.elements[0] = ((closureN)self_7312276)->elements[1];
++c_7317864.elements[1] = ((closureN)self_7312276)->elements[2];
++c_7317864.elements[2] = ((closureN)self_7312276)->elements[3];
+
+
+-closureN_type c_7319180;
+-object e_7319200 [3];
+-c_7319180.hdr.mark = gc_color_red;
+- c_7319180.hdr.grayed = 0;
+-c_7319180.tag = closureN_tag;
+- c_7319180.fn = (function_type)__lambda_539;
+-c_7319180.num_args = 2;
+-c_7319180.num_elements = 3;
+-c_7319180.elements = (object *)e_7319200;
+-c_7319180.elements[0] = ((closureN)self_7313529)->elements[0];
+-c_7319180.elements[1] = ((closureN)self_7313529)->elements[2];
+-c_7319180.elements[2] = ((closureN)self_7313529)->elements[4];
++closureN_type c_7317880;
++object e_7317900 [3];
++c_7317880.hdr.mark = gc_color_red;
++ c_7317880.hdr.grayed = 0;
++c_7317880.tag = closureN_tag;
++ c_7317880.fn = (function_type)__lambda_539;
++c_7317880.num_args = 2;
++c_7317880.num_elements = 3;
++c_7317880.elements = (object *)e_7317900;
++c_7317880.elements[0] = ((closureN)self_7312276)->elements[0];
++c_7317880.elements[1] = ((closureN)self_7312276)->elements[2];
++c_7317880.elements[2] = ((closureN)self_7312276)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7319164,__lambda_537, &c_7319180);;
++return_direct_with_clo1(data,(closure)&c_7317864,__lambda_537, &c_7317880);;
+ }
+
+-static void __lambda_539(void *data, object self_7313530, int argc, object *args) /* object self_7313530, object k_735512, object i_73673_733274, object lst_73674_733275 */
++static void __lambda_539(void *data, object self_7312277, int argc, object *args) /* object self_7312277, object k_735060, object i_73673_732927, object lst_73674_732928 */
+ {
+- object k_735512 = args[0]; object i_73673_733274 = args[1]; object lst_73674_733275 = args[2];
++ object k_735060 = args[0]; object i_73673_732927 = args[1]; object lst_73674_732928 = args[2];
+
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, i_73673_733274, car(((closureN)self_7313530)->elements[0]))) ){
+- return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_735512, primitive_cons, NULL, lst_73674_733275);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73673_732927, car(((closureN)self_7312277)->elements[0]))) ){
++ return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_735060, primitive_cons, NULL, lst_73674_732928);
+ } else {
+
+
+
+-complex_num_type local_7319193;
++complex_num_type local_7317893;
+
+-pair_type local_7319196;
++pair_type local_7317896;
+
+
+-return_closcall3(data, car(((closureN)self_7313530)->elements[1]), k_735512, Cyc_fast_sum(data,&local_7319193, i_73673_733274, obj_int2obj(1)), set_pair_as_expr(&local_7319196, Cyc_string_ref(data, ((closureN)self_7313530)->elements[2], i_73673_733274), lst_73674_733275));}
++return_closcall3(data, car(((closureN)self_7312277)->elements[1]), k_735060, Cyc_fast_sum(data,&local_7317893, i_73673_732927, obj_int2obj(1)), set_pair_as_expr(&local_7317896, Cyc_string_ref(data, ((closureN)self_7312277)->elements[2], i_73673_732927), lst_73674_732928));}
+ ;;
+ }
+
+-static void __lambda_537(void *data, object self_7313531, int argc, object *args) /* object self_7313531, object r_735511 */
++static void __lambda_537(void *data, object self_7312278, int argc, object *args) /* object self_7312278, object r_735059 */
+ {
+- object r_735511 = args[0];
++ object r_735059 = args[0];
+
+-closureN_type c_7319166;
+-object e_7319175 [3];
+-c_7319166.hdr.mark = gc_color_red;
+- c_7319166.hdr.grayed = 0;
+-c_7319166.tag = closureN_tag;
+- c_7319166.fn = (function_type)__lambda_538;
+-c_7319166.num_args = 1;
+-c_7319166.num_elements = 3;
+-c_7319166.elements = (object *)e_7319175;
+-c_7319166.elements[0] = ((closureN)self_7313531)->elements[0];
+-c_7319166.elements[1] = ((closureN)self_7313531)->elements[1];
+-c_7319166.elements[2] = ((closureN)self_7313531)->elements[2];
++closureN_type c_7317866;
++object e_7317875 [3];
++c_7317866.hdr.mark = gc_color_red;
++ c_7317866.hdr.grayed = 0;
++c_7317866.tag = closureN_tag;
++ c_7317866.fn = (function_type)__lambda_538;
++c_7317866.num_args = 1;
++c_7317866.num_elements = 3;
++c_7317866.elements = (object *)e_7317875;
++c_7317866.elements[0] = ((closureN)self_7312278)->elements[0];
++c_7317866.elements[1] = ((closureN)self_7312278)->elements[1];
++c_7317866.elements[2] = ((closureN)self_7312278)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319166,__lambda_538, Cyc_set_cell(data, ((closureN)self_7313531)->elements[1], r_735511));;
++return_direct_with_clo1(data,(closure)&c_7317866,__lambda_538, Cyc_set_cell(data, ((closureN)self_7312278)->elements[1], r_735059));;
+ }
+
+-static void __lambda_538(void *data, object self_7313532, int argc, object *args) /* object self_7313532, object r_735509 */
++static void __lambda_538(void *data, object self_7312279, int argc, object *args) /* object self_7312279, object r_735057 */
+ {
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313532)->elements[1]), ((closureN)self_7313532)->elements[0], car(((closureN)self_7313532)->elements[2]), NULL);;
++return_closcall3(data, car(((closureN)self_7312279)->elements[1]), ((closureN)self_7312279)->elements[0], car(((closureN)self_7312279)->elements[2]), NULL);;
+ }
+
+-static void __lambda_534(void *data, object self_7313533, int argc, object *args) /* object self_7313533, object k_735518 */
++static void __lambda_534(void *data, object self_7312280, int argc, object *args) /* object self_7312280, object k_735066 */
+ {
+- object k_735518 = args[0];
++ object k_735066 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313533)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312280)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735518,__lambda_535, Cyc_cadr(data, ((closureN)self_7313533)->elements[1]));
++return_direct_with_clo1(data, k_735066,__lambda_535, Cyc_cadr(data, ((closureN)self_7312280)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735518,__lambda_535, car(((closureN)self_7313533)->elements[0]));}
++return_direct_with_clo1(data, k_735066,__lambda_535, car(((closureN)self_7312280)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_528(void *data, object _, int argc, object *args) /* closure _,object k_735500, object vec_73664_733265, object opts_73665_733266_raw, ... */
++static void __lambda_528(void *data, object _, int argc, object *args) /* closure _,object k_735048, object vec_73664_732918, object opts_73665_732919_raw, ... */
+ {
+-object k_735500 = args[0]; object vec_73664_733265 = args[1];
+-load_varargs(opts_73665_733266, args, 2, argc - 2);
++object k_735048 = args[0]; object vec_73664_732918 = args[1];
++load_varargs(opts_73665_732919, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:vector->string");
+
+-closureN_type c_7319105;
+-object e_7319111 [1];
+-c_7319105.hdr.mark = gc_color_red;
+- c_7319105.hdr.grayed = 0;
+-c_7319105.tag = closureN_tag;
+- c_7319105.fn = (function_type)__lambda_529;
+-c_7319105.num_args = 1;
+-c_7319105.num_elements = 1;
+-c_7319105.elements = (object *)e_7319111;
+-c_7319105.elements[0] = k_735500;
++closureN_type c_7317805;
++object e_7317811 [1];
++c_7317805.hdr.mark = gc_color_red;
++ c_7317805.hdr.grayed = 0;
++c_7317805.tag = closureN_tag;
++ c_7317805.fn = (function_type)__lambda_529;
++c_7317805.num_args = 1;
++c_7317805.num_elements = 1;
++c_7317805.elements = (object *)e_7317811;
++c_7317805.elements[0] = k_735048;
+
+
+-pair_type local_7319117;
++pair_type local_7317817;
+
+-object c_7319114 = apply(data,(closure)&c_7319105,__glo_vector_91_125list_scheme_base, set_pair_as_expr(&local_7319117, vec_73664_733265, opts_73665_733266));
+-return_closcall1(data,(closure)&c_7319105, c_7319114);;
++object c_7317814 = apply(data,(closure)&c_7317805,__glo_vector_91_125list_scheme_base, set_pair_as_expr(&local_7317817, vec_73664_732918, opts_73665_732919));
++return_closcall1(data,(closure)&c_7317805, c_7317814);;
+ }
+
+-static void __lambda_529(void *data, object self_7313520, int argc, object *args) /* object self_7313520, object lst_73666_733267 */
++static void __lambda_529(void *data, object self_7312267, int argc, object *args) /* object self_7312267, object lst_73666_732920 */
+ {
+- object lst_73666_733267 = args[0];
++ object lst_73666_732920 = args[0];
+
+-object c_7319110 = Cyc_list2string(data, ((closureN)self_7313520)->elements[0],lst_73666_733267);
+-return_direct_with_clo1(data, ((closureN)self_7313520)->elements[0], (((closure) ((closureN)self_7313520)->elements[0])->fn), c_7319110);;
++object c_7317810 = Cyc_list2string(data, ((closureN)self_7312267)->elements[0],lst_73666_732920);
++return_direct_with_clo1(data, ((closureN)self_7312267)->elements[0], (((closure) ((closureN)self_7312267)->elements[0])->fn), c_7317810);;
+ }
+
+-static void __lambda_521(void *data, object _, int argc, object *args) /* closure _,object k_735485, object str_73659_733260, object opts_73660_733261_raw, ... */
++static void __lambda_521(void *data, object _, int argc, object *args) /* closure _,object k_735033, object str_73659_732913, object opts_73660_732914_raw, ... */
+ {
+-object k_735485 = args[0]; object str_73659_733260 = args[1];
+-load_varargs(opts_73660_733261, args, 2, argc - 2);
++object k_735033 = args[0]; object str_73659_732913 = args[1];
++load_varargs(opts_73660_732914, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:string->utf8");
+
+-closureN_type c_7319019;
+-object e_7319102 [3];
+-c_7319019.hdr.mark = gc_color_red;
+- c_7319019.hdr.grayed = 0;
+-c_7319019.tag = closureN_tag;
+- c_7319019.fn = (function_type)__lambda_522;
+-c_7319019.num_args = 3;
+-c_7319019.num_elements = 3;
+-c_7319019.elements = (object *)e_7319102;
+-c_7319019.elements[0] = k_735485;
+-c_7319019.elements[1] = opts_73660_733261;
+-c_7319019.elements[2] = str_73659_733260;
+-
+-return_direct_with_clo3(data,(closure)&c_7319019,__lambda_522, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_522(void *data, object self_7313511, int argc, object *args) /* object self_7313511, object len_73661_733262, object start_73662_733263, object end_73663_733264 */
+- {
+- object len_73661_733262 = args[0]; object start_73662_733263 = args[1]; object end_73663_733264 = args[2];
+-
+-closureN_type c_7319021;
+-object e_7319098 [5];
+-c_7319021.hdr.mark = gc_color_red;
+- c_7319021.hdr.grayed = 0;
+-c_7319021.tag = closureN_tag;
+- c_7319021.fn = (function_type)__lambda_1388;
+-c_7319021.num_args = 1;
+-c_7319021.num_elements = 5;
+-c_7319021.elements = (object *)e_7319098;
+-c_7319021.elements[0] = end_73663_733264;
+-c_7319021.elements[1] = ((closureN)self_7313511)->elements[0];
+-c_7319021.elements[2] = ((closureN)self_7313511)->elements[1];
+-c_7319021.elements[3] = start_73662_733263;
+-c_7319021.elements[4] = ((closureN)self_7313511)->elements[2];
++closureN_type c_7317719;
++object e_7317802 [3];
++c_7317719.hdr.mark = gc_color_red;
++ c_7317719.hdr.grayed = 0;
++c_7317719.tag = closureN_tag;
++ c_7317719.fn = (function_type)__lambda_522;
++c_7317719.num_args = 3;
++c_7317719.num_elements = 3;
++c_7317719.elements = (object *)e_7317802;
++c_7317719.elements[0] = k_735033;
++c_7317719.elements[1] = opts_73660_732914;
++c_7317719.elements[2] = str_73659_732913;
++
++return_direct_with_clo3(data,(closure)&c_7317719,__lambda_522, boolean_f, boolean_f, boolean_f);;
++}
+
++static void __lambda_522(void *data, object self_7312258, int argc, object *args) /* object self_7312258, object len_73661_732915, object start_73662_732916, object end_73663_732917 */
++ {
++ object len_73661_732915 = args[0]; object start_73662_732916 = args[1]; object end_73663_732917 = args[2];
++
++closureN_type c_7317721;
++object e_7317798 [5];
++c_7317721.hdr.mark = gc_color_red;
++ c_7317721.hdr.grayed = 0;
++c_7317721.tag = closureN_tag;
++ c_7317721.fn = (function_type)__lambda_1341;
++c_7317721.num_args = 1;
++c_7317721.num_elements = 5;
++c_7317721.elements = (object *)e_7317798;
++c_7317721.elements[0] = end_73663_732917;
++c_7317721.elements[1] = ((closureN)self_7312258)->elements[0];
++c_7317721.elements[2] = ((closureN)self_7312258)->elements[1];
++c_7317721.elements[3] = start_73662_732916;
++c_7317721.elements[4] = ((closureN)self_7312258)->elements[2];
+
+-pair_type local_7319101;
+-return_direct_with_clo1(data,(closure)&c_7319021,__lambda_1388, set_cell_as_expr(&local_7319101, len_73661_733262));;
++
++pair_type local_7317801;
++return_direct_with_clo1(data,(closure)&c_7317721,__lambda_1341, set_cell_as_expr(&local_7317801, len_73661_732915));;
+ }
+
+-static void __lambda_1388(void *data, object self_7313512, int argc, object *args) /* object self_7313512, object len_73661_733262 */
++static void __lambda_1341(void *data, object self_7312259, int argc, object *args) /* object self_7312259, object len_73661_732915 */
+ {
+- object len_73661_733262 = args[0];
++ object len_73661_732915 = args[0];
+
+-closureN_type c_7319023;
+-object e_7319093 [5];
+-c_7319023.hdr.mark = gc_color_red;
+- c_7319023.hdr.grayed = 0;
+-c_7319023.tag = closureN_tag;
+- c_7319023.fn = (function_type)__lambda_1387;
+-c_7319023.num_args = 1;
+-c_7319023.num_elements = 5;
+-c_7319023.elements = (object *)e_7319093;
+-c_7319023.elements[0] = ((closureN)self_7313512)->elements[0];
+-c_7319023.elements[1] = ((closureN)self_7313512)->elements[1];
+-c_7319023.elements[2] = len_73661_733262;
+-c_7319023.elements[3] = ((closureN)self_7313512)->elements[2];
+-c_7319023.elements[4] = ((closureN)self_7313512)->elements[4];
++closureN_type c_7317723;
++object e_7317793 [5];
++c_7317723.hdr.mark = gc_color_red;
++ c_7317723.hdr.grayed = 0;
++c_7317723.tag = closureN_tag;
++ c_7317723.fn = (function_type)__lambda_1340;
++c_7317723.num_args = 1;
++c_7317723.num_elements = 5;
++c_7317723.elements = (object *)e_7317793;
++c_7317723.elements[0] = ((closureN)self_7312259)->elements[0];
++c_7317723.elements[1] = ((closureN)self_7312259)->elements[1];
++c_7317723.elements[2] = len_73661_732915;
++c_7317723.elements[3] = ((closureN)self_7312259)->elements[2];
++c_7317723.elements[4] = ((closureN)self_7312259)->elements[4];
+
+
+-pair_type local_7319096;
+-return_direct_with_clo1(data,(closure)&c_7319023,__lambda_1387, set_cell_as_expr(&local_7319096, ((closureN)self_7313512)->elements[3]));;
++pair_type local_7317796;
++return_direct_with_clo1(data,(closure)&c_7317723,__lambda_1340, set_cell_as_expr(&local_7317796, ((closureN)self_7312259)->elements[3]));;
+ }
+
+-static void __lambda_1387(void *data, object self_7313513, int argc, object *args) /* object self_7313513, object start_73662_733263 */
++static void __lambda_1340(void *data, object self_7312260, int argc, object *args) /* object self_7312260, object start_73662_732916 */
+ {
+- object start_73662_733263 = args[0];
++ object start_73662_732916 = args[0];
+
+-closureN_type c_7319025;
+-object e_7319088 [5];
+-c_7319025.hdr.mark = gc_color_red;
+- c_7319025.hdr.grayed = 0;
+-c_7319025.tag = closureN_tag;
+- c_7319025.fn = (function_type)__lambda_1386;
+-c_7319025.num_args = 1;
+-c_7319025.num_elements = 5;
+-c_7319025.elements = (object *)e_7319088;
+-c_7319025.elements[0] = ((closureN)self_7313513)->elements[1];
+-c_7319025.elements[1] = ((closureN)self_7313513)->elements[2];
+-c_7319025.elements[2] = ((closureN)self_7313513)->elements[3];
+-c_7319025.elements[3] = start_73662_733263;
+-c_7319025.elements[4] = ((closureN)self_7313513)->elements[4];
++closureN_type c_7317725;
++object e_7317788 [5];
++c_7317725.hdr.mark = gc_color_red;
++ c_7317725.hdr.grayed = 0;
++c_7317725.tag = closureN_tag;
++ c_7317725.fn = (function_type)__lambda_1339;
++c_7317725.num_args = 1;
++c_7317725.num_elements = 5;
++c_7317725.elements = (object *)e_7317788;
++c_7317725.elements[0] = ((closureN)self_7312260)->elements[1];
++c_7317725.elements[1] = ((closureN)self_7312260)->elements[2];
++c_7317725.elements[2] = ((closureN)self_7312260)->elements[3];
++c_7317725.elements[3] = start_73662_732916;
++c_7317725.elements[4] = ((closureN)self_7312260)->elements[4];
+
+
+-pair_type local_7319091;
+-return_direct_with_clo1(data,(closure)&c_7319025,__lambda_1386, set_cell_as_expr(&local_7319091, ((closureN)self_7313513)->elements[0]));;
++pair_type local_7317791;
++return_direct_with_clo1(data,(closure)&c_7317725,__lambda_1339, set_cell_as_expr(&local_7317791, ((closureN)self_7312260)->elements[0]));;
+ }
+
+-static void __lambda_1386(void *data, object self_7313514, int argc, object *args) /* object self_7313514, object end_73663_733264 */
++static void __lambda_1339(void *data, object self_7312261, int argc, object *args) /* object self_7312261, object end_73663_732917 */
+ {
+- object end_73663_733264 = args[0];
++ object end_73663_732917 = args[0];
+
+-closureN_type c_7319027;
+-object e_7319081 [6];
+-c_7319027.hdr.mark = gc_color_red;
+- c_7319027.hdr.grayed = 0;
+-c_7319027.tag = closureN_tag;
+- c_7319027.fn = (function_type)__lambda_523;
+-c_7319027.num_args = 1;
+-c_7319027.num_elements = 6;
+-c_7319027.elements = (object *)e_7319081;
+-c_7319027.elements[0] = end_73663_733264;
+-c_7319027.elements[1] = ((closureN)self_7313514)->elements[0];
+-c_7319027.elements[2] = ((closureN)self_7313514)->elements[1];
+-c_7319027.elements[3] = ((closureN)self_7313514)->elements[2];
+-c_7319027.elements[4] = ((closureN)self_7313514)->elements[3];
+-c_7319027.elements[5] = ((closureN)self_7313514)->elements[4];
++closureN_type c_7317727;
++object e_7317781 [6];
++c_7317727.hdr.mark = gc_color_red;
++ c_7317727.hdr.grayed = 0;
++c_7317727.tag = closureN_tag;
++ c_7317727.fn = (function_type)__lambda_523;
++c_7317727.num_args = 1;
++c_7317727.num_elements = 6;
++c_7317727.elements = (object *)e_7317781;
++c_7317727.elements[0] = end_73663_732917;
++c_7317727.elements[1] = ((closureN)self_7312261)->elements[0];
++c_7317727.elements[2] = ((closureN)self_7312261)->elements[1];
++c_7317727.elements[3] = ((closureN)self_7312261)->elements[2];
++c_7317727.elements[4] = ((closureN)self_7312261)->elements[3];
++c_7317727.elements[5] = ((closureN)self_7312261)->elements[4];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319027,__lambda_523, Cyc_set_cell(data, ((closureN)self_7313514)->elements[1], Cyc_string_length(data, ((closureN)self_7313514)->elements[4])));;
++return_direct_with_clo1(data,(closure)&c_7317727,__lambda_523, Cyc_set_cell(data, ((closureN)self_7312261)->elements[1], Cyc_string_length(data, ((closureN)self_7312261)->elements[4])));;
+ }
+
+-static void __lambda_523(void *data, object self_7313515, int argc, object *args) /* object self_7313515, object r_735486 */
++static void __lambda_523(void *data, object self_7312262, int argc, object *args) /* object self_7312262, object r_735034 */
+ {
+
+- object r_735493;
++ object r_735041;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313515)->elements[3]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312262)->elements[3]), obj_int2obj(0))) ){
+
+- r_735493 = Cyc_car(data, ((closureN)self_7313515)->elements[3]);
++ r_735041 = Cyc_car(data, ((closureN)self_7312262)->elements[3]);
+ } else {
+- r_735493 = obj_int2obj(0);}
++ r_735041 = obj_int2obj(0);}
+ ;
+-closureN_type c_7319040;
+-object e_7319077 [6];
+-c_7319040.hdr.mark = gc_color_red;
+- c_7319040.hdr.grayed = 0;
+-c_7319040.tag = closureN_tag;
+- c_7319040.fn = (function_type)__lambda_524;
+-c_7319040.num_args = 1;
+-c_7319040.num_elements = 6;
+-c_7319040.elements = (object *)e_7319077;
+-c_7319040.elements[0] = ((closureN)self_7313515)->elements[0];
+-c_7319040.elements[1] = ((closureN)self_7313515)->elements[1];
+-c_7319040.elements[2] = ((closureN)self_7313515)->elements[2];
+-c_7319040.elements[3] = ((closureN)self_7313515)->elements[3];
+-c_7319040.elements[4] = ((closureN)self_7313515)->elements[4];
+-c_7319040.elements[5] = ((closureN)self_7313515)->elements[5];
++closureN_type c_7317740;
++object e_7317777 [6];
++c_7317740.hdr.mark = gc_color_red;
++ c_7317740.hdr.grayed = 0;
++c_7317740.tag = closureN_tag;
++ c_7317740.fn = (function_type)__lambda_524;
++c_7317740.num_args = 1;
++c_7317740.num_elements = 6;
++c_7317740.elements = (object *)e_7317777;
++c_7317740.elements[0] = ((closureN)self_7312262)->elements[0];
++c_7317740.elements[1] = ((closureN)self_7312262)->elements[1];
++c_7317740.elements[2] = ((closureN)self_7312262)->elements[2];
++c_7317740.elements[3] = ((closureN)self_7312262)->elements[3];
++c_7317740.elements[4] = ((closureN)self_7312262)->elements[4];
++c_7317740.elements[5] = ((closureN)self_7312262)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319040,__lambda_524, Cyc_set_cell(data, ((closureN)self_7313515)->elements[4], r_735493));;
++return_direct_with_clo1(data,(closure)&c_7317740,__lambda_524, Cyc_set_cell(data, ((closureN)self_7312262)->elements[4], r_735041));;
+ }
+
+-static void __lambda_524(void *data, object self_7313516, int argc, object *args) /* object self_7313516, object r_735487 */
++static void __lambda_524(void *data, object self_7312263, int argc, object *args) /* object self_7312263, object r_735035 */
+ {
+
+
+-closureN_type c_7319042;
+-object e_7319056 [2];
+-c_7319042.hdr.mark = gc_color_red;
+- c_7319042.hdr.grayed = 0;
+-c_7319042.tag = closureN_tag;
+- c_7319042.fn = (function_type)__lambda_525;
+-c_7319042.num_args = 0;
+-c_7319042.num_elements = 2;
+-c_7319042.elements = (object *)e_7319056;
+-c_7319042.elements[0] = ((closureN)self_7313516)->elements[2];
+-c_7319042.elements[1] = ((closureN)self_7313516)->elements[3];
++closureN_type c_7317742;
++object e_7317756 [2];
++c_7317742.hdr.mark = gc_color_red;
++ c_7317742.hdr.grayed = 0;
++c_7317742.tag = closureN_tag;
++ c_7317742.fn = (function_type)__lambda_525;
++c_7317742.num_args = 0;
++c_7317742.num_elements = 2;
++c_7317742.elements = (object *)e_7317756;
++c_7317742.elements[0] = ((closureN)self_7312263)->elements[2];
++c_7317742.elements[1] = ((closureN)self_7312263)->elements[3];
+
+
+-closureN_type c_7319057;
+-object e_7319076 [4];
+-c_7319057.hdr.mark = gc_color_red;
+- c_7319057.hdr.grayed = 0;
+-c_7319057.tag = closureN_tag;
+- c_7319057.fn = (function_type)__lambda_526;
+-c_7319057.num_args = 1;
+-c_7319057.num_elements = 4;
+-c_7319057.elements = (object *)e_7319076;
+-c_7319057.elements[0] = ((closureN)self_7313516)->elements[0];
+-c_7319057.elements[1] = ((closureN)self_7313516)->elements[1];
+-c_7319057.elements[2] = ((closureN)self_7313516)->elements[4];
+-c_7319057.elements[3] = ((closureN)self_7313516)->elements[5];
++closureN_type c_7317757;
++object e_7317776 [4];
++c_7317757.hdr.mark = gc_color_red;
++ c_7317757.hdr.grayed = 0;
++c_7317757.tag = closureN_tag;
++ c_7317757.fn = (function_type)__lambda_526;
++c_7317757.num_args = 1;
++c_7317757.num_elements = 4;
++c_7317757.elements = (object *)e_7317776;
++c_7317757.elements[0] = ((closureN)self_7312263)->elements[0];
++c_7317757.elements[1] = ((closureN)self_7312263)->elements[1];
++c_7317757.elements[2] = ((closureN)self_7312263)->elements[4];
++c_7317757.elements[3] = ((closureN)self_7312263)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7319042,__lambda_525, &c_7319057);;
++return_direct_with_clo1(data,(closure)&c_7317742,__lambda_525, &c_7317757);;
+ }
+
+-static void __lambda_526(void *data, object self_7313517, int argc, object *args) /* object self_7313517, object r_735489 */
++static void __lambda_526(void *data, object self_7312264, int argc, object *args) /* object self_7312264, object r_735037 */
+ {
+- object r_735489 = args[0];
++ object r_735037 = args[0];
+
+-closureN_type c_7319059;
+-object e_7319072 [4];
+-c_7319059.hdr.mark = gc_color_red;
+- c_7319059.hdr.grayed = 0;
+-c_7319059.tag = closureN_tag;
+- c_7319059.fn = (function_type)__lambda_527;
+-c_7319059.num_args = 1;
+-c_7319059.num_elements = 4;
+-c_7319059.elements = (object *)e_7319072;
+-c_7319059.elements[0] = ((closureN)self_7313517)->elements[0];
+-c_7319059.elements[1] = ((closureN)self_7313517)->elements[1];
+-c_7319059.elements[2] = ((closureN)self_7313517)->elements[2];
+-c_7319059.elements[3] = ((closureN)self_7313517)->elements[3];
++closureN_type c_7317759;
++object e_7317772 [4];
++c_7317759.hdr.mark = gc_color_red;
++ c_7317759.hdr.grayed = 0;
++c_7317759.tag = closureN_tag;
++ c_7317759.fn = (function_type)__lambda_527;
++c_7317759.num_args = 1;
++c_7317759.num_elements = 4;
++c_7317759.elements = (object *)e_7317772;
++c_7317759.elements[0] = ((closureN)self_7312264)->elements[0];
++c_7317759.elements[1] = ((closureN)self_7312264)->elements[1];
++c_7317759.elements[2] = ((closureN)self_7312264)->elements[2];
++c_7317759.elements[3] = ((closureN)self_7312264)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7319059,__lambda_527, Cyc_set_cell(data, ((closureN)self_7313517)->elements[0], r_735489));;
++return_direct_with_clo1(data,(closure)&c_7317759,__lambda_527, Cyc_set_cell(data, ((closureN)self_7312264)->elements[0], r_735037));;
+ }
+
+-static void __lambda_527(void *data, object self_7313518, int argc, object *args) /* object self_7313518, object r_735488 */
++static void __lambda_527(void *data, object self_7312265, int argc, object *args) /* object self_7312265, object r_735036 */
+ {
+
+
+@@ -28359,238 +26562,238 @@ static void __lambda_527(void *data, obj
+
+
+
+-object c_7319064 = Cyc_string2utf8(data, ((closureN)self_7313518)->elements[1],((closureN)self_7313518)->elements[3], car(((closureN)self_7313518)->elements[2]), car(((closureN)self_7313518)->elements[0]));
+-return_direct_with_clo1(data, ((closureN)self_7313518)->elements[1], (((closure) ((closureN)self_7313518)->elements[1])->fn), c_7319064);;
++object c_7317764 = Cyc_string2utf8(data, ((closureN)self_7312265)->elements[1],((closureN)self_7312265)->elements[3], car(((closureN)self_7312265)->elements[2]), car(((closureN)self_7312265)->elements[0]));
++return_direct_with_clo1(data, ((closureN)self_7312265)->elements[1], (((closure) ((closureN)self_7312265)->elements[1])->fn), c_7317764);;
+ }
+
+-static void __lambda_525(void *data, object self_7313519, int argc, object *args) /* object self_7313519, object k_735490 */
++static void __lambda_525(void *data, object self_7312266, int argc, object *args) /* object self_7312266, object k_735038 */
+ {
+- object k_735490 = args[0];
++ object k_735038 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313519)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312266)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735490,__lambda_526, Cyc_cadr(data, ((closureN)self_7313519)->elements[1]));
++return_direct_with_clo1(data, k_735038,__lambda_526, Cyc_cadr(data, ((closureN)self_7312266)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735490,__lambda_526, car(((closureN)self_7313519)->elements[0]));}
++return_direct_with_clo1(data, k_735038,__lambda_526, car(((closureN)self_7312266)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_514(void *data, object _, int argc, object *args) /* closure _,object k_735470, object bv_73654_733255, object opts_73655_733256_raw, ... */
++static void __lambda_514(void *data, object _, int argc, object *args) /* closure _,object k_735018, object bv_73654_732908, object opts_73655_732909_raw, ... */
+ {
+-object k_735470 = args[0]; object bv_73654_733255 = args[1];
+-load_varargs(opts_73655_733256, args, 2, argc - 2);
++object k_735018 = args[0]; object bv_73654_732908 = args[1];
++load_varargs(opts_73655_732909, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:utf8->string");
+
+-closureN_type c_7318933;
+-object e_7319016 [3];
+-c_7318933.hdr.mark = gc_color_red;
+- c_7318933.hdr.grayed = 0;
+-c_7318933.tag = closureN_tag;
+- c_7318933.fn = (function_type)__lambda_515;
+-c_7318933.num_args = 3;
+-c_7318933.num_elements = 3;
+-c_7318933.elements = (object *)e_7319016;
+-c_7318933.elements[0] = bv_73654_733255;
+-c_7318933.elements[1] = k_735470;
+-c_7318933.elements[2] = opts_73655_733256;
++closureN_type c_7317633;
++object e_7317716 [3];
++c_7317633.hdr.mark = gc_color_red;
++ c_7317633.hdr.grayed = 0;
++c_7317633.tag = closureN_tag;
++ c_7317633.fn = (function_type)__lambda_515;
++c_7317633.num_args = 3;
++c_7317633.num_elements = 3;
++c_7317633.elements = (object *)e_7317716;
++c_7317633.elements[0] = bv_73654_732908;
++c_7317633.elements[1] = k_735018;
++c_7317633.elements[2] = opts_73655_732909;
+
+-return_direct_with_clo3(data,(closure)&c_7318933,__lambda_515, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo3(data,(closure)&c_7317633,__lambda_515, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_515(void *data, object self_7313502, int argc, object *args) /* object self_7313502, object len_73656_733257, object start_73657_733258, object end_73658_733259 */
++static void __lambda_515(void *data, object self_7312249, int argc, object *args) /* object self_7312249, object len_73656_732910, object start_73657_732911, object end_73658_732912 */
+ {
+- object len_73656_733257 = args[0]; object start_73657_733258 = args[1]; object end_73658_733259 = args[2];
++ object len_73656_732910 = args[0]; object start_73657_732911 = args[1]; object end_73658_732912 = args[2];
+
+-closureN_type c_7318935;
+-object e_7319012 [5];
+-c_7318935.hdr.mark = gc_color_red;
+- c_7318935.hdr.grayed = 0;
+-c_7318935.tag = closureN_tag;
+- c_7318935.fn = (function_type)__lambda_1385;
+-c_7318935.num_args = 1;
+-c_7318935.num_elements = 5;
+-c_7318935.elements = (object *)e_7319012;
+-c_7318935.elements[0] = ((closureN)self_7313502)->elements[0];
+-c_7318935.elements[1] = end_73658_733259;
+-c_7318935.elements[2] = ((closureN)self_7313502)->elements[1];
+-c_7318935.elements[3] = ((closureN)self_7313502)->elements[2];
+-c_7318935.elements[4] = start_73657_733258;
++closureN_type c_7317635;
++object e_7317712 [5];
++c_7317635.hdr.mark = gc_color_red;
++ c_7317635.hdr.grayed = 0;
++c_7317635.tag = closureN_tag;
++ c_7317635.fn = (function_type)__lambda_1338;
++c_7317635.num_args = 1;
++c_7317635.num_elements = 5;
++c_7317635.elements = (object *)e_7317712;
++c_7317635.elements[0] = ((closureN)self_7312249)->elements[0];
++c_7317635.elements[1] = end_73658_732912;
++c_7317635.elements[2] = ((closureN)self_7312249)->elements[1];
++c_7317635.elements[3] = ((closureN)self_7312249)->elements[2];
++c_7317635.elements[4] = start_73657_732911;
+
+
+-pair_type local_7319015;
+-return_direct_with_clo1(data,(closure)&c_7318935,__lambda_1385, set_cell_as_expr(&local_7319015, len_73656_733257));;
++pair_type local_7317715;
++return_direct_with_clo1(data,(closure)&c_7317635,__lambda_1338, set_cell_as_expr(&local_7317715, len_73656_732910));;
+ }
+
+-static void __lambda_1385(void *data, object self_7313503, int argc, object *args) /* object self_7313503, object len_73656_733257 */
++static void __lambda_1338(void *data, object self_7312250, int argc, object *args) /* object self_7312250, object len_73656_732910 */
+ {
+- object len_73656_733257 = args[0];
++ object len_73656_732910 = args[0];
+
+-closureN_type c_7318937;
+-object e_7319007 [5];
+-c_7318937.hdr.mark = gc_color_red;
+- c_7318937.hdr.grayed = 0;
+-c_7318937.tag = closureN_tag;
+- c_7318937.fn = (function_type)__lambda_1384;
+-c_7318937.num_args = 1;
+-c_7318937.num_elements = 5;
+-c_7318937.elements = (object *)e_7319007;
+-c_7318937.elements[0] = ((closureN)self_7313503)->elements[0];
+-c_7318937.elements[1] = ((closureN)self_7313503)->elements[1];
+-c_7318937.elements[2] = ((closureN)self_7313503)->elements[2];
+-c_7318937.elements[3] = len_73656_733257;
+-c_7318937.elements[4] = ((closureN)self_7313503)->elements[3];
++closureN_type c_7317637;
++object e_7317707 [5];
++c_7317637.hdr.mark = gc_color_red;
++ c_7317637.hdr.grayed = 0;
++c_7317637.tag = closureN_tag;
++ c_7317637.fn = (function_type)__lambda_1337;
++c_7317637.num_args = 1;
++c_7317637.num_elements = 5;
++c_7317637.elements = (object *)e_7317707;
++c_7317637.elements[0] = ((closureN)self_7312250)->elements[0];
++c_7317637.elements[1] = ((closureN)self_7312250)->elements[1];
++c_7317637.elements[2] = ((closureN)self_7312250)->elements[2];
++c_7317637.elements[3] = len_73656_732910;
++c_7317637.elements[4] = ((closureN)self_7312250)->elements[3];
+
+
+-pair_type local_7319010;
+-return_direct_with_clo1(data,(closure)&c_7318937,__lambda_1384, set_cell_as_expr(&local_7319010, ((closureN)self_7313503)->elements[4]));;
++pair_type local_7317710;
++return_direct_with_clo1(data,(closure)&c_7317637,__lambda_1337, set_cell_as_expr(&local_7317710, ((closureN)self_7312250)->elements[4]));;
+ }
+
+-static void __lambda_1384(void *data, object self_7313504, int argc, object *args) /* object self_7313504, object start_73657_733258 */
++static void __lambda_1337(void *data, object self_7312251, int argc, object *args) /* object self_7312251, object start_73657_732911 */
+ {
+- object start_73657_733258 = args[0];
++ object start_73657_732911 = args[0];
+
+-closureN_type c_7318939;
+-object e_7319002 [5];
+-c_7318939.hdr.mark = gc_color_red;
+- c_7318939.hdr.grayed = 0;
+-c_7318939.tag = closureN_tag;
+- c_7318939.fn = (function_type)__lambda_1383;
+-c_7318939.num_args = 1;
+-c_7318939.num_elements = 5;
+-c_7318939.elements = (object *)e_7319002;
+-c_7318939.elements[0] = ((closureN)self_7313504)->elements[0];
+-c_7318939.elements[1] = ((closureN)self_7313504)->elements[2];
+-c_7318939.elements[2] = ((closureN)self_7313504)->elements[3];
+-c_7318939.elements[3] = ((closureN)self_7313504)->elements[4];
+-c_7318939.elements[4] = start_73657_733258;
++closureN_type c_7317639;
++object e_7317702 [5];
++c_7317639.hdr.mark = gc_color_red;
++ c_7317639.hdr.grayed = 0;
++c_7317639.tag = closureN_tag;
++ c_7317639.fn = (function_type)__lambda_1336;
++c_7317639.num_args = 1;
++c_7317639.num_elements = 5;
++c_7317639.elements = (object *)e_7317702;
++c_7317639.elements[0] = ((closureN)self_7312251)->elements[0];
++c_7317639.elements[1] = ((closureN)self_7312251)->elements[2];
++c_7317639.elements[2] = ((closureN)self_7312251)->elements[3];
++c_7317639.elements[3] = ((closureN)self_7312251)->elements[4];
++c_7317639.elements[4] = start_73657_732911;
+
+
+-pair_type local_7319005;
+-return_direct_with_clo1(data,(closure)&c_7318939,__lambda_1383, set_cell_as_expr(&local_7319005, ((closureN)self_7313504)->elements[1]));;
++pair_type local_7317705;
++return_direct_with_clo1(data,(closure)&c_7317639,__lambda_1336, set_cell_as_expr(&local_7317705, ((closureN)self_7312251)->elements[1]));;
+ }
+
+-static void __lambda_1383(void *data, object self_7313505, int argc, object *args) /* object self_7313505, object end_73658_733259 */
++static void __lambda_1336(void *data, object self_7312252, int argc, object *args) /* object self_7312252, object end_73658_732912 */
+ {
+- object end_73658_733259 = args[0];
++ object end_73658_732912 = args[0];
+
+-closureN_type c_7318941;
+-object e_7318995 [6];
+-c_7318941.hdr.mark = gc_color_red;
+- c_7318941.hdr.grayed = 0;
+-c_7318941.tag = closureN_tag;
+- c_7318941.fn = (function_type)__lambda_516;
+-c_7318941.num_args = 1;
+-c_7318941.num_elements = 6;
+-c_7318941.elements = (object *)e_7318995;
+-c_7318941.elements[0] = ((closureN)self_7313505)->elements[0];
+-c_7318941.elements[1] = end_73658_733259;
+-c_7318941.elements[2] = ((closureN)self_7313505)->elements[1];
+-c_7318941.elements[3] = ((closureN)self_7313505)->elements[2];
+-c_7318941.elements[4] = ((closureN)self_7313505)->elements[3];
+-c_7318941.elements[5] = ((closureN)self_7313505)->elements[4];
++closureN_type c_7317641;
++object e_7317695 [6];
++c_7317641.hdr.mark = gc_color_red;
++ c_7317641.hdr.grayed = 0;
++c_7317641.tag = closureN_tag;
++ c_7317641.fn = (function_type)__lambda_516;
++c_7317641.num_args = 1;
++c_7317641.num_elements = 6;
++c_7317641.elements = (object *)e_7317695;
++c_7317641.elements[0] = ((closureN)self_7312252)->elements[0];
++c_7317641.elements[1] = end_73658_732912;
++c_7317641.elements[2] = ((closureN)self_7312252)->elements[1];
++c_7317641.elements[3] = ((closureN)self_7312252)->elements[2];
++c_7317641.elements[4] = ((closureN)self_7312252)->elements[3];
++c_7317641.elements[5] = ((closureN)self_7312252)->elements[4];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318941,__lambda_516, Cyc_set_cell(data, ((closureN)self_7313505)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7313505)->elements[0])));;
++return_direct_with_clo1(data,(closure)&c_7317641,__lambda_516, Cyc_set_cell(data, ((closureN)self_7312252)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7312252)->elements[0])));;
+ }
+
+-static void __lambda_516(void *data, object self_7313506, int argc, object *args) /* object self_7313506, object r_735471 */
++static void __lambda_516(void *data, object self_7312253, int argc, object *args) /* object self_7312253, object r_735019 */
+ {
+
+- object r_735478;
++ object r_735026;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313506)->elements[4]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312253)->elements[4]), obj_int2obj(0))) ){
+
+- r_735478 = Cyc_car(data, ((closureN)self_7313506)->elements[4]);
++ r_735026 = Cyc_car(data, ((closureN)self_7312253)->elements[4]);
+ } else {
+- r_735478 = obj_int2obj(0);}
++ r_735026 = obj_int2obj(0);}
+ ;
+-closureN_type c_7318954;
+-object e_7318991 [6];
+-c_7318954.hdr.mark = gc_color_red;
+- c_7318954.hdr.grayed = 0;
+-c_7318954.tag = closureN_tag;
+- c_7318954.fn = (function_type)__lambda_517;
+-c_7318954.num_args = 1;
+-c_7318954.num_elements = 6;
+-c_7318954.elements = (object *)e_7318991;
+-c_7318954.elements[0] = ((closureN)self_7313506)->elements[0];
+-c_7318954.elements[1] = ((closureN)self_7313506)->elements[1];
+-c_7318954.elements[2] = ((closureN)self_7313506)->elements[2];
+-c_7318954.elements[3] = ((closureN)self_7313506)->elements[3];
+-c_7318954.elements[4] = ((closureN)self_7313506)->elements[4];
+-c_7318954.elements[5] = ((closureN)self_7313506)->elements[5];
++closureN_type c_7317654;
++object e_7317691 [6];
++c_7317654.hdr.mark = gc_color_red;
++ c_7317654.hdr.grayed = 0;
++c_7317654.tag = closureN_tag;
++ c_7317654.fn = (function_type)__lambda_517;
++c_7317654.num_args = 1;
++c_7317654.num_elements = 6;
++c_7317654.elements = (object *)e_7317691;
++c_7317654.elements[0] = ((closureN)self_7312253)->elements[0];
++c_7317654.elements[1] = ((closureN)self_7312253)->elements[1];
++c_7317654.elements[2] = ((closureN)self_7312253)->elements[2];
++c_7317654.elements[3] = ((closureN)self_7312253)->elements[3];
++c_7317654.elements[4] = ((closureN)self_7312253)->elements[4];
++c_7317654.elements[5] = ((closureN)self_7312253)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318954,__lambda_517, Cyc_set_cell(data, ((closureN)self_7313506)->elements[5], r_735478));;
++return_direct_with_clo1(data,(closure)&c_7317654,__lambda_517, Cyc_set_cell(data, ((closureN)self_7312253)->elements[5], r_735026));;
+ }
+
+-static void __lambda_517(void *data, object self_7313507, int argc, object *args) /* object self_7313507, object r_735472 */
++static void __lambda_517(void *data, object self_7312254, int argc, object *args) /* object self_7312254, object r_735020 */
+ {
+
+
+-closureN_type c_7318956;
+-object e_7318970 [2];
+-c_7318956.hdr.mark = gc_color_red;
+- c_7318956.hdr.grayed = 0;
+-c_7318956.tag = closureN_tag;
+- c_7318956.fn = (function_type)__lambda_518;
+-c_7318956.num_args = 0;
+-c_7318956.num_elements = 2;
+-c_7318956.elements = (object *)e_7318970;
+-c_7318956.elements[0] = ((closureN)self_7313507)->elements[3];
+-c_7318956.elements[1] = ((closureN)self_7313507)->elements[4];
++closureN_type c_7317656;
++object e_7317670 [2];
++c_7317656.hdr.mark = gc_color_red;
++ c_7317656.hdr.grayed = 0;
++c_7317656.tag = closureN_tag;
++ c_7317656.fn = (function_type)__lambda_518;
++c_7317656.num_args = 0;
++c_7317656.num_elements = 2;
++c_7317656.elements = (object *)e_7317670;
++c_7317656.elements[0] = ((closureN)self_7312254)->elements[3];
++c_7317656.elements[1] = ((closureN)self_7312254)->elements[4];
+
+
+-closureN_type c_7318971;
+-object e_7318990 [4];
+-c_7318971.hdr.mark = gc_color_red;
+- c_7318971.hdr.grayed = 0;
+-c_7318971.tag = closureN_tag;
+- c_7318971.fn = (function_type)__lambda_519;
+-c_7318971.num_args = 1;
+-c_7318971.num_elements = 4;
+-c_7318971.elements = (object *)e_7318990;
+-c_7318971.elements[0] = ((closureN)self_7313507)->elements[0];
+-c_7318971.elements[1] = ((closureN)self_7313507)->elements[1];
+-c_7318971.elements[2] = ((closureN)self_7313507)->elements[2];
+-c_7318971.elements[3] = ((closureN)self_7313507)->elements[5];
++closureN_type c_7317671;
++object e_7317690 [4];
++c_7317671.hdr.mark = gc_color_red;
++ c_7317671.hdr.grayed = 0;
++c_7317671.tag = closureN_tag;
++ c_7317671.fn = (function_type)__lambda_519;
++c_7317671.num_args = 1;
++c_7317671.num_elements = 4;
++c_7317671.elements = (object *)e_7317690;
++c_7317671.elements[0] = ((closureN)self_7312254)->elements[0];
++c_7317671.elements[1] = ((closureN)self_7312254)->elements[1];
++c_7317671.elements[2] = ((closureN)self_7312254)->elements[2];
++c_7317671.elements[3] = ((closureN)self_7312254)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7318956,__lambda_518, &c_7318971);;
++return_direct_with_clo1(data,(closure)&c_7317656,__lambda_518, &c_7317671);;
+ }
+
+-static void __lambda_519(void *data, object self_7313508, int argc, object *args) /* object self_7313508, object r_735474 */
++static void __lambda_519(void *data, object self_7312255, int argc, object *args) /* object self_7312255, object r_735022 */
+ {
+- object r_735474 = args[0];
++ object r_735022 = args[0];
+
+-closureN_type c_7318973;
+-object e_7318986 [4];
+-c_7318973.hdr.mark = gc_color_red;
+- c_7318973.hdr.grayed = 0;
+-c_7318973.tag = closureN_tag;
+- c_7318973.fn = (function_type)__lambda_520;
+-c_7318973.num_args = 1;
+-c_7318973.num_elements = 4;
+-c_7318973.elements = (object *)e_7318986;
+-c_7318973.elements[0] = ((closureN)self_7313508)->elements[0];
+-c_7318973.elements[1] = ((closureN)self_7313508)->elements[1];
+-c_7318973.elements[2] = ((closureN)self_7313508)->elements[2];
+-c_7318973.elements[3] = ((closureN)self_7313508)->elements[3];
++closureN_type c_7317673;
++object e_7317686 [4];
++c_7317673.hdr.mark = gc_color_red;
++ c_7317673.hdr.grayed = 0;
++c_7317673.tag = closureN_tag;
++ c_7317673.fn = (function_type)__lambda_520;
++c_7317673.num_args = 1;
++c_7317673.num_elements = 4;
++c_7317673.elements = (object *)e_7317686;
++c_7317673.elements[0] = ((closureN)self_7312255)->elements[0];
++c_7317673.elements[1] = ((closureN)self_7312255)->elements[1];
++c_7317673.elements[2] = ((closureN)self_7312255)->elements[2];
++c_7317673.elements[3] = ((closureN)self_7312255)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318973,__lambda_520, Cyc_set_cell(data, ((closureN)self_7313508)->elements[1], r_735474));;
++return_direct_with_clo1(data,(closure)&c_7317673,__lambda_520, Cyc_set_cell(data, ((closureN)self_7312255)->elements[1], r_735022));;
+ }
+
+-static void __lambda_520(void *data, object self_7313509, int argc, object *args) /* object self_7313509, object r_735473 */
++static void __lambda_520(void *data, object self_7312256, int argc, object *args) /* object self_7312256, object r_735021 */
+ {
+
+
+@@ -28598,806 +26801,806 @@ static void __lambda_520(void *data, obj
+
+
+
+-object c_7318978 = Cyc_utf82string(data, ((closureN)self_7313509)->elements[2],((closureN)self_7313509)->elements[0], car(((closureN)self_7313509)->elements[3]), car(((closureN)self_7313509)->elements[1]));
+-return_direct_with_clo1(data, ((closureN)self_7313509)->elements[2], (((closure) ((closureN)self_7313509)->elements[2])->fn), c_7318978);;
++object c_7317678 = Cyc_utf82string(data, ((closureN)self_7312256)->elements[2],((closureN)self_7312256)->elements[0], car(((closureN)self_7312256)->elements[3]), car(((closureN)self_7312256)->elements[1]));
++return_direct_with_clo1(data, ((closureN)self_7312256)->elements[2], (((closure) ((closureN)self_7312256)->elements[2])->fn), c_7317678);;
+ }
+
+-static void __lambda_518(void *data, object self_7313510, int argc, object *args) /* object self_7313510, object k_735475 */
++static void __lambda_518(void *data, object self_7312257, int argc, object *args) /* object self_7312257, object k_735023 */
+ {
+- object k_735475 = args[0];
++ object k_735023 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313510)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312257)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735475,__lambda_519, Cyc_cadr(data, ((closureN)self_7313510)->elements[1]));
++return_direct_with_clo1(data, k_735023,__lambda_519, Cyc_cadr(data, ((closureN)self_7312257)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735475,__lambda_519, car(((closureN)self_7313510)->elements[0]));}
++return_direct_with_clo1(data, k_735023,__lambda_519, car(((closureN)self_7312257)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_493(void *data, object _, int argc, object *args) /* closure _,object k_735433, object to_73619_733236, object at_73620_733237, object from_73621_733238, object o_73622_733239_raw, ... */
++static void __lambda_493(void *data, object _, int argc, object *args) /* closure _,object k_734981, object to_73619_732889, object at_73620_732890, object from_73621_732891, object o_73622_732892_raw, ... */
+ {
+-object k_735433 = args[0]; object to_73619_733236 = args[1]; object at_73620_733237 = args[2]; object from_73621_733238 = args[3];
+-load_varargs(o_73622_733239, args, 4, argc - 4);
+- object start_73625_733240;
++object k_734981 = args[0]; object to_73619_732889 = args[1]; object at_73620_732890 = args[2]; object from_73621_732891 = args[3];
++load_varargs(o_73622_732892, args, 4, argc - 4);
++ object start_73625_732893;
+ Cyc_st_add(data, "scheme/base.sld:bytevector-copy!");
+
+-if( (boolean_f != Cyc_is_pair(o_73622_733239)) ){
++if( (boolean_f != Cyc_is_pair(o_73622_732892)) ){
+
+- start_73625_733240 = Cyc_car(data, o_73622_733239);
++ start_73625_732893 = Cyc_car(data, o_73622_732892);
+ } else {
+- start_73625_733240 = obj_int2obj(0);}
++ start_73625_732893 = obj_int2obj(0);}
+ ;
+-closureN_type c_7318737;
+-object e_7318763 [2];
+-c_7318737.hdr.mark = gc_color_red;
+- c_7318737.hdr.grayed = 0;
+-c_7318737.tag = closureN_tag;
+- c_7318737.fn = (function_type)__lambda_494;
+-c_7318737.num_args = 0;
+-c_7318737.num_elements = 2;
+-c_7318737.elements = (object *)e_7318763;
+-c_7318737.elements[0] = from_73621_733238;
+-c_7318737.elements[1] = o_73622_733239;
++closureN_type c_7317437;
++object e_7317463 [2];
++c_7317437.hdr.mark = gc_color_red;
++ c_7317437.hdr.grayed = 0;
++c_7317437.tag = closureN_tag;
++ c_7317437.fn = (function_type)__lambda_494;
++c_7317437.num_args = 0;
++c_7317437.num_elements = 2;
++c_7317437.elements = (object *)e_7317463;
++c_7317437.elements[0] = from_73621_732891;
++c_7317437.elements[1] = o_73622_732892;
+
+
+-closureN_type c_7318764;
+-object e_7318930 [5];
+-c_7318764.hdr.mark = gc_color_red;
+- c_7318764.hdr.grayed = 0;
+-c_7318764.tag = closureN_tag;
+- c_7318764.fn = (function_type)__lambda_497;
+-c_7318764.num_args = 1;
+-c_7318764.num_elements = 5;
+-c_7318764.elements = (object *)e_7318930;
+-c_7318764.elements[0] = at_73620_733237;
+-c_7318764.elements[1] = from_73621_733238;
+-c_7318764.elements[2] = k_735433;
+-c_7318764.elements[3] = start_73625_733240;
+-c_7318764.elements[4] = to_73619_733236;
++closureN_type c_7317464;
++object e_7317630 [5];
++c_7317464.hdr.mark = gc_color_red;
++ c_7317464.hdr.grayed = 0;
++c_7317464.tag = closureN_tag;
++ c_7317464.fn = (function_type)__lambda_497;
++c_7317464.num_args = 1;
++c_7317464.num_elements = 5;
++c_7317464.elements = (object *)e_7317630;
++c_7317464.elements[0] = at_73620_732890;
++c_7317464.elements[1] = from_73621_732891;
++c_7317464.elements[2] = k_734981;
++c_7317464.elements[3] = start_73625_732893;
++c_7317464.elements[4] = to_73619_732889;
+
+-return_direct_with_clo1(data,(closure)&c_7318737,__lambda_494, &c_7318764);;
++return_direct_with_clo1(data,(closure)&c_7317437,__lambda_494, &c_7317464);;
+ }
+
+-static void __lambda_497(void *data, object self_7313480, int argc, object *args) /* object self_7313480, object end_73628_733241 */
++static void __lambda_497(void *data, object self_7312227, int argc, object *args) /* object self_7312227, object end_73628_732894 */
+ {
+- object end_73628_733241 = args[0];
++ object end_73628_732894 = args[0];
+
+-closureN_type c_7318766;
+-object e_7318926 [6];
+-c_7318766.hdr.mark = gc_color_red;
+- c_7318766.hdr.grayed = 0;
+-c_7318766.tag = closureN_tag;
+- c_7318766.fn = (function_type)__lambda_498;
+-c_7318766.num_args = 1;
+-c_7318766.num_elements = 6;
+-c_7318766.elements = (object *)e_7318926;
+-c_7318766.elements[0] = ((closureN)self_7313480)->elements[0];
+-c_7318766.elements[1] = end_73628_733241;
+-c_7318766.elements[2] = ((closureN)self_7313480)->elements[1];
+-c_7318766.elements[3] = ((closureN)self_7313480)->elements[2];
+-c_7318766.elements[4] = ((closureN)self_7313480)->elements[3];
+-c_7318766.elements[5] = ((closureN)self_7313480)->elements[4];
++closureN_type c_7317466;
++object e_7317626 [6];
++c_7317466.hdr.mark = gc_color_red;
++ c_7317466.hdr.grayed = 0;
++c_7317466.tag = closureN_tag;
++ c_7317466.fn = (function_type)__lambda_498;
++c_7317466.num_args = 1;
++c_7317466.num_elements = 6;
++c_7317466.elements = (object *)e_7317626;
++c_7317466.elements[0] = ((closureN)self_7312227)->elements[0];
++c_7317466.elements[1] = end_73628_732894;
++c_7317466.elements[2] = ((closureN)self_7312227)->elements[1];
++c_7317466.elements[3] = ((closureN)self_7312227)->elements[2];
++c_7317466.elements[4] = ((closureN)self_7312227)->elements[3];
++c_7317466.elements[5] = ((closureN)self_7312227)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318766,__lambda_498, Cyc_bytevector_length(data, ((closureN)self_7313480)->elements[4]));;
++return_direct_with_clo1(data,(closure)&c_7317466,__lambda_498, Cyc_bytevector_length(data, ((closureN)self_7312227)->elements[4]));;
+ }
+
+-static void __lambda_498(void *data, object self_7313481, int argc, object *args) /* object self_7313481, object r_735460 */
++static void __lambda_498(void *data, object self_7312228, int argc, object *args) /* object self_7312228, object r_735008 */
+ {
+- object r_735460 = args[0];
++ object r_735008 = args[0];
+
+-closureN_type c_7318768;
+-object e_7318916 [6];
+-c_7318768.hdr.mark = gc_color_red;
+- c_7318768.hdr.grayed = 0;
+-c_7318768.tag = closureN_tag;
+- c_7318768.fn = (function_type)__lambda_499;
+-c_7318768.num_args = 1;
+-c_7318768.num_elements = 6;
+-c_7318768.elements = (object *)e_7318916;
+-c_7318768.elements[0] = ((closureN)self_7313481)->elements[0];
+-c_7318768.elements[1] = ((closureN)self_7313481)->elements[1];
+-c_7318768.elements[2] = ((closureN)self_7313481)->elements[2];
+-c_7318768.elements[3] = ((closureN)self_7313481)->elements[3];
+-c_7318768.elements[4] = ((closureN)self_7313481)->elements[4];
+-c_7318768.elements[5] = ((closureN)self_7313481)->elements[5];
++closureN_type c_7317468;
++object e_7317616 [6];
++c_7317468.hdr.mark = gc_color_red;
++ c_7317468.hdr.grayed = 0;
++c_7317468.tag = closureN_tag;
++ c_7317468.fn = (function_type)__lambda_499;
++c_7317468.num_args = 1;
++c_7317468.num_elements = 6;
++c_7317468.elements = (object *)e_7317616;
++c_7317468.elements[0] = ((closureN)self_7312228)->elements[0];
++c_7317468.elements[1] = ((closureN)self_7312228)->elements[1];
++c_7317468.elements[2] = ((closureN)self_7312228)->elements[2];
++c_7317468.elements[3] = ((closureN)self_7312228)->elements[3];
++c_7317468.elements[4] = ((closureN)self_7312228)->elements[4];
++c_7317468.elements[5] = ((closureN)self_7312228)->elements[5];
+
+
+-complex_num_type local_7318920;
++complex_num_type local_7317620;
+
+-complex_num_type local_7318924;
+-return_direct_with_clo3(data, __glo_min_scheme_base, (((closure) __glo_min_scheme_base)->fn), &c_7318768, ((closureN)self_7313481)->elements[1], Cyc_fast_sum(data,&local_7318920, ((closureN)self_7313481)->elements[4], Cyc_fast_sub(data,&local_7318924, r_735460, ((closureN)self_7313481)->elements[0])));;
++complex_num_type local_7317624;
++return_direct_with_clo3(data, __glo_min_scheme_base, (((closure) __glo_min_scheme_base)->fn), &c_7317468, ((closureN)self_7312228)->elements[1], Cyc_fast_sum(data,&local_7317620, ((closureN)self_7312228)->elements[4], Cyc_fast_sub(data,&local_7317624, r_735008, ((closureN)self_7312228)->elements[0])));;
+ }
+
+-static void __lambda_499(void *data, object self_7313482, int argc, object *args) /* object self_7313482, object limit_73631_733242 */
++static void __lambda_499(void *data, object self_7312229, int argc, object *args) /* object self_7312229, object limit_73631_732895 */
+ {
+- object limit_73631_733242 = args[0];
++ object limit_73631_732895 = args[0];
+
+-if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313482)->elements[0], ((closureN)self_7313482)->elements[4])) ){
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7312229)->elements[0], ((closureN)self_7312229)->elements[4])) ){
+
+-closureN_type c_7318774;
+-object e_7318835 [4];
+-c_7318774.hdr.mark = gc_color_red;
+- c_7318774.hdr.grayed = 0;
+-c_7318774.tag = closureN_tag;
+- c_7318774.fn = (function_type)__lambda_500;
+-c_7318774.num_args = 2;
+-c_7318774.num_elements = 4;
+-c_7318774.elements = (object *)e_7318835;
+-c_7318774.elements[0] = ((closureN)self_7313482)->elements[2];
+-c_7318774.elements[1] = ((closureN)self_7313482)->elements[3];
+-c_7318774.elements[2] = limit_73631_733242;
+-c_7318774.elements[3] = ((closureN)self_7313482)->elements[5];
++closureN_type c_7317474;
++object e_7317535 [4];
++c_7317474.hdr.mark = gc_color_red;
++ c_7317474.hdr.grayed = 0;
++c_7317474.tag = closureN_tag;
++ c_7317474.fn = (function_type)__lambda_500;
++c_7317474.num_args = 2;
++c_7317474.num_elements = 4;
++c_7317474.elements = (object *)e_7317535;
++c_7317474.elements[0] = ((closureN)self_7312229)->elements[2];
++c_7317474.elements[1] = ((closureN)self_7312229)->elements[3];
++c_7317474.elements[2] = limit_73631_732895;
++c_7317474.elements[3] = ((closureN)self_7312229)->elements[5];
+
+-return_direct_with_clo2(data,(closure)&c_7318774,__lambda_500, ((closureN)self_7313482)->elements[0], ((closureN)self_7313482)->elements[4]);
++return_direct_with_clo2(data,(closure)&c_7317474,__lambda_500, ((closureN)self_7312229)->elements[0], ((closureN)self_7312229)->elements[4]);
+ } else {
+
+-closureN_type c_7318839;
+-object e_7318900 [4];
+-c_7318839.hdr.mark = gc_color_red;
+- c_7318839.hdr.grayed = 0;
+-c_7318839.tag = closureN_tag;
+- c_7318839.fn = (function_type)__lambda_507;
+-c_7318839.num_args = 2;
+-c_7318839.num_elements = 4;
+-c_7318839.elements = (object *)e_7318900;
+-c_7318839.elements[0] = ((closureN)self_7313482)->elements[2];
+-c_7318839.elements[1] = ((closureN)self_7313482)->elements[3];
+-c_7318839.elements[2] = ((closureN)self_7313482)->elements[4];
+-c_7318839.elements[3] = ((closureN)self_7313482)->elements[5];
++closureN_type c_7317539;
++object e_7317600 [4];
++c_7317539.hdr.mark = gc_color_red;
++ c_7317539.hdr.grayed = 0;
++c_7317539.tag = closureN_tag;
++ c_7317539.fn = (function_type)__lambda_507;
++c_7317539.num_args = 2;
++c_7317539.num_elements = 4;
++c_7317539.elements = (object *)e_7317600;
++c_7317539.elements[0] = ((closureN)self_7312229)->elements[2];
++c_7317539.elements[1] = ((closureN)self_7312229)->elements[3];
++c_7317539.elements[2] = ((closureN)self_7312229)->elements[4];
++c_7317539.elements[3] = ((closureN)self_7312229)->elements[5];
+
+
+-complex_num_type local_7318903;
++complex_num_type local_7317603;
+
+-complex_num_type local_7318907;
++complex_num_type local_7317607;
+
+-complex_num_type local_7318910;
++complex_num_type local_7317610;
+
+-complex_num_type local_7318915;
+-return_direct_with_clo2(data,(closure)&c_7318839,__lambda_507, Cyc_fast_sum(data,&local_7318903, ((closureN)self_7313482)->elements[0], Cyc_fast_sub(data,&local_7318907, Cyc_fast_sub(data,&local_7318910, ((closureN)self_7313482)->elements[1], ((closureN)self_7313482)->elements[4]), obj_int2obj(1))), Cyc_fast_sub(data,&local_7318915, limit_73631_733242, obj_int2obj(1)));}
++complex_num_type local_7317615;
++return_direct_with_clo2(data,(closure)&c_7317539,__lambda_507, Cyc_fast_sum(data,&local_7317603, ((closureN)self_7312229)->elements[0], Cyc_fast_sub(data,&local_7317607, Cyc_fast_sub(data,&local_7317610, ((closureN)self_7312229)->elements[1], ((closureN)self_7312229)->elements[4]), obj_int2obj(1))), Cyc_fast_sub(data,&local_7317615, limit_73631_732895, obj_int2obj(1)));}
+ ;;
+ }
+
+-static void __lambda_507(void *data, object self_7313491, int argc, object *args) /* object self_7313491, object i_73647_733249, object j_73648_733250 */
++static void __lambda_507(void *data, object self_7312238, int argc, object *args) /* object self_7312238, object i_73647_732902, object j_73648_732903 */
+ {
+- object i_73647_733249 = args[0]; object j_73648_733250 = args[1];
++ object i_73647_732902 = args[0]; object j_73648_732903 = args[1];
+
+-closureN_type c_7318841;
+-object e_7318899 [6];
+-c_7318841.hdr.mark = gc_color_red;
+- c_7318841.hdr.grayed = 0;
+-c_7318841.tag = closureN_tag;
+- c_7318841.fn = (function_type)__lambda_508;
+-c_7318841.num_args = 1;
+-c_7318841.num_elements = 6;
+-c_7318841.elements = (object *)e_7318899;
+-c_7318841.elements[0] = ((closureN)self_7313491)->elements[0];
+-c_7318841.elements[1] = i_73647_733249;
+-c_7318841.elements[2] = j_73648_733250;
+-c_7318841.elements[3] = ((closureN)self_7313491)->elements[1];
+-c_7318841.elements[4] = ((closureN)self_7313491)->elements[2];
+-c_7318841.elements[5] = ((closureN)self_7313491)->elements[3];
++closureN_type c_7317541;
++object e_7317599 [6];
++c_7317541.hdr.mark = gc_color_red;
++ c_7317541.hdr.grayed = 0;
++c_7317541.tag = closureN_tag;
++ c_7317541.fn = (function_type)__lambda_508;
++c_7317541.num_args = 1;
++c_7317541.num_elements = 6;
++c_7317541.elements = (object *)e_7317599;
++c_7317541.elements[0] = ((closureN)self_7312238)->elements[0];
++c_7317541.elements[1] = i_73647_732902;
++c_7317541.elements[2] = j_73648_732903;
++c_7317541.elements[3] = ((closureN)self_7312238)->elements[1];
++c_7317541.elements[4] = ((closureN)self_7312238)->elements[2];
++c_7317541.elements[5] = ((closureN)self_7312238)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7318841,__lambda_508, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7317541,__lambda_508, boolean_f);;
+ }
+
+-static void __lambda_508(void *data, object self_7313492, int argc, object *args) /* object self_7313492, object lp_73643_73649_733251 */
++static void __lambda_508(void *data, object self_7312239, int argc, object *args) /* object self_7312239, object lp_73643_73649_732904 */
+ {
+- object lp_73643_73649_733251 = args[0];
++ object lp_73643_73649_732904 = args[0];
+
+-closureN_type c_7318843;
+-object e_7318895 [6];
+-c_7318843.hdr.mark = gc_color_red;
+- c_7318843.hdr.grayed = 0;
+-c_7318843.tag = closureN_tag;
+- c_7318843.fn = (function_type)__lambda_1382;
+-c_7318843.num_args = 1;
+-c_7318843.num_elements = 6;
+-c_7318843.elements = (object *)e_7318895;
+-c_7318843.elements[0] = ((closureN)self_7313492)->elements[0];
+-c_7318843.elements[1] = ((closureN)self_7313492)->elements[1];
+-c_7318843.elements[2] = ((closureN)self_7313492)->elements[2];
+-c_7318843.elements[3] = ((closureN)self_7313492)->elements[3];
+-c_7318843.elements[4] = ((closureN)self_7313492)->elements[4];
+-c_7318843.elements[5] = ((closureN)self_7313492)->elements[5];
++closureN_type c_7317543;
++object e_7317595 [6];
++c_7317543.hdr.mark = gc_color_red;
++ c_7317543.hdr.grayed = 0;
++c_7317543.tag = closureN_tag;
++ c_7317543.fn = (function_type)__lambda_1335;
++c_7317543.num_args = 1;
++c_7317543.num_elements = 6;
++c_7317543.elements = (object *)e_7317595;
++c_7317543.elements[0] = ((closureN)self_7312239)->elements[0];
++c_7317543.elements[1] = ((closureN)self_7312239)->elements[1];
++c_7317543.elements[2] = ((closureN)self_7312239)->elements[2];
++c_7317543.elements[3] = ((closureN)self_7312239)->elements[3];
++c_7317543.elements[4] = ((closureN)self_7312239)->elements[4];
++c_7317543.elements[5] = ((closureN)self_7312239)->elements[5];
+
+
+-pair_type local_7318898;
+-return_direct_with_clo1(data,(closure)&c_7318843,__lambda_1382, set_cell_as_expr(&local_7318898, lp_73643_73649_733251));;
++pair_type local_7317598;
++return_direct_with_clo1(data,(closure)&c_7317543,__lambda_1335, set_cell_as_expr(&local_7317598, lp_73643_73649_732904));;
+ }
+
+-static void __lambda_1382(void *data, object self_7313493, int argc, object *args) /* object self_7313493, object lp_73643_73649_733251 */
++static void __lambda_1335(void *data, object self_7312240, int argc, object *args) /* object self_7312240, object lp_73643_73649_732904 */
+ {
+- object lp_73643_73649_733251 = args[0];
++ object lp_73643_73649_732904 = args[0];
+
+-closureN_type c_7318845;
+-object e_7318859 [4];
+-c_7318845.hdr.mark = gc_color_red;
+- c_7318845.hdr.grayed = 0;
+-c_7318845.tag = closureN_tag;
+- c_7318845.fn = (function_type)__lambda_509;
+-c_7318845.num_args = 1;
+-c_7318845.num_elements = 4;
+-c_7318845.elements = (object *)e_7318859;
+-c_7318845.elements[0] = ((closureN)self_7313493)->elements[1];
+-c_7318845.elements[1] = ((closureN)self_7313493)->elements[2];
+-c_7318845.elements[2] = ((closureN)self_7313493)->elements[3];
+-c_7318845.elements[3] = lp_73643_73649_733251;
++closureN_type c_7317545;
++object e_7317559 [4];
++c_7317545.hdr.mark = gc_color_red;
++ c_7317545.hdr.grayed = 0;
++c_7317545.tag = closureN_tag;
++ c_7317545.fn = (function_type)__lambda_509;
++c_7317545.num_args = 1;
++c_7317545.num_elements = 4;
++c_7317545.elements = (object *)e_7317559;
++c_7317545.elements[0] = ((closureN)self_7312240)->elements[1];
++c_7317545.elements[1] = ((closureN)self_7312240)->elements[2];
++c_7317545.elements[2] = ((closureN)self_7312240)->elements[3];
++c_7317545.elements[3] = lp_73643_73649_732904;
+
+
+-closureN_type c_7318860;
+-object e_7318894 [4];
+-c_7318860.hdr.mark = gc_color_red;
+- c_7318860.hdr.grayed = 0;
+-c_7318860.tag = closureN_tag;
+- c_7318860.fn = (function_type)__lambda_511;
+-c_7318860.num_args = 2;
+-c_7318860.num_elements = 4;
+-c_7318860.elements = (object *)e_7318894;
+-c_7318860.elements[0] = ((closureN)self_7313493)->elements[0];
+-c_7318860.elements[1] = lp_73643_73649_733251;
+-c_7318860.elements[2] = ((closureN)self_7313493)->elements[4];
+-c_7318860.elements[3] = ((closureN)self_7313493)->elements[5];
++closureN_type c_7317560;
++object e_7317594 [4];
++c_7317560.hdr.mark = gc_color_red;
++ c_7317560.hdr.grayed = 0;
++c_7317560.tag = closureN_tag;
++ c_7317560.fn = (function_type)__lambda_511;
++c_7317560.num_args = 2;
++c_7317560.num_elements = 4;
++c_7317560.elements = (object *)e_7317594;
++c_7317560.elements[0] = ((closureN)self_7312240)->elements[0];
++c_7317560.elements[1] = lp_73643_73649_732904;
++c_7317560.elements[2] = ((closureN)self_7312240)->elements[4];
++c_7317560.elements[3] = ((closureN)self_7312240)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7318845,__lambda_509, &c_7318860);;
++return_direct_with_clo1(data,(closure)&c_7317545,__lambda_509, &c_7317560);;
+ }
+
+-static void __lambda_511(void *data, object self_7313494, int argc, object *args) /* object self_7313494, object k_735450, object i_73650_733252, object j_73651_733253 */
++static void __lambda_511(void *data, object self_7312241, int argc, object *args) /* object self_7312241, object k_734998, object i_73650_732905, object j_73651_732906 */
+ {
+- object k_735450 = args[0]; object i_73650_733252 = args[1]; object j_73651_733253 = args[2];
++ object k_734998 = args[0]; object i_73650_732905 = args[1]; object j_73651_732906 = args[2];
+
+-if( (boolean_f != Cyc_num_fast_lt_op(data, j_73651_733253, ((closureN)self_7313494)->elements[2])) ){
++if( (boolean_f != Cyc_num_fast_lt_op(data, j_73651_732906, ((closureN)self_7312241)->elements[2])) ){
+
+
+-return_direct_with_clo1(data, k_735450, (((closure) k_735450)->fn), Cyc_num_fast_lt_op(data, j_73651_733253, ((closureN)self_7313494)->elements[2]));
++return_direct_with_clo1(data, k_734998, (((closure) k_734998)->fn), Cyc_num_fast_lt_op(data, j_73651_732906, ((closureN)self_7312241)->elements[2]));
+ } else {
+
+-closureN_type c_7318869;
+-object e_7318890 [5];
+-c_7318869.hdr.mark = gc_color_red;
+- c_7318869.hdr.grayed = 0;
+-c_7318869.tag = closureN_tag;
+- c_7318869.fn = (function_type)__lambda_512;
+-c_7318869.num_args = 1;
+-c_7318869.num_elements = 5;
+-c_7318869.elements = (object *)e_7318890;
+-c_7318869.elements[0] = i_73650_733252;
+-c_7318869.elements[1] = j_73651_733253;
+-c_7318869.elements[2] = k_735450;
+-c_7318869.elements[3] = ((closureN)self_7313494)->elements[1];
+-c_7318869.elements[4] = ((closureN)self_7313494)->elements[3];
++closureN_type c_7317569;
++object e_7317590 [5];
++c_7317569.hdr.mark = gc_color_red;
++ c_7317569.hdr.grayed = 0;
++c_7317569.tag = closureN_tag;
++ c_7317569.fn = (function_type)__lambda_512;
++c_7317569.num_args = 1;
++c_7317569.num_elements = 5;
++c_7317569.elements = (object *)e_7317590;
++c_7317569.elements[0] = i_73650_732905;
++c_7317569.elements[1] = j_73651_732906;
++c_7317569.elements[2] = k_734998;
++c_7317569.elements[3] = ((closureN)self_7312241)->elements[1];
++c_7317569.elements[4] = ((closureN)self_7312241)->elements[3];
+
+
+
+-return_closcall1(data,(closure)&c_7318869, Cyc_bytevector_u8_ref(data, ((closureN)self_7313494)->elements[0], j_73651_733253));}
++return_closcall1(data,(closure)&c_7317569, Cyc_bytevector_u8_ref(data, ((closureN)self_7312241)->elements[0], j_73651_732906));}
+ ;;
+ }
+
+-static void __lambda_512(void *data, object self_7313495, int argc, object *args) /* object self_7313495, object r_735455 */
++static void __lambda_512(void *data, object self_7312242, int argc, object *args) /* object self_7312242, object r_735003 */
+ {
+- object r_735455 = args[0];
++ object r_735003 = args[0];
+
+-closureN_type c_7318871;
+-object e_7318885 [4];
+-c_7318871.hdr.mark = gc_color_red;
+- c_7318871.hdr.grayed = 0;
+-c_7318871.tag = closureN_tag;
+- c_7318871.fn = (function_type)__lambda_513;
+-c_7318871.num_args = 1;
+-c_7318871.num_elements = 4;
+-c_7318871.elements = (object *)e_7318885;
+-c_7318871.elements[0] = ((closureN)self_7313495)->elements[0];
+-c_7318871.elements[1] = ((closureN)self_7313495)->elements[1];
+-c_7318871.elements[2] = ((closureN)self_7313495)->elements[2];
+-c_7318871.elements[3] = ((closureN)self_7313495)->elements[3];
++closureN_type c_7317571;
++object e_7317585 [4];
++c_7317571.hdr.mark = gc_color_red;
++ c_7317571.hdr.grayed = 0;
++c_7317571.tag = closureN_tag;
++ c_7317571.fn = (function_type)__lambda_513;
++c_7317571.num_args = 1;
++c_7317571.num_elements = 4;
++c_7317571.elements = (object *)e_7317585;
++c_7317571.elements[0] = ((closureN)self_7312242)->elements[0];
++c_7317571.elements[1] = ((closureN)self_7312242)->elements[1];
++c_7317571.elements[2] = ((closureN)self_7312242)->elements[2];
++c_7317571.elements[3] = ((closureN)self_7312242)->elements[3];
+
+
+
+-return_closcall1(data,(closure)&c_7318871, Cyc_bytevector_u8_set(data, ((closureN)self_7313495)->elements[4], ((closureN)self_7313495)->elements[0], r_735455));;
++return_closcall1(data,(closure)&c_7317571, Cyc_bytevector_u8_set(data, ((closureN)self_7312242)->elements[4], ((closureN)self_7312242)->elements[0], r_735003));;
+ }
+
+-static void __lambda_513(void *data, object self_7313496, int argc, object *args) /* object self_7313496, object r_735452 */
++static void __lambda_513(void *data, object self_7312243, int argc, object *args) /* object self_7312243, object r_735000 */
+ {
+
+
+
+
+-complex_num_type local_7318879;
++complex_num_type local_7317579;
+
+-complex_num_type local_7318883;
+-return_closcall3(data, car(((closureN)self_7313496)->elements[3]), ((closureN)self_7313496)->elements[2], Cyc_fast_sub(data,&local_7318879, ((closureN)self_7313496)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7318883, ((closureN)self_7313496)->elements[1], obj_int2obj(1)));;
++complex_num_type local_7317583;
++return_closcall3(data, car(((closureN)self_7312243)->elements[3]), ((closureN)self_7312243)->elements[2], Cyc_fast_sub(data,&local_7317579, ((closureN)self_7312243)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7317583, ((closureN)self_7312243)->elements[1], obj_int2obj(1)));;
+ }
+
+-static void __lambda_509(void *data, object self_7313497, int argc, object *args) /* object self_7313497, object r_735449 */
++static void __lambda_509(void *data, object self_7312244, int argc, object *args) /* object self_7312244, object r_734997 */
+ {
+- object r_735449 = args[0];
++ object r_734997 = args[0];
+
+-closureN_type c_7318847;
+-object e_7318855 [4];
+-c_7318847.hdr.mark = gc_color_red;
+- c_7318847.hdr.grayed = 0;
+-c_7318847.tag = closureN_tag;
+- c_7318847.fn = (function_type)__lambda_510;
+-c_7318847.num_args = 1;
+-c_7318847.num_elements = 4;
+-c_7318847.elements = (object *)e_7318855;
+-c_7318847.elements[0] = ((closureN)self_7313497)->elements[0];
+-c_7318847.elements[1] = ((closureN)self_7313497)->elements[1];
+-c_7318847.elements[2] = ((closureN)self_7313497)->elements[2];
+-c_7318847.elements[3] = ((closureN)self_7313497)->elements[3];
++closureN_type c_7317547;
++object e_7317555 [4];
++c_7317547.hdr.mark = gc_color_red;
++ c_7317547.hdr.grayed = 0;
++c_7317547.tag = closureN_tag;
++ c_7317547.fn = (function_type)__lambda_510;
++c_7317547.num_args = 1;
++c_7317547.num_elements = 4;
++c_7317547.elements = (object *)e_7317555;
++c_7317547.elements[0] = ((closureN)self_7312244)->elements[0];
++c_7317547.elements[1] = ((closureN)self_7312244)->elements[1];
++c_7317547.elements[2] = ((closureN)self_7312244)->elements[2];
++c_7317547.elements[3] = ((closureN)self_7312244)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318847,__lambda_510, Cyc_set_cell(data, ((closureN)self_7313497)->elements[3], r_735449));;
++return_direct_with_clo1(data,(closure)&c_7317547,__lambda_510, Cyc_set_cell(data, ((closureN)self_7312244)->elements[3], r_734997));;
+ }
+
+-static void __lambda_510(void *data, object self_7313498, int argc, object *args) /* object self_7313498, object r_735448 */
++static void __lambda_510(void *data, object self_7312245, int argc, object *args) /* object self_7312245, object r_734996 */
+ {
+
+
+
+-return_closcall3(data, car(((closureN)self_7313498)->elements[3]), ((closureN)self_7313498)->elements[2], ((closureN)self_7313498)->elements[0], ((closureN)self_7313498)->elements[1]);;
++return_closcall3(data, car(((closureN)self_7312245)->elements[3]), ((closureN)self_7312245)->elements[2], ((closureN)self_7312245)->elements[0], ((closureN)self_7312245)->elements[1]);;
+ }
+
+-static void __lambda_500(void *data, object self_7313483, int argc, object *args) /* object self_7313483, object i_73637_733243, object j_73638_733244 */
++static void __lambda_500(void *data, object self_7312230, int argc, object *args) /* object self_7312230, object i_73637_732896, object j_73638_732897 */
+ {
+- object i_73637_733243 = args[0]; object j_73638_733244 = args[1];
++ object i_73637_732896 = args[0]; object j_73638_732897 = args[1];
+
+-closureN_type c_7318776;
+-object e_7318834 [6];
+-c_7318776.hdr.mark = gc_color_red;
+- c_7318776.hdr.grayed = 0;
+-c_7318776.tag = closureN_tag;
+- c_7318776.fn = (function_type)__lambda_501;
+-c_7318776.num_args = 1;
+-c_7318776.num_elements = 6;
+-c_7318776.elements = (object *)e_7318834;
+-c_7318776.elements[0] = ((closureN)self_7313483)->elements[0];
+-c_7318776.elements[1] = i_73637_733243;
+-c_7318776.elements[2] = j_73638_733244;
+-c_7318776.elements[3] = ((closureN)self_7313483)->elements[1];
+-c_7318776.elements[4] = ((closureN)self_7313483)->elements[2];
+-c_7318776.elements[5] = ((closureN)self_7313483)->elements[3];
++closureN_type c_7317476;
++object e_7317534 [6];
++c_7317476.hdr.mark = gc_color_red;
++ c_7317476.hdr.grayed = 0;
++c_7317476.tag = closureN_tag;
++ c_7317476.fn = (function_type)__lambda_501;
++c_7317476.num_args = 1;
++c_7317476.num_elements = 6;
++c_7317476.elements = (object *)e_7317534;
++c_7317476.elements[0] = ((closureN)self_7312230)->elements[0];
++c_7317476.elements[1] = i_73637_732896;
++c_7317476.elements[2] = j_73638_732897;
++c_7317476.elements[3] = ((closureN)self_7312230)->elements[1];
++c_7317476.elements[4] = ((closureN)self_7312230)->elements[2];
++c_7317476.elements[5] = ((closureN)self_7312230)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7318776,__lambda_501, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7317476,__lambda_501, boolean_f);;
+ }
+
+-static void __lambda_501(void *data, object self_7313484, int argc, object *args) /* object self_7313484, object lp_73633_73639_733245 */
++static void __lambda_501(void *data, object self_7312231, int argc, object *args) /* object self_7312231, object lp_73633_73639_732898 */
+ {
+- object lp_73633_73639_733245 = args[0];
++ object lp_73633_73639_732898 = args[0];
+
+-closureN_type c_7318778;
+-object e_7318830 [6];
+-c_7318778.hdr.mark = gc_color_red;
+- c_7318778.hdr.grayed = 0;
+-c_7318778.tag = closureN_tag;
+- c_7318778.fn = (function_type)__lambda_1381;
+-c_7318778.num_args = 1;
+-c_7318778.num_elements = 6;
+-c_7318778.elements = (object *)e_7318830;
+-c_7318778.elements[0] = ((closureN)self_7313484)->elements[0];
+-c_7318778.elements[1] = ((closureN)self_7313484)->elements[1];
+-c_7318778.elements[2] = ((closureN)self_7313484)->elements[2];
+-c_7318778.elements[3] = ((closureN)self_7313484)->elements[3];
+-c_7318778.elements[4] = ((closureN)self_7313484)->elements[4];
+-c_7318778.elements[5] = ((closureN)self_7313484)->elements[5];
++closureN_type c_7317478;
++object e_7317530 [6];
++c_7317478.hdr.mark = gc_color_red;
++ c_7317478.hdr.grayed = 0;
++c_7317478.tag = closureN_tag;
++ c_7317478.fn = (function_type)__lambda_1334;
++c_7317478.num_args = 1;
++c_7317478.num_elements = 6;
++c_7317478.elements = (object *)e_7317530;
++c_7317478.elements[0] = ((closureN)self_7312231)->elements[0];
++c_7317478.elements[1] = ((closureN)self_7312231)->elements[1];
++c_7317478.elements[2] = ((closureN)self_7312231)->elements[2];
++c_7317478.elements[3] = ((closureN)self_7312231)->elements[3];
++c_7317478.elements[4] = ((closureN)self_7312231)->elements[4];
++c_7317478.elements[5] = ((closureN)self_7312231)->elements[5];
+
+
+-pair_type local_7318833;
+-return_direct_with_clo1(data,(closure)&c_7318778,__lambda_1381, set_cell_as_expr(&local_7318833, lp_73633_73639_733245));;
++pair_type local_7317533;
++return_direct_with_clo1(data,(closure)&c_7317478,__lambda_1334, set_cell_as_expr(&local_7317533, lp_73633_73639_732898));;
+ }
+
+-static void __lambda_1381(void *data, object self_7313485, int argc, object *args) /* object self_7313485, object lp_73633_73639_733245 */
++static void __lambda_1334(void *data, object self_7312232, int argc, object *args) /* object self_7312232, object lp_73633_73639_732898 */
+ {
+- object lp_73633_73639_733245 = args[0];
++ object lp_73633_73639_732898 = args[0];
+
+-closureN_type c_7318780;
+-object e_7318794 [4];
+-c_7318780.hdr.mark = gc_color_red;
+- c_7318780.hdr.grayed = 0;
+-c_7318780.tag = closureN_tag;
+- c_7318780.fn = (function_type)__lambda_502;
+-c_7318780.num_args = 1;
+-c_7318780.num_elements = 4;
+-c_7318780.elements = (object *)e_7318794;
+-c_7318780.elements[0] = ((closureN)self_7313485)->elements[1];
+-c_7318780.elements[1] = ((closureN)self_7313485)->elements[2];
+-c_7318780.elements[2] = ((closureN)self_7313485)->elements[3];
+-c_7318780.elements[3] = lp_73633_73639_733245;
++closureN_type c_7317480;
++object e_7317494 [4];
++c_7317480.hdr.mark = gc_color_red;
++ c_7317480.hdr.grayed = 0;
++c_7317480.tag = closureN_tag;
++ c_7317480.fn = (function_type)__lambda_502;
++c_7317480.num_args = 1;
++c_7317480.num_elements = 4;
++c_7317480.elements = (object *)e_7317494;
++c_7317480.elements[0] = ((closureN)self_7312232)->elements[1];
++c_7317480.elements[1] = ((closureN)self_7312232)->elements[2];
++c_7317480.elements[2] = ((closureN)self_7312232)->elements[3];
++c_7317480.elements[3] = lp_73633_73639_732898;
+
+
+-closureN_type c_7318795;
+-object e_7318829 [4];
+-c_7318795.hdr.mark = gc_color_red;
+- c_7318795.hdr.grayed = 0;
+-c_7318795.tag = closureN_tag;
+- c_7318795.fn = (function_type)__lambda_504;
+-c_7318795.num_args = 2;
+-c_7318795.num_elements = 4;
+-c_7318795.elements = (object *)e_7318829;
+-c_7318795.elements[0] = ((closureN)self_7313485)->elements[0];
+-c_7318795.elements[1] = ((closureN)self_7313485)->elements[4];
+-c_7318795.elements[2] = lp_73633_73639_733245;
+-c_7318795.elements[3] = ((closureN)self_7313485)->elements[5];
++closureN_type c_7317495;
++object e_7317529 [4];
++c_7317495.hdr.mark = gc_color_red;
++ c_7317495.hdr.grayed = 0;
++c_7317495.tag = closureN_tag;
++ c_7317495.fn = (function_type)__lambda_504;
++c_7317495.num_args = 2;
++c_7317495.num_elements = 4;
++c_7317495.elements = (object *)e_7317529;
++c_7317495.elements[0] = ((closureN)self_7312232)->elements[0];
++c_7317495.elements[1] = ((closureN)self_7312232)->elements[4];
++c_7317495.elements[2] = lp_73633_73639_732898;
++c_7317495.elements[3] = ((closureN)self_7312232)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7318780,__lambda_502, &c_7318795);;
++return_direct_with_clo1(data,(closure)&c_7317480,__lambda_502, &c_7317495);;
+ }
+
+-static void __lambda_504(void *data, object self_7313486, int argc, object *args) /* object self_7313486, object k_735440, object i_73640_733246, object j_73641_733247 */
++static void __lambda_504(void *data, object self_7312233, int argc, object *args) /* object self_7312233, object k_734988, object i_73640_732899, object j_73641_732900 */
+ {
+- object k_735440 = args[0]; object i_73640_733246 = args[1]; object j_73641_733247 = args[2];
++ object k_734988 = args[0]; object i_73640_732899 = args[1]; object j_73641_732900 = args[2];
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, j_73641_733247, ((closureN)self_7313486)->elements[1])) ){
++if( (boolean_f != Cyc_num_fast_gte_op(data, j_73641_732900, ((closureN)self_7312233)->elements[1])) ){
+
+
+-return_direct_with_clo1(data, k_735440, (((closure) k_735440)->fn), Cyc_num_fast_gte_op(data, j_73641_733247, ((closureN)self_7313486)->elements[1]));
++return_direct_with_clo1(data, k_734988, (((closure) k_734988)->fn), Cyc_num_fast_gte_op(data, j_73641_732900, ((closureN)self_7312233)->elements[1]));
+ } else {
+
+-closureN_type c_7318804;
+-object e_7318825 [5];
+-c_7318804.hdr.mark = gc_color_red;
+- c_7318804.hdr.grayed = 0;
+-c_7318804.tag = closureN_tag;
+- c_7318804.fn = (function_type)__lambda_505;
+-c_7318804.num_args = 1;
+-c_7318804.num_elements = 5;
+-c_7318804.elements = (object *)e_7318825;
+-c_7318804.elements[0] = i_73640_733246;
+-c_7318804.elements[1] = j_73641_733247;
+-c_7318804.elements[2] = k_735440;
+-c_7318804.elements[3] = ((closureN)self_7313486)->elements[2];
+-c_7318804.elements[4] = ((closureN)self_7313486)->elements[3];
++closureN_type c_7317504;
++object e_7317525 [5];
++c_7317504.hdr.mark = gc_color_red;
++ c_7317504.hdr.grayed = 0;
++c_7317504.tag = closureN_tag;
++ c_7317504.fn = (function_type)__lambda_505;
++c_7317504.num_args = 1;
++c_7317504.num_elements = 5;
++c_7317504.elements = (object *)e_7317525;
++c_7317504.elements[0] = i_73640_732899;
++c_7317504.elements[1] = j_73641_732900;
++c_7317504.elements[2] = k_734988;
++c_7317504.elements[3] = ((closureN)self_7312233)->elements[2];
++c_7317504.elements[4] = ((closureN)self_7312233)->elements[3];
+
+
+
+-return_closcall1(data,(closure)&c_7318804, Cyc_bytevector_u8_ref(data, ((closureN)self_7313486)->elements[0], j_73641_733247));}
++return_closcall1(data,(closure)&c_7317504, Cyc_bytevector_u8_ref(data, ((closureN)self_7312233)->elements[0], j_73641_732900));}
+ ;;
+ }
+
+-static void __lambda_505(void *data, object self_7313487, int argc, object *args) /* object self_7313487, object r_735445 */
++static void __lambda_505(void *data, object self_7312234, int argc, object *args) /* object self_7312234, object r_734993 */
+ {
+- object r_735445 = args[0];
++ object r_734993 = args[0];
+
+-closureN_type c_7318806;
+-object e_7318820 [4];
+-c_7318806.hdr.mark = gc_color_red;
+- c_7318806.hdr.grayed = 0;
+-c_7318806.tag = closureN_tag;
+- c_7318806.fn = (function_type)__lambda_506;
+-c_7318806.num_args = 1;
+-c_7318806.num_elements = 4;
+-c_7318806.elements = (object *)e_7318820;
+-c_7318806.elements[0] = ((closureN)self_7313487)->elements[0];
+-c_7318806.elements[1] = ((closureN)self_7313487)->elements[1];
+-c_7318806.elements[2] = ((closureN)self_7313487)->elements[2];
+-c_7318806.elements[3] = ((closureN)self_7313487)->elements[3];
++closureN_type c_7317506;
++object e_7317520 [4];
++c_7317506.hdr.mark = gc_color_red;
++ c_7317506.hdr.grayed = 0;
++c_7317506.tag = closureN_tag;
++ c_7317506.fn = (function_type)__lambda_506;
++c_7317506.num_args = 1;
++c_7317506.num_elements = 4;
++c_7317506.elements = (object *)e_7317520;
++c_7317506.elements[0] = ((closureN)self_7312234)->elements[0];
++c_7317506.elements[1] = ((closureN)self_7312234)->elements[1];
++c_7317506.elements[2] = ((closureN)self_7312234)->elements[2];
++c_7317506.elements[3] = ((closureN)self_7312234)->elements[3];
+
+
+
+-return_closcall1(data,(closure)&c_7318806, Cyc_bytevector_u8_set(data, ((closureN)self_7313487)->elements[4], ((closureN)self_7313487)->elements[0], r_735445));;
++return_closcall1(data,(closure)&c_7317506, Cyc_bytevector_u8_set(data, ((closureN)self_7312234)->elements[4], ((closureN)self_7312234)->elements[0], r_734993));;
+ }
+
+-static void __lambda_506(void *data, object self_7313488, int argc, object *args) /* object self_7313488, object r_735442 */
++static void __lambda_506(void *data, object self_7312235, int argc, object *args) /* object self_7312235, object r_734990 */
+ {
+
+
+
+
+-complex_num_type local_7318814;
++complex_num_type local_7317514;
+
+-complex_num_type local_7318818;
+-return_closcall3(data, car(((closureN)self_7313488)->elements[3]), ((closureN)self_7313488)->elements[2], Cyc_fast_sum(data,&local_7318814, ((closureN)self_7313488)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7318818, ((closureN)self_7313488)->elements[1], obj_int2obj(1)));;
++complex_num_type local_7317518;
++return_closcall3(data, car(((closureN)self_7312235)->elements[3]), ((closureN)self_7312235)->elements[2], Cyc_fast_sum(data,&local_7317514, ((closureN)self_7312235)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7317518, ((closureN)self_7312235)->elements[1], obj_int2obj(1)));;
+ }
+
+-static void __lambda_502(void *data, object self_7313489, int argc, object *args) /* object self_7313489, object r_735439 */
++static void __lambda_502(void *data, object self_7312236, int argc, object *args) /* object self_7312236, object r_734987 */
+ {
+- object r_735439 = args[0];
++ object r_734987 = args[0];
+
+-closureN_type c_7318782;
+-object e_7318790 [4];
+-c_7318782.hdr.mark = gc_color_red;
+- c_7318782.hdr.grayed = 0;
+-c_7318782.tag = closureN_tag;
+- c_7318782.fn = (function_type)__lambda_503;
+-c_7318782.num_args = 1;
+-c_7318782.num_elements = 4;
+-c_7318782.elements = (object *)e_7318790;
+-c_7318782.elements[0] = ((closureN)self_7313489)->elements[0];
+-c_7318782.elements[1] = ((closureN)self_7313489)->elements[1];
+-c_7318782.elements[2] = ((closureN)self_7313489)->elements[2];
+-c_7318782.elements[3] = ((closureN)self_7313489)->elements[3];
++closureN_type c_7317482;
++object e_7317490 [4];
++c_7317482.hdr.mark = gc_color_red;
++ c_7317482.hdr.grayed = 0;
++c_7317482.tag = closureN_tag;
++ c_7317482.fn = (function_type)__lambda_503;
++c_7317482.num_args = 1;
++c_7317482.num_elements = 4;
++c_7317482.elements = (object *)e_7317490;
++c_7317482.elements[0] = ((closureN)self_7312236)->elements[0];
++c_7317482.elements[1] = ((closureN)self_7312236)->elements[1];
++c_7317482.elements[2] = ((closureN)self_7312236)->elements[2];
++c_7317482.elements[3] = ((closureN)self_7312236)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318782,__lambda_503, Cyc_set_cell(data, ((closureN)self_7313489)->elements[3], r_735439));;
++return_direct_with_clo1(data,(closure)&c_7317482,__lambda_503, Cyc_set_cell(data, ((closureN)self_7312236)->elements[3], r_734987));;
+ }
+
+-static void __lambda_503(void *data, object self_7313490, int argc, object *args) /* object self_7313490, object r_735438 */
++static void __lambda_503(void *data, object self_7312237, int argc, object *args) /* object self_7312237, object r_734986 */
+ {
+
+
+
+-return_closcall3(data, car(((closureN)self_7313490)->elements[3]), ((closureN)self_7313490)->elements[2], ((closureN)self_7313490)->elements[0], ((closureN)self_7313490)->elements[1]);;
++return_closcall3(data, car(((closureN)self_7312237)->elements[3]), ((closureN)self_7312237)->elements[2], ((closureN)self_7312237)->elements[0], ((closureN)self_7312237)->elements[1]);;
+ }
+
+-static void __lambda_494(void *data, object self_7313499, int argc, object *args) /* object self_7313499, object k_735461 */
++static void __lambda_494(void *data, object self_7312246, int argc, object *args) /* object self_7312246, object k_735009 */
+ {
+- object k_735461 = args[0];
++ object k_735009 = args[0];
+
+-closureN_type c_7318739;
+-object e_7318750 [1];
+-c_7318739.hdr.mark = gc_color_red;
+- c_7318739.hdr.grayed = 0;
+-c_7318739.tag = closureN_tag;
+- c_7318739.fn = (function_type)__lambda_495;
+-c_7318739.num_args = 0;
+-c_7318739.num_elements = 1;
+-c_7318739.elements = (object *)e_7318750;
+-c_7318739.elements[0] = ((closureN)self_7313499)->elements[1];
++closureN_type c_7317439;
++object e_7317450 [1];
++c_7317439.hdr.mark = gc_color_red;
++ c_7317439.hdr.grayed = 0;
++c_7317439.tag = closureN_tag;
++ c_7317439.fn = (function_type)__lambda_495;
++c_7317439.num_args = 0;
++c_7317439.num_elements = 1;
++c_7317439.elements = (object *)e_7317450;
++c_7317439.elements[0] = ((closureN)self_7312246)->elements[1];
+
+
+-closureN_type c_7318751;
+-object e_7318762 [3];
+-c_7318751.hdr.mark = gc_color_red;
+- c_7318751.hdr.grayed = 0;
+-c_7318751.tag = closureN_tag;
+- c_7318751.fn = (function_type)__lambda_496;
+-c_7318751.num_args = 1;
+-c_7318751.num_elements = 3;
+-c_7318751.elements = (object *)e_7318762;
+-c_7318751.elements[0] = ((closureN)self_7313499)->elements[0];
+-c_7318751.elements[1] = k_735461;
+-c_7318751.elements[2] = ((closureN)self_7313499)->elements[1];
++closureN_type c_7317451;
++object e_7317462 [3];
++c_7317451.hdr.mark = gc_color_red;
++ c_7317451.hdr.grayed = 0;
++c_7317451.tag = closureN_tag;
++ c_7317451.fn = (function_type)__lambda_496;
++c_7317451.num_args = 1;
++c_7317451.num_elements = 3;
++c_7317451.elements = (object *)e_7317462;
++c_7317451.elements[0] = ((closureN)self_7312246)->elements[0];
++c_7317451.elements[1] = k_735009;
++c_7317451.elements[2] = ((closureN)self_7312246)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7318739,__lambda_495, &c_7318751);;
++return_direct_with_clo1(data,(closure)&c_7317439,__lambda_495, &c_7317451);;
+ }
+
+-static void __lambda_496(void *data, object self_7313500, int argc, object *args) /* object self_7313500, object r_735462 */
++static void __lambda_496(void *data, object self_7312247, int argc, object *args) /* object self_7312247, object r_735010 */
+ {
+- object r_735462 = args[0];
+- if( (boolean_f != r_735462) ){
++ object r_735010 = args[0];
++ if( (boolean_f != r_735010) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313500)->elements[1], (((closure) ((closureN)self_7313500)->elements[1])->fn), Cyc_cadr(data, ((closureN)self_7313500)->elements[2]));
++return_direct_with_clo1(data, ((closureN)self_7312247)->elements[1], (((closure) ((closureN)self_7312247)->elements[1])->fn), Cyc_cadr(data, ((closureN)self_7312247)->elements[2]));
+ } else {
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313500)->elements[1], (((closure) ((closureN)self_7313500)->elements[1])->fn), Cyc_bytevector_length(data, ((closureN)self_7313500)->elements[0]));}
++return_direct_with_clo1(data, ((closureN)self_7312247)->elements[1], (((closure) ((closureN)self_7312247)->elements[1])->fn), Cyc_bytevector_length(data, ((closureN)self_7312247)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_495(void *data, object self_7313501, int argc, object *args) /* object self_7313501, object k_735463 */
++static void __lambda_495(void *data, object self_7312248, int argc, object *args) /* object self_7312248, object k_735011 */
+ {
+- object k_735463 = args[0];
++ object k_735011 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313501)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312248)->elements[0])) ){
+
+
+
+
+-return_direct_with_clo1(data, k_735463,__lambda_496, Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313501)->elements[0])));
++return_direct_with_clo1(data, k_735011,__lambda_496, Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312248)->elements[0])));
+ } else {
+- return_direct_with_clo1(data, k_735463,__lambda_496, boolean_f);}
++ return_direct_with_clo1(data, k_735011,__lambda_496, boolean_f);}
+ ;;
+ }
+
+-static void __lambda_486(void *data, object _, int argc, object *args) /* closure _,object k_735418, object bv_73614_733231, object opts_73615_733232_raw, ... */
++static void __lambda_486(void *data, object _, int argc, object *args) /* closure _,object k_734966, object bv_73614_732884, object opts_73615_732885_raw, ... */
+ {
+-object k_735418 = args[0]; object bv_73614_733231 = args[1];
+-load_varargs(opts_73615_733232, args, 2, argc - 2);
++object k_734966 = args[0]; object bv_73614_732884 = args[1];
++load_varargs(opts_73615_732885, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:bytevector-copy");
+
+-closureN_type c_7318644;
+-object e_7318727 [3];
+-c_7318644.hdr.mark = gc_color_red;
+- c_7318644.hdr.grayed = 0;
+-c_7318644.tag = closureN_tag;
+- c_7318644.fn = (function_type)__lambda_487;
+-c_7318644.num_args = 3;
+-c_7318644.num_elements = 3;
+-c_7318644.elements = (object *)e_7318727;
+-c_7318644.elements[0] = bv_73614_733231;
+-c_7318644.elements[1] = k_735418;
+-c_7318644.elements[2] = opts_73615_733232;
++closureN_type c_7317344;
++object e_7317427 [3];
++c_7317344.hdr.mark = gc_color_red;
++ c_7317344.hdr.grayed = 0;
++c_7317344.tag = closureN_tag;
++ c_7317344.fn = (function_type)__lambda_487;
++c_7317344.num_args = 3;
++c_7317344.num_elements = 3;
++c_7317344.elements = (object *)e_7317427;
++c_7317344.elements[0] = bv_73614_732884;
++c_7317344.elements[1] = k_734966;
++c_7317344.elements[2] = opts_73615_732885;
+
+-return_direct_with_clo3(data,(closure)&c_7318644,__lambda_487, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo3(data,(closure)&c_7317344,__lambda_487, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_487(void *data, object self_7313471, int argc, object *args) /* object self_7313471, object len_73616_733233, object start_73617_733234, object end_73618_733235 */
++static void __lambda_487(void *data, object self_7312218, int argc, object *args) /* object self_7312218, object len_73616_732886, object start_73617_732887, object end_73618_732888 */
+ {
+- object len_73616_733233 = args[0]; object start_73617_733234 = args[1]; object end_73618_733235 = args[2];
++ object len_73616_732886 = args[0]; object start_73617_732887 = args[1]; object end_73618_732888 = args[2];
+
+-closureN_type c_7318646;
+-object e_7318723 [5];
+-c_7318646.hdr.mark = gc_color_red;
+- c_7318646.hdr.grayed = 0;
+-c_7318646.tag = closureN_tag;
+- c_7318646.fn = (function_type)__lambda_1380;
+-c_7318646.num_args = 1;
+-c_7318646.num_elements = 5;
+-c_7318646.elements = (object *)e_7318723;
+-c_7318646.elements[0] = ((closureN)self_7313471)->elements[0];
+-c_7318646.elements[1] = end_73618_733235;
+-c_7318646.elements[2] = ((closureN)self_7313471)->elements[1];
+-c_7318646.elements[3] = ((closureN)self_7313471)->elements[2];
+-c_7318646.elements[4] = start_73617_733234;
++closureN_type c_7317346;
++object e_7317423 [5];
++c_7317346.hdr.mark = gc_color_red;
++ c_7317346.hdr.grayed = 0;
++c_7317346.tag = closureN_tag;
++ c_7317346.fn = (function_type)__lambda_1333;
++c_7317346.num_args = 1;
++c_7317346.num_elements = 5;
++c_7317346.elements = (object *)e_7317423;
++c_7317346.elements[0] = ((closureN)self_7312218)->elements[0];
++c_7317346.elements[1] = end_73618_732888;
++c_7317346.elements[2] = ((closureN)self_7312218)->elements[1];
++c_7317346.elements[3] = ((closureN)self_7312218)->elements[2];
++c_7317346.elements[4] = start_73617_732887;
+
+
+-pair_type local_7318726;
+-return_direct_with_clo1(data,(closure)&c_7318646,__lambda_1380, set_cell_as_expr(&local_7318726, len_73616_733233));;
++pair_type local_7317426;
++return_direct_with_clo1(data,(closure)&c_7317346,__lambda_1333, set_cell_as_expr(&local_7317426, len_73616_732886));;
+ }
+
+-static void __lambda_1380(void *data, object self_7313472, int argc, object *args) /* object self_7313472, object len_73616_733233 */
++static void __lambda_1333(void *data, object self_7312219, int argc, object *args) /* object self_7312219, object len_73616_732886 */
+ {
+- object len_73616_733233 = args[0];
++ object len_73616_732886 = args[0];
+
+-closureN_type c_7318648;
+-object e_7318718 [5];
+-c_7318648.hdr.mark = gc_color_red;
+- c_7318648.hdr.grayed = 0;
+-c_7318648.tag = closureN_tag;
+- c_7318648.fn = (function_type)__lambda_1379;
+-c_7318648.num_args = 1;
+-c_7318648.num_elements = 5;
+-c_7318648.elements = (object *)e_7318718;
+-c_7318648.elements[0] = ((closureN)self_7313472)->elements[0];
+-c_7318648.elements[1] = ((closureN)self_7313472)->elements[1];
+-c_7318648.elements[2] = ((closureN)self_7313472)->elements[2];
+-c_7318648.elements[3] = len_73616_733233;
+-c_7318648.elements[4] = ((closureN)self_7313472)->elements[3];
++closureN_type c_7317348;
++object e_7317418 [5];
++c_7317348.hdr.mark = gc_color_red;
++ c_7317348.hdr.grayed = 0;
++c_7317348.tag = closureN_tag;
++ c_7317348.fn = (function_type)__lambda_1332;
++c_7317348.num_args = 1;
++c_7317348.num_elements = 5;
++c_7317348.elements = (object *)e_7317418;
++c_7317348.elements[0] = ((closureN)self_7312219)->elements[0];
++c_7317348.elements[1] = ((closureN)self_7312219)->elements[1];
++c_7317348.elements[2] = ((closureN)self_7312219)->elements[2];
++c_7317348.elements[3] = len_73616_732886;
++c_7317348.elements[4] = ((closureN)self_7312219)->elements[3];
+
+
+-pair_type local_7318721;
+-return_direct_with_clo1(data,(closure)&c_7318648,__lambda_1379, set_cell_as_expr(&local_7318721, ((closureN)self_7313472)->elements[4]));;
++pair_type local_7317421;
++return_direct_with_clo1(data,(closure)&c_7317348,__lambda_1332, set_cell_as_expr(&local_7317421, ((closureN)self_7312219)->elements[4]));;
+ }
+
+-static void __lambda_1379(void *data, object self_7313473, int argc, object *args) /* object self_7313473, object start_73617_733234 */
++static void __lambda_1332(void *data, object self_7312220, int argc, object *args) /* object self_7312220, object start_73617_732887 */
+ {
+- object start_73617_733234 = args[0];
++ object start_73617_732887 = args[0];
+
+-closureN_type c_7318650;
+-object e_7318713 [5];
+-c_7318650.hdr.mark = gc_color_red;
+- c_7318650.hdr.grayed = 0;
+-c_7318650.tag = closureN_tag;
+- c_7318650.fn = (function_type)__lambda_1378;
+-c_7318650.num_args = 1;
+-c_7318650.num_elements = 5;
+-c_7318650.elements = (object *)e_7318713;
+-c_7318650.elements[0] = ((closureN)self_7313473)->elements[0];
+-c_7318650.elements[1] = ((closureN)self_7313473)->elements[2];
+-c_7318650.elements[2] = ((closureN)self_7313473)->elements[3];
+-c_7318650.elements[3] = ((closureN)self_7313473)->elements[4];
+-c_7318650.elements[4] = start_73617_733234;
++closureN_type c_7317350;
++object e_7317413 [5];
++c_7317350.hdr.mark = gc_color_red;
++ c_7317350.hdr.grayed = 0;
++c_7317350.tag = closureN_tag;
++ c_7317350.fn = (function_type)__lambda_1331;
++c_7317350.num_args = 1;
++c_7317350.num_elements = 5;
++c_7317350.elements = (object *)e_7317413;
++c_7317350.elements[0] = ((closureN)self_7312220)->elements[0];
++c_7317350.elements[1] = ((closureN)self_7312220)->elements[2];
++c_7317350.elements[2] = ((closureN)self_7312220)->elements[3];
++c_7317350.elements[3] = ((closureN)self_7312220)->elements[4];
++c_7317350.elements[4] = start_73617_732887;
+
+
+-pair_type local_7318716;
+-return_direct_with_clo1(data,(closure)&c_7318650,__lambda_1378, set_cell_as_expr(&local_7318716, ((closureN)self_7313473)->elements[1]));;
++pair_type local_7317416;
++return_direct_with_clo1(data,(closure)&c_7317350,__lambda_1331, set_cell_as_expr(&local_7317416, ((closureN)self_7312220)->elements[1]));;
+ }
+
+-static void __lambda_1378(void *data, object self_7313474, int argc, object *args) /* object self_7313474, object end_73618_733235 */
++static void __lambda_1331(void *data, object self_7312221, int argc, object *args) /* object self_7312221, object end_73618_732888 */
+ {
+- object end_73618_733235 = args[0];
++ object end_73618_732888 = args[0];
+
+-closureN_type c_7318652;
+-object e_7318706 [6];
+-c_7318652.hdr.mark = gc_color_red;
+- c_7318652.hdr.grayed = 0;
+-c_7318652.tag = closureN_tag;
+- c_7318652.fn = (function_type)__lambda_488;
+-c_7318652.num_args = 1;
+-c_7318652.num_elements = 6;
+-c_7318652.elements = (object *)e_7318706;
+-c_7318652.elements[0] = ((closureN)self_7313474)->elements[0];
+-c_7318652.elements[1] = end_73618_733235;
+-c_7318652.elements[2] = ((closureN)self_7313474)->elements[1];
+-c_7318652.elements[3] = ((closureN)self_7313474)->elements[2];
+-c_7318652.elements[4] = ((closureN)self_7313474)->elements[3];
+-c_7318652.elements[5] = ((closureN)self_7313474)->elements[4];
++closureN_type c_7317352;
++object e_7317406 [6];
++c_7317352.hdr.mark = gc_color_red;
++ c_7317352.hdr.grayed = 0;
++c_7317352.tag = closureN_tag;
++ c_7317352.fn = (function_type)__lambda_488;
++c_7317352.num_args = 1;
++c_7317352.num_elements = 6;
++c_7317352.elements = (object *)e_7317406;
++c_7317352.elements[0] = ((closureN)self_7312221)->elements[0];
++c_7317352.elements[1] = end_73618_732888;
++c_7317352.elements[2] = ((closureN)self_7312221)->elements[1];
++c_7317352.elements[3] = ((closureN)self_7312221)->elements[2];
++c_7317352.elements[4] = ((closureN)self_7312221)->elements[3];
++c_7317352.elements[5] = ((closureN)self_7312221)->elements[4];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318652,__lambda_488, Cyc_set_cell(data, ((closureN)self_7313474)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7313474)->elements[0])));;
++return_direct_with_clo1(data,(closure)&c_7317352,__lambda_488, Cyc_set_cell(data, ((closureN)self_7312221)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7312221)->elements[0])));;
+ }
+
+-static void __lambda_488(void *data, object self_7313475, int argc, object *args) /* object self_7313475, object r_735419 */
++static void __lambda_488(void *data, object self_7312222, int argc, object *args) /* object self_7312222, object r_734967 */
+ {
+
+- object r_735426;
++ object r_734974;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313475)->elements[4]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312222)->elements[4]), obj_int2obj(0))) ){
+
+- r_735426 = Cyc_car(data, ((closureN)self_7313475)->elements[4]);
++ r_734974 = Cyc_car(data, ((closureN)self_7312222)->elements[4]);
+ } else {
+- r_735426 = obj_int2obj(0);}
++ r_734974 = obj_int2obj(0);}
+ ;
+-closureN_type c_7318665;
+-object e_7318702 [6];
+-c_7318665.hdr.mark = gc_color_red;
+- c_7318665.hdr.grayed = 0;
+-c_7318665.tag = closureN_tag;
+- c_7318665.fn = (function_type)__lambda_489;
+-c_7318665.num_args = 1;
+-c_7318665.num_elements = 6;
+-c_7318665.elements = (object *)e_7318702;
+-c_7318665.elements[0] = ((closureN)self_7313475)->elements[0];
+-c_7318665.elements[1] = ((closureN)self_7313475)->elements[1];
+-c_7318665.elements[2] = ((closureN)self_7313475)->elements[2];
+-c_7318665.elements[3] = ((closureN)self_7313475)->elements[3];
+-c_7318665.elements[4] = ((closureN)self_7313475)->elements[4];
+-c_7318665.elements[5] = ((closureN)self_7313475)->elements[5];
++closureN_type c_7317365;
++object e_7317402 [6];
++c_7317365.hdr.mark = gc_color_red;
++ c_7317365.hdr.grayed = 0;
++c_7317365.tag = closureN_tag;
++ c_7317365.fn = (function_type)__lambda_489;
++c_7317365.num_args = 1;
++c_7317365.num_elements = 6;
++c_7317365.elements = (object *)e_7317402;
++c_7317365.elements[0] = ((closureN)self_7312222)->elements[0];
++c_7317365.elements[1] = ((closureN)self_7312222)->elements[1];
++c_7317365.elements[2] = ((closureN)self_7312222)->elements[2];
++c_7317365.elements[3] = ((closureN)self_7312222)->elements[3];
++c_7317365.elements[4] = ((closureN)self_7312222)->elements[4];
++c_7317365.elements[5] = ((closureN)self_7312222)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318665,__lambda_489, Cyc_set_cell(data, ((closureN)self_7313475)->elements[5], r_735426));;
++return_direct_with_clo1(data,(closure)&c_7317365,__lambda_489, Cyc_set_cell(data, ((closureN)self_7312222)->elements[5], r_734974));;
+ }
+
+-static void __lambda_489(void *data, object self_7313476, int argc, object *args) /* object self_7313476, object r_735420 */
++static void __lambda_489(void *data, object self_7312223, int argc, object *args) /* object self_7312223, object r_734968 */
+ {
+
+
+-closureN_type c_7318667;
+-object e_7318681 [2];
+-c_7318667.hdr.mark = gc_color_red;
+- c_7318667.hdr.grayed = 0;
+-c_7318667.tag = closureN_tag;
+- c_7318667.fn = (function_type)__lambda_490;
+-c_7318667.num_args = 0;
+-c_7318667.num_elements = 2;
+-c_7318667.elements = (object *)e_7318681;
+-c_7318667.elements[0] = ((closureN)self_7313476)->elements[3];
+-c_7318667.elements[1] = ((closureN)self_7313476)->elements[4];
++closureN_type c_7317367;
++object e_7317381 [2];
++c_7317367.hdr.mark = gc_color_red;
++ c_7317367.hdr.grayed = 0;
++c_7317367.tag = closureN_tag;
++ c_7317367.fn = (function_type)__lambda_490;
++c_7317367.num_args = 0;
++c_7317367.num_elements = 2;
++c_7317367.elements = (object *)e_7317381;
++c_7317367.elements[0] = ((closureN)self_7312223)->elements[3];
++c_7317367.elements[1] = ((closureN)self_7312223)->elements[4];
+
+
+-closureN_type c_7318682;
+-object e_7318701 [4];
+-c_7318682.hdr.mark = gc_color_red;
+- c_7318682.hdr.grayed = 0;
+-c_7318682.tag = closureN_tag;
+- c_7318682.fn = (function_type)__lambda_491;
+-c_7318682.num_args = 1;
+-c_7318682.num_elements = 4;
+-c_7318682.elements = (object *)e_7318701;
+-c_7318682.elements[0] = ((closureN)self_7313476)->elements[0];
+-c_7318682.elements[1] = ((closureN)self_7313476)->elements[1];
+-c_7318682.elements[2] = ((closureN)self_7313476)->elements[2];
+-c_7318682.elements[3] = ((closureN)self_7313476)->elements[5];
++closureN_type c_7317382;
++object e_7317401 [4];
++c_7317382.hdr.mark = gc_color_red;
++ c_7317382.hdr.grayed = 0;
++c_7317382.tag = closureN_tag;
++ c_7317382.fn = (function_type)__lambda_491;
++c_7317382.num_args = 1;
++c_7317382.num_elements = 4;
++c_7317382.elements = (object *)e_7317401;
++c_7317382.elements[0] = ((closureN)self_7312223)->elements[0];
++c_7317382.elements[1] = ((closureN)self_7312223)->elements[1];
++c_7317382.elements[2] = ((closureN)self_7312223)->elements[2];
++c_7317382.elements[3] = ((closureN)self_7312223)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7318667,__lambda_490, &c_7318682);;
++return_direct_with_clo1(data,(closure)&c_7317367,__lambda_490, &c_7317382);;
+ }
+
+-static void __lambda_491(void *data, object self_7313477, int argc, object *args) /* object self_7313477, object r_735422 */
++static void __lambda_491(void *data, object self_7312224, int argc, object *args) /* object self_7312224, object r_734970 */
+ {
+- object r_735422 = args[0];
++ object r_734970 = args[0];
+
+-closureN_type c_7318684;
+-object e_7318697 [4];
+-c_7318684.hdr.mark = gc_color_red;
+- c_7318684.hdr.grayed = 0;
+-c_7318684.tag = closureN_tag;
+- c_7318684.fn = (function_type)__lambda_492;
+-c_7318684.num_args = 1;
+-c_7318684.num_elements = 4;
+-c_7318684.elements = (object *)e_7318697;
+-c_7318684.elements[0] = ((closureN)self_7313477)->elements[0];
+-c_7318684.elements[1] = ((closureN)self_7313477)->elements[1];
+-c_7318684.elements[2] = ((closureN)self_7313477)->elements[2];
+-c_7318684.elements[3] = ((closureN)self_7313477)->elements[3];
++closureN_type c_7317384;
++object e_7317397 [4];
++c_7317384.hdr.mark = gc_color_red;
++ c_7317384.hdr.grayed = 0;
++c_7317384.tag = closureN_tag;
++ c_7317384.fn = (function_type)__lambda_492;
++c_7317384.num_args = 1;
++c_7317384.num_elements = 4;
++c_7317384.elements = (object *)e_7317397;
++c_7317384.elements[0] = ((closureN)self_7312224)->elements[0];
++c_7317384.elements[1] = ((closureN)self_7312224)->elements[1];
++c_7317384.elements[2] = ((closureN)self_7312224)->elements[2];
++c_7317384.elements[3] = ((closureN)self_7312224)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318684,__lambda_492, Cyc_set_cell(data, ((closureN)self_7313477)->elements[1], r_735422));;
++return_direct_with_clo1(data,(closure)&c_7317384,__lambda_492, Cyc_set_cell(data, ((closureN)self_7312224)->elements[1], r_734970));;
+ }
+
+-static void __lambda_492(void *data, object self_7313478, int argc, object *args) /* object self_7313478, object r_735421 */
++static void __lambda_492(void *data, object self_7312225, int argc, object *args) /* object self_7312225, object r_734969 */
+ {
+
+
+@@ -29405,6771 +27608,6771 @@ static void __lambda_492(void *data, obj
+
+
+
+-object c_7318689 = Cyc_bytevector_copy(data, ((closureN)self_7313478)->elements[2],((closureN)self_7313478)->elements[0], car(((closureN)self_7313478)->elements[3]), car(((closureN)self_7313478)->elements[1]));
+-return_direct_with_clo1(data, ((closureN)self_7313478)->elements[2], (((closure) ((closureN)self_7313478)->elements[2])->fn), c_7318689);;
++object c_7317389 = Cyc_bytevector_copy(data, ((closureN)self_7312225)->elements[2],((closureN)self_7312225)->elements[0], car(((closureN)self_7312225)->elements[3]), car(((closureN)self_7312225)->elements[1]));
++return_direct_with_clo1(data, ((closureN)self_7312225)->elements[2], (((closure) ((closureN)self_7312225)->elements[2])->fn), c_7317389);;
+ }
+
+-static void __lambda_490(void *data, object self_7313479, int argc, object *args) /* object self_7313479, object k_735423 */
++static void __lambda_490(void *data, object self_7312226, int argc, object *args) /* object self_7312226, object k_734971 */
+ {
+- object k_735423 = args[0];
++ object k_734971 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313479)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312226)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735423,__lambda_491, Cyc_cadr(data, ((closureN)self_7313479)->elements[1]));
++return_direct_with_clo1(data, k_734971,__lambda_491, Cyc_cadr(data, ((closureN)self_7312226)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735423,__lambda_491, car(((closureN)self_7313479)->elements[0]));}
++return_direct_with_clo1(data, k_734971,__lambda_491, car(((closureN)self_7312226)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_476(void *data, object _, int argc, object *args) /* closure _,object k_735395, object vec_73606_733223, object opts_73607_733224_raw, ... */
++static void __lambda_476(void *data, object _, int argc, object *args) /* closure _,object k_734943, object vec_73606_732876, object opts_73607_732877_raw, ... */
+ {
+-object k_735395 = args[0]; object vec_73606_733223 = args[1];
+-load_varargs(opts_73607_733224, args, 2, argc - 2);
++object k_734943 = args[0]; object vec_73606_732876 = args[1];
++load_varargs(opts_73607_732877, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:vector->list");
+
+-closureN_type c_7318525;
+-object e_7318641 [3];
+-c_7318525.hdr.mark = gc_color_red;
+- c_7318525.hdr.grayed = 0;
+-c_7318525.tag = closureN_tag;
+- c_7318525.fn = (function_type)__lambda_477;
+-c_7318525.num_args = 4;
+-c_7318525.num_elements = 3;
+-c_7318525.elements = (object *)e_7318641;
+-c_7318525.elements[0] = k_735395;
+-c_7318525.elements[1] = opts_73607_733224;
+-c_7318525.elements[2] = vec_73606_733223;
++closureN_type c_7317225;
++object e_7317341 [3];
++c_7317225.hdr.mark = gc_color_red;
++ c_7317225.hdr.grayed = 0;
++c_7317225.tag = closureN_tag;
++ c_7317225.fn = (function_type)__lambda_477;
++c_7317225.num_args = 4;
++c_7317225.num_elements = 3;
++c_7317225.elements = (object *)e_7317341;
++c_7317225.elements[0] = k_734943;
++c_7317225.elements[1] = opts_73607_732877;
++c_7317225.elements[2] = vec_73606_732876;
+
+-return_direct_with_clo4(data,(closure)&c_7318525,__lambda_477, boolean_f, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo4(data,(closure)&c_7317225,__lambda_477, boolean_f, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_477(void *data, object self_7313458, int argc, object *args) /* object self_7313458, object len_73608_733225, object start_73609_733226, object end_73610_733227, object loop_73611_733228 */
++static void __lambda_477(void *data, object self_7312205, int argc, object *args) /* object self_7312205, object len_73608_732878, object start_73609_732879, object end_73610_732880, object loop_73611_732881 */
+ {
+- object len_73608_733225 = args[0]; object start_73609_733226 = args[1]; object end_73610_733227 = args[2]; object loop_73611_733228 = args[3];
++ object len_73608_732878 = args[0]; object start_73609_732879 = args[1]; object end_73610_732880 = args[2]; object loop_73611_732881 = args[3];
+
+-closureN_type c_7318527;
+-object e_7318637 [6];
+-c_7318527.hdr.mark = gc_color_red;
+- c_7318527.hdr.grayed = 0;
+-c_7318527.tag = closureN_tag;
+- c_7318527.fn = (function_type)__lambda_1377;
+-c_7318527.num_args = 1;
+-c_7318527.num_elements = 6;
+-c_7318527.elements = (object *)e_7318637;
+-c_7318527.elements[0] = end_73610_733227;
+-c_7318527.elements[1] = ((closureN)self_7313458)->elements[0];
+-c_7318527.elements[2] = loop_73611_733228;
+-c_7318527.elements[3] = ((closureN)self_7313458)->elements[1];
+-c_7318527.elements[4] = start_73609_733226;
+-c_7318527.elements[5] = ((closureN)self_7313458)->elements[2];
++closureN_type c_7317227;
++object e_7317337 [6];
++c_7317227.hdr.mark = gc_color_red;
++ c_7317227.hdr.grayed = 0;
++c_7317227.tag = closureN_tag;
++ c_7317227.fn = (function_type)__lambda_1330;
++c_7317227.num_args = 1;
++c_7317227.num_elements = 6;
++c_7317227.elements = (object *)e_7317337;
++c_7317227.elements[0] = end_73610_732880;
++c_7317227.elements[1] = ((closureN)self_7312205)->elements[0];
++c_7317227.elements[2] = loop_73611_732881;
++c_7317227.elements[3] = ((closureN)self_7312205)->elements[1];
++c_7317227.elements[4] = start_73609_732879;
++c_7317227.elements[5] = ((closureN)self_7312205)->elements[2];
+
+
+-pair_type local_7318640;
+-return_direct_with_clo1(data,(closure)&c_7318527,__lambda_1377, set_cell_as_expr(&local_7318640, len_73608_733225));;
++pair_type local_7317340;
++return_direct_with_clo1(data,(closure)&c_7317227,__lambda_1330, set_cell_as_expr(&local_7317340, len_73608_732878));;
+ }
+
+-static void __lambda_1377(void *data, object self_7313459, int argc, object *args) /* object self_7313459, object len_73608_733225 */
++static void __lambda_1330(void *data, object self_7312206, int argc, object *args) /* object self_7312206, object len_73608_732878 */
+ {
+- object len_73608_733225 = args[0];
++ object len_73608_732878 = args[0];
+
+-closureN_type c_7318529;
+-object e_7318632 [6];
+-c_7318529.hdr.mark = gc_color_red;
+- c_7318529.hdr.grayed = 0;
+-c_7318529.tag = closureN_tag;
+- c_7318529.fn = (function_type)__lambda_1376;
+-c_7318529.num_args = 1;
+-c_7318529.num_elements = 6;
+-c_7318529.elements = (object *)e_7318632;
+-c_7318529.elements[0] = ((closureN)self_7313459)->elements[0];
+-c_7318529.elements[1] = ((closureN)self_7313459)->elements[1];
+-c_7318529.elements[2] = len_73608_733225;
+-c_7318529.elements[3] = ((closureN)self_7313459)->elements[2];
+-c_7318529.elements[4] = ((closureN)self_7313459)->elements[3];
+-c_7318529.elements[5] = ((closureN)self_7313459)->elements[5];
++closureN_type c_7317229;
++object e_7317332 [6];
++c_7317229.hdr.mark = gc_color_red;
++ c_7317229.hdr.grayed = 0;
++c_7317229.tag = closureN_tag;
++ c_7317229.fn = (function_type)__lambda_1329;
++c_7317229.num_args = 1;
++c_7317229.num_elements = 6;
++c_7317229.elements = (object *)e_7317332;
++c_7317229.elements[0] = ((closureN)self_7312206)->elements[0];
++c_7317229.elements[1] = ((closureN)self_7312206)->elements[1];
++c_7317229.elements[2] = len_73608_732878;
++c_7317229.elements[3] = ((closureN)self_7312206)->elements[2];
++c_7317229.elements[4] = ((closureN)self_7312206)->elements[3];
++c_7317229.elements[5] = ((closureN)self_7312206)->elements[5];
+
+
+-pair_type local_7318635;
+-return_direct_with_clo1(data,(closure)&c_7318529,__lambda_1376, set_cell_as_expr(&local_7318635, ((closureN)self_7313459)->elements[4]));;
++pair_type local_7317335;
++return_direct_with_clo1(data,(closure)&c_7317229,__lambda_1329, set_cell_as_expr(&local_7317335, ((closureN)self_7312206)->elements[4]));;
+ }
+
+-static void __lambda_1376(void *data, object self_7313460, int argc, object *args) /* object self_7313460, object start_73609_733226 */
++static void __lambda_1329(void *data, object self_7312207, int argc, object *args) /* object self_7312207, object start_73609_732879 */
+ {
+- object start_73609_733226 = args[0];
++ object start_73609_732879 = args[0];
+
+-closureN_type c_7318531;
+-object e_7318627 [6];
+-c_7318531.hdr.mark = gc_color_red;
+- c_7318531.hdr.grayed = 0;
+-c_7318531.tag = closureN_tag;
+- c_7318531.fn = (function_type)__lambda_1375;
+-c_7318531.num_args = 1;
+-c_7318531.num_elements = 6;
+-c_7318531.elements = (object *)e_7318627;
+-c_7318531.elements[0] = ((closureN)self_7313460)->elements[1];
+-c_7318531.elements[1] = ((closureN)self_7313460)->elements[2];
+-c_7318531.elements[2] = ((closureN)self_7313460)->elements[3];
+-c_7318531.elements[3] = ((closureN)self_7313460)->elements[4];
+-c_7318531.elements[4] = start_73609_733226;
+-c_7318531.elements[5] = ((closureN)self_7313460)->elements[5];
++closureN_type c_7317231;
++object e_7317327 [6];
++c_7317231.hdr.mark = gc_color_red;
++ c_7317231.hdr.grayed = 0;
++c_7317231.tag = closureN_tag;
++ c_7317231.fn = (function_type)__lambda_1328;
++c_7317231.num_args = 1;
++c_7317231.num_elements = 6;
++c_7317231.elements = (object *)e_7317327;
++c_7317231.elements[0] = ((closureN)self_7312207)->elements[1];
++c_7317231.elements[1] = ((closureN)self_7312207)->elements[2];
++c_7317231.elements[2] = ((closureN)self_7312207)->elements[3];
++c_7317231.elements[3] = ((closureN)self_7312207)->elements[4];
++c_7317231.elements[4] = start_73609_732879;
++c_7317231.elements[5] = ((closureN)self_7312207)->elements[5];
+
+
+-pair_type local_7318630;
+-return_direct_with_clo1(data,(closure)&c_7318531,__lambda_1375, set_cell_as_expr(&local_7318630, ((closureN)self_7313460)->elements[0]));;
++pair_type local_7317330;
++return_direct_with_clo1(data,(closure)&c_7317231,__lambda_1328, set_cell_as_expr(&local_7317330, ((closureN)self_7312207)->elements[0]));;
+ }
+
+-static void __lambda_1375(void *data, object self_7313461, int argc, object *args) /* object self_7313461, object end_73610_733227 */
++static void __lambda_1328(void *data, object self_7312208, int argc, object *args) /* object self_7312208, object end_73610_732880 */
+ {
+- object end_73610_733227 = args[0];
++ object end_73610_732880 = args[0];
+
+-closureN_type c_7318533;
+-object e_7318622 [6];
+-c_7318533.hdr.mark = gc_color_red;
+- c_7318533.hdr.grayed = 0;
+-c_7318533.tag = closureN_tag;
+- c_7318533.fn = (function_type)__lambda_1374;
+-c_7318533.num_args = 1;
+-c_7318533.num_elements = 6;
+-c_7318533.elements = (object *)e_7318622;
+-c_7318533.elements[0] = end_73610_733227;
+-c_7318533.elements[1] = ((closureN)self_7313461)->elements[0];
+-c_7318533.elements[2] = ((closureN)self_7313461)->elements[1];
+-c_7318533.elements[3] = ((closureN)self_7313461)->elements[3];
+-c_7318533.elements[4] = ((closureN)self_7313461)->elements[4];
+-c_7318533.elements[5] = ((closureN)self_7313461)->elements[5];
++closureN_type c_7317233;
++object e_7317322 [6];
++c_7317233.hdr.mark = gc_color_red;
++ c_7317233.hdr.grayed = 0;
++c_7317233.tag = closureN_tag;
++ c_7317233.fn = (function_type)__lambda_1327;
++c_7317233.num_args = 1;
++c_7317233.num_elements = 6;
++c_7317233.elements = (object *)e_7317322;
++c_7317233.elements[0] = end_73610_732880;
++c_7317233.elements[1] = ((closureN)self_7312208)->elements[0];
++c_7317233.elements[2] = ((closureN)self_7312208)->elements[1];
++c_7317233.elements[3] = ((closureN)self_7312208)->elements[3];
++c_7317233.elements[4] = ((closureN)self_7312208)->elements[4];
++c_7317233.elements[5] = ((closureN)self_7312208)->elements[5];
+
+
+-pair_type local_7318625;
+-return_direct_with_clo1(data,(closure)&c_7318533,__lambda_1374, set_cell_as_expr(&local_7318625, ((closureN)self_7313461)->elements[2]));;
++pair_type local_7317325;
++return_direct_with_clo1(data,(closure)&c_7317233,__lambda_1327, set_cell_as_expr(&local_7317325, ((closureN)self_7312208)->elements[2]));;
+ }
+
+-static void __lambda_1374(void *data, object self_7313462, int argc, object *args) /* object self_7313462, object loop_73611_733228 */
++static void __lambda_1327(void *data, object self_7312209, int argc, object *args) /* object self_7312209, object loop_73611_732881 */
+ {
+- object loop_73611_733228 = args[0];
++ object loop_73611_732881 = args[0];
+
+-closureN_type c_7318535;
+-object e_7318615 [7];
+-c_7318535.hdr.mark = gc_color_red;
+- c_7318535.hdr.grayed = 0;
+-c_7318535.tag = closureN_tag;
+- c_7318535.fn = (function_type)__lambda_478;
+-c_7318535.num_args = 1;
+-c_7318535.num_elements = 7;
+-c_7318535.elements = (object *)e_7318615;
+-c_7318535.elements[0] = ((closureN)self_7313462)->elements[0];
+-c_7318535.elements[1] = ((closureN)self_7313462)->elements[1];
+-c_7318535.elements[2] = ((closureN)self_7313462)->elements[2];
+-c_7318535.elements[3] = loop_73611_733228;
+-c_7318535.elements[4] = ((closureN)self_7313462)->elements[3];
+-c_7318535.elements[5] = ((closureN)self_7313462)->elements[4];
+-c_7318535.elements[6] = ((closureN)self_7313462)->elements[5];
++closureN_type c_7317235;
++object e_7317315 [7];
++c_7317235.hdr.mark = gc_color_red;
++ c_7317235.hdr.grayed = 0;
++c_7317235.tag = closureN_tag;
++ c_7317235.fn = (function_type)__lambda_478;
++c_7317235.num_args = 1;
++c_7317235.num_elements = 7;
++c_7317235.elements = (object *)e_7317315;
++c_7317235.elements[0] = ((closureN)self_7312209)->elements[0];
++c_7317235.elements[1] = ((closureN)self_7312209)->elements[1];
++c_7317235.elements[2] = ((closureN)self_7312209)->elements[2];
++c_7317235.elements[3] = loop_73611_732881;
++c_7317235.elements[4] = ((closureN)self_7312209)->elements[3];
++c_7317235.elements[5] = ((closureN)self_7312209)->elements[4];
++c_7317235.elements[6] = ((closureN)self_7312209)->elements[5];
+
+
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318535,__lambda_478, Cyc_set_cell(data, ((closureN)self_7313462)->elements[2], Cyc_vector_length(data, ((closureN)self_7313462)->elements[5])));;
++return_direct_with_clo1(data,(closure)&c_7317235,__lambda_478, Cyc_set_cell(data, ((closureN)self_7312209)->elements[2], Cyc_vector_length(data, ((closureN)self_7312209)->elements[5])));;
+ }
+
+-static void __lambda_478(void *data, object self_7313463, int argc, object *args) /* object self_7313463, object r_735396 */
++static void __lambda_478(void *data, object self_7312210, int argc, object *args) /* object self_7312210, object r_734944 */
+ {
+
+- object r_735411;
++ object r_734959;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313463)->elements[4]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312210)->elements[4]), obj_int2obj(0))) ){
+
+- r_735411 = Cyc_car(data, ((closureN)self_7313463)->elements[4]);
++ r_734959 = Cyc_car(data, ((closureN)self_7312210)->elements[4]);
+ } else {
+- r_735411 = obj_int2obj(0);}
++ r_734959 = obj_int2obj(0);}
+ ;
+-closureN_type c_7318548;
+-object e_7318611 [7];
+-c_7318548.hdr.mark = gc_color_red;
+- c_7318548.hdr.grayed = 0;
+-c_7318548.tag = closureN_tag;
+- c_7318548.fn = (function_type)__lambda_479;
+-c_7318548.num_args = 1;
+-c_7318548.num_elements = 7;
+-c_7318548.elements = (object *)e_7318611;
+-c_7318548.elements[0] = ((closureN)self_7313463)->elements[0];
+-c_7318548.elements[1] = ((closureN)self_7313463)->elements[1];
+-c_7318548.elements[2] = ((closureN)self_7313463)->elements[2];
+-c_7318548.elements[3] = ((closureN)self_7313463)->elements[3];
+-c_7318548.elements[4] = ((closureN)self_7313463)->elements[4];
+-c_7318548.elements[5] = ((closureN)self_7313463)->elements[5];
+-c_7318548.elements[6] = ((closureN)self_7313463)->elements[6];
++closureN_type c_7317248;
++object e_7317311 [7];
++c_7317248.hdr.mark = gc_color_red;
++ c_7317248.hdr.grayed = 0;
++c_7317248.tag = closureN_tag;
++ c_7317248.fn = (function_type)__lambda_479;
++c_7317248.num_args = 1;
++c_7317248.num_elements = 7;
++c_7317248.elements = (object *)e_7317311;
++c_7317248.elements[0] = ((closureN)self_7312210)->elements[0];
++c_7317248.elements[1] = ((closureN)self_7312210)->elements[1];
++c_7317248.elements[2] = ((closureN)self_7312210)->elements[2];
++c_7317248.elements[3] = ((closureN)self_7312210)->elements[3];
++c_7317248.elements[4] = ((closureN)self_7312210)->elements[4];
++c_7317248.elements[5] = ((closureN)self_7312210)->elements[5];
++c_7317248.elements[6] = ((closureN)self_7312210)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318548,__lambda_479, Cyc_set_cell(data, ((closureN)self_7313463)->elements[5], r_735411));;
++return_direct_with_clo1(data,(closure)&c_7317248,__lambda_479, Cyc_set_cell(data, ((closureN)self_7312210)->elements[5], r_734959));;
+ }
+
+-static void __lambda_479(void *data, object self_7313464, int argc, object *args) /* object self_7313464, object r_735397 */
++static void __lambda_479(void *data, object self_7312211, int argc, object *args) /* object self_7312211, object r_734945 */
+ {
+
+
+-closureN_type c_7318550;
+-object e_7318564 [2];
+-c_7318550.hdr.mark = gc_color_red;
+- c_7318550.hdr.grayed = 0;
+-c_7318550.tag = closureN_tag;
+- c_7318550.fn = (function_type)__lambda_480;
+-c_7318550.num_args = 0;
+-c_7318550.num_elements = 2;
+-c_7318550.elements = (object *)e_7318564;
+-c_7318550.elements[0] = ((closureN)self_7313464)->elements[2];
+-c_7318550.elements[1] = ((closureN)self_7313464)->elements[4];
++closureN_type c_7317250;
++object e_7317264 [2];
++c_7317250.hdr.mark = gc_color_red;
++ c_7317250.hdr.grayed = 0;
++c_7317250.tag = closureN_tag;
++ c_7317250.fn = (function_type)__lambda_480;
++c_7317250.num_args = 0;
++c_7317250.num_elements = 2;
++c_7317250.elements = (object *)e_7317264;
++c_7317250.elements[0] = ((closureN)self_7312211)->elements[2];
++c_7317250.elements[1] = ((closureN)self_7312211)->elements[4];
+
+
+-closureN_type c_7318565;
+-object e_7318610 [5];
+-c_7318565.hdr.mark = gc_color_red;
+- c_7318565.hdr.grayed = 0;
+-c_7318565.tag = closureN_tag;
+- c_7318565.fn = (function_type)__lambda_481;
+-c_7318565.num_args = 1;
+-c_7318565.num_elements = 5;
+-c_7318565.elements = (object *)e_7318610;
+-c_7318565.elements[0] = ((closureN)self_7313464)->elements[0];
+-c_7318565.elements[1] = ((closureN)self_7313464)->elements[1];
+-c_7318565.elements[2] = ((closureN)self_7313464)->elements[3];
+-c_7318565.elements[3] = ((closureN)self_7313464)->elements[5];
+-c_7318565.elements[4] = ((closureN)self_7313464)->elements[6];
++closureN_type c_7317265;
++object e_7317310 [5];
++c_7317265.hdr.mark = gc_color_red;
++ c_7317265.hdr.grayed = 0;
++c_7317265.tag = closureN_tag;
++ c_7317265.fn = (function_type)__lambda_481;
++c_7317265.num_args = 1;
++c_7317265.num_elements = 5;
++c_7317265.elements = (object *)e_7317310;
++c_7317265.elements[0] = ((closureN)self_7312211)->elements[0];
++c_7317265.elements[1] = ((closureN)self_7312211)->elements[1];
++c_7317265.elements[2] = ((closureN)self_7312211)->elements[3];
++c_7317265.elements[3] = ((closureN)self_7312211)->elements[5];
++c_7317265.elements[4] = ((closureN)self_7312211)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7318550,__lambda_480, &c_7318565);;
++return_direct_with_clo1(data,(closure)&c_7317250,__lambda_480, &c_7317265);;
+ }
+
+-static void __lambda_481(void *data, object self_7313465, int argc, object *args) /* object self_7313465, object r_735407 */
++static void __lambda_481(void *data, object self_7312212, int argc, object *args) /* object self_7312212, object r_734955 */
+ {
+- object r_735407 = args[0];
++ object r_734955 = args[0];
+
+-closureN_type c_7318567;
+-object e_7318606 [5];
+-c_7318567.hdr.mark = gc_color_red;
+- c_7318567.hdr.grayed = 0;
+-c_7318567.tag = closureN_tag;
+- c_7318567.fn = (function_type)__lambda_482;
+-c_7318567.num_args = 1;
+-c_7318567.num_elements = 5;
+-c_7318567.elements = (object *)e_7318606;
+-c_7318567.elements[0] = ((closureN)self_7313465)->elements[0];
+-c_7318567.elements[1] = ((closureN)self_7313465)->elements[1];
+-c_7318567.elements[2] = ((closureN)self_7313465)->elements[2];
+-c_7318567.elements[3] = ((closureN)self_7313465)->elements[3];
+-c_7318567.elements[4] = ((closureN)self_7313465)->elements[4];
++closureN_type c_7317267;
++object e_7317306 [5];
++c_7317267.hdr.mark = gc_color_red;
++ c_7317267.hdr.grayed = 0;
++c_7317267.tag = closureN_tag;
++ c_7317267.fn = (function_type)__lambda_482;
++c_7317267.num_args = 1;
++c_7317267.num_elements = 5;
++c_7317267.elements = (object *)e_7317306;
++c_7317267.elements[0] = ((closureN)self_7312212)->elements[0];
++c_7317267.elements[1] = ((closureN)self_7312212)->elements[1];
++c_7317267.elements[2] = ((closureN)self_7312212)->elements[2];
++c_7317267.elements[3] = ((closureN)self_7312212)->elements[3];
++c_7317267.elements[4] = ((closureN)self_7312212)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318567,__lambda_482, Cyc_set_cell(data, ((closureN)self_7313465)->elements[0], r_735407));;
++return_direct_with_clo1(data,(closure)&c_7317267,__lambda_482, Cyc_set_cell(data, ((closureN)self_7312212)->elements[0], r_734955));;
+ }
+
+-static void __lambda_482(void *data, object self_7313466, int argc, object *args) /* object self_7313466, object r_735398 */
++static void __lambda_482(void *data, object self_7312213, int argc, object *args) /* object self_7312213, object r_734946 */
+ {
+
+
+-closureN_type c_7318569;
+-object e_7318584 [3];
+-c_7318569.hdr.mark = gc_color_red;
+- c_7318569.hdr.grayed = 0;
+-c_7318569.tag = closureN_tag;
+- c_7318569.fn = (function_type)__lambda_483;
+-c_7318569.num_args = 1;
+-c_7318569.num_elements = 3;
+-c_7318569.elements = (object *)e_7318584;
+-c_7318569.elements[0] = ((closureN)self_7313466)->elements[1];
+-c_7318569.elements[1] = ((closureN)self_7313466)->elements[2];
+-c_7318569.elements[2] = ((closureN)self_7313466)->elements[3];
++closureN_type c_7317269;
++object e_7317284 [3];
++c_7317269.hdr.mark = gc_color_red;
++ c_7317269.hdr.grayed = 0;
++c_7317269.tag = closureN_tag;
++ c_7317269.fn = (function_type)__lambda_483;
++c_7317269.num_args = 1;
++c_7317269.num_elements = 3;
++c_7317269.elements = (object *)e_7317284;
++c_7317269.elements[0] = ((closureN)self_7312213)->elements[1];
++c_7317269.elements[1] = ((closureN)self_7312213)->elements[2];
++c_7317269.elements[2] = ((closureN)self_7312213)->elements[3];
+
+
+-closureN_type c_7318585;
+-object e_7318605 [3];
+-c_7318585.hdr.mark = gc_color_red;
+- c_7318585.hdr.grayed = 0;
+-c_7318585.tag = closureN_tag;
+- c_7318585.fn = (function_type)__lambda_485;
+-c_7318585.num_args = 2;
+-c_7318585.num_elements = 3;
+-c_7318585.elements = (object *)e_7318605;
+-c_7318585.elements[0] = ((closureN)self_7313466)->elements[0];
+-c_7318585.elements[1] = ((closureN)self_7313466)->elements[2];
+-c_7318585.elements[2] = ((closureN)self_7313466)->elements[4];
++closureN_type c_7317285;
++object e_7317305 [3];
++c_7317285.hdr.mark = gc_color_red;
++ c_7317285.hdr.grayed = 0;
++c_7317285.tag = closureN_tag;
++ c_7317285.fn = (function_type)__lambda_485;
++c_7317285.num_args = 2;
++c_7317285.num_elements = 3;
++c_7317285.elements = (object *)e_7317305;
++c_7317285.elements[0] = ((closureN)self_7312213)->elements[0];
++c_7317285.elements[1] = ((closureN)self_7312213)->elements[2];
++c_7317285.elements[2] = ((closureN)self_7312213)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7318569,__lambda_483, &c_7318585);;
++return_direct_with_clo1(data,(closure)&c_7317269,__lambda_483, &c_7317285);;
+ }
+
+-static void __lambda_485(void *data, object self_7313467, int argc, object *args) /* object self_7313467, object k_735402, object i_73612_733229, object lst_73613_733230 */
++static void __lambda_485(void *data, object self_7312214, int argc, object *args) /* object self_7312214, object k_734950, object i_73612_732882, object lst_73613_732883 */
+ {
+- object k_735402 = args[0]; object i_73612_733229 = args[1]; object lst_73613_733230 = args[2];
++ object k_734950 = args[0]; object i_73612_732882 = args[1]; object lst_73613_732883 = args[2];
+
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, i_73612_733229, car(((closureN)self_7313467)->elements[0]))) ){
+- return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_735402, primitive_cons, NULL, lst_73613_733230);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73612_732882, car(((closureN)self_7312214)->elements[0]))) ){
++ return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_734950, primitive_cons, NULL, lst_73613_732883);
+ } else {
+
+
+
+-complex_num_type local_7318598;
++complex_num_type local_7317298;
+
+-pair_type local_7318601;
++pair_type local_7317301;
+
+
+-return_closcall3(data, car(((closureN)self_7313467)->elements[1]), k_735402, Cyc_fast_sum(data,&local_7318598, i_73612_733229, obj_int2obj(1)), set_pair_as_expr(&local_7318601, Cyc_vector_ref(data, ((closureN)self_7313467)->elements[2], i_73612_733229), lst_73613_733230));}
++return_closcall3(data, car(((closureN)self_7312214)->elements[1]), k_734950, Cyc_fast_sum(data,&local_7317298, i_73612_732882, obj_int2obj(1)), set_pair_as_expr(&local_7317301, Cyc_vector_ref(data, ((closureN)self_7312214)->elements[2], i_73612_732882), lst_73613_732883));}
+ ;;
+ }
+
+-static void __lambda_483(void *data, object self_7313468, int argc, object *args) /* object self_7313468, object r_735401 */
++static void __lambda_483(void *data, object self_7312215, int argc, object *args) /* object self_7312215, object r_734949 */
+ {
+- object r_735401 = args[0];
++ object r_734949 = args[0];
+
+-closureN_type c_7318571;
+-object e_7318580 [3];
+-c_7318571.hdr.mark = gc_color_red;
+- c_7318571.hdr.grayed = 0;
+-c_7318571.tag = closureN_tag;
+- c_7318571.fn = (function_type)__lambda_484;
+-c_7318571.num_args = 1;
+-c_7318571.num_elements = 3;
+-c_7318571.elements = (object *)e_7318580;
+-c_7318571.elements[0] = ((closureN)self_7313468)->elements[0];
+-c_7318571.elements[1] = ((closureN)self_7313468)->elements[1];
+-c_7318571.elements[2] = ((closureN)self_7313468)->elements[2];
++closureN_type c_7317271;
++object e_7317280 [3];
++c_7317271.hdr.mark = gc_color_red;
++ c_7317271.hdr.grayed = 0;
++c_7317271.tag = closureN_tag;
++ c_7317271.fn = (function_type)__lambda_484;
++c_7317271.num_args = 1;
++c_7317271.num_elements = 3;
++c_7317271.elements = (object *)e_7317280;
++c_7317271.elements[0] = ((closureN)self_7312215)->elements[0];
++c_7317271.elements[1] = ((closureN)self_7312215)->elements[1];
++c_7317271.elements[2] = ((closureN)self_7312215)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318571,__lambda_484, Cyc_set_cell(data, ((closureN)self_7313468)->elements[1], r_735401));;
++return_direct_with_clo1(data,(closure)&c_7317271,__lambda_484, Cyc_set_cell(data, ((closureN)self_7312215)->elements[1], r_734949));;
+ }
+
+-static void __lambda_484(void *data, object self_7313469, int argc, object *args) /* object self_7313469, object r_735399 */
++static void __lambda_484(void *data, object self_7312216, int argc, object *args) /* object self_7312216, object r_734947 */
+ {
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313469)->elements[1]), ((closureN)self_7313469)->elements[0], car(((closureN)self_7313469)->elements[2]), NULL);;
++return_closcall3(data, car(((closureN)self_7312216)->elements[1]), ((closureN)self_7312216)->elements[0], car(((closureN)self_7312216)->elements[2]), NULL);;
+ }
+
+-static void __lambda_480(void *data, object self_7313470, int argc, object *args) /* object self_7313470, object k_735408 */
++static void __lambda_480(void *data, object self_7312217, int argc, object *args) /* object self_7312217, object k_734956 */
+ {
+- object k_735408 = args[0];
++ object k_734956 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313470)->elements[1]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312217)->elements[1]), obj_int2obj(1))) ){
+
+
+-return_direct_with_clo1(data, k_735408,__lambda_481, Cyc_cadr(data, ((closureN)self_7313470)->elements[1]));
++return_direct_with_clo1(data, k_734956,__lambda_481, Cyc_cadr(data, ((closureN)self_7312217)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735408,__lambda_481, car(((closureN)self_7313470)->elements[0]));}
++return_direct_with_clo1(data, k_734956,__lambda_481, car(((closureN)self_7312217)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_475(void *data, object _, int argc, object *args) /* closure _,object k_735392, object objs_73605_733222_raw, ... */
++static void __lambda_475(void *data, object _, int argc, object *args) /* closure _,object k_734940, object objs_73605_732875_raw, ... */
+ {
+-object k_735392 = args[0];
+-load_varargs(objs_73605_733222, args, 1, argc - 1);
++object k_734940 = args[0];
++load_varargs(objs_73605_732875, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:vector");
+
+-object c_7318522 = Cyc_list2vector(data, k_735392,objs_73605_733222);
+-return_direct_with_clo1(data, k_735392, (((closure) k_735392)->fn), c_7318522);;
++object c_7317222 = Cyc_list2vector(data, k_734940,objs_73605_732875);
++return_direct_with_clo1(data, k_734940, (((closure) k_734940)->fn), c_7317222);;
+ }
+
+-static void __lambda_474(void *data, object _, int argc, object *args) /* closure _,object k_735388, object lst_73604_733221 */
++static void __lambda_474(void *data, object _, int argc, object *args) /* closure _,object k_734936, object lst_73604_732874 */
+ {
+-object k_735388 = args[0]; object lst_73604_733221 = args[1];
++object k_734936 = args[0]; object lst_73604_732874 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:reverse");
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_735388, primitive_cons, NULL, lst_73604_733221);;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), k_734936, primitive_cons, NULL, lst_73604_732874);;
+ }
+
+-static void __lambda_472(void *data, object _, int argc, object *args) /* closure _,object k_735384, object lst_73600_733217, object k_73601_733218, object obj_73602_733219 */
++static void __lambda_472(void *data, object _, int argc, object *args) /* closure _,object k_734932, object lst_73600_732870, object k_73601_732871, object obj_73602_732872 */
+ {
+-object k_735384 = args[0]; object lst_73600_733217 = args[1]; object k_73601_733218 = args[2]; object obj_73602_733219 = args[3];
++object k_734932 = args[0]; object lst_73600_732870 = args[1]; object k_73601_732871 = args[2]; object obj_73602_732872 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:list-set!");
+
+-closureN_type c_7318508;
+-object e_7318515 [2];
+-c_7318508.hdr.mark = gc_color_red;
+- c_7318508.hdr.grayed = 0;
+-c_7318508.tag = closureN_tag;
+- c_7318508.fn = (function_type)__lambda_473;
+-c_7318508.num_args = 1;
+-c_7318508.num_elements = 2;
+-c_7318508.elements = (object *)e_7318515;
+-c_7318508.elements[0] = k_735384;
+-c_7318508.elements[1] = obj_73602_733219;
++closureN_type c_7317208;
++object e_7317215 [2];
++c_7317208.hdr.mark = gc_color_red;
++ c_7317208.hdr.grayed = 0;
++c_7317208.tag = closureN_tag;
++ c_7317208.fn = (function_type)__lambda_473;
++c_7317208.num_args = 1;
++c_7317208.num_elements = 2;
++c_7317208.elements = (object *)e_7317215;
++c_7317208.elements[0] = k_734932;
++c_7317208.elements[1] = obj_73602_732872;
+
+-return_direct_with_clo3(data, __glo_list_91tail_scheme_base, (((closure) __glo_list_91tail_scheme_base)->fn), &c_7318508, lst_73600_733217, k_73601_733218);;
++return_direct_with_clo3(data, __glo_list_91tail_scheme_base, (((closure) __glo_list_91tail_scheme_base)->fn), &c_7317208, lst_73600_732870, k_73601_732871);;
+ }
+
+-static void __lambda_473(void *data, object self_7313457, int argc, object *args) /* object self_7313457, object kth_73603_733220 */
++static void __lambda_473(void *data, object self_7312204, int argc, object *args) /* object self_7312204, object kth_73603_732873 */
+ {
+- object kth_73603_733220 = args[0];
++ object kth_73603_732873 = args[0];
+
+-object c_7318513 = Cyc_set_car_cps(data, ((closureN)self_7313457)->elements[0],kth_73603_733220, ((closureN)self_7313457)->elements[1]);
+-return_direct_with_clo1(data, ((closureN)self_7313457)->elements[0], (((closure) ((closureN)self_7313457)->elements[0])->fn), c_7318513);;
++object c_7317213 = Cyc_set_car_cps(data, ((closureN)self_7312204)->elements[0],kth_73603_732873, ((closureN)self_7312204)->elements[1]);
++return_direct_with_clo1(data, ((closureN)self_7312204)->elements[0], (((closure) ((closureN)self_7312204)->elements[0])->fn), c_7317213);;
+ }
+
+-static void __lambda_470(void *data, object _, int argc, object *args) /* closure _,object k_735380, object lst_73598_733215, object k_73599_733216 */
++static void __lambda_470(void *data, object _, int argc, object *args) /* closure _,object k_734928, object lst_73598_732868, object k_73599_732869 */
+ {
+-object k_735380 = args[0]; object lst_73598_733215 = args[1]; object k_73599_733216 = args[2];
++object k_734928 = args[0]; object lst_73598_732868 = args[1]; object k_73599_732869 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:list-ref");
+
+-closureN_type c_7318500;
+-object e_7318505 [1];
+-c_7318500.hdr.mark = gc_color_red;
+- c_7318500.hdr.grayed = 0;
+-c_7318500.tag = closureN_tag;
+- c_7318500.fn = (function_type)__lambda_471;
+-c_7318500.num_args = 1;
+-c_7318500.num_elements = 1;
+-c_7318500.elements = (object *)e_7318505;
+-c_7318500.elements[0] = k_735380;
++closureN_type c_7317200;
++object e_7317205 [1];
++c_7317200.hdr.mark = gc_color_red;
++ c_7317200.hdr.grayed = 0;
++c_7317200.tag = closureN_tag;
++ c_7317200.fn = (function_type)__lambda_471;
++c_7317200.num_args = 1;
++c_7317200.num_elements = 1;
++c_7317200.elements = (object *)e_7317205;
++c_7317200.elements[0] = k_734928;
+
+-return_direct_with_clo3(data, __glo_list_91tail_scheme_base, (((closure) __glo_list_91tail_scheme_base)->fn), &c_7318500, lst_73598_733215, k_73599_733216);;
++return_direct_with_clo3(data, __glo_list_91tail_scheme_base, (((closure) __glo_list_91tail_scheme_base)->fn), &c_7317200, lst_73598_732868, k_73599_732869);;
+ }
+
+-static void __lambda_471(void *data, object self_7313456, int argc, object *args) /* object self_7313456, object r_735381 */
++static void __lambda_471(void *data, object self_7312203, int argc, object *args) /* object self_7312203, object r_734929 */
+ {
+- object r_735381 = args[0];
++ object r_734929 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313456)->elements[0], (((closure) ((closureN)self_7313456)->elements[0])->fn), Cyc_car(data, r_735381));;
++return_direct_with_clo1(data, ((closureN)self_7312203)->elements[0], (((closure) ((closureN)self_7312203)->elements[0])->fn), Cyc_car(data, r_734929));;
+ }
+
+-static void __lambda_469(void *data, object _, int argc, object *args) /* closure _,object k_735374, object lst_73596_733213, object k_73597_733214 */
++static void __lambda_469(void *data, object _, int argc, object *args) /* closure _,object k_734922, object lst_73596_732866, object k_73597_732867 */
+ {
+-object k_735374 = args[0]; object lst_73596_733213 = args[1]; object k_73597_733214 = args[2];
++object k_734922 = args[0]; object lst_73596_732866 = args[1]; object k_73597_732867 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:list-tail");
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, k_73597_733214, obj_int2obj(0))) ){
+- return_direct_with_clo1(data, k_735374, (((closure) k_735374)->fn), lst_73596_733213);
++if( (boolean_f != Cyc_num_fast_eq_op(data, k_73597_732867, obj_int2obj(0))) ){
++ return_direct_with_clo1(data, k_734922, (((closure) k_734922)->fn), lst_73596_732866);
+ } else {
+
+
+
+-complex_num_type local_7318497;
+-return_direct_with_clo3(data, __glo_list_91tail_scheme_base, (((closure) __glo_list_91tail_scheme_base)->fn), k_735374, Cyc_cdr(data, lst_73596_733213), Cyc_fast_sub(data,&local_7318497, k_73597_733214, obj_int2obj(1)));}
++complex_num_type local_7317197;
++return_direct_with_clo3(data, __glo_list_91tail_scheme_base, (((closure) __glo_list_91tail_scheme_base)->fn), k_734922, Cyc_cdr(data, lst_73596_732866), Cyc_fast_sub(data,&local_7317197, k_73597_732867, obj_int2obj(1)));}
+ ;;
+ }
+
+-static void __lambda_457(void *data, object _, int argc, object *args) /* closure _,object k_735353, object f_73587_733205, object lis1_73588_733206, object lists_73589_733207_raw, ... */
++static void __lambda_457(void *data, object _, int argc, object *args) /* closure _,object k_734901, object f_73587_732858, object lis1_73588_732859, object lists_73589_732860_raw, ... */
+ {
+-object k_735353 = args[0]; object f_73587_733205 = args[1]; object lis1_73588_733206 = args[2];
+-load_varargs(lists_73589_733207, args, 3, argc - 3);
++object k_734901 = args[0]; object f_73587_732858 = args[1]; object lis1_73588_732859 = args[2];
++load_varargs(lists_73589_732860, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:for-each");
+
+-if( (boolean_f != Cyc_is_null(lis1_73588_733206)) ){
+- return_direct_with_clo1(data, k_735353, (((closure) k_735353)->fn), Cyc_VOID);
++if( (boolean_f != Cyc_is_null(lis1_73588_732859)) ){
++ return_direct_with_clo1(data, k_734901, (((closure) k_734901)->fn), Cyc_VOID);
+ } else {
+
+-if( (boolean_f != Cyc_is_pair(lists_73589_733207)) ){
++if( (boolean_f != Cyc_is_pair(lists_73589_732860)) ){
+
+-closureN_type c_7318408;
+-object e_7318466 [2];
+-c_7318408.hdr.mark = gc_color_red;
+- c_7318408.hdr.grayed = 0;
+-c_7318408.tag = closureN_tag;
+- c_7318408.fn = (function_type)__lambda_458;
+-c_7318408.num_args = 1;
+-c_7318408.num_elements = 2;
+-c_7318408.elements = (object *)e_7318466;
+-c_7318408.elements[0] = f_73587_733205;
+-c_7318408.elements[1] = k_735353;
++closureN_type c_7317108;
++object e_7317166 [2];
++c_7317108.hdr.mark = gc_color_red;
++ c_7317108.hdr.grayed = 0;
++c_7317108.tag = closureN_tag;
++ c_7317108.fn = (function_type)__lambda_458;
++c_7317108.num_args = 1;
++c_7317108.num_elements = 2;
++c_7317108.elements = (object *)e_7317166;
++c_7317108.elements[0] = f_73587_732858;
++c_7317108.elements[1] = k_734901;
+
+
+-pair_type local_7318469;
+-return_direct_with_clo1(data,(closure)&c_7318408,__lambda_458, set_pair_as_expr(&local_7318469, lis1_73588_733206, lists_73589_733207));
++pair_type local_7317169;
++return_direct_with_clo1(data,(closure)&c_7317108,__lambda_458, set_pair_as_expr(&local_7317169, lis1_73588_732859, lists_73589_732860));
+ } else {
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis1_73588_733206))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis1_73588_732859))) ){
+
+
+-return_closcall2(data, f_73587_733205, k_735353, Cyc_car(data, lis1_73588_733206));
++return_closcall2(data, f_73587_732858, k_734901, Cyc_car(data, lis1_73588_732859));
+ } else {
+
+-closureN_type c_7318478;
+-object e_7318485 [3];
+-c_7318478.hdr.mark = gc_color_red;
+- c_7318478.hdr.grayed = 0;
+-c_7318478.tag = closureN_tag;
+- c_7318478.fn = (function_type)__lambda_468;
+-c_7318478.num_args = 1;
+-c_7318478.num_elements = 3;
+-c_7318478.elements = (object *)e_7318485;
+-c_7318478.elements[0] = f_73587_733205;
+-c_7318478.elements[1] = k_735353;
+-c_7318478.elements[2] = lis1_73588_733206;
++closureN_type c_7317178;
++object e_7317185 [3];
++c_7317178.hdr.mark = gc_color_red;
++ c_7317178.hdr.grayed = 0;
++c_7317178.tag = closureN_tag;
++ c_7317178.fn = (function_type)__lambda_468;
++c_7317178.num_args = 1;
++c_7317178.num_elements = 3;
++c_7317178.elements = (object *)e_7317185;
++c_7317178.elements[0] = f_73587_732858;
++c_7317178.elements[1] = k_734901;
++c_7317178.elements[2] = lis1_73588_732859;
+
+
+
+-return_closcall2(data, f_73587_733205, &c_7318478, Cyc_car(data, lis1_73588_733206));}
++return_closcall2(data, f_73587_732858, &c_7317178, Cyc_car(data, lis1_73588_732859));}
+ ;}
+ ;}
+ ;;
+ }
+
+-static void __lambda_468(void *data, object self_7313455, int argc, object *args) /* object self_7313455, object r_735368 */
++static void __lambda_468(void *data, object self_7312202, int argc, object *args) /* object self_7312202, object r_734916 */
+ {
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure) __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn), ((closureN)self_7313455)->elements[1], ((closureN)self_7313455)->elements[0], Cyc_cdr(data, ((closureN)self_7313455)->elements[2]));;
++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_7312202)->elements[1], ((closureN)self_7312202)->elements[0], Cyc_cdr(data, ((closureN)self_7312202)->elements[2]));;
+ }
+
+-static void __lambda_458(void *data, object self_7313444, int argc, object *args) /* object self_7313444, object lists_73591_733208 */
++static void __lambda_458(void *data, object self_7312191, int argc, object *args) /* object self_7312191, object lists_73591_732861 */
+ {
+- object lists_73591_733208 = args[0];
++ object lists_73591_732861 = args[0];
+
+-closureN_type c_7318410;
+-object e_7318465 [3];
+-c_7318410.hdr.mark = gc_color_red;
+- c_7318410.hdr.grayed = 0;
+-c_7318410.tag = closureN_tag;
+- c_7318410.fn = (function_type)__lambda_459;
+-c_7318410.num_args = 1;
+-c_7318410.num_elements = 3;
+-c_7318410.elements = (object *)e_7318465;
+-c_7318410.elements[0] = ((closureN)self_7313444)->elements[0];
+-c_7318410.elements[1] = ((closureN)self_7313444)->elements[1];
+-c_7318410.elements[2] = lists_73591_733208;
++closureN_type c_7317110;
++object e_7317165 [3];
++c_7317110.hdr.mark = gc_color_red;
++ c_7317110.hdr.grayed = 0;
++c_7317110.tag = closureN_tag;
++ c_7317110.fn = (function_type)__lambda_459;
++c_7317110.num_args = 1;
++c_7317110.num_elements = 3;
++c_7317110.elements = (object *)e_7317165;
++c_7317110.elements[0] = ((closureN)self_7312191)->elements[0];
++c_7317110.elements[1] = ((closureN)self_7312191)->elements[1];
++c_7317110.elements[2] = lists_73591_732861;
+
+-return_direct_with_clo1(data,(closure)&c_7318410,__lambda_459, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7317110,__lambda_459, boolean_f);;
+ }
+
+-static void __lambda_459(void *data, object self_7313445, int argc, object *args) /* object self_7313445, object recur_73592_733209 */
++static void __lambda_459(void *data, object self_7312192, int argc, object *args) /* object self_7312192, object recur_73592_732862 */
+ {
+- object recur_73592_733209 = args[0];
++ object recur_73592_732862 = args[0];
+
+-closureN_type c_7318412;
+-object e_7318461 [3];
+-c_7318412.hdr.mark = gc_color_red;
+- c_7318412.hdr.grayed = 0;
+-c_7318412.tag = closureN_tag;
+- c_7318412.fn = (function_type)__lambda_1373;
+-c_7318412.num_args = 1;
+-c_7318412.num_elements = 3;
+-c_7318412.elements = (object *)e_7318461;
+-c_7318412.elements[0] = ((closureN)self_7313445)->elements[0];
+-c_7318412.elements[1] = ((closureN)self_7313445)->elements[1];
+-c_7318412.elements[2] = ((closureN)self_7313445)->elements[2];
++closureN_type c_7317112;
++object e_7317161 [3];
++c_7317112.hdr.mark = gc_color_red;
++ c_7317112.hdr.grayed = 0;
++c_7317112.tag = closureN_tag;
++ c_7317112.fn = (function_type)__lambda_1326;
++c_7317112.num_args = 1;
++c_7317112.num_elements = 3;
++c_7317112.elements = (object *)e_7317161;
++c_7317112.elements[0] = ((closureN)self_7312192)->elements[0];
++c_7317112.elements[1] = ((closureN)self_7312192)->elements[1];
++c_7317112.elements[2] = ((closureN)self_7312192)->elements[2];
+
+
+-pair_type local_7318464;
+-return_direct_with_clo1(data,(closure)&c_7318412,__lambda_1373, set_cell_as_expr(&local_7318464, recur_73592_733209));;
++pair_type local_7317164;
++return_direct_with_clo1(data,(closure)&c_7317112,__lambda_1326, set_cell_as_expr(&local_7317164, recur_73592_732862));;
+ }
+
+-static void __lambda_1373(void *data, object self_7313446, int argc, object *args) /* object self_7313446, object recur_73592_733209 */
++static void __lambda_1326(void *data, object self_7312193, int argc, object *args) /* object self_7312193, object recur_73592_732862 */
+ {
+- object recur_73592_733209 = args[0];
++ object recur_73592_732862 = args[0];
+
+-closureN_type c_7318414;
+-object e_7318427 [3];
+-c_7318414.hdr.mark = gc_color_red;
+- c_7318414.hdr.grayed = 0;
+-c_7318414.tag = closureN_tag;
+- c_7318414.fn = (function_type)__lambda_460;
+-c_7318414.num_args = 1;
+-c_7318414.num_elements = 3;
+-c_7318414.elements = (object *)e_7318427;
+-c_7318414.elements[0] = ((closureN)self_7313446)->elements[1];
+-c_7318414.elements[1] = ((closureN)self_7313446)->elements[2];
+-c_7318414.elements[2] = recur_73592_733209;
++closureN_type c_7317114;
++object e_7317127 [3];
++c_7317114.hdr.mark = gc_color_red;
++ c_7317114.hdr.grayed = 0;
++c_7317114.tag = closureN_tag;
++ c_7317114.fn = (function_type)__lambda_460;
++c_7317114.num_args = 1;
++c_7317114.num_elements = 3;
++c_7317114.elements = (object *)e_7317127;
++c_7317114.elements[0] = ((closureN)self_7312193)->elements[1];
++c_7317114.elements[1] = ((closureN)self_7312193)->elements[2];
++c_7317114.elements[2] = recur_73592_732862;
+
+
+-closureN_type c_7318428;
+-object e_7318460 [2];
+-c_7318428.hdr.mark = gc_color_red;
+- c_7318428.hdr.grayed = 0;
+-c_7318428.tag = closureN_tag;
+- c_7318428.fn = (function_type)__lambda_462;
+-c_7318428.num_args = 1;
+-c_7318428.num_elements = 2;
+-c_7318428.elements = (object *)e_7318460;
+-c_7318428.elements[0] = ((closureN)self_7313446)->elements[0];
+-c_7318428.elements[1] = recur_73592_733209;
++closureN_type c_7317128;
++object e_7317160 [2];
++c_7317128.hdr.mark = gc_color_red;
++ c_7317128.hdr.grayed = 0;
++c_7317128.tag = closureN_tag;
++ c_7317128.fn = (function_type)__lambda_462;
++c_7317128.num_args = 1;
++c_7317128.num_elements = 2;
++c_7317128.elements = (object *)e_7317160;
++c_7317128.elements[0] = ((closureN)self_7312193)->elements[0];
++c_7317128.elements[1] = recur_73592_732862;
+
+-return_direct_with_clo1(data,(closure)&c_7318414,__lambda_460, &c_7318428);;
++return_direct_with_clo1(data,(closure)&c_7317114,__lambda_460, &c_7317128);;
+ }
+
+-static void __lambda_462(void *data, object self_7313447, int argc, object *args) /* object self_7313447, object k_735359, object lists_73593_733210 */
++static void __lambda_462(void *data, object self_7312194, int argc, object *args) /* object self_7312194, object k_734907, object lists_73593_732863 */
+ {
+- object k_735359 = args[0]; object lists_73593_733210 = args[1];
++ object k_734907 = args[0]; object lists_73593_732863 = args[1];
+
+-closureN_type c_7318430;
+-object e_7318455 [3];
+-c_7318430.hdr.mark = gc_color_red;
+- c_7318430.hdr.grayed = 0;
+-c_7318430.tag = closureN_tag;
+- c_7318430.fn = (function_type)__lambda_463;
+-c_7318430.num_args = 1;
+-c_7318430.num_elements = 3;
+-c_7318430.elements = (object *)e_7318455;
+-c_7318430.elements[0] = ((closureN)self_7313447)->elements[0];
+-c_7318430.elements[1] = k_735359;
+-c_7318430.elements[2] = ((closureN)self_7313447)->elements[1];
++closureN_type c_7317130;
++object e_7317155 [3];
++c_7317130.hdr.mark = gc_color_red;
++ c_7317130.hdr.grayed = 0;
++c_7317130.tag = closureN_tag;
++ c_7317130.fn = (function_type)__lambda_463;
++c_7317130.num_args = 1;
++c_7317130.num_elements = 3;
++c_7317130.elements = (object *)e_7317155;
++c_7317130.elements[0] = ((closureN)self_7312194)->elements[0];
++c_7317130.elements[1] = k_734907;
++c_7317130.elements[2] = ((closureN)self_7312194)->elements[1];
+
+
+-closureN_type c_7318456;
+-object e_7318459 [1];
+-c_7318456.hdr.mark = gc_color_red;
+- c_7318456.hdr.grayed = 0;
+-c_7318456.tag = closureN_tag;
+- c_7318456.fn = (function_type)__lambda_467;
+-c_7318456.num_args = 0;
+-c_7318456.num_elements = 1;
+-c_7318456.elements = (object *)e_7318459;
+-c_7318456.elements[0] = lists_73593_733210;
++closureN_type c_7317156;
++object e_7317159 [1];
++c_7317156.hdr.mark = gc_color_red;
++ c_7317156.hdr.grayed = 0;
++c_7317156.tag = closureN_tag;
++ c_7317156.fn = (function_type)__lambda_467;
++c_7317156.num_args = 0;
++c_7317156.num_elements = 1;
++c_7317156.elements = (object *)e_7317159;
++c_7317156.elements[0] = lists_73593_732863;
+
+-return_direct_with_clo1(data,(closure)&c_7318430,__lambda_463, &c_7318456);;
++return_direct_with_clo1(data,(closure)&c_7317130,__lambda_463, &c_7317156);;
+ }
+
+-static void __lambda_467(void *data, object self_7313448, int argc, object *args) /* object self_7313448, object k_735365 */
++static void __lambda_467(void *data, object self_7312195, int argc, object *args) /* object self_7312195, object k_734913 */
+ {
+- object k_735365 = args[0];
+- return_direct_with_clo2(data, __glo__75cars_87cdrs_scheme_base, (((closure) __glo__75cars_87cdrs_scheme_base)->fn), k_735365, ((closureN)self_7313448)->elements[0]);;
++ object k_734913 = args[0];
++ return_direct_with_clo2(data, __glo__75cars_87cdrs_scheme_base, (((closure) __glo__75cars_87cdrs_scheme_base)->fn), k_734913, ((closureN)self_7312195)->elements[0]);;
+ }
+
+-static void __lambda_463(void *data, object self_7313449, int argc, object *args) /* object self_7313449, object r_735360 */
++static void __lambda_463(void *data, object self_7312196, int argc, object *args) /* object self_7312196, object r_734908 */
+ {
+- object r_735360 = args[0];
++ object r_734908 = args[0];
+
+-closureN_type c_7318432;
+-object e_7318436 [2];
+-c_7318432.hdr.mark = gc_color_red;
+- c_7318432.hdr.grayed = 0;
+-c_7318432.tag = closureN_tag;
+- c_7318432.fn = (function_type)__lambda_464;
+-c_7318432.num_args = 1;
+-c_7318432.num_elements = 2;
+-c_7318432.elements = (object *)e_7318436;
+-c_7318432.elements[0] = ((closureN)self_7313449)->elements[1];
+-c_7318432.elements[1] = r_735360;
++closureN_type c_7317132;
++object e_7317136 [2];
++c_7317132.hdr.mark = gc_color_red;
++ c_7317132.hdr.grayed = 0;
++c_7317132.tag = closureN_tag;
++ c_7317132.fn = (function_type)__lambda_464;
++c_7317132.num_args = 1;
++c_7317132.num_elements = 2;
++c_7317132.elements = (object *)e_7317136;
++c_7317132.elements[0] = ((closureN)self_7312196)->elements[1];
++c_7317132.elements[1] = r_734908;
+
+
+-closureN_type c_7318437;
+-object e_7318454 [2];
+-c_7318437.hdr.mark = gc_color_red;
+- c_7318437.hdr.grayed = 0;
+-c_7318437.tag = closureN_tag;
+- c_7318437.fn = (function_type)__lambda_465;
+-c_7318437.num_args = 2;
+-c_7318437.num_elements = 2;
+-c_7318437.elements = (object *)e_7318454;
+-c_7318437.elements[0] = ((closureN)self_7313449)->elements[0];
+-c_7318437.elements[1] = ((closureN)self_7313449)->elements[2];
++closureN_type c_7317137;
++object e_7317154 [2];
++c_7317137.hdr.mark = gc_color_red;
++ c_7317137.hdr.grayed = 0;
++c_7317137.tag = closureN_tag;
++ c_7317137.fn = (function_type)__lambda_465;
++c_7317137.num_args = 2;
++c_7317137.num_elements = 2;
++c_7317137.elements = (object *)e_7317154;
++c_7317137.elements[0] = ((closureN)self_7312196)->elements[0];
++c_7317137.elements[1] = ((closureN)self_7312196)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7318432,__lambda_464, &c_7318437);;
++return_direct_with_clo1(data,(closure)&c_7317132,__lambda_464, &c_7317137);;
+ }
+
+-static void __lambda_465(void *data, object self_7313450, int argc, object *args) /* object self_7313450, object k_735362, object cars_73594_733211, object cdrs_73595_733212 */
++static void __lambda_465(void *data, object self_7312197, int argc, object *args) /* object self_7312197, object k_734910, object cars_73594_732864, object cdrs_73595_732865 */
+ {
+- object k_735362 = args[0]; object cars_73594_733211 = args[1]; object cdrs_73595_733212 = args[2];
++ object k_734910 = args[0]; object cars_73594_732864 = args[1]; object cdrs_73595_732865 = args[2];
+
+-if( (boolean_f != Cyc_is_pair(cars_73594_733211)) ){
++if( (boolean_f != Cyc_is_pair(cars_73594_732864)) ){
+
+-closureN_type c_7318441;
+-object e_7318448 [3];
+-c_7318441.hdr.mark = gc_color_red;
+- c_7318441.hdr.grayed = 0;
+-c_7318441.tag = closureN_tag;
+- c_7318441.fn = (function_type)__lambda_466;
+-c_7318441.num_args = 1;
+-c_7318441.num_elements = 3;
+-c_7318441.elements = (object *)e_7318448;
+-c_7318441.elements[0] = cdrs_73595_733212;
+-c_7318441.elements[1] = k_735362;
+-c_7318441.elements[2] = ((closureN)self_7313450)->elements[1];
++closureN_type c_7317141;
++object e_7317148 [3];
++c_7317141.hdr.mark = gc_color_red;
++ c_7317141.hdr.grayed = 0;
++c_7317141.tag = closureN_tag;
++ c_7317141.fn = (function_type)__lambda_466;
++c_7317141.num_args = 1;
++c_7317141.num_elements = 3;
++c_7317141.elements = (object *)e_7317148;
++c_7317141.elements[0] = cdrs_73595_732865;
++c_7317141.elements[1] = k_734910;
++c_7317141.elements[2] = ((closureN)self_7312197)->elements[1];
+
+
+-object c_7318451 = apply(data,(closure)&c_7318441,((closureN)self_7313450)->elements[0], cars_73594_733211);
+-return_closcall1(data,(closure)&c_7318441, c_7318451);
++object c_7317151 = apply(data,(closure)&c_7317141,((closureN)self_7312197)->elements[0], cars_73594_732864);
++return_closcall1(data,(closure)&c_7317141, c_7317151);
+ } else {
+- return_direct_with_clo1(data, k_735362, (((closure) k_735362)->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, k_734910, (((closure) k_734910)->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_466(void *data, object self_7313451, int argc, object *args) /* object self_7313451, object r_735364 */
++static void __lambda_466(void *data, object self_7312198, int argc, object *args) /* object self_7312198, object r_734912 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313451)->elements[2]), ((closureN)self_7313451)->elements[1], ((closureN)self_7313451)->elements[0]);;
++return_closcall2(data, car(((closureN)self_7312198)->elements[2]), ((closureN)self_7312198)->elements[1], ((closureN)self_7312198)->elements[0]);;
+ }
+
+-static void __lambda_464(void *data, object self_7313452, int argc, object *args) /* object self_7313452, object r_735361 */
++static void __lambda_464(void *data, object self_7312199, int argc, object *args) /* object self_7312199, object r_734909 */
+ {
+- object r_735361 = args[0];
+- return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7313452)->elements[0], ((closureN)self_7313452)->elements[1], r_735361);;
++ object r_734909 = args[0];
++ return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7312199)->elements[0], ((closureN)self_7312199)->elements[1], r_734909);;
+ }
+
+-static void __lambda_460(void *data, object self_7313453, int argc, object *args) /* object self_7313453, object r_735358 */
++static void __lambda_460(void *data, object self_7312200, int argc, object *args) /* object self_7312200, object r_734906 */
+ {
+- object r_735358 = args[0];
++ object r_734906 = args[0];
+
+-closureN_type c_7318416;
+-object e_7318423 [3];
+-c_7318416.hdr.mark = gc_color_red;
+- c_7318416.hdr.grayed = 0;
+-c_7318416.tag = closureN_tag;
+- c_7318416.fn = (function_type)__lambda_461;
+-c_7318416.num_args = 1;
+-c_7318416.num_elements = 3;
+-c_7318416.elements = (object *)e_7318423;
+-c_7318416.elements[0] = ((closureN)self_7313453)->elements[0];
+-c_7318416.elements[1] = ((closureN)self_7313453)->elements[1];
+-c_7318416.elements[2] = ((closureN)self_7313453)->elements[2];
++closureN_type c_7317116;
++object e_7317123 [3];
++c_7317116.hdr.mark = gc_color_red;
++ c_7317116.hdr.grayed = 0;
++c_7317116.tag = closureN_tag;
++ c_7317116.fn = (function_type)__lambda_461;
++c_7317116.num_args = 1;
++c_7317116.num_elements = 3;
++c_7317116.elements = (object *)e_7317123;
++c_7317116.elements[0] = ((closureN)self_7312200)->elements[0];
++c_7317116.elements[1] = ((closureN)self_7312200)->elements[1];
++c_7317116.elements[2] = ((closureN)self_7312200)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318416,__lambda_461, Cyc_set_cell(data, ((closureN)self_7313453)->elements[2], r_735358));;
++return_direct_with_clo1(data,(closure)&c_7317116,__lambda_461, Cyc_set_cell(data, ((closureN)self_7312200)->elements[2], r_734906));;
+ }
+
+-static void __lambda_461(void *data, object self_7313454, int argc, object *args) /* object self_7313454, object r_735357 */
++static void __lambda_461(void *data, object self_7312201, int argc, object *args) /* object self_7312201, object r_734905 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313454)->elements[2]), ((closureN)self_7313454)->elements[0], ((closureN)self_7313454)->elements[1]);;
++return_closcall2(data, car(((closureN)self_7312201)->elements[2]), ((closureN)self_7312201)->elements[0], ((closureN)self_7312201)->elements[1]);;
+ }
+
+-static void __lambda_455(void *data, object _, int argc, object *args) /* closure _,object k_735342, object f_73580_733201, object lst1_73581_733202, object lst2_73582_733203 */
++static void __lambda_455(void *data, object _, int argc, object *args) /* closure _,object k_734890, object f_73580_732854, object lst1_73581_732855, object lst2_73582_732856 */
+ {
+-object k_735342 = args[0]; object f_73580_733201 = args[1]; object lst1_73581_733202 = args[2]; object lst2_73582_733203 = args[3];
+- object r_735343;
++object k_734890 = args[0]; object f_73580_732854 = args[1]; object lst1_73581_732855 = args[2]; object lst2_73582_732856 = args[3];
++ object r_734891;
+ Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-2");
+
+-if( (boolean_f != Cyc_is_null(lst1_73581_733202)) ){
++if( (boolean_f != Cyc_is_null(lst1_73581_732855)) ){
+
+- r_735343 = Cyc_is_null(lst1_73581_733202);
++ r_734891 = Cyc_is_null(lst1_73581_732855);
+ } else {
+
+- r_735343 = Cyc_is_null(lst2_73582_733203);}
+-;if( (boolean_f != r_735343) ){
++ r_734891 = Cyc_is_null(lst2_73582_732856);}
++;if( (boolean_f != r_734891) ){
+
+-complex_num_type local_7318384;
+-return_direct_with_clo1(data, k_735342, (((closure) k_735342)->fn), ((inline_function_type)
+- ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7318384));
++complex_num_type local_7317084;
++return_direct_with_clo1(data, k_734890, (((closure) k_734890)->fn), ((inline_function_type)
++ ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7317084));
+ } else {
+
+-closureN_type c_7318386;
+-object e_7318396 [4];
+-c_7318386.hdr.mark = gc_color_red;
+- c_7318386.hdr.grayed = 0;
+-c_7318386.tag = closureN_tag;
+- c_7318386.fn = (function_type)__lambda_456;
+-c_7318386.num_args = 1;
+-c_7318386.num_elements = 4;
+-c_7318386.elements = (object *)e_7318396;
+-c_7318386.elements[0] = f_73580_733201;
+-c_7318386.elements[1] = k_735342;
+-c_7318386.elements[2] = lst1_73581_733202;
+-c_7318386.elements[3] = lst2_73582_733203;
++closureN_type c_7317086;
++object e_7317096 [4];
++c_7317086.hdr.mark = gc_color_red;
++ c_7317086.hdr.grayed = 0;
++c_7317086.tag = closureN_tag;
++ c_7317086.fn = (function_type)__lambda_456;
++c_7317086.num_args = 1;
++c_7317086.num_elements = 4;
++c_7317086.elements = (object *)e_7317096;
++c_7317086.elements[0] = f_73580_732854;
++c_7317086.elements[1] = k_734890;
++c_7317086.elements[2] = lst1_73581_732855;
++c_7317086.elements[3] = lst2_73582_732856;
+
+
+
+
+
+-return_closcall3(data, f_73580_733201, &c_7318386, Cyc_car(data, lst1_73581_733202), Cyc_car(data, lst2_73582_733203));}
++return_closcall3(data, f_73580_732854, &c_7317086, Cyc_car(data, lst1_73581_732855), Cyc_car(data, lst2_73582_732856));}
+ ;;
+ }
+
+-static void __lambda_456(void *data, object self_7313443, int argc, object *args) /* object self_7313443, object r_735344 */
++static void __lambda_456(void *data, object self_7312190, int argc, object *args) /* object self_7312190, object r_734892 */
+ {
+
+
+
+
+
+-return_direct_with_clo4(data, __glo_Cyc_91for_91each_91loop_912_scheme_base, (((closure) __glo_Cyc_91for_91each_91loop_912_scheme_base)->fn), ((closureN)self_7313443)->elements[1], ((closureN)self_7313443)->elements[0], Cyc_cdr(data, ((closureN)self_7313443)->elements[2]), Cyc_cdr(data, ((closureN)self_7313443)->elements[3]));;
++return_direct_with_clo4(data, __glo_Cyc_91for_91each_91loop_912_scheme_base, (((closure) __glo_Cyc_91for_91each_91loop_912_scheme_base)->fn), ((closureN)self_7312190)->elements[1], ((closureN)self_7312190)->elements[0], Cyc_cdr(data, ((closureN)self_7312190)->elements[2]), Cyc_cdr(data, ((closureN)self_7312190)->elements[3]));;
+ }
+
+-static void __lambda_453(void *data, object _, int argc, object *args) /* closure _,object k_735335, object f_73578_733199, object lst_73579_733200 */
++static void __lambda_453(void *data, object _, int argc, object *args) /* closure _,object k_734883, object f_73578_732852, object lst_73579_732853 */
+ {
+-object k_735335 = args[0]; object f_73578_733199 = args[1]; object lst_73579_733200 = args[2];
++object k_734883 = args[0]; object f_73578_732852 = args[1]; object lst_73579_732853 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-1");
+
+-if( (boolean_f != Cyc_is_null(lst_73579_733200)) ){
++if( (boolean_f != Cyc_is_null(lst_73579_732853)) ){
+
+-complex_num_type local_7318359;
+-return_direct_with_clo1(data, k_735335, (((closure) k_735335)->fn), ((inline_function_type)
+- ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7318359));
++complex_num_type local_7317059;
++return_direct_with_clo1(data, k_734883, (((closure) k_734883)->fn), ((inline_function_type)
++ ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7317059));
+ } else {
+
+-closureN_type c_7318361;
+-object e_7318368 [3];
+-c_7318361.hdr.mark = gc_color_red;
+- c_7318361.hdr.grayed = 0;
+-c_7318361.tag = closureN_tag;
+- c_7318361.fn = (function_type)__lambda_454;
+-c_7318361.num_args = 1;
+-c_7318361.num_elements = 3;
+-c_7318361.elements = (object *)e_7318368;
+-c_7318361.elements[0] = f_73578_733199;
+-c_7318361.elements[1] = k_735335;
+-c_7318361.elements[2] = lst_73579_733200;
++closureN_type c_7317061;
++object e_7317068 [3];
++c_7317061.hdr.mark = gc_color_red;
++ c_7317061.hdr.grayed = 0;
++c_7317061.tag = closureN_tag;
++ c_7317061.fn = (function_type)__lambda_454;
++c_7317061.num_args = 1;
++c_7317061.num_elements = 3;
++c_7317061.elements = (object *)e_7317068;
++c_7317061.elements[0] = f_73578_732852;
++c_7317061.elements[1] = k_734883;
++c_7317061.elements[2] = lst_73579_732853;
+
+
+
+-return_closcall2(data, f_73578_733199, &c_7318361, Cyc_car(data, lst_73579_733200));}
++return_closcall2(data, f_73578_732852, &c_7317061, Cyc_car(data, lst_73579_732853));}
+ ;;
+ }
+
+-static void __lambda_454(void *data, object self_7313442, int argc, object *args) /* object self_7313442, object r_735337 */
++static void __lambda_454(void *data, object self_7312189, int argc, object *args) /* object self_7312189, object r_734885 */
+ {
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure) __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn), ((closureN)self_7313442)->elements[1], ((closureN)self_7313442)->elements[0], Cyc_cdr(data, ((closureN)self_7313442)->elements[2]));;
++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_7312189)->elements[1], ((closureN)self_7312189)->elements[0], Cyc_cdr(data, ((closureN)self_7312189)->elements[2]));;
+ }
+
+-static void __lambda_450(void *data, object _, int argc, object *args) /* closure _,object k_735323, object f_73571_733195, object lst1_73572_733196, object lst2_73573_733197 */
++static void __lambda_450(void *data, object _, int argc, object *args) /* closure _,object k_734871, object f_73571_732848, object lst1_73572_732849, object lst2_73573_732850 */
+ {
+-object k_735323 = args[0]; object f_73571_733195 = args[1]; object lst1_73572_733196 = args[2]; object lst2_73573_733197 = args[3];
+- object r_735324;
++object k_734871 = args[0]; object f_73571_732848 = args[1]; object lst1_73572_732849 = args[2]; object lst2_73573_732850 = args[3];
++ object r_734872;
+ Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-2");
+
+-if( (boolean_f != Cyc_is_null(lst1_73572_733196)) ){
++if( (boolean_f != Cyc_is_null(lst1_73572_732849)) ){
+
+- r_735324 = Cyc_is_null(lst1_73572_733196);
++ r_734872 = Cyc_is_null(lst1_73572_732849);
+ } else {
+
+- r_735324 = Cyc_is_null(lst2_73573_733197);}
+-;if( (boolean_f != r_735324) ){
+- return_direct_with_clo1(data, k_735323, (((closure) k_735323)->fn), NULL);
++ r_734872 = Cyc_is_null(lst2_73573_732850);}
++;if( (boolean_f != r_734872) ){
++ return_direct_with_clo1(data, k_734871, (((closure) k_734871)->fn), NULL);
+ } else {
+
+-closureN_type c_7318331;
+-object e_7318348 [4];
+-c_7318331.hdr.mark = gc_color_red;
+- c_7318331.hdr.grayed = 0;
+-c_7318331.tag = closureN_tag;
+- c_7318331.fn = (function_type)__lambda_451;
+-c_7318331.num_args = 1;
+-c_7318331.num_elements = 4;
+-c_7318331.elements = (object *)e_7318348;
+-c_7318331.elements[0] = f_73571_733195;
+-c_7318331.elements[1] = k_735323;
+-c_7318331.elements[2] = lst1_73572_733196;
+-c_7318331.elements[3] = lst2_73573_733197;
++closureN_type c_7317031;
++object e_7317048 [4];
++c_7317031.hdr.mark = gc_color_red;
++ c_7317031.hdr.grayed = 0;
++c_7317031.tag = closureN_tag;
++ c_7317031.fn = (function_type)__lambda_451;
++c_7317031.num_args = 1;
++c_7317031.num_elements = 4;
++c_7317031.elements = (object *)e_7317048;
++c_7317031.elements[0] = f_73571_732848;
++c_7317031.elements[1] = k_734871;
++c_7317031.elements[2] = lst1_73572_732849;
++c_7317031.elements[3] = lst2_73573_732850;
+
+
+
+
+
+-return_closcall3(data, f_73571_733195, &c_7318331, Cyc_car(data, lst1_73572_733196), Cyc_car(data, lst2_73573_733197));}
++return_closcall3(data, f_73571_732848, &c_7317031, Cyc_car(data, lst1_73572_732849), Cyc_car(data, lst2_73573_732850));}
+ ;;
+ }
+
+-static void __lambda_451(void *data, object self_7313440, int argc, object *args) /* object self_7313440, object r_735325 */
++static void __lambda_451(void *data, object self_7312187, int argc, object *args) /* object self_7312187, object r_734873 */
+ {
+- object r_735325 = args[0];
++ object r_734873 = args[0];
+
+-closureN_type c_7318333;
+-object e_7318340 [2];
+-c_7318333.hdr.mark = gc_color_red;
+- c_7318333.hdr.grayed = 0;
+-c_7318333.tag = closureN_tag;
+- c_7318333.fn = (function_type)__lambda_452;
+-c_7318333.num_args = 1;
+-c_7318333.num_elements = 2;
+-c_7318333.elements = (object *)e_7318340;
+-c_7318333.elements[0] = ((closureN)self_7313440)->elements[1];
+-c_7318333.elements[1] = r_735325;
++closureN_type c_7317033;
++object e_7317040 [2];
++c_7317033.hdr.mark = gc_color_red;
++ c_7317033.hdr.grayed = 0;
++c_7317033.tag = closureN_tag;
++ c_7317033.fn = (function_type)__lambda_452;
++c_7317033.num_args = 1;
++c_7317033.num_elements = 2;
++c_7317033.elements = (object *)e_7317040;
++c_7317033.elements[0] = ((closureN)self_7312187)->elements[1];
++c_7317033.elements[1] = r_734873;
+
+
+
+
+
+-return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7318333, ((closureN)self_7313440)->elements[0], Cyc_cdr(data, ((closureN)self_7313440)->elements[2]), Cyc_cdr(data, ((closureN)self_7313440)->elements[3]));;
++return_direct_with_clo4(data, __glo_Cyc_91map_91loop_912_scheme_base, (((closure) __glo_Cyc_91map_91loop_912_scheme_base)->fn), &c_7317033, ((closureN)self_7312187)->elements[0], Cyc_cdr(data, ((closureN)self_7312187)->elements[2]), Cyc_cdr(data, ((closureN)self_7312187)->elements[3]));;
+ }
+
+-static void __lambda_452(void *data, object self_7313441, int argc, object *args) /* object self_7313441, object r_735326 */
++static void __lambda_452(void *data, object self_7312188, int argc, object *args) /* object self_7312188, object r_734874 */
+ {
+- object r_735326 = args[0];
++ object r_734874 = args[0];
+
+-pair_type local_7318338;
+-return_direct_with_clo1(data, ((closureN)self_7313441)->elements[0], (((closure) ((closureN)self_7313441)->elements[0])->fn), set_pair_as_expr(&local_7318338, ((closureN)self_7313441)->elements[1], r_735326));;
++pair_type local_7317038;
++return_direct_with_clo1(data, ((closureN)self_7312188)->elements[0], (((closure) ((closureN)self_7312188)->elements[0])->fn), set_pair_as_expr(&local_7317038, ((closureN)self_7312188)->elements[1], r_734874));;
+ }
+
+-static void __lambda_447(void *data, object _, int argc, object *args) /* closure _,object k_735315, object f_73569_733193, object lst_73570_733194 */
++static void __lambda_447(void *data, object _, int argc, object *args) /* closure _,object k_734863, object f_73569_732846, object lst_73570_732847 */
+ {
+-object k_735315 = args[0]; object f_73569_733193 = args[1]; object lst_73570_733194 = args[2];
++object k_734863 = args[0]; object f_73569_732846 = args[1]; object lst_73570_732847 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-1");
+
+-if( (boolean_f != Cyc_is_null(lst_73570_733194)) ){
+- return_direct_with_clo1(data, k_735315, (((closure) k_735315)->fn), NULL);
++if( (boolean_f != Cyc_is_null(lst_73570_732847)) ){
++ return_direct_with_clo1(data, k_734863, (((closure) k_734863)->fn), NULL);
+ } else {
+
+-closureN_type c_7318302;
+-object e_7318316 [3];
+-c_7318302.hdr.mark = gc_color_red;
+- c_7318302.hdr.grayed = 0;
+-c_7318302.tag = closureN_tag;
+- c_7318302.fn = (function_type)__lambda_448;
+-c_7318302.num_args = 1;
+-c_7318302.num_elements = 3;
+-c_7318302.elements = (object *)e_7318316;
+-c_7318302.elements[0] = f_73569_733193;
+-c_7318302.elements[1] = k_735315;
+-c_7318302.elements[2] = lst_73570_733194;
++closureN_type c_7317002;
++object e_7317016 [3];
++c_7317002.hdr.mark = gc_color_red;
++ c_7317002.hdr.grayed = 0;
++c_7317002.tag = closureN_tag;
++ c_7317002.fn = (function_type)__lambda_448;
++c_7317002.num_args = 1;
++c_7317002.num_elements = 3;
++c_7317002.elements = (object *)e_7317016;
++c_7317002.elements[0] = f_73569_732846;
++c_7317002.elements[1] = k_734863;
++c_7317002.elements[2] = lst_73570_732847;
+
+
+
+-return_closcall2(data, f_73569_733193, &c_7318302, Cyc_car(data, lst_73570_733194));}
++return_closcall2(data, f_73569_732846, &c_7317002, Cyc_car(data, lst_73570_732847));}
+ ;;
+ }
+
+-static void __lambda_448(void *data, object self_7313438, int argc, object *args) /* object self_7313438, object r_735317 */
++static void __lambda_448(void *data, object self_7312185, int argc, object *args) /* object self_7312185, object r_734865 */
+ {
+- object r_735317 = args[0];
++ object r_734865 = args[0];
+
+-closureN_type c_7318304;
+-object e_7318311 [2];
+-c_7318304.hdr.mark = gc_color_red;
+- c_7318304.hdr.grayed = 0;
+-c_7318304.tag = closureN_tag;
+- c_7318304.fn = (function_type)__lambda_449;
+-c_7318304.num_args = 1;
+-c_7318304.num_elements = 2;
+-c_7318304.elements = (object *)e_7318311;
+-c_7318304.elements[0] = ((closureN)self_7313438)->elements[1];
+-c_7318304.elements[1] = r_735317;
++closureN_type c_7317004;
++object e_7317011 [2];
++c_7317004.hdr.mark = gc_color_red;
++ c_7317004.hdr.grayed = 0;
++c_7317004.tag = closureN_tag;
++ c_7317004.fn = (function_type)__lambda_449;
++c_7317004.num_args = 1;
++c_7317004.num_elements = 2;
++c_7317004.elements = (object *)e_7317011;
++c_7317004.elements[0] = ((closureN)self_7312185)->elements[1];
++c_7317004.elements[1] = r_734865;
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7318304, ((closureN)self_7313438)->elements[0], Cyc_cdr(data, ((closureN)self_7313438)->elements[2]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7317004, ((closureN)self_7312185)->elements[0], Cyc_cdr(data, ((closureN)self_7312185)->elements[2]));;
+ }
+
+-static void __lambda_449(void *data, object self_7313439, int argc, object *args) /* object self_7313439, object r_735318 */
++static void __lambda_449(void *data, object self_7312186, int argc, object *args) /* object self_7312186, object r_734866 */
+ {
+- object r_735318 = args[0];
++ object r_734866 = args[0];
+
+-pair_type local_7318309;
+-return_direct_with_clo1(data, ((closureN)self_7313439)->elements[0], (((closure) ((closureN)self_7313439)->elements[0])->fn), set_pair_as_expr(&local_7318309, ((closureN)self_7313439)->elements[1], r_735318));;
++pair_type local_7317009;
++return_direct_with_clo1(data, ((closureN)self_7312186)->elements[0], (((closure) ((closureN)self_7312186)->elements[0])->fn), set_pair_as_expr(&local_7317009, ((closureN)self_7312186)->elements[1], r_734866));;
+ }
+
+-static void __lambda_432(void *data, object _, int argc, object *args) /* closure _,object k_735296, object f_73557_733182, object lis1_73558_733183, object lists_73559_733184_raw, ... */
++static void __lambda_432(void *data, object _, int argc, object *args) /* closure _,object k_734844, object f_73557_732835, object lis1_73558_732836, object lists_73559_732837_raw, ... */
+ {
+-object k_735296 = args[0]; object f_73557_733182 = args[1]; object lis1_73558_733183 = args[2];
+-load_varargs(lists_73559_733184, args, 3, argc - 3);
++object k_734844 = args[0]; object f_73557_732835 = args[1]; object lis1_73558_732836 = args[2];
++load_varargs(lists_73559_732837, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:map");
+
+-if( (boolean_f != Cyc_is_pair(lists_73559_733184)) ){
++if( (boolean_f != Cyc_is_pair(lists_73559_732837)) ){
+
+-closureN_type c_7318210;
+-object e_7318275 [2];
+-c_7318210.hdr.mark = gc_color_red;
+- c_7318210.hdr.grayed = 0;
+-c_7318210.tag = closureN_tag;
+- c_7318210.fn = (function_type)__lambda_433;
+-c_7318210.num_args = 1;
+-c_7318210.num_elements = 2;
+-c_7318210.elements = (object *)e_7318275;
+-c_7318210.elements[0] = f_73557_733182;
+-c_7318210.elements[1] = k_735296;
++closureN_type c_7316910;
++object e_7316975 [2];
++c_7316910.hdr.mark = gc_color_red;
++ c_7316910.hdr.grayed = 0;
++c_7316910.tag = closureN_tag;
++ c_7316910.fn = (function_type)__lambda_433;
++c_7316910.num_args = 1;
++c_7316910.num_elements = 2;
++c_7316910.elements = (object *)e_7316975;
++c_7316910.elements[0] = f_73557_732835;
++c_7316910.elements[1] = k_734844;
+
+
+-pair_type local_7318278;
+-return_direct_with_clo1(data,(closure)&c_7318210,__lambda_433, set_pair_as_expr(&local_7318278, lis1_73558_733183, lists_73559_733184));
++pair_type local_7316978;
++return_direct_with_clo1(data,(closure)&c_7316910,__lambda_433, set_pair_as_expr(&local_7316978, lis1_73558_732836, lists_73559_732837));
+ } else {
+
+-closureN_type c_7318280;
+-object e_7318284 [2];
+-c_7318280.hdr.mark = gc_color_red;
+- c_7318280.hdr.grayed = 0;
+-c_7318280.tag = closureN_tag;
+- c_7318280.fn = (function_type)__lambda_444;
+-c_7318280.num_args = 1;
+-c_7318280.num_elements = 2;
+-c_7318280.elements = (object *)e_7318284;
+-c_7318280.elements[0] = k_735296;
+-c_7318280.elements[1] = lis1_73558_733183;
++closureN_type c_7316980;
++object e_7316984 [2];
++c_7316980.hdr.mark = gc_color_red;
++ c_7316980.hdr.grayed = 0;
++c_7316980.tag = closureN_tag;
++ c_7316980.fn = (function_type)__lambda_444;
++c_7316980.num_args = 1;
++c_7316980.num_elements = 2;
++c_7316980.elements = (object *)e_7316984;
++c_7316980.elements[0] = k_734844;
++c_7316980.elements[1] = lis1_73558_732836;
+
+
+-closureN_type c_7318285;
+-object e_7318296 [1];
+-c_7318285.hdr.mark = gc_color_red;
+- c_7318285.hdr.grayed = 0;
+-c_7318285.tag = closureN_tag;
+- c_7318285.fn = (function_type)__lambda_445;
+-c_7318285.num_args = 2;
+-c_7318285.num_elements = 1;
+-c_7318285.elements = (object *)e_7318296;
+-c_7318285.elements[0] = f_73557_733182;
++closureN_type c_7316985;
++object e_7316996 [1];
++c_7316985.hdr.mark = gc_color_red;
++ c_7316985.hdr.grayed = 0;
++c_7316985.tag = closureN_tag;
++ c_7316985.fn = (function_type)__lambda_445;
++c_7316985.num_args = 2;
++c_7316985.num_elements = 1;
++c_7316985.elements = (object *)e_7316996;
++c_7316985.elements[0] = f_73557_732835;
+
+-return_direct_with_clo1(data,(closure)&c_7318280,__lambda_444, &c_7318285);}
++return_direct_with_clo1(data,(closure)&c_7316980,__lambda_444, &c_7316985);}
+ ;;
+ }
+
+-static void __lambda_445(void *data, object self_7313435, int argc, object *args) /* object self_7313435, object k_735311, object x_73567_733191, object y_73568_733192 */
++static void __lambda_445(void *data, object self_7312182, int argc, object *args) /* object self_7312182, object k_734859, object x_73567_732844, object y_73568_732845 */
+ {
+- object k_735311 = args[0]; object x_73567_733191 = args[1]; object y_73568_733192 = args[2];
++ object k_734859 = args[0]; object x_73567_732844 = args[1]; object y_73568_732845 = args[2];
+
+-closureN_type c_7318288;
+-object e_7318295 [2];
+-c_7318288.hdr.mark = gc_color_red;
+- c_7318288.hdr.grayed = 0;
+-c_7318288.tag = closureN_tag;
+- c_7318288.fn = (function_type)__lambda_446;
+-c_7318288.num_args = 1;
+-c_7318288.num_elements = 2;
+-c_7318288.elements = (object *)e_7318295;
+-c_7318288.elements[0] = k_735311;
+-c_7318288.elements[1] = y_73568_733192;
++closureN_type c_7316988;
++object e_7316995 [2];
++c_7316988.hdr.mark = gc_color_red;
++ c_7316988.hdr.grayed = 0;
++c_7316988.tag = closureN_tag;
++ c_7316988.fn = (function_type)__lambda_446;
++c_7316988.num_args = 1;
++c_7316988.num_elements = 2;
++c_7316988.elements = (object *)e_7316995;
++c_7316988.elements[0] = k_734859;
++c_7316988.elements[1] = y_73568_732845;
+
+-return_closcall2(data, ((closureN)self_7313435)->elements[0], &c_7318288, x_73567_733191);;
++return_closcall2(data, ((closureN)self_7312182)->elements[0], &c_7316988, x_73567_732844);;
+ }
+
+-static void __lambda_446(void *data, object self_7313436, int argc, object *args) /* object self_7313436, object r_735312 */
++static void __lambda_446(void *data, object self_7312183, int argc, object *args) /* object self_7312183, object r_734860 */
+ {
+- object r_735312 = args[0];
++ object r_734860 = args[0];
+
+-pair_type local_7318293;
+-return_direct_with_clo1(data, ((closureN)self_7313436)->elements[0], (((closure) ((closureN)self_7313436)->elements[0])->fn), set_pair_as_expr(&local_7318293, r_735312, ((closureN)self_7313436)->elements[1]));;
++pair_type local_7316993;
++return_direct_with_clo1(data, ((closureN)self_7312183)->elements[0], (((closure) ((closureN)self_7312183)->elements[0])->fn), set_pair_as_expr(&local_7316993, r_734860, ((closureN)self_7312183)->elements[1]));;
+ }
+
+-static void __lambda_444(void *data, object self_7313437, int argc, object *args) /* object self_7313437, object r_735309 */
++static void __lambda_444(void *data, object self_7312184, int argc, object *args) /* object self_7312184, object r_734857 */
+ {
+- object r_735309 = args[0];
+- return_direct_with_clo4(data, __glo_foldr_scheme_base, (((closure) __glo_foldr_scheme_base)->fn), ((closureN)self_7313437)->elements[0], r_735309, NULL, ((closureN)self_7313437)->elements[1]);;
++ object r_734857 = args[0];
++ return_direct_with_clo4(data, __glo_foldr_scheme_base, (((closure) __glo_foldr_scheme_base)->fn), ((closureN)self_7312184)->elements[0], r_734857, NULL, ((closureN)self_7312184)->elements[1]);;
+ }
+
+-static void __lambda_433(void *data, object self_7313423, int argc, object *args) /* object self_7313423, object lists_73561_733185 */
++static void __lambda_433(void *data, object self_7312170, int argc, object *args) /* object self_7312170, object lists_73561_732838 */
+ {
+- object lists_73561_733185 = args[0];
++ object lists_73561_732838 = args[0];
+
+-closureN_type c_7318212;
+-object e_7318274 [3];
+-c_7318212.hdr.mark = gc_color_red;
+- c_7318212.hdr.grayed = 0;
+-c_7318212.tag = closureN_tag;
+- c_7318212.fn = (function_type)__lambda_434;
+-c_7318212.num_args = 1;
+-c_7318212.num_elements = 3;
+-c_7318212.elements = (object *)e_7318274;
+-c_7318212.elements[0] = ((closureN)self_7313423)->elements[0];
+-c_7318212.elements[1] = ((closureN)self_7313423)->elements[1];
+-c_7318212.elements[2] = lists_73561_733185;
++closureN_type c_7316912;
++object e_7316974 [3];
++c_7316912.hdr.mark = gc_color_red;
++ c_7316912.hdr.grayed = 0;
++c_7316912.tag = closureN_tag;
++ c_7316912.fn = (function_type)__lambda_434;
++c_7316912.num_args = 1;
++c_7316912.num_elements = 3;
++c_7316912.elements = (object *)e_7316974;
++c_7316912.elements[0] = ((closureN)self_7312170)->elements[0];
++c_7316912.elements[1] = ((closureN)self_7312170)->elements[1];
++c_7316912.elements[2] = lists_73561_732838;
+
+-return_direct_with_clo1(data,(closure)&c_7318212,__lambda_434, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7316912,__lambda_434, boolean_f);;
+ }
+
+-static void __lambda_434(void *data, object self_7313424, int argc, object *args) /* object self_7313424, object recur_73562_733186 */
++static void __lambda_434(void *data, object self_7312171, int argc, object *args) /* object self_7312171, object recur_73562_732839 */
+ {
+- object recur_73562_733186 = args[0];
++ object recur_73562_732839 = args[0];
+
+-closureN_type c_7318214;
+-object e_7318270 [3];
+-c_7318214.hdr.mark = gc_color_red;
+- c_7318214.hdr.grayed = 0;
+-c_7318214.tag = closureN_tag;
+- c_7318214.fn = (function_type)__lambda_1372;
+-c_7318214.num_args = 1;
+-c_7318214.num_elements = 3;
+-c_7318214.elements = (object *)e_7318270;
+-c_7318214.elements[0] = ((closureN)self_7313424)->elements[0];
+-c_7318214.elements[1] = ((closureN)self_7313424)->elements[1];
+-c_7318214.elements[2] = ((closureN)self_7313424)->elements[2];
++closureN_type c_7316914;
++object e_7316970 [3];
++c_7316914.hdr.mark = gc_color_red;
++ c_7316914.hdr.grayed = 0;
++c_7316914.tag = closureN_tag;
++ c_7316914.fn = (function_type)__lambda_1325;
++c_7316914.num_args = 1;
++c_7316914.num_elements = 3;
++c_7316914.elements = (object *)e_7316970;
++c_7316914.elements[0] = ((closureN)self_7312171)->elements[0];
++c_7316914.elements[1] = ((closureN)self_7312171)->elements[1];
++c_7316914.elements[2] = ((closureN)self_7312171)->elements[2];
+
+
+-pair_type local_7318273;
+-return_direct_with_clo1(data,(closure)&c_7318214,__lambda_1372, set_cell_as_expr(&local_7318273, recur_73562_733186));;
++pair_type local_7316973;
++return_direct_with_clo1(data,(closure)&c_7316914,__lambda_1325, set_cell_as_expr(&local_7316973, recur_73562_732839));;
+ }
+
+-static void __lambda_1372(void *data, object self_7313425, int argc, object *args) /* object self_7313425, object recur_73562_733186 */
++static void __lambda_1325(void *data, object self_7312172, int argc, object *args) /* object self_7312172, object recur_73562_732839 */
+ {
+- object recur_73562_733186 = args[0];
++ object recur_73562_732839 = args[0];
+
+-closureN_type c_7318216;
+-object e_7318229 [3];
+-c_7318216.hdr.mark = gc_color_red;
+- c_7318216.hdr.grayed = 0;
+-c_7318216.tag = closureN_tag;
+- c_7318216.fn = (function_type)__lambda_435;
+-c_7318216.num_args = 1;
+-c_7318216.num_elements = 3;
+-c_7318216.elements = (object *)e_7318229;
+-c_7318216.elements[0] = ((closureN)self_7313425)->elements[1];
+-c_7318216.elements[1] = ((closureN)self_7313425)->elements[2];
+-c_7318216.elements[2] = recur_73562_733186;
++closureN_type c_7316916;
++object e_7316929 [3];
++c_7316916.hdr.mark = gc_color_red;
++ c_7316916.hdr.grayed = 0;
++c_7316916.tag = closureN_tag;
++ c_7316916.fn = (function_type)__lambda_435;
++c_7316916.num_args = 1;
++c_7316916.num_elements = 3;
++c_7316916.elements = (object *)e_7316929;
++c_7316916.elements[0] = ((closureN)self_7312172)->elements[1];
++c_7316916.elements[1] = ((closureN)self_7312172)->elements[2];
++c_7316916.elements[2] = recur_73562_732839;
+
+
+-closureN_type c_7318230;
+-object e_7318269 [2];
+-c_7318230.hdr.mark = gc_color_red;
+- c_7318230.hdr.grayed = 0;
+-c_7318230.tag = closureN_tag;
+- c_7318230.fn = (function_type)__lambda_437;
+-c_7318230.num_args = 1;
+-c_7318230.num_elements = 2;
+-c_7318230.elements = (object *)e_7318269;
+-c_7318230.elements[0] = ((closureN)self_7313425)->elements[0];
+-c_7318230.elements[1] = recur_73562_733186;
++closureN_type c_7316930;
++object e_7316969 [2];
++c_7316930.hdr.mark = gc_color_red;
++ c_7316930.hdr.grayed = 0;
++c_7316930.tag = closureN_tag;
++ c_7316930.fn = (function_type)__lambda_437;
++c_7316930.num_args = 1;
++c_7316930.num_elements = 2;
++c_7316930.elements = (object *)e_7316969;
++c_7316930.elements[0] = ((closureN)self_7312172)->elements[0];
++c_7316930.elements[1] = recur_73562_732839;
+
+-return_direct_with_clo1(data,(closure)&c_7318216,__lambda_435, &c_7318230);;
++return_direct_with_clo1(data,(closure)&c_7316916,__lambda_435, &c_7316930);;
+ }
+
+-static void __lambda_437(void *data, object self_7313426, int argc, object *args) /* object self_7313426, object k_735301, object lists_73563_733187 */
++static void __lambda_437(void *data, object self_7312173, int argc, object *args) /* object self_7312173, object k_734849, object lists_73563_732840 */
+ {
+- object k_735301 = args[0]; object lists_73563_733187 = args[1];
++ object k_734849 = args[0]; object lists_73563_732840 = args[1];
+
+-closureN_type c_7318232;
+-object e_7318264 [3];
+-c_7318232.hdr.mark = gc_color_red;
+- c_7318232.hdr.grayed = 0;
+-c_7318232.tag = closureN_tag;
+- c_7318232.fn = (function_type)__lambda_438;
+-c_7318232.num_args = 1;
+-c_7318232.num_elements = 3;
+-c_7318232.elements = (object *)e_7318264;
+-c_7318232.elements[0] = ((closureN)self_7313426)->elements[0];
+-c_7318232.elements[1] = k_735301;
+-c_7318232.elements[2] = ((closureN)self_7313426)->elements[1];
++closureN_type c_7316932;
++object e_7316964 [3];
++c_7316932.hdr.mark = gc_color_red;
++ c_7316932.hdr.grayed = 0;
++c_7316932.tag = closureN_tag;
++ c_7316932.fn = (function_type)__lambda_438;
++c_7316932.num_args = 1;
++c_7316932.num_elements = 3;
++c_7316932.elements = (object *)e_7316964;
++c_7316932.elements[0] = ((closureN)self_7312173)->elements[0];
++c_7316932.elements[1] = k_734849;
++c_7316932.elements[2] = ((closureN)self_7312173)->elements[1];
+
+
+-closureN_type c_7318265;
+-object e_7318268 [1];
+-c_7318265.hdr.mark = gc_color_red;
+- c_7318265.hdr.grayed = 0;
+-c_7318265.tag = closureN_tag;
+- c_7318265.fn = (function_type)__lambda_443;
+-c_7318265.num_args = 0;
+-c_7318265.num_elements = 1;
+-c_7318265.elements = (object *)e_7318268;
+-c_7318265.elements[0] = lists_73563_733187;
++closureN_type c_7316965;
++object e_7316968 [1];
++c_7316965.hdr.mark = gc_color_red;
++ c_7316965.hdr.grayed = 0;
++c_7316965.tag = closureN_tag;
++ c_7316965.fn = (function_type)__lambda_443;
++c_7316965.num_args = 0;
++c_7316965.num_elements = 1;
++c_7316965.elements = (object *)e_7316968;
++c_7316965.elements[0] = lists_73563_732840;
+
+-return_direct_with_clo1(data,(closure)&c_7318232,__lambda_438, &c_7318265);;
++return_direct_with_clo1(data,(closure)&c_7316932,__lambda_438, &c_7316965);;
+ }
+
+-static void __lambda_443(void *data, object self_7313427, int argc, object *args) /* object self_7313427, object k_735308 */
++static void __lambda_443(void *data, object self_7312174, int argc, object *args) /* object self_7312174, object k_734856 */
+ {
+- object k_735308 = args[0];
+- return_direct_with_clo2(data, __glo__75cars_87cdrs_scheme_base, (((closure) __glo__75cars_87cdrs_scheme_base)->fn), k_735308, ((closureN)self_7313427)->elements[0]);;
++ object k_734856 = args[0];
++ return_direct_with_clo2(data, __glo__75cars_87cdrs_scheme_base, (((closure) __glo__75cars_87cdrs_scheme_base)->fn), k_734856, ((closureN)self_7312174)->elements[0]);;
+ }
+
+-static void __lambda_438(void *data, object self_7313428, int argc, object *args) /* object self_7313428, object r_735302 */
++static void __lambda_438(void *data, object self_7312175, int argc, object *args) /* object self_7312175, object r_734850 */
+ {
+- object r_735302 = args[0];
++ object r_734850 = args[0];
+
+-closureN_type c_7318234;
+-object e_7318238 [2];
+-c_7318234.hdr.mark = gc_color_red;
+- c_7318234.hdr.grayed = 0;
+-c_7318234.tag = closureN_tag;
+- c_7318234.fn = (function_type)__lambda_439;
+-c_7318234.num_args = 1;
+-c_7318234.num_elements = 2;
+-c_7318234.elements = (object *)e_7318238;
+-c_7318234.elements[0] = ((closureN)self_7313428)->elements[1];
+-c_7318234.elements[1] = r_735302;
++closureN_type c_7316934;
++object e_7316938 [2];
++c_7316934.hdr.mark = gc_color_red;
++ c_7316934.hdr.grayed = 0;
++c_7316934.tag = closureN_tag;
++ c_7316934.fn = (function_type)__lambda_439;
++c_7316934.num_args = 1;
++c_7316934.num_elements = 2;
++c_7316934.elements = (object *)e_7316938;
++c_7316934.elements[0] = ((closureN)self_7312175)->elements[1];
++c_7316934.elements[1] = r_734850;
+
+
+-closureN_type c_7318239;
+-object e_7318263 [2];
+-c_7318239.hdr.mark = gc_color_red;
+- c_7318239.hdr.grayed = 0;
+-c_7318239.tag = closureN_tag;
+- c_7318239.fn = (function_type)__lambda_440;
+-c_7318239.num_args = 2;
+-c_7318239.num_elements = 2;
+-c_7318239.elements = (object *)e_7318263;
+-c_7318239.elements[0] = ((closureN)self_7313428)->elements[0];
+-c_7318239.elements[1] = ((closureN)self_7313428)->elements[2];
++closureN_type c_7316939;
++object e_7316963 [2];
++c_7316939.hdr.mark = gc_color_red;
++ c_7316939.hdr.grayed = 0;
++c_7316939.tag = closureN_tag;
++ c_7316939.fn = (function_type)__lambda_440;
++c_7316939.num_args = 2;
++c_7316939.num_elements = 2;
++c_7316939.elements = (object *)e_7316963;
++c_7316939.elements[0] = ((closureN)self_7312175)->elements[0];
++c_7316939.elements[1] = ((closureN)self_7312175)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7318234,__lambda_439, &c_7318239);;
++return_direct_with_clo1(data,(closure)&c_7316934,__lambda_439, &c_7316939);;
+ }
+
+-static void __lambda_440(void *data, object self_7313429, int argc, object *args) /* object self_7313429, object k_735304, object cars_73564_733188, object cdrs_73565_733189 */
++static void __lambda_440(void *data, object self_7312176, int argc, object *args) /* object self_7312176, object k_734852, object cars_73564_732841, object cdrs_73565_732842 */
+ {
+- object k_735304 = args[0]; object cars_73564_733188 = args[1]; object cdrs_73565_733189 = args[2];
++ object k_734852 = args[0]; object cars_73564_732841 = args[1]; object cdrs_73565_732842 = args[2];
+
+-if( (boolean_f != Cyc_is_pair(cars_73564_733188)) ){
++if( (boolean_f != Cyc_is_pair(cars_73564_732841)) ){
+
+-closureN_type c_7318243;
+-object e_7318257 [3];
+-c_7318243.hdr.mark = gc_color_red;
+- c_7318243.hdr.grayed = 0;
+-c_7318243.tag = closureN_tag;
+- c_7318243.fn = (function_type)__lambda_441;
+-c_7318243.num_args = 1;
+-c_7318243.num_elements = 3;
+-c_7318243.elements = (object *)e_7318257;
+-c_7318243.elements[0] = cdrs_73565_733189;
+-c_7318243.elements[1] = k_735304;
+-c_7318243.elements[2] = ((closureN)self_7313429)->elements[1];
++closureN_type c_7316943;
++object e_7316957 [3];
++c_7316943.hdr.mark = gc_color_red;
++ c_7316943.hdr.grayed = 0;
++c_7316943.tag = closureN_tag;
++ c_7316943.fn = (function_type)__lambda_441;
++c_7316943.num_args = 1;
++c_7316943.num_elements = 3;
++c_7316943.elements = (object *)e_7316957;
++c_7316943.elements[0] = cdrs_73565_732842;
++c_7316943.elements[1] = k_734852;
++c_7316943.elements[2] = ((closureN)self_7312176)->elements[1];
+
+
+-object c_7318260 = apply(data,(closure)&c_7318243,((closureN)self_7313429)->elements[0], cars_73564_733188);
+-return_closcall1(data,(closure)&c_7318243, c_7318260);
++object c_7316960 = apply(data,(closure)&c_7316943,((closureN)self_7312176)->elements[0], cars_73564_732841);
++return_closcall1(data,(closure)&c_7316943, c_7316960);
+ } else {
+- return_direct_with_clo1(data, k_735304, (((closure) k_735304)->fn), NULL);}
++ return_direct_with_clo1(data, k_734852, (((closure) k_734852)->fn), NULL);}
+ ;;
+ }
+
+-static void __lambda_441(void *data, object self_7313430, int argc, object *args) /* object self_7313430, object x_73566_733190 */
++static void __lambda_441(void *data, object self_7312177, int argc, object *args) /* object self_7312177, object x_73566_732843 */
+ {
+- object x_73566_733190 = args[0];
++ object x_73566_732843 = args[0];
+
+
+
+-closureN_type c_7318248;
+-object e_7318255 [2];
+-c_7318248.hdr.mark = gc_color_red;
+- c_7318248.hdr.grayed = 0;
+-c_7318248.tag = closureN_tag;
+- c_7318248.fn = (function_type)__lambda_442;
+-c_7318248.num_args = 1;
+-c_7318248.num_elements = 2;
+-c_7318248.elements = (object *)e_7318255;
+-c_7318248.elements[0] = ((closureN)self_7313430)->elements[1];
+-c_7318248.elements[1] = x_73566_733190;
++closureN_type c_7316948;
++object e_7316955 [2];
++c_7316948.hdr.mark = gc_color_red;
++ c_7316948.hdr.grayed = 0;
++c_7316948.tag = closureN_tag;
++ c_7316948.fn = (function_type)__lambda_442;
++c_7316948.num_args = 1;
++c_7316948.num_elements = 2;
++c_7316948.elements = (object *)e_7316955;
++c_7316948.elements[0] = ((closureN)self_7312177)->elements[1];
++c_7316948.elements[1] = x_73566_732843;
+
+-return_closcall2(data, car(((closureN)self_7313430)->elements[2]), &c_7318248, ((closureN)self_7313430)->elements[0]);;
++return_closcall2(data, car(((closureN)self_7312177)->elements[2]), &c_7316948, ((closureN)self_7312177)->elements[0]);;
+ }
+
+-static void __lambda_442(void *data, object self_7313431, int argc, object *args) /* object self_7313431, object r_735307 */
++static void __lambda_442(void *data, object self_7312178, int argc, object *args) /* object self_7312178, object r_734855 */
+ {
+- object r_735307 = args[0];
++ object r_734855 = args[0];
+
+-pair_type local_7318253;
+-return_direct_with_clo1(data, ((closureN)self_7313431)->elements[0], (((closure) ((closureN)self_7313431)->elements[0])->fn), set_pair_as_expr(&local_7318253, ((closureN)self_7313431)->elements[1], r_735307));;
++pair_type local_7316953;
++return_direct_with_clo1(data, ((closureN)self_7312178)->elements[0], (((closure) ((closureN)self_7312178)->elements[0])->fn), set_pair_as_expr(&local_7316953, ((closureN)self_7312178)->elements[1], r_734855));;
+ }
+
+-static void __lambda_439(void *data, object self_7313432, int argc, object *args) /* object self_7313432, object r_735303 */
++static void __lambda_439(void *data, object self_7312179, int argc, object *args) /* object self_7312179, object r_734851 */
+ {
+- object r_735303 = args[0];
+- return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7313432)->elements[0], ((closureN)self_7313432)->elements[1], r_735303);;
++ object r_734851 = args[0];
++ return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7312179)->elements[0], ((closureN)self_7312179)->elements[1], r_734851);;
+ }
+
+-static void __lambda_435(void *data, object self_7313433, int argc, object *args) /* object self_7313433, object r_735300 */
++static void __lambda_435(void *data, object self_7312180, int argc, object *args) /* object self_7312180, object r_734848 */
+ {
+- object r_735300 = args[0];
++ object r_734848 = args[0];
+
+-closureN_type c_7318218;
+-object e_7318225 [3];
+-c_7318218.hdr.mark = gc_color_red;
+- c_7318218.hdr.grayed = 0;
+-c_7318218.tag = closureN_tag;
+- c_7318218.fn = (function_type)__lambda_436;
+-c_7318218.num_args = 1;
+-c_7318218.num_elements = 3;
+-c_7318218.elements = (object *)e_7318225;
+-c_7318218.elements[0] = ((closureN)self_7313433)->elements[0];
+-c_7318218.elements[1] = ((closureN)self_7313433)->elements[1];
+-c_7318218.elements[2] = ((closureN)self_7313433)->elements[2];
++closureN_type c_7316918;
++object e_7316925 [3];
++c_7316918.hdr.mark = gc_color_red;
++ c_7316918.hdr.grayed = 0;
++c_7316918.tag = closureN_tag;
++ c_7316918.fn = (function_type)__lambda_436;
++c_7316918.num_args = 1;
++c_7316918.num_elements = 3;
++c_7316918.elements = (object *)e_7316925;
++c_7316918.elements[0] = ((closureN)self_7312180)->elements[0];
++c_7316918.elements[1] = ((closureN)self_7312180)->elements[1];
++c_7316918.elements[2] = ((closureN)self_7312180)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318218,__lambda_436, Cyc_set_cell(data, ((closureN)self_7313433)->elements[2], r_735300));;
++return_direct_with_clo1(data,(closure)&c_7316918,__lambda_436, Cyc_set_cell(data, ((closureN)self_7312180)->elements[2], r_734848));;
+ }
+
+-static void __lambda_436(void *data, object self_7313434, int argc, object *args) /* object self_7313434, object r_735299 */
++static void __lambda_436(void *data, object self_7312181, int argc, object *args) /* object self_7312181, object r_734847 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313434)->elements[2]), ((closureN)self_7313434)->elements[0], ((closureN)self_7313434)->elements[1]);;
++return_closcall2(data, car(((closureN)self_7312181)->elements[2]), ((closureN)self_7312181)->elements[0], ((closureN)self_7312181)->elements[1]);;
+ }
+
+-static void __lambda_412(void *data, object _, int argc, object *args) /* closure _,object k_735268, object lists_73545_733171 */
++static void __lambda_412(void *data, object _, int argc, object *args) /* closure _,object k_734816, object lists_73545_732824 */
+ {
+-object k_735268 = args[0]; object lists_73545_733171 = args[1];
++object k_734816 = args[0]; object lists_73545_732824 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:%cars+cdrs");
+
+-closureN_type c_7318096;
+-object e_7318099 [1];
+-c_7318096.hdr.mark = gc_color_red;
+- c_7318096.hdr.grayed = 0;
+-c_7318096.tag = closureN_tag;
+- c_7318096.fn = (function_type)__lambda_413;
+-c_7318096.num_args = 1;
+-c_7318096.num_elements = 1;
+-c_7318096.elements = (object *)e_7318099;
+-c_7318096.elements[0] = k_735268;
++closureN_type c_7316796;
++object e_7316799 [1];
++c_7316796.hdr.mark = gc_color_red;
++ c_7316796.hdr.grayed = 0;
++c_7316796.tag = closureN_tag;
++ c_7316796.fn = (function_type)__lambda_413;
++c_7316796.num_args = 1;
++c_7316796.num_elements = 1;
++c_7316796.elements = (object *)e_7316799;
++c_7316796.elements[0] = k_734816;
+
+
+-closureN_type c_7318100;
+-object e_7318205 [1];
+-c_7318100.hdr.mark = gc_color_red;
+- c_7318100.hdr.grayed = 0;
+-c_7318100.tag = closureN_tag;
+- c_7318100.fn = (function_type)__lambda_414;
+-c_7318100.num_args = 1;
+-c_7318100.num_elements = 1;
+-c_7318100.elements = (object *)e_7318205;
+-c_7318100.elements[0] = lists_73545_733171;
++closureN_type c_7316800;
++object e_7316905 [1];
++c_7316800.hdr.mark = gc_color_red;
++ c_7316800.hdr.grayed = 0;
++c_7316800.tag = closureN_tag;
++ c_7316800.fn = (function_type)__lambda_414;
++c_7316800.num_args = 1;
++c_7316800.num_elements = 1;
++c_7316800.elements = (object *)e_7316905;
++c_7316800.elements[0] = lists_73545_732824;
+
+-return_direct_with_clo1(data,(closure)&c_7318096,__lambda_413, &c_7318100);;
++return_direct_with_clo1(data,(closure)&c_7316796,__lambda_413, &c_7316800);;
+ }
+
+-static void __lambda_414(void *data, object self_7313403, int argc, object *args) /* object self_7313403, object k_735270, object abort_73546_733172 */
++static void __lambda_414(void *data, object self_7312150, int argc, object *args) /* object self_7312150, object k_734818, object abort_73546_732825 */
+ {
+- object k_735270 = args[0]; object abort_73546_733172 = args[1];
++ object k_734818 = args[0]; object abort_73546_732825 = args[1];
+
+-closureN_type c_7318102;
+-object e_7318203 [2];
+-c_7318102.hdr.mark = gc_color_red;
+- c_7318102.hdr.grayed = 0;
+-c_7318102.tag = closureN_tag;
+- c_7318102.fn = (function_type)__lambda_415;
+-c_7318102.num_args = 1;
+-c_7318102.num_elements = 2;
+-c_7318102.elements = (object *)e_7318203;
+-c_7318102.elements[0] = abort_73546_733172;
+-c_7318102.elements[1] = k_735270;
++closureN_type c_7316802;
++object e_7316903 [2];
++c_7316802.hdr.mark = gc_color_red;
++ c_7316802.hdr.grayed = 0;
++c_7316802.tag = closureN_tag;
++ c_7316802.fn = (function_type)__lambda_415;
++c_7316802.num_args = 1;
++c_7316802.num_elements = 2;
++c_7316802.elements = (object *)e_7316903;
++c_7316802.elements[0] = abort_73546_732825;
++c_7316802.elements[1] = k_734818;
+
+-return_direct_with_clo1(data,(closure)&c_7318102,__lambda_415, ((closureN)self_7313403)->elements[0]);;
++return_direct_with_clo1(data,(closure)&c_7316802,__lambda_415, ((closureN)self_7312150)->elements[0]);;
+ }
+
+-static void __lambda_415(void *data, object self_7313404, int argc, object *args) /* object self_7313404, object lists_73548_733173 */
++static void __lambda_415(void *data, object self_7312151, int argc, object *args) /* object self_7312151, object lists_73548_732826 */
+ {
+- object lists_73548_733173 = args[0];
++ object lists_73548_732826 = args[0];
+
+-closureN_type c_7318104;
+-object e_7318202 [3];
+-c_7318104.hdr.mark = gc_color_red;
+- c_7318104.hdr.grayed = 0;
+-c_7318104.tag = closureN_tag;
+- c_7318104.fn = (function_type)__lambda_416;
+-c_7318104.num_args = 1;
+-c_7318104.num_elements = 3;
+-c_7318104.elements = (object *)e_7318202;
+-c_7318104.elements[0] = ((closureN)self_7313404)->elements[0];
+-c_7318104.elements[1] = ((closureN)self_7313404)->elements[1];
+-c_7318104.elements[2] = lists_73548_733173;
++closureN_type c_7316804;
++object e_7316902 [3];
++c_7316804.hdr.mark = gc_color_red;
++ c_7316804.hdr.grayed = 0;
++c_7316804.tag = closureN_tag;
++ c_7316804.fn = (function_type)__lambda_416;
++c_7316804.num_args = 1;
++c_7316804.num_elements = 3;
++c_7316804.elements = (object *)e_7316902;
++c_7316804.elements[0] = ((closureN)self_7312151)->elements[0];
++c_7316804.elements[1] = ((closureN)self_7312151)->elements[1];
++c_7316804.elements[2] = lists_73548_732826;
+
+-return_direct_with_clo1(data,(closure)&c_7318104,__lambda_416, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7316804,__lambda_416, boolean_f);;
+ }
+
+-static void __lambda_416(void *data, object self_7313405, int argc, object *args) /* object self_7313405, object recur_73549_733174 */
++static void __lambda_416(void *data, object self_7312152, int argc, object *args) /* object self_7312152, object recur_73549_732827 */
+ {
+- object recur_73549_733174 = args[0];
++ object recur_73549_732827 = args[0];
+
+-closureN_type c_7318106;
+-object e_7318198 [3];
+-c_7318106.hdr.mark = gc_color_red;
+- c_7318106.hdr.grayed = 0;
+-c_7318106.tag = closureN_tag;
+- c_7318106.fn = (function_type)__lambda_1371;
+-c_7318106.num_args = 1;
+-c_7318106.num_elements = 3;
+-c_7318106.elements = (object *)e_7318198;
+-c_7318106.elements[0] = ((closureN)self_7313405)->elements[0];
+-c_7318106.elements[1] = ((closureN)self_7313405)->elements[1];
+-c_7318106.elements[2] = ((closureN)self_7313405)->elements[2];
++closureN_type c_7316806;
++object e_7316898 [3];
++c_7316806.hdr.mark = gc_color_red;
++ c_7316806.hdr.grayed = 0;
++c_7316806.tag = closureN_tag;
++ c_7316806.fn = (function_type)__lambda_1324;
++c_7316806.num_args = 1;
++c_7316806.num_elements = 3;
++c_7316806.elements = (object *)e_7316898;
++c_7316806.elements[0] = ((closureN)self_7312152)->elements[0];
++c_7316806.elements[1] = ((closureN)self_7312152)->elements[1];
++c_7316806.elements[2] = ((closureN)self_7312152)->elements[2];
+
+
+-pair_type local_7318201;
+-return_direct_with_clo1(data,(closure)&c_7318106,__lambda_1371, set_cell_as_expr(&local_7318201, recur_73549_733174));;
++pair_type local_7316901;
++return_direct_with_clo1(data,(closure)&c_7316806,__lambda_1324, set_cell_as_expr(&local_7316901, recur_73549_732827));;
+ }
+
+-static void __lambda_1371(void *data, object self_7313406, int argc, object *args) /* object self_7313406, object recur_73549_733174 */
++static void __lambda_1324(void *data, object self_7312153, int argc, object *args) /* object self_7312153, object recur_73549_732827 */
+ {
+- object recur_73549_733174 = args[0];
++ object recur_73549_732827 = args[0];
+
+-closureN_type c_7318108;
+-object e_7318121 [3];
+-c_7318108.hdr.mark = gc_color_red;
+- c_7318108.hdr.grayed = 0;
+-c_7318108.tag = closureN_tag;
+- c_7318108.fn = (function_type)__lambda_417;
+-c_7318108.num_args = 1;
+-c_7318108.num_elements = 3;
+-c_7318108.elements = (object *)e_7318121;
+-c_7318108.elements[0] = ((closureN)self_7313406)->elements[1];
+-c_7318108.elements[1] = ((closureN)self_7313406)->elements[2];
+-c_7318108.elements[2] = recur_73549_733174;
++closureN_type c_7316808;
++object e_7316821 [3];
++c_7316808.hdr.mark = gc_color_red;
++ c_7316808.hdr.grayed = 0;
++c_7316808.tag = closureN_tag;
++ c_7316808.fn = (function_type)__lambda_417;
++c_7316808.num_args = 1;
++c_7316808.num_elements = 3;
++c_7316808.elements = (object *)e_7316821;
++c_7316808.elements[0] = ((closureN)self_7312153)->elements[1];
++c_7316808.elements[1] = ((closureN)self_7312153)->elements[2];
++c_7316808.elements[2] = recur_73549_732827;
+
+
+-closureN_type c_7318122;
+-object e_7318197 [2];
+-c_7318122.hdr.mark = gc_color_red;
+- c_7318122.hdr.grayed = 0;
+-c_7318122.tag = closureN_tag;
+- c_7318122.fn = (function_type)__lambda_419;
+-c_7318122.num_args = 1;
+-c_7318122.num_elements = 2;
+-c_7318122.elements = (object *)e_7318197;
+-c_7318122.elements[0] = ((closureN)self_7313406)->elements[0];
+-c_7318122.elements[1] = recur_73549_733174;
++closureN_type c_7316822;
++object e_7316897 [2];
++c_7316822.hdr.mark = gc_color_red;
++ c_7316822.hdr.grayed = 0;
++c_7316822.tag = closureN_tag;
++ c_7316822.fn = (function_type)__lambda_419;
++c_7316822.num_args = 1;
++c_7316822.num_elements = 2;
++c_7316822.elements = (object *)e_7316897;
++c_7316822.elements[0] = ((closureN)self_7312153)->elements[0];
++c_7316822.elements[1] = recur_73549_732827;
+
+-return_direct_with_clo1(data,(closure)&c_7318108,__lambda_417, &c_7318122);;
++return_direct_with_clo1(data,(closure)&c_7316808,__lambda_417, &c_7316822);;
+ }
+
+-static void __lambda_419(void *data, object self_7313407, int argc, object *args) /* object self_7313407, object k_735273, object lists_73550_733175 */
++static void __lambda_419(void *data, object self_7312154, int argc, object *args) /* object self_7312154, object k_734821, object lists_73550_732828 */
+ {
+- object k_735273 = args[0]; object lists_73550_733175 = args[1];
++ object k_734821 = args[0]; object lists_73550_732828 = args[1];
+
+-if( (boolean_f != Cyc_is_pair(lists_73550_733175)) ){
++if( (boolean_f != Cyc_is_pair(lists_73550_732828)) ){
+
+-closureN_type c_7318126;
+-object e_7318186 [3];
+-c_7318126.hdr.mark = gc_color_red;
+- c_7318126.hdr.grayed = 0;
+-c_7318126.tag = closureN_tag;
+- c_7318126.fn = (function_type)__lambda_420;
+-c_7318126.num_args = 1;
+-c_7318126.num_elements = 3;
+-c_7318126.elements = (object *)e_7318186;
+-c_7318126.elements[0] = ((closureN)self_7313407)->elements[0];
+-c_7318126.elements[1] = k_735273;
+-c_7318126.elements[2] = ((closureN)self_7313407)->elements[1];
++closureN_type c_7316826;
++object e_7316886 [3];
++c_7316826.hdr.mark = gc_color_red;
++ c_7316826.hdr.grayed = 0;
++c_7316826.tag = closureN_tag;
++ c_7316826.fn = (function_type)__lambda_420;
++c_7316826.num_args = 1;
++c_7316826.num_elements = 3;
++c_7316826.elements = (object *)e_7316886;
++c_7316826.elements[0] = ((closureN)self_7312154)->elements[0];
++c_7316826.elements[1] = k_734821;
++c_7316826.elements[2] = ((closureN)self_7312154)->elements[1];
+
+
+-closureN_type c_7318187;
+-object e_7318195 [1];
+-c_7318187.hdr.mark = gc_color_red;
+- c_7318187.hdr.grayed = 0;
+-c_7318187.tag = closureN_tag;
+- c_7318187.fn = (function_type)__lambda_431;
+-c_7318187.num_args = 0;
+-c_7318187.num_elements = 1;
+-c_7318187.elements = (object *)e_7318195;
+-c_7318187.elements[0] = lists_73550_733175;
++closureN_type c_7316887;
++object e_7316895 [1];
++c_7316887.hdr.mark = gc_color_red;
++ c_7316887.hdr.grayed = 0;
++c_7316887.tag = closureN_tag;
++ c_7316887.fn = (function_type)__lambda_431;
++c_7316887.num_args = 0;
++c_7316887.num_elements = 1;
++c_7316887.elements = (object *)e_7316895;
++c_7316887.elements[0] = lists_73550_732828;
+
+-return_direct_with_clo1(data,(closure)&c_7318126,__lambda_420, &c_7318187);
++return_direct_with_clo1(data,(closure)&c_7316826,__lambda_420, &c_7316887);
+ } else {
+- return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_735273, NULL, NULL);}
++ return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_734821, NULL, NULL);}
+ ;;
+ }
+
+-static void __lambda_431(void *data, object self_7313408, int argc, object *args) /* object self_7313408, object k_735291 */
++static void __lambda_431(void *data, object self_7312155, int argc, object *args) /* object self_7312155, object k_734839 */
+ {
+- object k_735291 = args[0];
++ object k_734839 = args[0];
+
+
+
+
+-return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_735291, Cyc_car(data, ((closureN)self_7313408)->elements[0]), Cyc_cdr(data, ((closureN)self_7313408)->elements[0]));;
++return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_734839, Cyc_car(data, ((closureN)self_7312155)->elements[0]), Cyc_cdr(data, ((closureN)self_7312155)->elements[0]));;
+ }
+
+-static void __lambda_420(void *data, object self_7313409, int argc, object *args) /* object self_7313409, object r_735275 */
++static void __lambda_420(void *data, object self_7312156, int argc, object *args) /* object self_7312156, object r_734823 */
+ {
+- object r_735275 = args[0];
++ object r_734823 = args[0];
+
+-closureN_type c_7318128;
+-object e_7318132 [2];
+-c_7318128.hdr.mark = gc_color_red;
+- c_7318128.hdr.grayed = 0;
+-c_7318128.tag = closureN_tag;
+- c_7318128.fn = (function_type)__lambda_421;
+-c_7318128.num_args = 1;
+-c_7318128.num_elements = 2;
+-c_7318128.elements = (object *)e_7318132;
+-c_7318128.elements[0] = ((closureN)self_7313409)->elements[1];
+-c_7318128.elements[1] = r_735275;
++closureN_type c_7316828;
++object e_7316832 [2];
++c_7316828.hdr.mark = gc_color_red;
++ c_7316828.hdr.grayed = 0;
++c_7316828.tag = closureN_tag;
++ c_7316828.fn = (function_type)__lambda_421;
++c_7316828.num_args = 1;
++c_7316828.num_elements = 2;
++c_7316828.elements = (object *)e_7316832;
++c_7316828.elements[0] = ((closureN)self_7312156)->elements[1];
++c_7316828.elements[1] = r_734823;
+
+
+-closureN_type c_7318133;
+-object e_7318185 [2];
+-c_7318133.hdr.mark = gc_color_red;
+- c_7318133.hdr.grayed = 0;
+-c_7318133.tag = closureN_tag;
+- c_7318133.fn = (function_type)__lambda_422;
+-c_7318133.num_args = 2;
+-c_7318133.num_elements = 2;
+-c_7318133.elements = (object *)e_7318185;
+-c_7318133.elements[0] = ((closureN)self_7313409)->elements[0];
+-c_7318133.elements[1] = ((closureN)self_7313409)->elements[2];
++closureN_type c_7316833;
++object e_7316885 [2];
++c_7316833.hdr.mark = gc_color_red;
++ c_7316833.hdr.grayed = 0;
++c_7316833.tag = closureN_tag;
++ c_7316833.fn = (function_type)__lambda_422;
++c_7316833.num_args = 2;
++c_7316833.num_elements = 2;
++c_7316833.elements = (object *)e_7316885;
++c_7316833.elements[0] = ((closureN)self_7312156)->elements[0];
++c_7316833.elements[1] = ((closureN)self_7312156)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7318128,__lambda_421, &c_7318133);;
++return_direct_with_clo1(data,(closure)&c_7316828,__lambda_421, &c_7316833);;
+ }
+
+-static void __lambda_422(void *data, object self_7313410, int argc, object *args) /* object self_7313410, object k_735277, object list_73551_733176, object other_91lists_73552_733177 */
++static void __lambda_422(void *data, object self_7312157, int argc, object *args) /* object self_7312157, object k_734825, object list_73551_732829, object other_91lists_73552_732830 */
+ {
+- object k_735277 = args[0]; object list_73551_733176 = args[1]; object other_91lists_73552_733177 = args[2];
++ object k_734825 = args[0]; object list_73551_732829 = args[1]; object other_91lists_73552_732830 = args[2];
+
+-if( (boolean_f != Cyc_is_null(list_73551_733176)) ){
+- return_closcall3(data, ((closureN)self_7313410)->elements[0], k_735277, NULL, NULL);
++if( (boolean_f != Cyc_is_null(list_73551_732829)) ){
++ return_closcall3(data, ((closureN)self_7312157)->elements[0], k_734825, NULL, NULL);
+ } else {
+
+-closureN_type c_7318139;
+-object e_7318175 [3];
+-c_7318139.hdr.mark = gc_color_red;
+- c_7318139.hdr.grayed = 0;
+-c_7318139.tag = closureN_tag;
+- c_7318139.fn = (function_type)__lambda_423;
+-c_7318139.num_args = 1;
+-c_7318139.num_elements = 3;
+-c_7318139.elements = (object *)e_7318175;
+-c_7318139.elements[0] = k_735277;
+-c_7318139.elements[1] = other_91lists_73552_733177;
+-c_7318139.elements[2] = ((closureN)self_7313410)->elements[1];
++closureN_type c_7316839;
++object e_7316875 [3];
++c_7316839.hdr.mark = gc_color_red;
++ c_7316839.hdr.grayed = 0;
++c_7316839.tag = closureN_tag;
++ c_7316839.fn = (function_type)__lambda_423;
++c_7316839.num_args = 1;
++c_7316839.num_elements = 3;
++c_7316839.elements = (object *)e_7316875;
++c_7316839.elements[0] = k_734825;
++c_7316839.elements[1] = other_91lists_73552_732830;
++c_7316839.elements[2] = ((closureN)self_7312157)->elements[1];
+
+
+-closureN_type c_7318176;
+-object e_7318184 [1];
+-c_7318176.hdr.mark = gc_color_red;
+- c_7318176.hdr.grayed = 0;
+-c_7318176.tag = closureN_tag;
+- c_7318176.fn = (function_type)__lambda_430;
+-c_7318176.num_args = 0;
+-c_7318176.num_elements = 1;
+-c_7318176.elements = (object *)e_7318184;
+-c_7318176.elements[0] = list_73551_733176;
++closureN_type c_7316876;
++object e_7316884 [1];
++c_7316876.hdr.mark = gc_color_red;
++ c_7316876.hdr.grayed = 0;
++c_7316876.tag = closureN_tag;
++ c_7316876.fn = (function_type)__lambda_430;
++c_7316876.num_args = 0;
++c_7316876.num_elements = 1;
++c_7316876.elements = (object *)e_7316884;
++c_7316876.elements[0] = list_73551_732829;
+
+-return_direct_with_clo1(data,(closure)&c_7318139,__lambda_423, &c_7318176);}
++return_direct_with_clo1(data,(closure)&c_7316839,__lambda_423, &c_7316876);}
+ ;;
+ }
+
+-static void __lambda_430(void *data, object self_7313411, int argc, object *args) /* object self_7313411, object k_735290 */
++static void __lambda_430(void *data, object self_7312158, int argc, object *args) /* object self_7312158, object k_734838 */
+ {
+- object k_735290 = args[0];
++ object k_734838 = args[0];
+
+
+
+
+-return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_735290, Cyc_car(data, ((closureN)self_7313411)->elements[0]), Cyc_cdr(data, ((closureN)self_7313411)->elements[0]));;
++return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_734838, Cyc_car(data, ((closureN)self_7312158)->elements[0]), Cyc_cdr(data, ((closureN)self_7312158)->elements[0]));;
+ }
+
+-static void __lambda_423(void *data, object self_7313412, int argc, object *args) /* object self_7313412, object r_735281 */
++static void __lambda_423(void *data, object self_7312159, int argc, object *args) /* object self_7312159, object r_734829 */
+ {
+- object r_735281 = args[0];
++ object r_734829 = args[0];
+
+-closureN_type c_7318141;
+-object e_7318145 [2];
+-c_7318141.hdr.mark = gc_color_red;
+- c_7318141.hdr.grayed = 0;
+-c_7318141.tag = closureN_tag;
+- c_7318141.fn = (function_type)__lambda_424;
+-c_7318141.num_args = 1;
+-c_7318141.num_elements = 2;
+-c_7318141.elements = (object *)e_7318145;
+-c_7318141.elements[0] = ((closureN)self_7313412)->elements[0];
+-c_7318141.elements[1] = r_735281;
++closureN_type c_7316841;
++object e_7316845 [2];
++c_7316841.hdr.mark = gc_color_red;
++ c_7316841.hdr.grayed = 0;
++c_7316841.tag = closureN_tag;
++ c_7316841.fn = (function_type)__lambda_424;
++c_7316841.num_args = 1;
++c_7316841.num_elements = 2;
++c_7316841.elements = (object *)e_7316845;
++c_7316841.elements[0] = ((closureN)self_7312159)->elements[0];
++c_7316841.elements[1] = r_734829;
+
+
+-closureN_type c_7318146;
+-object e_7318174 [2];
+-c_7318146.hdr.mark = gc_color_red;
+- c_7318146.hdr.grayed = 0;
+-c_7318146.tag = closureN_tag;
+- c_7318146.fn = (function_type)__lambda_425;
+-c_7318146.num_args = 2;
+-c_7318146.num_elements = 2;
+-c_7318146.elements = (object *)e_7318174;
+-c_7318146.elements[0] = ((closureN)self_7313412)->elements[1];
+-c_7318146.elements[1] = ((closureN)self_7313412)->elements[2];
++closureN_type c_7316846;
++object e_7316874 [2];
++c_7316846.hdr.mark = gc_color_red;
++ c_7316846.hdr.grayed = 0;
++c_7316846.tag = closureN_tag;
++ c_7316846.fn = (function_type)__lambda_425;
++c_7316846.num_args = 2;
++c_7316846.num_elements = 2;
++c_7316846.elements = (object *)e_7316874;
++c_7316846.elements[0] = ((closureN)self_7312159)->elements[1];
++c_7316846.elements[1] = ((closureN)self_7312159)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7318141,__lambda_424, &c_7318146);;
++return_direct_with_clo1(data,(closure)&c_7316841,__lambda_424, &c_7316846);;
+ }
+
+-static void __lambda_425(void *data, object self_7313413, int argc, object *args) /* object self_7313413, object k_735283, object a_73553_733178, object d_73554_733179 */
++static void __lambda_425(void *data, object self_7312160, int argc, object *args) /* object self_7312160, object k_734831, object a_73553_732831, object d_73554_732832 */
+ {
+- object k_735283 = args[0]; object a_73553_733178 = args[1]; object d_73554_733179 = args[2];
++ object k_734831 = args[0]; object a_73553_732831 = args[1]; object d_73554_732832 = args[2];
+
+-closureN_type c_7318148;
+-object e_7318166 [3];
+-c_7318148.hdr.mark = gc_color_red;
+- c_7318148.hdr.grayed = 0;
+-c_7318148.tag = closureN_tag;
+- c_7318148.fn = (function_type)__lambda_426;
+-c_7318148.num_args = 1;
+-c_7318148.num_elements = 3;
+-c_7318148.elements = (object *)e_7318166;
+-c_7318148.elements[0] = a_73553_733178;
+-c_7318148.elements[1] = d_73554_733179;
+-c_7318148.elements[2] = k_735283;
++closureN_type c_7316848;
++object e_7316866 [3];
++c_7316848.hdr.mark = gc_color_red;
++ c_7316848.hdr.grayed = 0;
++c_7316848.tag = closureN_tag;
++ c_7316848.fn = (function_type)__lambda_426;
++c_7316848.num_args = 1;
++c_7316848.num_elements = 3;
++c_7316848.elements = (object *)e_7316866;
++c_7316848.elements[0] = a_73553_732831;
++c_7316848.elements[1] = d_73554_732832;
++c_7316848.elements[2] = k_734831;
+
+
+-closureN_type c_7318167;
+-object e_7318173 [2];
+-c_7318167.hdr.mark = gc_color_red;
+- c_7318167.hdr.grayed = 0;
+-c_7318167.tag = closureN_tag;
+- c_7318167.fn = (function_type)__lambda_429;
+-c_7318167.num_args = 0;
+-c_7318167.num_elements = 2;
+-c_7318167.elements = (object *)e_7318173;
+-c_7318167.elements[0] = ((closureN)self_7313413)->elements[0];
+-c_7318167.elements[1] = ((closureN)self_7313413)->elements[1];
++closureN_type c_7316867;
++object e_7316873 [2];
++c_7316867.hdr.mark = gc_color_red;
++ c_7316867.hdr.grayed = 0;
++c_7316867.tag = closureN_tag;
++ c_7316867.fn = (function_type)__lambda_429;
++c_7316867.num_args = 0;
++c_7316867.num_elements = 2;
++c_7316867.elements = (object *)e_7316873;
++c_7316867.elements[0] = ((closureN)self_7312160)->elements[0];
++c_7316867.elements[1] = ((closureN)self_7312160)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7318148,__lambda_426, &c_7318167);;
++return_direct_with_clo1(data,(closure)&c_7316848,__lambda_426, &c_7316867);;
+ }
+
+-static void __lambda_429(void *data, object self_7313414, int argc, object *args) /* object self_7313414, object k_735289 */
++static void __lambda_429(void *data, object self_7312161, int argc, object *args) /* object self_7312161, object k_734837 */
+ {
+- object k_735289 = args[0];
++ object k_734837 = args[0];
+
+
+-return_closcall2(data, car(((closureN)self_7313414)->elements[1]), k_735289, ((closureN)self_7313414)->elements[0]);;
++return_closcall2(data, car(((closureN)self_7312161)->elements[1]), k_734837, ((closureN)self_7312161)->elements[0]);;
+ }
+
+-static void __lambda_426(void *data, object self_7313415, int argc, object *args) /* object self_7313415, object r_735284 */
++static void __lambda_426(void *data, object self_7312162, int argc, object *args) /* object self_7312162, object r_734832 */
+ {
+- object r_735284 = args[0];
++ object r_734832 = args[0];
+
+-closureN_type c_7318150;
+-object e_7318154 [2];
+-c_7318150.hdr.mark = gc_color_red;
+- c_7318150.hdr.grayed = 0;
+-c_7318150.tag = closureN_tag;
+- c_7318150.fn = (function_type)__lambda_427;
+-c_7318150.num_args = 1;
+-c_7318150.num_elements = 2;
+-c_7318150.elements = (object *)e_7318154;
+-c_7318150.elements[0] = ((closureN)self_7313415)->elements[2];
+-c_7318150.elements[1] = r_735284;
++closureN_type c_7316850;
++object e_7316854 [2];
++c_7316850.hdr.mark = gc_color_red;
++ c_7316850.hdr.grayed = 0;
++c_7316850.tag = closureN_tag;
++ c_7316850.fn = (function_type)__lambda_427;
++c_7316850.num_args = 1;
++c_7316850.num_elements = 2;
++c_7316850.elements = (object *)e_7316854;
++c_7316850.elements[0] = ((closureN)self_7312162)->elements[2];
++c_7316850.elements[1] = r_734832;
+
+
+-closureN_type c_7318155;
+-object e_7318165 [2];
+-c_7318155.hdr.mark = gc_color_red;
+- c_7318155.hdr.grayed = 0;
+-c_7318155.tag = closureN_tag;
+- c_7318155.fn = (function_type)__lambda_428;
+-c_7318155.num_args = 2;
+-c_7318155.num_elements = 2;
+-c_7318155.elements = (object *)e_7318165;
+-c_7318155.elements[0] = ((closureN)self_7313415)->elements[0];
+-c_7318155.elements[1] = ((closureN)self_7313415)->elements[1];
++closureN_type c_7316855;
++object e_7316865 [2];
++c_7316855.hdr.mark = gc_color_red;
++ c_7316855.hdr.grayed = 0;
++c_7316855.tag = closureN_tag;
++ c_7316855.fn = (function_type)__lambda_428;
++c_7316855.num_args = 2;
++c_7316855.num_elements = 2;
++c_7316855.elements = (object *)e_7316865;
++c_7316855.elements[0] = ((closureN)self_7312162)->elements[0];
++c_7316855.elements[1] = ((closureN)self_7312162)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7318150,__lambda_427, &c_7318155);;
++return_direct_with_clo1(data,(closure)&c_7316850,__lambda_427, &c_7316855);;
+ }
+
+-static void __lambda_428(void *data, object self_7313416, int argc, object *args) /* object self_7313416, object k_735286, object cars_73555_733180, object cdrs_73556_733181 */
++static void __lambda_428(void *data, object self_7312163, int argc, object *args) /* object self_7312163, object k_734834, object cars_73555_732833, object cdrs_73556_732834 */
+ {
+- object k_735286 = args[0]; object cars_73555_733180 = args[1]; object cdrs_73556_733181 = args[2];
++ object k_734834 = args[0]; object cars_73555_732833 = args[1]; object cdrs_73556_732834 = args[2];
+
+-pair_type local_7318159;
++pair_type local_7316859;
+
+-pair_type local_7318163;
+-return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_735286, set_pair_as_expr(&local_7318159, ((closureN)self_7313416)->elements[0], cars_73555_733180), set_pair_as_expr(&local_7318163, ((closureN)self_7313416)->elements[1], cdrs_73556_733181));;
++pair_type local_7316863;
++return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_734834, set_pair_as_expr(&local_7316859, ((closureN)self_7312163)->elements[0], cars_73555_732833), set_pair_as_expr(&local_7316863, ((closureN)self_7312163)->elements[1], cdrs_73556_732834));;
+ }
+
+-static void __lambda_427(void *data, object self_7313417, int argc, object *args) /* object self_7313417, object r_735285 */
++static void __lambda_427(void *data, object self_7312164, int argc, object *args) /* object self_7312164, object r_734833 */
+ {
+- object r_735285 = args[0];
+- return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7313417)->elements[0], ((closureN)self_7313417)->elements[1], r_735285);;
++ object r_734833 = args[0];
++ return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7312164)->elements[0], ((closureN)self_7312164)->elements[1], r_734833);;
+ }
+
+-static void __lambda_424(void *data, object self_7313418, int argc, object *args) /* object self_7313418, object r_735282 */
++static void __lambda_424(void *data, object self_7312165, int argc, object *args) /* object self_7312165, object r_734830 */
+ {
+- object r_735282 = args[0];
+- return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7313418)->elements[0], ((closureN)self_7313418)->elements[1], r_735282);;
++ object r_734830 = args[0];
++ return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7312165)->elements[0], ((closureN)self_7312165)->elements[1], r_734830);;
+ }
+
+-static void __lambda_421(void *data, object self_7313419, int argc, object *args) /* object self_7313419, object r_735276 */
++static void __lambda_421(void *data, object self_7312166, int argc, object *args) /* object self_7312166, object r_734824 */
+ {
+- object r_735276 = args[0];
+- return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7313419)->elements[0], ((closureN)self_7313419)->elements[1], r_735276);;
++ object r_734824 = args[0];
++ return_direct_with_clo3(data, __glo_call_91with_91values_scheme_base, (((closure) __glo_call_91with_91values_scheme_base)->fn), ((closureN)self_7312166)->elements[0], ((closureN)self_7312166)->elements[1], r_734824);;
+ }
+
+-static void __lambda_417(void *data, object self_7313420, int argc, object *args) /* object self_7313420, object r_735272 */
++static void __lambda_417(void *data, object self_7312167, int argc, object *args) /* object self_7312167, object r_734820 */
+ {
+- object r_735272 = args[0];
++ object r_734820 = args[0];
+
+-closureN_type c_7318110;
+-object e_7318117 [3];
+-c_7318110.hdr.mark = gc_color_red;
+- c_7318110.hdr.grayed = 0;
+-c_7318110.tag = closureN_tag;
+- c_7318110.fn = (function_type)__lambda_418;
+-c_7318110.num_args = 1;
+-c_7318110.num_elements = 3;
+-c_7318110.elements = (object *)e_7318117;
+-c_7318110.elements[0] = ((closureN)self_7313420)->elements[0];
+-c_7318110.elements[1] = ((closureN)self_7313420)->elements[1];
+-c_7318110.elements[2] = ((closureN)self_7313420)->elements[2];
++closureN_type c_7316810;
++object e_7316817 [3];
++c_7316810.hdr.mark = gc_color_red;
++ c_7316810.hdr.grayed = 0;
++c_7316810.tag = closureN_tag;
++ c_7316810.fn = (function_type)__lambda_418;
++c_7316810.num_args = 1;
++c_7316810.num_elements = 3;
++c_7316810.elements = (object *)e_7316817;
++c_7316810.elements[0] = ((closureN)self_7312167)->elements[0];
++c_7316810.elements[1] = ((closureN)self_7312167)->elements[1];
++c_7316810.elements[2] = ((closureN)self_7312167)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318110,__lambda_418, Cyc_set_cell(data, ((closureN)self_7313420)->elements[2], r_735272));;
++return_direct_with_clo1(data,(closure)&c_7316810,__lambda_418, Cyc_set_cell(data, ((closureN)self_7312167)->elements[2], r_734820));;
+ }
+
+-static void __lambda_418(void *data, object self_7313421, int argc, object *args) /* object self_7313421, object r_735271 */
++static void __lambda_418(void *data, object self_7312168, int argc, object *args) /* object self_7312168, object r_734819 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313421)->elements[2]), ((closureN)self_7313421)->elements[0], ((closureN)self_7313421)->elements[1]);;
++return_closcall2(data, car(((closureN)self_7312168)->elements[2]), ((closureN)self_7312168)->elements[0], ((closureN)self_7312168)->elements[1]);;
+ }
+
+-static void __lambda_413(void *data, object self_7313422, int argc, object *args) /* object self_7313422, object r_735269 */
++static void __lambda_413(void *data, object self_7312169, int argc, object *args) /* object self_7312169, object r_734817 */
+ {
+- object r_735269 = args[0];
+- return_direct_with_clo2(data, __glo_call_91with_91current_91continuation_scheme_base, (((closure) __glo_call_91with_91current_91continuation_scheme_base)->fn), ((closureN)self_7313422)->elements[0], r_735269);;
++ object r_734817 = args[0];
++ return_direct_with_clo2(data, __glo_call_91with_91current_91continuation_scheme_base, (((closure) __glo_call_91with_91current_91continuation_scheme_base)->fn), ((closureN)self_7312169)->elements[0], r_734817);;
+ }
+
+-static void __lambda_411(void *data, object _, int argc, object *args) /* closure _,object k_735263, object pair_73544_733170 */
++static void __lambda_411(void *data, object _, int argc, object *args) /* closure _,object k_734811, object pair_73544_732823 */
+ {
+-object k_735263 = args[0]; object pair_73544_733170 = args[1];
++object k_734811 = args[0]; object pair_73544_732823 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:car+cdr");
+
+
+
+
+-return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_735263, Cyc_car(data, pair_73544_733170), Cyc_cdr(data, pair_73544_733170));;
++return_direct_with_clo3(data, __glo_values_scheme_base, (((closure) __glo_values_scheme_base)->fn), k_734811, Cyc_car(data, pair_73544_732823), Cyc_cdr(data, pair_73544_732823));;
+ }
+
+-static void __lambda_410(void *data, object _, int argc, object *args) /* closure _,object k_735244, object expr_73535_733164, object rename_73536_733165, object compare_73537_733166 */
++static void __lambda_410(void *data, object _, int argc, object *args) /* closure _,object k_734792, object expr_73535_732817, object rename_73536_732818, object compare_73537_732819 */
+ {
+-object k_735244 = args[0]; object expr_73535_733164 = args[1];
++object k_734792 = args[0]; object expr_73535_732817 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:receive");
+
+-pair_type local_7318060;
++pair_type local_7316760;
+
+-pair_type local_7318063;
++pair_type local_7316763;
+
+-pair_type local_7318066;
++pair_type local_7316766;
+
+-pair_type local_7318069;
++pair_type local_7316769;
+
+-pair_type local_7318072;
++pair_type local_7316772;
+
+
+
+-pair_type local_7318077;
++pair_type local_7316777;
+
+-pair_type local_7318080;
++pair_type local_7316780;
+
+-pair_type local_7318083;
++pair_type local_7316783;
+
+
+
+
+-return_direct_with_clo1(data, k_735244, (((closure) k_735244)->fn), set_pair_as_expr(&local_7318060, quote_call_91with_91values, set_pair_as_expr(&local_7318063, set_pair_as_expr(&local_7318066, quote_lambda, set_pair_as_expr(&local_7318069, NULL, set_pair_as_expr(&local_7318072, Cyc_caddr(data, expr_73535_733164), NULL))), set_pair_as_expr(&local_7318077, set_pair_as_expr(&local_7318080, quote_lambda, set_pair_as_expr(&local_7318083, Cyc_cadr(data, expr_73535_733164), Cyc_cdddr(data, expr_73535_733164))), NULL))));;
++return_direct_with_clo1(data, k_734792, (((closure) k_734792)->fn), set_pair_as_expr(&local_7316760, quote_call_91with_91values, set_pair_as_expr(&local_7316763, set_pair_as_expr(&local_7316766, quote_lambda, set_pair_as_expr(&local_7316769, NULL, set_pair_as_expr(&local_7316772, Cyc_caddr(data, expr_73535_732817), NULL))), set_pair_as_expr(&local_7316777, set_pair_as_expr(&local_7316780, quote_lambda, set_pair_as_expr(&local_7316783, Cyc_cadr(data, expr_73535_732817), Cyc_cdddr(data, expr_73535_732817))), NULL))));;
+ }
+
+-static void __lambda_403(void *data, object _, int argc, object *args) /* closure _,object k_735232, object ls_73528_733158 */
++static void __lambda_403(void *data, object _, int argc, object *args) /* closure _,object k_734780, object ls_73528_732811 */
+ {
+-object k_735232 = args[0]; object ls_73528_733158 = args[1];
++object k_734780 = args[0]; object ls_73528_732811 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:list-copy");
+
+-closureN_type c_7318008;
+-object e_7318055 [1];
+-c_7318008.hdr.mark = gc_color_red;
+- c_7318008.hdr.grayed = 0;
+-c_7318008.tag = closureN_tag;
+- c_7318008.fn = (function_type)__lambda_404;
+-c_7318008.num_args = 2;
+-c_7318008.num_elements = 1;
+-c_7318008.elements = (object *)e_7318055;
+-c_7318008.elements[0] = k_735232;
++closureN_type c_7316708;
++object e_7316755 [1];
++c_7316708.hdr.mark = gc_color_red;
++ c_7316708.hdr.grayed = 0;
++c_7316708.tag = closureN_tag;
++ c_7316708.fn = (function_type)__lambda_404;
++c_7316708.num_args = 2;
++c_7316708.num_elements = 1;
++c_7316708.elements = (object *)e_7316755;
++c_7316708.elements[0] = k_734780;
+
+-return_direct_with_clo2(data,(closure)&c_7318008,__lambda_404, ls_73528_733158, NULL);;
++return_direct_with_clo2(data,(closure)&c_7316708,__lambda_404, ls_73528_732811, NULL);;
+ }
+
+-static void __lambda_404(void *data, object self_7313396, int argc, object *args) /* object self_7313396, object ls_73530_733159, object res_73531_733160 */
++static void __lambda_404(void *data, object self_7312143, int argc, object *args) /* object self_7312143, object ls_73530_732812, object res_73531_732813 */
+ {
+- object ls_73530_733159 = args[0]; object res_73531_733160 = args[1];
++ object ls_73530_732812 = args[0]; object res_73531_732813 = args[1];
+
+-closureN_type c_7318010;
+-object e_7318054 [3];
+-c_7318010.hdr.mark = gc_color_red;
+- c_7318010.hdr.grayed = 0;
+-c_7318010.tag = closureN_tag;
+- c_7318010.fn = (function_type)__lambda_405;
+-c_7318010.num_args = 1;
+-c_7318010.num_elements = 3;
+-c_7318010.elements = (object *)e_7318054;
+-c_7318010.elements[0] = ((closureN)self_7313396)->elements[0];
+-c_7318010.elements[1] = ls_73530_733159;
+-c_7318010.elements[2] = res_73531_733160;
++closureN_type c_7316710;
++object e_7316754 [3];
++c_7316710.hdr.mark = gc_color_red;
++ c_7316710.hdr.grayed = 0;
++c_7316710.tag = closureN_tag;
++ c_7316710.fn = (function_type)__lambda_405;
++c_7316710.num_args = 1;
++c_7316710.num_elements = 3;
++c_7316710.elements = (object *)e_7316754;
++c_7316710.elements[0] = ((closureN)self_7312143)->elements[0];
++c_7316710.elements[1] = ls_73530_732812;
++c_7316710.elements[2] = res_73531_732813;
+
+-return_direct_with_clo1(data,(closure)&c_7318010,__lambda_405, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7316710,__lambda_405, boolean_f);;
+ }
+
+-static void __lambda_405(void *data, object self_7313397, int argc, object *args) /* object self_7313397, object lp_73532_733161 */
++static void __lambda_405(void *data, object self_7312144, int argc, object *args) /* object self_7312144, object lp_73532_732814 */
+ {
+- object lp_73532_733161 = args[0];
++ object lp_73532_732814 = args[0];
+
+-closureN_type c_7318012;
+-object e_7318050 [3];
+-c_7318012.hdr.mark = gc_color_red;
+- c_7318012.hdr.grayed = 0;
+-c_7318012.tag = closureN_tag;
+- c_7318012.fn = (function_type)__lambda_1370;
+-c_7318012.num_args = 1;
+-c_7318012.num_elements = 3;
+-c_7318012.elements = (object *)e_7318050;
+-c_7318012.elements[0] = ((closureN)self_7313397)->elements[0];
+-c_7318012.elements[1] = ((closureN)self_7313397)->elements[1];
+-c_7318012.elements[2] = ((closureN)self_7313397)->elements[2];
++closureN_type c_7316712;
++object e_7316750 [3];
++c_7316712.hdr.mark = gc_color_red;
++ c_7316712.hdr.grayed = 0;
++c_7316712.tag = closureN_tag;
++ c_7316712.fn = (function_type)__lambda_1323;
++c_7316712.num_args = 1;
++c_7316712.num_elements = 3;
++c_7316712.elements = (object *)e_7316750;
++c_7316712.elements[0] = ((closureN)self_7312144)->elements[0];
++c_7316712.elements[1] = ((closureN)self_7312144)->elements[1];
++c_7316712.elements[2] = ((closureN)self_7312144)->elements[2];
+
+
+-pair_type local_7318053;
+-return_direct_with_clo1(data,(closure)&c_7318012,__lambda_1370, set_cell_as_expr(&local_7318053, lp_73532_733161));;
++pair_type local_7316753;
++return_direct_with_clo1(data,(closure)&c_7316712,__lambda_1323, set_cell_as_expr(&local_7316753, lp_73532_732814));;
+ }
+
+-static void __lambda_1370(void *data, object self_7313398, int argc, object *args) /* object self_7313398, object lp_73532_733161 */
++static void __lambda_1323(void *data, object self_7312145, int argc, object *args) /* object self_7312145, object lp_73532_732814 */
+ {
+- object lp_73532_733161 = args[0];
++ object lp_73532_732814 = args[0];
+
+-closureN_type c_7318014;
+-object e_7318028 [4];
+-c_7318014.hdr.mark = gc_color_red;
+- c_7318014.hdr.grayed = 0;
+-c_7318014.tag = closureN_tag;
+- c_7318014.fn = (function_type)__lambda_406;
+-c_7318014.num_args = 1;
+-c_7318014.num_elements = 4;
+-c_7318014.elements = (object *)e_7318028;
+-c_7318014.elements[0] = ((closureN)self_7313398)->elements[0];
+-c_7318014.elements[1] = lp_73532_733161;
+-c_7318014.elements[2] = ((closureN)self_7313398)->elements[1];
+-c_7318014.elements[3] = ((closureN)self_7313398)->elements[2];
++closureN_type c_7316714;
++object e_7316728 [4];
++c_7316714.hdr.mark = gc_color_red;
++ c_7316714.hdr.grayed = 0;
++c_7316714.tag = closureN_tag;
++ c_7316714.fn = (function_type)__lambda_406;
++c_7316714.num_args = 1;
++c_7316714.num_elements = 4;
++c_7316714.elements = (object *)e_7316728;
++c_7316714.elements[0] = ((closureN)self_7312145)->elements[0];
++c_7316714.elements[1] = lp_73532_732814;
++c_7316714.elements[2] = ((closureN)self_7312145)->elements[1];
++c_7316714.elements[3] = ((closureN)self_7312145)->elements[2];
+
+
+-closureN_type c_7318029;
+-object e_7318049 [1];
+-c_7318029.hdr.mark = gc_color_red;
+- c_7318029.hdr.grayed = 0;
+-c_7318029.tag = closureN_tag;
+- c_7318029.fn = (function_type)__lambda_408;
+-c_7318029.num_args = 2;
+-c_7318029.num_elements = 1;
+-c_7318029.elements = (object *)e_7318049;
+-c_7318029.elements[0] = lp_73532_733161;
++closureN_type c_7316729;
++object e_7316749 [1];
++c_7316729.hdr.mark = gc_color_red;
++ c_7316729.hdr.grayed = 0;
++c_7316729.tag = closureN_tag;
++ c_7316729.fn = (function_type)__lambda_408;
++c_7316729.num_args = 2;
++c_7316729.num_elements = 1;
++c_7316729.elements = (object *)e_7316749;
++c_7316729.elements[0] = lp_73532_732814;
+
+-return_direct_with_clo1(data,(closure)&c_7318014,__lambda_406, &c_7318029);;
++return_direct_with_clo1(data,(closure)&c_7316714,__lambda_406, &c_7316729);;
+ }
+
+-static void __lambda_408(void *data, object self_7313399, int argc, object *args) /* object self_7313399, object k_735236, object ls_73533_733162, object res_73534_733163 */
++static void __lambda_408(void *data, object self_7312146, int argc, object *args) /* object self_7312146, object k_734784, object ls_73533_732815, object res_73534_732816 */
+ {
+- object k_735236 = args[0]; object ls_73533_733162 = args[1]; object res_73534_733163 = args[2];
++ object k_734784 = args[0]; object ls_73533_732815 = args[1]; object res_73534_732816 = args[2];
+
+-if( (boolean_f != Cyc_is_pair(ls_73533_733162)) ){
++if( (boolean_f != Cyc_is_pair(ls_73533_732815)) ){
+
+
+
+
+
+-pair_type local_7318040;
++pair_type local_7316740;
+
+
+-return_closcall3(data, car(((closureN)self_7313399)->elements[0]), k_735236, Cyc_cdr(data, ls_73533_733162), set_pair_as_expr(&local_7318040, Cyc_car(data, ls_73533_733162), res_73534_733163));
++return_closcall3(data, car(((closureN)self_7312146)->elements[0]), k_734784, Cyc_cdr(data, ls_73533_732815), set_pair_as_expr(&local_7316740, Cyc_car(data, ls_73533_732815), res_73534_732816));
+ } else {
+
+-closureN_type c_7318044;
+-object e_7318048 [2];
+-c_7318044.hdr.mark = gc_color_red;
+- c_7318044.hdr.grayed = 0;
+-c_7318044.tag = closureN_tag;
+- c_7318044.fn = (function_type)__lambda_409;
+-c_7318044.num_args = 1;
+-c_7318044.num_elements = 2;
+-c_7318044.elements = (object *)e_7318048;
+-c_7318044.elements[0] = k_735236;
+-c_7318044.elements[1] = ls_73533_733162;
++closureN_type c_7316744;
++object e_7316748 [2];
++c_7316744.hdr.mark = gc_color_red;
++ c_7316744.hdr.grayed = 0;
++c_7316744.tag = closureN_tag;
++ c_7316744.fn = (function_type)__lambda_409;
++c_7316744.num_args = 1;
++c_7316744.num_elements = 2;
++c_7316744.elements = (object *)e_7316748;
++c_7316744.elements[0] = k_734784;
++c_7316744.elements[1] = ls_73533_732815;
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7318044, primitive_cons, NULL, res_73534_733163);}
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7316744, primitive_cons, NULL, res_73534_732816);}
+ ;;
+ }
+
+-static void __lambda_409(void *data, object self_7313400, int argc, object *args) /* object self_7313400, object r_735241_7312727 */
++static void __lambda_409(void *data, object self_7312147, int argc, object *args) /* object self_7312147, object r_734789_7311474 */
+ {
+- object r_735241_7312727 = args[0];
+- return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), ((closureN)self_7313400)->elements[0], r_735241_7312727, ((closureN)self_7313400)->elements[1]);;
++ object r_734789_7311474 = args[0];
++ return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), ((closureN)self_7312147)->elements[0], r_734789_7311474, ((closureN)self_7312147)->elements[1]);;
+ }
+
+-static void __lambda_406(void *data, object self_7313401, int argc, object *args) /* object self_7313401, object r_735235 */
++static void __lambda_406(void *data, object self_7312148, int argc, object *args) /* object self_7312148, object r_734783 */
+ {
+- object r_735235 = args[0];
++ object r_734783 = args[0];
+
+-closureN_type c_7318016;
+-object e_7318024 [4];
+-c_7318016.hdr.mark = gc_color_red;
+- c_7318016.hdr.grayed = 0;
+-c_7318016.tag = closureN_tag;
+- c_7318016.fn = (function_type)__lambda_407;
+-c_7318016.num_args = 1;
+-c_7318016.num_elements = 4;
+-c_7318016.elements = (object *)e_7318024;
+-c_7318016.elements[0] = ((closureN)self_7313401)->elements[0];
+-c_7318016.elements[1] = ((closureN)self_7313401)->elements[1];
+-c_7318016.elements[2] = ((closureN)self_7313401)->elements[2];
+-c_7318016.elements[3] = ((closureN)self_7313401)->elements[3];
++closureN_type c_7316716;
++object e_7316724 [4];
++c_7316716.hdr.mark = gc_color_red;
++ c_7316716.hdr.grayed = 0;
++c_7316716.tag = closureN_tag;
++ c_7316716.fn = (function_type)__lambda_407;
++c_7316716.num_args = 1;
++c_7316716.num_elements = 4;
++c_7316716.elements = (object *)e_7316724;
++c_7316716.elements[0] = ((closureN)self_7312148)->elements[0];
++c_7316716.elements[1] = ((closureN)self_7312148)->elements[1];
++c_7316716.elements[2] = ((closureN)self_7312148)->elements[2];
++c_7316716.elements[3] = ((closureN)self_7312148)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7318016,__lambda_407, Cyc_set_cell(data, ((closureN)self_7313401)->elements[1], r_735235));;
++return_direct_with_clo1(data,(closure)&c_7316716,__lambda_407, Cyc_set_cell(data, ((closureN)self_7312148)->elements[1], r_734783));;
+ }
+
+-static void __lambda_407(void *data, object self_7313402, int argc, object *args) /* object self_7313402, object r_735234 */
++static void __lambda_407(void *data, object self_7312149, int argc, object *args) /* object self_7312149, object r_734782 */
+ {
+
+
+
+-return_closcall3(data, car(((closureN)self_7313402)->elements[1]), ((closureN)self_7313402)->elements[0], ((closureN)self_7313402)->elements[2], ((closureN)self_7313402)->elements[3]);;
++return_closcall3(data, car(((closureN)self_7312149)->elements[1]), ((closureN)self_7312149)->elements[0], ((closureN)self_7312149)->elements[2], ((closureN)self_7312149)->elements[3]);;
+ }
+
+-static void __lambda_396(void *data, object _, int argc, object *args) /* closure _,object k_735219, object k_73522_733152, object fill_73523_733153_raw, ... */
++static void __lambda_396(void *data, object _, int argc, object *args) /* closure _,object k_734767, object k_73522_732805, object fill_73523_732806_raw, ... */
+ {
+-object k_735219 = args[0]; object k_73522_733152 = args[1];
+-load_varargs(fill_73523_733153, args, 2, argc - 2);
++object k_734767 = args[0]; object k_73522_732805 = args[1];
++load_varargs(fill_73523_732806, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:make-list");
+
+-closureN_type c_7317938;
+-object e_7318005 [3];
+-c_7317938.hdr.mark = gc_color_red;
+- c_7317938.hdr.grayed = 0;
+-c_7317938.tag = closureN_tag;
+- c_7317938.fn = (function_type)__lambda_397;
+-c_7317938.num_args = 2;
+-c_7317938.num_elements = 3;
+-c_7317938.elements = (object *)e_7318005;
+-c_7317938.elements[0] = fill_73523_733153;
+-c_7317938.elements[1] = k_735219;
+-c_7317938.elements[2] = k_73522_733152;
++closureN_type c_7316638;
++object e_7316705 [3];
++c_7316638.hdr.mark = gc_color_red;
++ c_7316638.hdr.grayed = 0;
++c_7316638.tag = closureN_tag;
++ c_7316638.fn = (function_type)__lambda_397;
++c_7316638.num_args = 2;
++c_7316638.num_elements = 3;
++c_7316638.elements = (object *)e_7316705;
++c_7316638.elements[0] = fill_73523_732806;
++c_7316638.elements[1] = k_734767;
++c_7316638.elements[2] = k_73522_732805;
+
+-return_direct_with_clo2(data,(closure)&c_7317938,__lambda_397, boolean_f, boolean_f);;
++return_direct_with_clo2(data,(closure)&c_7316638,__lambda_397, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_397(void *data, object self_7313388, int argc, object *args) /* object self_7313388, object x_73524_733154, object make_73525_733155 */
++static void __lambda_397(void *data, object self_7312135, int argc, object *args) /* object self_7312135, object x_73524_732807, object make_73525_732808 */
+ {
+- object x_73524_733154 = args[0]; object make_73525_733155 = args[1];
++ object x_73524_732807 = args[0]; object make_73525_732808 = args[1];
+
+-closureN_type c_7317940;
+-object e_7318001 [4];
+-c_7317940.hdr.mark = gc_color_red;
+- c_7317940.hdr.grayed = 0;
+-c_7317940.tag = closureN_tag;
+- c_7317940.fn = (function_type)__lambda_1369;
+-c_7317940.num_args = 1;
+-c_7317940.num_elements = 4;
+-c_7317940.elements = (object *)e_7318001;
+-c_7317940.elements[0] = ((closureN)self_7313388)->elements[0];
+-c_7317940.elements[1] = ((closureN)self_7313388)->elements[1];
+-c_7317940.elements[2] = ((closureN)self_7313388)->elements[2];
+-c_7317940.elements[3] = make_73525_733155;
++closureN_type c_7316640;
++object e_7316701 [4];
++c_7316640.hdr.mark = gc_color_red;
++ c_7316640.hdr.grayed = 0;
++c_7316640.tag = closureN_tag;
++ c_7316640.fn = (function_type)__lambda_1322;
++c_7316640.num_args = 1;
++c_7316640.num_elements = 4;
++c_7316640.elements = (object *)e_7316701;
++c_7316640.elements[0] = ((closureN)self_7312135)->elements[0];
++c_7316640.elements[1] = ((closureN)self_7312135)->elements[1];
++c_7316640.elements[2] = ((closureN)self_7312135)->elements[2];
++c_7316640.elements[3] = make_73525_732808;
+
+
+-pair_type local_7318004;
+-return_direct_with_clo1(data,(closure)&c_7317940,__lambda_1369, set_cell_as_expr(&local_7318004, x_73524_733154));;
++pair_type local_7316704;
++return_direct_with_clo1(data,(closure)&c_7316640,__lambda_1322, set_cell_as_expr(&local_7316704, x_73524_732807));;
+ }
+
+-static void __lambda_1369(void *data, object self_7313389, int argc, object *args) /* object self_7313389, object x_73524_733154 */
++static void __lambda_1322(void *data, object self_7312136, int argc, object *args) /* object self_7312136, object x_73524_732807 */
+ {
+- object x_73524_733154 = args[0];
++ object x_73524_732807 = args[0];
+
+-closureN_type c_7317942;
+-object e_7317996 [4];
+-c_7317942.hdr.mark = gc_color_red;
+- c_7317942.hdr.grayed = 0;
+-c_7317942.tag = closureN_tag;
+- c_7317942.fn = (function_type)__lambda_1368;
+-c_7317942.num_args = 1;
+-c_7317942.num_elements = 4;
+-c_7317942.elements = (object *)e_7317996;
+-c_7317942.elements[0] = ((closureN)self_7313389)->elements[0];
+-c_7317942.elements[1] = ((closureN)self_7313389)->elements[1];
+-c_7317942.elements[2] = ((closureN)self_7313389)->elements[2];
+-c_7317942.elements[3] = x_73524_733154;
++closureN_type c_7316642;
++object e_7316696 [4];
++c_7316642.hdr.mark = gc_color_red;
++ c_7316642.hdr.grayed = 0;
++c_7316642.tag = closureN_tag;
++ c_7316642.fn = (function_type)__lambda_1321;
++c_7316642.num_args = 1;
++c_7316642.num_elements = 4;
++c_7316642.elements = (object *)e_7316696;
++c_7316642.elements[0] = ((closureN)self_7312136)->elements[0];
++c_7316642.elements[1] = ((closureN)self_7312136)->elements[1];
++c_7316642.elements[2] = ((closureN)self_7312136)->elements[2];
++c_7316642.elements[3] = x_73524_732807;
+
+
+-pair_type local_7317999;
+-return_direct_with_clo1(data,(closure)&c_7317942,__lambda_1368, set_cell_as_expr(&local_7317999, ((closureN)self_7313389)->elements[3]));;
++pair_type local_7316699;
++return_direct_with_clo1(data,(closure)&c_7316642,__lambda_1321, set_cell_as_expr(&local_7316699, ((closureN)self_7312136)->elements[3]));;
+ }
+
+-static void __lambda_1368(void *data, object self_7313390, int argc, object *args) /* object self_7313390, object make_73525_733155 */
++static void __lambda_1321(void *data, object self_7312137, int argc, object *args) /* object self_7312137, object make_73525_732808 */
+ {
+- object make_73525_733155 = args[0];
+- object r_735227;
++ object make_73525_732808 = args[0];
++ object r_734775;
+
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313390)->elements[0])) ){
+- r_735227 = boolean_f;
++if( (boolean_f != Cyc_is_null(((closureN)self_7312137)->elements[0])) ){
++ r_734775 = boolean_f;
+ } else {
+
+- r_735227 = Cyc_car(data, ((closureN)self_7313390)->elements[0]);}
++ r_734775 = Cyc_car(data, ((closureN)self_7312137)->elements[0]);}
+ ;
+-closureN_type c_7317953;
+-object e_7317992 [4];
+-c_7317953.hdr.mark = gc_color_red;
+- c_7317953.hdr.grayed = 0;
+-c_7317953.tag = closureN_tag;
+- c_7317953.fn = (function_type)__lambda_398;
+-c_7317953.num_args = 1;
+-c_7317953.num_elements = 4;
+-c_7317953.elements = (object *)e_7317992;
+-c_7317953.elements[0] = ((closureN)self_7313390)->elements[1];
+-c_7317953.elements[1] = ((closureN)self_7313390)->elements[2];
+-c_7317953.elements[2] = make_73525_733155;
+-c_7317953.elements[3] = ((closureN)self_7313390)->elements[3];
++closureN_type c_7316653;
++object e_7316692 [4];
++c_7316653.hdr.mark = gc_color_red;
++ c_7316653.hdr.grayed = 0;
++c_7316653.tag = closureN_tag;
++ c_7316653.fn = (function_type)__lambda_398;
++c_7316653.num_args = 1;
++c_7316653.num_elements = 4;
++c_7316653.elements = (object *)e_7316692;
++c_7316653.elements[0] = ((closureN)self_7312137)->elements[1];
++c_7316653.elements[1] = ((closureN)self_7312137)->elements[2];
++c_7316653.elements[2] = make_73525_732808;
++c_7316653.elements[3] = ((closureN)self_7312137)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317953,__lambda_398, Cyc_set_cell(data, ((closureN)self_7313390)->elements[3], r_735227));;
++return_direct_with_clo1(data,(closure)&c_7316653,__lambda_398, Cyc_set_cell(data, ((closureN)self_7312137)->elements[3], r_734775));;
+ }
+
+-static void __lambda_398(void *data, object self_7313391, int argc, object *args) /* object self_7313391, object r_735220 */
++static void __lambda_398(void *data, object self_7312138, int argc, object *args) /* object self_7312138, object r_734768 */
+ {
+
+
+-closureN_type c_7317955;
+-object e_7317971 [4];
+-c_7317955.hdr.mark = gc_color_red;
+- c_7317955.hdr.grayed = 0;
+-c_7317955.tag = closureN_tag;
+- c_7317955.fn = (function_type)__lambda_399;
+-c_7317955.num_args = 1;
+-c_7317955.num_elements = 4;
+-c_7317955.elements = (object *)e_7317971;
+-c_7317955.elements[0] = ((closureN)self_7313391)->elements[0];
+-c_7317955.elements[1] = ((closureN)self_7313391)->elements[1];
+-c_7317955.elements[2] = ((closureN)self_7313391)->elements[2];
+-c_7317955.elements[3] = ((closureN)self_7313391)->elements[3];
++closureN_type c_7316655;
++object e_7316671 [4];
++c_7316655.hdr.mark = gc_color_red;
++ c_7316655.hdr.grayed = 0;
++c_7316655.tag = closureN_tag;
++ c_7316655.fn = (function_type)__lambda_399;
++c_7316655.num_args = 1;
++c_7316655.num_elements = 4;
++c_7316655.elements = (object *)e_7316671;
++c_7316655.elements[0] = ((closureN)self_7312138)->elements[0];
++c_7316655.elements[1] = ((closureN)self_7312138)->elements[1];
++c_7316655.elements[2] = ((closureN)self_7312138)->elements[2];
++c_7316655.elements[3] = ((closureN)self_7312138)->elements[3];
+
+
+-closureN_type c_7317972;
+-object e_7317991 [1];
+-c_7317972.hdr.mark = gc_color_red;
+- c_7317972.hdr.grayed = 0;
+-c_7317972.tag = closureN_tag;
+- c_7317972.fn = (function_type)__lambda_401;
+-c_7317972.num_args = 2;
+-c_7317972.num_elements = 1;
+-c_7317972.elements = (object *)e_7317991;
+-c_7317972.elements[0] = ((closureN)self_7313391)->elements[2];
++closureN_type c_7316672;
++object e_7316691 [1];
++c_7316672.hdr.mark = gc_color_red;
++ c_7316672.hdr.grayed = 0;
++c_7316672.tag = closureN_tag;
++ c_7316672.fn = (function_type)__lambda_401;
++c_7316672.num_args = 2;
++c_7316672.num_elements = 1;
++c_7316672.elements = (object *)e_7316691;
++c_7316672.elements[0] = ((closureN)self_7312138)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7317955,__lambda_399, &c_7317972);;
++return_direct_with_clo1(data,(closure)&c_7316655,__lambda_399, &c_7316672);;
+ }
+
+-static void __lambda_401(void *data, object self_7313392, int argc, object *args) /* object self_7313392, object k_735223, object n_73526_733156, object obj_73527_733157 */
++static void __lambda_401(void *data, object self_7312139, int argc, object *args) /* object self_7312139, object k_734771, object n_73526_732809, object obj_73527_732810 */
+ {
+- object k_735223 = args[0]; object n_73526_733156 = args[1]; object obj_73527_733157 = args[2];
++ object k_734771 = args[0]; object n_73526_732809 = args[1]; object obj_73527_732810 = args[2];
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, n_73526_733156, obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, n_73526_732809, obj_int2obj(0))) ){
+
+
+
+-closureN_type c_7317979;
+-object e_7317986 [2];
+-c_7317979.hdr.mark = gc_color_red;
+- c_7317979.hdr.grayed = 0;
+-c_7317979.tag = closureN_tag;
+- c_7317979.fn = (function_type)__lambda_402;
+-c_7317979.num_args = 1;
+-c_7317979.num_elements = 2;
+-c_7317979.elements = (object *)e_7317986;
+-c_7317979.elements[0] = k_735223;
+-c_7317979.elements[1] = obj_73527_733157;
++closureN_type c_7316679;
++object e_7316686 [2];
++c_7316679.hdr.mark = gc_color_red;
++ c_7316679.hdr.grayed = 0;
++c_7316679.tag = closureN_tag;
++ c_7316679.fn = (function_type)__lambda_402;
++c_7316679.num_args = 1;
++c_7316679.num_elements = 2;
++c_7316679.elements = (object *)e_7316686;
++c_7316679.elements[0] = k_734771;
++c_7316679.elements[1] = obj_73527_732810;
+
+
+-complex_num_type local_7317989;
+-return_closcall3(data, car(((closureN)self_7313392)->elements[0]), &c_7317979, Cyc_fast_sub(data,&local_7317989, n_73526_733156, obj_int2obj(1)), obj_73527_733157);
++complex_num_type local_7316689;
++return_closcall3(data, car(((closureN)self_7312139)->elements[0]), &c_7316679, Cyc_fast_sub(data,&local_7316689, n_73526_732809, obj_int2obj(1)), obj_73527_732810);
+ } else {
+- return_direct_with_clo1(data, k_735223, (((closure) k_735223)->fn), NULL);}
++ return_direct_with_clo1(data, k_734771, (((closure) k_734771)->fn), NULL);}
+ ;;
+ }
+
+-static void __lambda_402(void *data, object self_7313393, int argc, object *args) /* object self_7313393, object r_735225 */
++static void __lambda_402(void *data, object self_7312140, int argc, object *args) /* object self_7312140, object r_734773 */
+ {
+- object r_735225 = args[0];
++ object r_734773 = args[0];
+
+-pair_type local_7317984;
+-return_direct_with_clo1(data, ((closureN)self_7313393)->elements[0], (((closure) ((closureN)self_7313393)->elements[0])->fn), set_pair_as_expr(&local_7317984, ((closureN)self_7313393)->elements[1], r_735225));;
++pair_type local_7316684;
++return_direct_with_clo1(data, ((closureN)self_7312140)->elements[0], (((closure) ((closureN)self_7312140)->elements[0])->fn), set_pair_as_expr(&local_7316684, ((closureN)self_7312140)->elements[1], r_734773));;
+ }
+
+-static void __lambda_399(void *data, object self_7313394, int argc, object *args) /* object self_7313394, object r_735222 */
++static void __lambda_399(void *data, object self_7312141, int argc, object *args) /* object self_7312141, object r_734770 */
+ {
+- object r_735222 = args[0];
++ object r_734770 = args[0];
+
+-closureN_type c_7317957;
+-object e_7317967 [4];
+-c_7317957.hdr.mark = gc_color_red;
+- c_7317957.hdr.grayed = 0;
+-c_7317957.tag = closureN_tag;
+- c_7317957.fn = (function_type)__lambda_400;
+-c_7317957.num_args = 1;
+-c_7317957.num_elements = 4;
+-c_7317957.elements = (object *)e_7317967;
+-c_7317957.elements[0] = ((closureN)self_7313394)->elements[0];
+-c_7317957.elements[1] = ((closureN)self_7313394)->elements[1];
+-c_7317957.elements[2] = ((closureN)self_7313394)->elements[2];
+-c_7317957.elements[3] = ((closureN)self_7313394)->elements[3];
++closureN_type c_7316657;
++object e_7316667 [4];
++c_7316657.hdr.mark = gc_color_red;
++ c_7316657.hdr.grayed = 0;
++c_7316657.tag = closureN_tag;
++ c_7316657.fn = (function_type)__lambda_400;
++c_7316657.num_args = 1;
++c_7316657.num_elements = 4;
++c_7316657.elements = (object *)e_7316667;
++c_7316657.elements[0] = ((closureN)self_7312141)->elements[0];
++c_7316657.elements[1] = ((closureN)self_7312141)->elements[1];
++c_7316657.elements[2] = ((closureN)self_7312141)->elements[2];
++c_7316657.elements[3] = ((closureN)self_7312141)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317957,__lambda_400, Cyc_set_cell(data, ((closureN)self_7313394)->elements[2], r_735222));;
++return_direct_with_clo1(data,(closure)&c_7316657,__lambda_400, Cyc_set_cell(data, ((closureN)self_7312141)->elements[2], r_734770));;
+ }
+
+-static void __lambda_400(void *data, object self_7313395, int argc, object *args) /* object self_7313395, object r_735221 */
++static void __lambda_400(void *data, object self_7312142, int argc, object *args) /* object self_7312142, object r_734769 */
+ {
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313395)->elements[2]), ((closureN)self_7313395)->elements[0], ((closureN)self_7313395)->elements[1], car(((closureN)self_7313395)->elements[3]));;
++return_closcall3(data, car(((closureN)self_7312142)->elements[2]), ((closureN)self_7312142)->elements[0], ((closureN)self_7312142)->elements[1], car(((closureN)self_7312142)->elements[3]));;
+ }
+
+-static void __lambda_395(void *data, object _, int argc, object *args) /* closure _,object k_735216, object objs_73521_733151_raw, ... */
++static void __lambda_395(void *data, object _, int argc, object *args) /* closure _,object k_734764, object objs_73521_732804_raw, ... */
+ {
+-object k_735216 = args[0];
+-load_varargs(objs_73521_733151, args, 1, argc - 1);
++object k_734764 = args[0];
++load_varargs(objs_73521_732804, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:list");
+-return_direct_with_clo1(data, k_735216, (((closure) k_735216)->fn), objs_73521_733151);;
++return_direct_with_clo1(data, k_734764, (((closure) k_734764)->fn), objs_73521_732804);;
+ }
+
+-static void __lambda_386(void *data, object _, int argc, object *args) /* closure _,object k_735201, object lst_73514_733141_raw, ... */
++static void __lambda_386(void *data, object _, int argc, object *args) /* closure _,object k_734749, object lst_73514_732794_raw, ... */
+ {
+-object k_735201 = args[0];
+-load_varargs(lst_73514_733141, args, 1, argc - 1);
++object k_734749 = args[0];
++load_varargs(lst_73514_732794, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:append");
+
+-closureN_type c_7317871;
+-object e_7317933 [2];
+-c_7317871.hdr.mark = gc_color_red;
+- c_7317871.hdr.grayed = 0;
+-c_7317871.tag = closureN_tag;
+- c_7317871.fn = (function_type)__lambda_387;
+-c_7317871.num_args = 1;
+-c_7317871.num_elements = 2;
+-c_7317871.elements = (object *)e_7317933;
+-c_7317871.elements[0] = k_735201;
+-c_7317871.elements[1] = lst_73514_733141;
++closureN_type c_7316571;
++object e_7316633 [2];
++c_7316571.hdr.mark = gc_color_red;
++ c_7316571.hdr.grayed = 0;
++c_7316571.tag = closureN_tag;
++ c_7316571.fn = (function_type)__lambda_387;
++c_7316571.num_args = 1;
++c_7316571.num_elements = 2;
++c_7316571.elements = (object *)e_7316633;
++c_7316571.elements[0] = k_734749;
++c_7316571.elements[1] = lst_73514_732794;
+
+-return_direct_with_clo1(data,(closure)&c_7317871,__lambda_387, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7316571,__lambda_387, boolean_f);;
+ }
+
+-static void __lambda_387(void *data, object self_7313379, int argc, object *args) /* object self_7313379, object append_912_733143 */
++static void __lambda_387(void *data, object self_7312126, int argc, object *args) /* object self_7312126, object append_912_732796 */
+ {
+- object append_912_733143 = args[0];
++ object append_912_732796 = args[0];
+
+-closureN_type c_7317873;
+-object e_7317929 [2];
+-c_7317873.hdr.mark = gc_color_red;
+- c_7317873.hdr.grayed = 0;
+-c_7317873.tag = closureN_tag;
+- c_7317873.fn = (function_type)__lambda_1367;
+-c_7317873.num_args = 1;
+-c_7317873.num_elements = 2;
+-c_7317873.elements = (object *)e_7317929;
+-c_7317873.elements[0] = ((closureN)self_7313379)->elements[0];
+-c_7317873.elements[1] = ((closureN)self_7313379)->elements[1];
++closureN_type c_7316573;
++object e_7316629 [2];
++c_7316573.hdr.mark = gc_color_red;
++ c_7316573.hdr.grayed = 0;
++c_7316573.tag = closureN_tag;
++ c_7316573.fn = (function_type)__lambda_1320;
++c_7316573.num_args = 1;
++c_7316573.num_elements = 2;
++c_7316573.elements = (object *)e_7316629;
++c_7316573.elements[0] = ((closureN)self_7312126)->elements[0];
++c_7316573.elements[1] = ((closureN)self_7312126)->elements[1];
+
+
+-pair_type local_7317932;
+-return_direct_with_clo1(data,(closure)&c_7317873,__lambda_1367, set_cell_as_expr(&local_7317932, append_912_733143));;
++pair_type local_7316632;
++return_direct_with_clo1(data,(closure)&c_7316573,__lambda_1320, set_cell_as_expr(&local_7316632, append_912_732796));;
+ }
+
+-static void __lambda_1367(void *data, object self_7313380, int argc, object *args) /* object self_7313380, object append_912_733143 */
++static void __lambda_1320(void *data, object self_7312127, int argc, object *args) /* object self_7312127, object append_912_732796 */
+ {
+- object append_912_733143 = args[0];
++ object append_912_732796 = args[0];
+
+-closureN_type c_7317875;
+-object e_7317915 [3];
+-c_7317875.hdr.mark = gc_color_red;
+- c_7317875.hdr.grayed = 0;
+-c_7317875.tag = closureN_tag;
+- c_7317875.fn = (function_type)__lambda_388;
+-c_7317875.num_args = 1;
+-c_7317875.num_elements = 3;
+-c_7317875.elements = (object *)e_7317915;
+-c_7317875.elements[0] = append_912_733143;
+-c_7317875.elements[1] = ((closureN)self_7313380)->elements[0];
+-c_7317875.elements[2] = ((closureN)self_7313380)->elements[1];
++closureN_type c_7316575;
++object e_7316615 [3];
++c_7316575.hdr.mark = gc_color_red;
++ c_7316575.hdr.grayed = 0;
++c_7316575.tag = closureN_tag;
++ c_7316575.fn = (function_type)__lambda_388;
++c_7316575.num_args = 1;
++c_7316575.num_elements = 3;
++c_7316575.elements = (object *)e_7316615;
++c_7316575.elements[0] = append_912_732796;
++c_7316575.elements[1] = ((closureN)self_7312127)->elements[0];
++c_7316575.elements[2] = ((closureN)self_7312127)->elements[1];
+
+
+-mclosure0(c_7317916, (function_type)__lambda_392);c_7317916.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7317875,__lambda_388, &c_7317916);;
++mclosure0(c_7316616, (function_type)__lambda_392);c_7316616.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7316575,__lambda_388, &c_7316616);;
+ }
+
+-static void __lambda_392(void *data, object self_7313381, int argc, object *args) /* object self_7313381, object k_735211, object inlist_73515_733145, object alist_73516_733146 */
++static void __lambda_392(void *data, object self_7312128, int argc, object *args) /* object self_7312128, object k_734759, object inlist_73515_732798, object alist_73516_732799 */
+ {
+- object k_735211 = args[0]; object inlist_73515_733145 = args[1]; object alist_73516_733146 = args[2];
++ object k_734759 = args[0]; object inlist_73515_732798 = args[1]; object alist_73516_732799 = args[2];
+
+-closureN_type c_7317918;
+-object e_7317923 [3];
+-c_7317918.hdr.mark = gc_color_red;
+- c_7317918.hdr.grayed = 0;
+-c_7317918.tag = closureN_tag;
+- c_7317918.fn = (function_type)__lambda_393;
+-c_7317918.num_args = 1;
+-c_7317918.num_elements = 3;
+-c_7317918.elements = (object *)e_7317923;
+-c_7317918.elements[0] = alist_73516_733146;
+-c_7317918.elements[1] = inlist_73515_733145;
+-c_7317918.elements[2] = k_735211;
++closureN_type c_7316618;
++object e_7316623 [3];
++c_7316618.hdr.mark = gc_color_red;
++ c_7316618.hdr.grayed = 0;
++c_7316618.tag = closureN_tag;
++ c_7316618.fn = (function_type)__lambda_393;
++c_7316618.num_args = 1;
++c_7316618.num_elements = 3;
++c_7316618.elements = (object *)e_7316623;
++c_7316618.elements[0] = alist_73516_732799;
++c_7316618.elements[1] = inlist_73515_732798;
++c_7316618.elements[2] = k_734759;
+
+
+-mclosure0(c_7317924, (function_type)__lambda_394);c_7317924.num_args = 2;
+-return_direct_with_clo1(data,(closure)&c_7317918,__lambda_393, &c_7317924);;
++mclosure0(c_7316624, (function_type)__lambda_394);c_7316624.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7316618,__lambda_393, &c_7316624);;
+ }
+
+-static void __lambda_394(void *data, object self_7313382, int argc, object *args) /* object self_7313382, object k_735213, object ap_73517_733147, object in_73518_733148 */
++static void __lambda_394(void *data, object self_7312129, int argc, object *args) /* object self_7312129, object k_734761, object ap_73517_732800, object in_73518_732801 */
+ {
+- object k_735213 = args[0]; object ap_73517_733147 = args[1]; object in_73518_733148 = args[2];
++ object k_734761 = args[0]; object ap_73517_732800 = args[1]; object in_73518_732801 = args[2];
+
+-pair_type local_7317928;
+-return_direct_with_clo1(data, k_735213, (((closure) k_735213)->fn), set_pair_as_expr(&local_7317928, ap_73517_733147, in_73518_733148));;
++pair_type local_7316628;
++return_direct_with_clo1(data, k_734761, (((closure) k_734761)->fn), set_pair_as_expr(&local_7316628, ap_73517_732800, in_73518_732801));;
+ }
+
+-static void __lambda_393(void *data, object self_7313383, int argc, object *args) /* object self_7313383, object r_735212 */
++static void __lambda_393(void *data, object self_7312130, int argc, object *args) /* object self_7312130, object r_734760 */
+ {
+- object r_735212 = args[0];
+- return_direct_with_clo4(data, __glo_foldr_scheme_base, (((closure) __glo_foldr_scheme_base)->fn), ((closureN)self_7313383)->elements[2], r_735212, ((closureN)self_7313383)->elements[0], ((closureN)self_7313383)->elements[1]);;
++ object r_734760 = args[0];
++ return_direct_with_clo4(data, __glo_foldr_scheme_base, (((closure) __glo_foldr_scheme_base)->fn), ((closureN)self_7312130)->elements[2], r_734760, ((closureN)self_7312130)->elements[0], ((closureN)self_7312130)->elements[1]);;
+ }
+
+-static void __lambda_388(void *data, object self_7313384, int argc, object *args) /* object self_7313384, object r_735210 */
++static void __lambda_388(void *data, object self_7312131, int argc, object *args) /* object self_7312131, object r_734758 */
+ {
+- object r_735210 = args[0];
++ object r_734758 = args[0];
+
+-closureN_type c_7317877;
+-object e_7317911 [3];
+-c_7317877.hdr.mark = gc_color_red;
+- c_7317877.hdr.grayed = 0;
+-c_7317877.tag = closureN_tag;
+- c_7317877.fn = (function_type)__lambda_389;
+-c_7317877.num_args = 1;
+-c_7317877.num_elements = 3;
+-c_7317877.elements = (object *)e_7317911;
+-c_7317877.elements[0] = ((closureN)self_7313384)->elements[0];
+-c_7317877.elements[1] = ((closureN)self_7313384)->elements[1];
+-c_7317877.elements[2] = ((closureN)self_7313384)->elements[2];
++closureN_type c_7316577;
++object e_7316611 [3];
++c_7316577.hdr.mark = gc_color_red;
++ c_7316577.hdr.grayed = 0;
++c_7316577.tag = closureN_tag;
++ c_7316577.fn = (function_type)__lambda_389;
++c_7316577.num_args = 1;
++c_7316577.num_elements = 3;
++c_7316577.elements = (object *)e_7316611;
++c_7316577.elements[0] = ((closureN)self_7312131)->elements[0];
++c_7316577.elements[1] = ((closureN)self_7312131)->elements[1];
++c_7316577.elements[2] = ((closureN)self_7312131)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317877,__lambda_389, Cyc_set_cell(data, ((closureN)self_7313384)->elements[0], r_735210));;
++return_direct_with_clo1(data,(closure)&c_7316577,__lambda_389, Cyc_set_cell(data, ((closureN)self_7312131)->elements[0], r_734758));;
+ }
+
+-static void __lambda_389(void *data, object self_7313385, int argc, object *args) /* object self_7313385, object r_735202 */
++static void __lambda_389(void *data, object self_7312132, int argc, object *args) /* object self_7312132, object r_734750 */
+ {
+
+
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313385)->elements[2])) ){
+- return_direct_with_clo1(data, ((closureN)self_7313385)->elements[1], (((closure) ((closureN)self_7313385)->elements[1])->fn), ((closureN)self_7313385)->elements[2]);
++if( (boolean_f != Cyc_is_null(((closureN)self_7312132)->elements[2])) ){
++ return_direct_with_clo1(data, ((closureN)self_7312132)->elements[1], (((closure) ((closureN)self_7312132)->elements[1])->fn), ((closureN)self_7312132)->elements[2]);
+ } else {
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313385)->elements[2]))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312132)->elements[2]))) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313385)->elements[1], (((closure) ((closureN)self_7313385)->elements[1])->fn), Cyc_car(data, ((closureN)self_7313385)->elements[2]));
++return_direct_with_clo1(data, ((closureN)self_7312132)->elements[1], (((closure) ((closureN)self_7312132)->elements[1])->fn), Cyc_car(data, ((closureN)self_7312132)->elements[2]));
+ } else {
+
+-closureN_type c_7317895;
+-object e_7317904 [2];
+-c_7317895.hdr.mark = gc_color_red;
+- c_7317895.hdr.grayed = 0;
+-c_7317895.tag = closureN_tag;
+- c_7317895.fn = (function_type)__lambda_390;
+-c_7317895.num_args = 1;
+-c_7317895.num_elements = 2;
+-c_7317895.elements = (object *)e_7317904;
+-c_7317895.elements[0] = ((closureN)self_7313385)->elements[1];
+-c_7317895.elements[1] = ((closureN)self_7313385)->elements[2];
++closureN_type c_7316595;
++object e_7316604 [2];
++c_7316595.hdr.mark = gc_color_red;
++ c_7316595.hdr.grayed = 0;
++c_7316595.tag = closureN_tag;
++ c_7316595.fn = (function_type)__lambda_390;
++c_7316595.num_args = 1;
++c_7316595.num_elements = 2;
++c_7316595.elements = (object *)e_7316604;
++c_7316595.elements[0] = ((closureN)self_7312132)->elements[1];
++c_7316595.elements[1] = ((closureN)self_7312132)->elements[2];
+
+
+-closureN_type c_7317905;
+-object e_7317910 [1];
+-c_7317905.hdr.mark = gc_color_red;
+- c_7317905.hdr.grayed = 0;
+-c_7317905.tag = closureN_tag;
+- c_7317905.fn = (function_type)__lambda_391;
+-c_7317905.num_args = 2;
+-c_7317905.num_elements = 1;
+-c_7317905.elements = (object *)e_7317910;
+-c_7317905.elements[0] = ((closureN)self_7313385)->elements[0];
++closureN_type c_7316605;
++object e_7316610 [1];
++c_7316605.hdr.mark = gc_color_red;
++ c_7316605.hdr.grayed = 0;
++c_7316605.tag = closureN_tag;
++ c_7316605.fn = (function_type)__lambda_391;
++c_7316605.num_args = 2;
++c_7316605.num_elements = 1;
++c_7316605.elements = (object *)e_7316610;
++c_7316605.elements[0] = ((closureN)self_7312132)->elements[0];
+
+-return_direct_with_clo1(data,(closure)&c_7317895,__lambda_390, &c_7317905);}
++return_direct_with_clo1(data,(closure)&c_7316595,__lambda_390, &c_7316605);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_391(void *data, object self_7313386, int argc, object *args) /* object self_7313386, object k_735208, object a_73519_733149, object b_73520_733150 */
++static void __lambda_391(void *data, object self_7312133, int argc, object *args) /* object self_7312133, object k_734756, object a_73519_732802, object b_73520_732803 */
+ {
+- object k_735208 = args[0]; object a_73519_733149 = args[1]; object b_73520_733150 = args[2];
++ object k_734756 = args[0]; object a_73519_732802 = args[1]; object b_73520_732803 = args[2];
+
+
+-return_closcall3(data, car(((closureN)self_7313386)->elements[0]), k_735208, b_73520_733150, a_73519_733149);;
++return_closcall3(data, car(((closureN)self_7312133)->elements[0]), k_734756, b_73520_732803, a_73519_732802);;
+ }
+
+-static void __lambda_390(void *data, object self_7313387, int argc, object *args) /* object self_7313387, object r_735205 */
++static void __lambda_390(void *data, object self_7312134, int argc, object *args) /* object self_7312134, object r_734753 */
+ {
+- object r_735205 = args[0];
++ object r_734753 = args[0];
+
+
+
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7313387)->elements[0], r_735205, Cyc_car(data, ((closureN)self_7313387)->elements[1]), Cyc_cdr(data, ((closureN)self_7313387)->elements[1]));;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7312134)->elements[0], r_734753, Cyc_car(data, ((closureN)self_7312134)->elements[1]), Cyc_cdr(data, ((closureN)self_7312134)->elements[1]));;
+ }
+
+-static object __lambda_1462(void *data, object ptr,object n_73513_733140) {
++static object __lambda_1415(void *data, object ptr,object n_73513_732793) {
+
+ Cyc_st_add(data, "scheme/base.sld:negative?");
+
+
+-return_copy(ptr, Cyc_num_fast_lt_op(data, n_73513_733140, obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_lt_op(data, n_73513_732793, obj_int2obj(0)));;
+ }
+
+-static void __lambda_385(void *data, object _, int argc, object *args) /* closure _,object k_735198, object n_73513_733140 */
++static void __lambda_385(void *data, object _, int argc, object *args) /* closure _,object k_734746, object n_73513_732793 */
+ {
+-object k_735198 = args[0]; object n_73513_733140 = args[1];
++object k_734746 = args[0]; object n_73513_732793 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:negative?");
+
+
+-return_direct_with_clo1(data, k_735198, (((closure) k_735198)->fn), Cyc_num_fast_lt_op(data, n_73513_733140, obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734746, (((closure) k_734746)->fn), Cyc_num_fast_lt_op(data, n_73513_732793, obj_int2obj(0)));;
+ }
+
+-static object __lambda_1461(void *data, object ptr,object n_73512_733139) {
++static object __lambda_1414(void *data, object ptr,object n_73512_732792) {
+
+ Cyc_st_add(data, "scheme/base.sld:positive?");
+
+
+-return_copy(ptr, Cyc_num_fast_gt_op(data, n_73512_733139, obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_gt_op(data, n_73512_732792, obj_int2obj(0)));;
+ }
+
+-static void __lambda_384(void *data, object _, int argc, object *args) /* closure _,object k_735195, object n_73512_733139 */
++static void __lambda_384(void *data, object _, int argc, object *args) /* closure _,object k_734743, object n_73512_732792 */
+ {
+-object k_735195 = args[0]; object n_73512_733139 = args[1];
++object k_734743 = args[0]; object n_73512_732792 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:positive?");
+
+
+-return_direct_with_clo1(data, k_735195, (((closure) k_735195)->fn), Cyc_num_fast_gt_op(data, n_73512_733139, obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734743, (((closure) k_734743)->fn), Cyc_num_fast_gt_op(data, n_73512_732792, obj_int2obj(0)));;
+ }
+
+-static object __lambda_1460(void *data, object ptr,object n_73511_733138) {
++static object __lambda_1413(void *data, object ptr,object n_73511_732791) {
+
+ Cyc_st_add(data, "scheme/base.sld:zero?");
+
+
+-return_copy(ptr, Cyc_num_fast_eq_op(data, n_73511_733138, obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_eq_op(data, n_73511_732791, obj_int2obj(0)));;
+ }
+
+-static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_735192, object n_73511_733138 */
++static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_734740, object n_73511_732791 */
+ {
+-object k_735192 = args[0]; object n_73511_733138 = args[1];
++object k_734740 = args[0]; object n_73511_732791 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:zero?");
+
+
+-return_direct_with_clo1(data, k_735192, (((closure) k_735192)->fn), Cyc_num_fast_eq_op(data, n_73511_733138, obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734740, (((closure) k_734740)->fn), Cyc_num_fast_eq_op(data, n_73511_732791, obj_int2obj(0)));;
+ }
+
+-static object __lambda_1459(void *data, object ptr, object o) { return Cyc_is_list(o); }
+-static void __lambda_1458(void *data, object _, int argc, object *args) {object k = args[0];object o = args[1]; return_closcall1(data, k, Cyc_is_list(o)); }
+-static object __lambda_1457(void *data, object ptr,object x_73510_733137) {
++static object __lambda_1412(void *data, object ptr, object o) { return Cyc_is_list(o); }
++static void __lambda_1411(void *data, object _, int argc, object *args) {object k = args[0];object o = args[1]; return_closcall1(data, k, Cyc_is_list(o)); }
++static object __lambda_1410(void *data, object ptr,object x_73510_732790) {
+
+ Cyc_st_add(data, "scheme/base.sld:not");
+-if( (boolean_f != x_73510_733137) ){
++if( (boolean_f != x_73510_732790) ){
+ return_copy(ptr, boolean_f);
+ } else {
+ return_copy(ptr, boolean_t);}
+ ;;
+ }
+
+-static void __lambda_382(void *data, object _, int argc, object *args) /* closure _,object k_735189, object x_73510_733137 */
++static void __lambda_382(void *data, object _, int argc, object *args) /* closure _,object k_734737, object x_73510_732790 */
+ {
+-object k_735189 = args[0]; object x_73510_733137 = args[1];
++object k_734737 = args[0]; object x_73510_732790 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:not");
+-if( (boolean_f != x_73510_733137) ){
+- return_direct_with_clo1(data, k_735189, (((closure) k_735189)->fn), boolean_f);
++if( (boolean_f != x_73510_732790) ){
++ return_direct_with_clo1(data, k_734737, (((closure) k_734737)->fn), boolean_f);
+ } else {
+- return_direct_with_clo1(data, k_735189, (((closure) k_735189)->fn), boolean_t);}
++ return_direct_with_clo1(data, k_734737, (((closure) k_734737)->fn), boolean_t);}
+ ;;
+ }
+
+-static void __lambda_381(void *data, object _, int argc, object *args) /* closure _,object k_735185, object port_73509_733136_raw, ... */
++static void __lambda_381(void *data, object _, int argc, object *args) /* closure _,object k_734733, object port_73509_732789_raw, ... */
+ {
+-object k_735185 = args[0];
+-load_varargs(port_73509_733136, args, 1, argc - 1);
++object k_734733 = args[0];
++load_varargs(port_73509_732789, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:newline");
+
+-pair_type local_7317836;
++pair_type local_7316536;
+
+-object c_7317833 = apply(data, k_735185,__glo_write_91char_scheme_base, set_pair_as_expr(&local_7317836, obj_char2obj(10), port_73509_733136));
+-return_direct_with_clo1(data, k_735185, (((closure) k_735185)->fn), c_7317833);;
++object c_7316533 = apply(data, k_734733,__glo_write_91char_scheme_base, set_pair_as_expr(&local_7316536, obj_char2obj(10), port_73509_732789));
++return_direct_with_clo1(data, k_734733, (((closure) k_734733)->fn), c_7316533);;
+ }
+
+-static void __lambda_379(void *data, object _, int argc, object *args) /* closure _,object k_735179, object char_73507_733134, object port_73508_733135_raw, ... */
++static void __lambda_379(void *data, object _, int argc, object *args) /* closure _,object k_734727, object char_73507_732787, object port_73508_732788_raw, ... */
+ {
+-object k_735179 = args[0]; object char_73507_733134 = args[1];
+-load_varargs(port_73508_733135, args, 2, argc - 2);
++object k_734727 = args[0]; object char_73507_732787 = args[1];
++load_varargs(port_73508_732788, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:write-char");
+
+-if( (boolean_f != Cyc_is_null(port_73508_733135)) ){
++if( (boolean_f != Cyc_is_null(port_73508_732788)) ){
+
+-closureN_type c_7317817;
+-object e_7317823 [2];
+-c_7317817.hdr.mark = gc_color_red;
+- c_7317817.hdr.grayed = 0;
+-c_7317817.tag = closureN_tag;
+- c_7317817.fn = (function_type)__lambda_380;
+-c_7317817.num_args = 1;
+-c_7317817.num_elements = 2;
+-c_7317817.elements = (object *)e_7317823;
+-c_7317817.elements[0] = char_73507_733134;
+-c_7317817.elements[1] = k_735179;
++closureN_type c_7316517;
++object e_7316523 [2];
++c_7316517.hdr.mark = gc_color_red;
++ c_7316517.hdr.grayed = 0;
++c_7316517.tag = closureN_tag;
++ c_7316517.fn = (function_type)__lambda_380;
++c_7316517.num_args = 1;
++c_7316517.num_elements = 2;
++c_7316517.elements = (object *)e_7316523;
++c_7316517.elements[0] = char_73507_732787;
++c_7316517.elements[1] = k_734727;
+
+-return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7317817);
++return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7316517);
+ } else {
+
+
+
+
+-return_direct_with_clo1(data, k_735179, (((closure) k_735179)->fn), Cyc_write_char(data, char_73507_733134, Cyc_car(data, port_73508_733135)));}
++return_direct_with_clo1(data, k_734727, (((closure) k_734727)->fn), Cyc_write_char(data, char_73507_732787, Cyc_car(data, port_73508_732788)));}
+ ;;
+ }
+
+-static void __lambda_380(void *data, object self_7313378, int argc, object *args) /* object self_7313378, object r_735181 */
++static void __lambda_380(void *data, object self_7312125, int argc, object *args) /* object self_7312125, object r_734729 */
+ {
+- object r_735181 = args[0];
++ object r_734729 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313378)->elements[1], (((closure) ((closureN)self_7313378)->elements[1])->fn), Cyc_write_char(data, ((closureN)self_7313378)->elements[0], r_735181));;
++return_direct_with_clo1(data, ((closureN)self_7312125)->elements[1], (((closure) ((closureN)self_7312125)->elements[1])->fn), Cyc_write_char(data, ((closureN)self_7312125)->elements[0], r_734729));;
+ }
+
+-static object __lambda_1456(void *data, object ptr, object bv, object port, object start, object end) { return Cyc_write_bytevector(data, bv, port, start, end); }
+-static void __lambda_1455(void *data, object _, int argc, object *args) {object k = args[0];object bv = args[1];object port = args[2];object start = args[3];object end = args[4]; return_closcall1(data, k, Cyc_write_bytevector(data, bv, port, start, end)); }
+-static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_735159, object vec_73501_733128, object opts_73502_733129_raw, ... */
++static object __lambda_1409(void *data, object ptr, object bv, object port, object start, object end) { return Cyc_write_bytevector(data, bv, port, start, end); }
++static void __lambda_1408(void *data, object _, int argc, object *args) {object k = args[0];object bv = args[1];object port = args[2];object start = args[3];object end = args[4]; return_closcall1(data, k, Cyc_write_bytevector(data, bv, port, start, end)); }
++static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_734707, object vec_73501_732781, object opts_73502_732782_raw, ... */
+ {
+-object k_735159 = args[0]; object vec_73501_733128 = args[1];
+-load_varargs(opts_73502_733129, args, 2, argc - 2);
++object k_734707 = args[0]; object vec_73501_732781 = args[1];
++load_varargs(opts_73502_732782, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:write-bytevector");
+
+-closureN_type c_7317696;
+-object e_7317810 [3];
+-c_7317696.hdr.mark = gc_color_red;
+- c_7317696.hdr.grayed = 0;
+-c_7317696.tag = closureN_tag;
+- c_7317696.fn = (function_type)__lambda_370;
+-c_7317696.num_args = 4;
+-c_7317696.num_elements = 3;
+-c_7317696.elements = (object *)e_7317810;
+-c_7317696.elements[0] = k_735159;
+-c_7317696.elements[1] = opts_73502_733129;
+-c_7317696.elements[2] = vec_73501_733128;
+-
+-return_direct_with_clo4(data,(closure)&c_7317696,__lambda_370, boolean_f, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_370(void *data, object self_7313365, int argc, object *args) /* object self_7313365, object len_73503_733130, object port_73504_733131, object start_73505_733132, object end_73506_733133 */
+- {
+- object len_73503_733130 = args[0]; object port_73504_733131 = args[1]; object start_73505_733132 = args[2]; object end_73506_733133 = args[3];
+-
+-closureN_type c_7317698;
+-object e_7317806 [6];
+-c_7317698.hdr.mark = gc_color_red;
+- c_7317698.hdr.grayed = 0;
+-c_7317698.tag = closureN_tag;
+- c_7317698.fn = (function_type)__lambda_1366;
+-c_7317698.num_args = 1;
+-c_7317698.num_elements = 6;
+-c_7317698.elements = (object *)e_7317806;
+-c_7317698.elements[0] = end_73506_733133;
+-c_7317698.elements[1] = ((closureN)self_7313365)->elements[0];
+-c_7317698.elements[2] = ((closureN)self_7313365)->elements[1];
+-c_7317698.elements[3] = port_73504_733131;
+-c_7317698.elements[4] = start_73505_733132;
+-c_7317698.elements[5] = ((closureN)self_7313365)->elements[2];
+-
+-
+-pair_type local_7317809;
+-return_direct_with_clo1(data,(closure)&c_7317698,__lambda_1366, set_cell_as_expr(&local_7317809, len_73503_733130));;
+-}
+-
+-static void __lambda_1366(void *data, object self_7313366, int argc, object *args) /* object self_7313366, object len_73503_733130 */
+- {
+- object len_73503_733130 = args[0];
+-
+-closureN_type c_7317700;
+-object e_7317801 [6];
+-c_7317700.hdr.mark = gc_color_red;
+- c_7317700.hdr.grayed = 0;
+-c_7317700.tag = closureN_tag;
+- c_7317700.fn = (function_type)__lambda_1365;
+-c_7317700.num_args = 1;
+-c_7317700.num_elements = 6;
+-c_7317700.elements = (object *)e_7317801;
+-c_7317700.elements[0] = ((closureN)self_7313366)->elements[0];
+-c_7317700.elements[1] = ((closureN)self_7313366)->elements[1];
+-c_7317700.elements[2] = len_73503_733130;
+-c_7317700.elements[3] = ((closureN)self_7313366)->elements[2];
+-c_7317700.elements[4] = ((closureN)self_7313366)->elements[4];
+-c_7317700.elements[5] = ((closureN)self_7313366)->elements[5];
+-
+-
+-pair_type local_7317804;
+-return_direct_with_clo1(data,(closure)&c_7317700,__lambda_1365, set_cell_as_expr(&local_7317804, ((closureN)self_7313366)->elements[3]));;
+-}
+-
+-static void __lambda_1365(void *data, object self_7313367, int argc, object *args) /* object self_7313367, object port_73504_733131 */
+- {
+- object port_73504_733131 = args[0];
+-
+-closureN_type c_7317702;
+-object e_7317796 [6];
+-c_7317702.hdr.mark = gc_color_red;
+- c_7317702.hdr.grayed = 0;
+-c_7317702.tag = closureN_tag;
+- c_7317702.fn = (function_type)__lambda_1364;
+-c_7317702.num_args = 1;
+-c_7317702.num_elements = 6;
+-c_7317702.elements = (object *)e_7317796;
+-c_7317702.elements[0] = ((closureN)self_7313367)->elements[0];
+-c_7317702.elements[1] = ((closureN)self_7313367)->elements[1];
+-c_7317702.elements[2] = ((closureN)self_7313367)->elements[2];
+-c_7317702.elements[3] = ((closureN)self_7313367)->elements[3];
+-c_7317702.elements[4] = port_73504_733131;
+-c_7317702.elements[5] = ((closureN)self_7313367)->elements[5];
+-
+-
+-pair_type local_7317799;
+-return_direct_with_clo1(data,(closure)&c_7317702,__lambda_1364, set_cell_as_expr(&local_7317799, ((closureN)self_7313367)->elements[4]));;
+-}
+-
+-static void __lambda_1364(void *data, object self_7313368, int argc, object *args) /* object self_7313368, object start_73505_733132 */
+- {
+- object start_73505_733132 = args[0];
+-
+-closureN_type c_7317704;
+-object e_7317791 [6];
+-c_7317704.hdr.mark = gc_color_red;
+- c_7317704.hdr.grayed = 0;
+-c_7317704.tag = closureN_tag;
+- c_7317704.fn = (function_type)__lambda_1363;
+-c_7317704.num_args = 1;
+-c_7317704.num_elements = 6;
+-c_7317704.elements = (object *)e_7317791;
+-c_7317704.elements[0] = ((closureN)self_7313368)->elements[1];
+-c_7317704.elements[1] = ((closureN)self_7313368)->elements[2];
+-c_7317704.elements[2] = ((closureN)self_7313368)->elements[3];
+-c_7317704.elements[3] = ((closureN)self_7313368)->elements[4];
+-c_7317704.elements[4] = start_73505_733132;
+-c_7317704.elements[5] = ((closureN)self_7313368)->elements[5];
+-
+-
+-pair_type local_7317794;
+-return_direct_with_clo1(data,(closure)&c_7317704,__lambda_1363, set_cell_as_expr(&local_7317794, ((closureN)self_7313368)->elements[0]));;
+-}
+-
+-static void __lambda_1363(void *data, object self_7313369, int argc, object *args) /* object self_7313369, object end_73506_733133 */
+- {
+- object end_73506_733133 = args[0];
+-
+-closureN_type c_7317706;
+-object e_7317784 [7];
+-c_7317706.hdr.mark = gc_color_red;
+- c_7317706.hdr.grayed = 0;
+-c_7317706.tag = closureN_tag;
+- c_7317706.fn = (function_type)__lambda_371;
+-c_7317706.num_args = 1;
+-c_7317706.num_elements = 7;
+-c_7317706.elements = (object *)e_7317784;
+-c_7317706.elements[0] = end_73506_733133;
+-c_7317706.elements[1] = ((closureN)self_7313369)->elements[0];
+-c_7317706.elements[2] = ((closureN)self_7313369)->elements[1];
+-c_7317706.elements[3] = ((closureN)self_7313369)->elements[2];
+-c_7317706.elements[4] = ((closureN)self_7313369)->elements[3];
+-c_7317706.elements[5] = ((closureN)self_7313369)->elements[4];
+-c_7317706.elements[6] = ((closureN)self_7313369)->elements[5];
++closureN_type c_7316396;
++object e_7316510 [3];
++c_7316396.hdr.mark = gc_color_red;
++ c_7316396.hdr.grayed = 0;
++c_7316396.tag = closureN_tag;
++ c_7316396.fn = (function_type)__lambda_370;
++c_7316396.num_args = 4;
++c_7316396.num_elements = 3;
++c_7316396.elements = (object *)e_7316510;
++c_7316396.elements[0] = k_734707;
++c_7316396.elements[1] = opts_73502_732782;
++c_7316396.elements[2] = vec_73501_732781;
++
++return_direct_with_clo4(data,(closure)&c_7316396,__lambda_370, boolean_f, boolean_f, boolean_f, boolean_f);;
++}
+
++static void __lambda_370(void *data, object self_7312112, int argc, object *args) /* object self_7312112, object len_73503_732783, object port_73504_732784, object start_73505_732785, object end_73506_732786 */
++ {
++ object len_73503_732783 = args[0]; object port_73504_732784 = args[1]; object start_73505_732785 = args[2]; object end_73506_732786 = args[3];
++
++closureN_type c_7316398;
++object e_7316506 [6];
++c_7316398.hdr.mark = gc_color_red;
++ c_7316398.hdr.grayed = 0;
++c_7316398.tag = closureN_tag;
++ c_7316398.fn = (function_type)__lambda_1319;
++c_7316398.num_args = 1;
++c_7316398.num_elements = 6;
++c_7316398.elements = (object *)e_7316506;
++c_7316398.elements[0] = end_73506_732786;
++c_7316398.elements[1] = ((closureN)self_7312112)->elements[0];
++c_7316398.elements[2] = ((closureN)self_7312112)->elements[1];
++c_7316398.elements[3] = port_73504_732784;
++c_7316398.elements[4] = start_73505_732785;
++c_7316398.elements[5] = ((closureN)self_7312112)->elements[2];
+
+
++pair_type local_7316509;
++return_direct_with_clo1(data,(closure)&c_7316398,__lambda_1319, set_cell_as_expr(&local_7316509, len_73503_732783));;
++}
+
++static void __lambda_1319(void *data, object self_7312113, int argc, object *args) /* object self_7312113, object len_73503_732783 */
++ {
++ object len_73503_732783 = args[0];
++
++closureN_type c_7316400;
++object e_7316501 [6];
++c_7316400.hdr.mark = gc_color_red;
++ c_7316400.hdr.grayed = 0;
++c_7316400.tag = closureN_tag;
++ c_7316400.fn = (function_type)__lambda_1318;
++c_7316400.num_args = 1;
++c_7316400.num_elements = 6;
++c_7316400.elements = (object *)e_7316501;
++c_7316400.elements[0] = ((closureN)self_7312113)->elements[0];
++c_7316400.elements[1] = ((closureN)self_7312113)->elements[1];
++c_7316400.elements[2] = len_73503_732783;
++c_7316400.elements[3] = ((closureN)self_7312113)->elements[2];
++c_7316400.elements[4] = ((closureN)self_7312113)->elements[4];
++c_7316400.elements[5] = ((closureN)self_7312113)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7317706,__lambda_371, Cyc_set_cell(data, ((closureN)self_7313369)->elements[1], Cyc_bytevector_length(data, ((closureN)self_7313369)->elements[5])));;
+-}
+-
+-static void __lambda_371(void *data, object self_7313370, int argc, object *args) /* object self_7313370, object r_735160 */
+- {
+-
+-
+-closureN_type c_7317708;
+-object e_7317719 [1];
+-c_7317708.hdr.mark = gc_color_red;
+- c_7317708.hdr.grayed = 0;
+-c_7317708.tag = closureN_tag;
+- c_7317708.fn = (function_type)__lambda_372;
+-c_7317708.num_args = 0;
+-c_7317708.num_elements = 1;
+-c_7317708.elements = (object *)e_7317719;
+-c_7317708.elements[0] = ((closureN)self_7313370)->elements[3];
+-
+-
+-closureN_type c_7317720;
+-object e_7317783 [7];
+-c_7317720.hdr.mark = gc_color_red;
+- c_7317720.hdr.grayed = 0;
+-c_7317720.tag = closureN_tag;
+- c_7317720.fn = (function_type)__lambda_373;
+-c_7317720.num_args = 1;
+-c_7317720.num_elements = 7;
+-c_7317720.elements = (object *)e_7317783;
+-c_7317720.elements[0] = ((closureN)self_7313370)->elements[0];
+-c_7317720.elements[1] = ((closureN)self_7313370)->elements[1];
+-c_7317720.elements[2] = ((closureN)self_7313370)->elements[2];
+-c_7317720.elements[3] = ((closureN)self_7313370)->elements[3];
+-c_7317720.elements[4] = ((closureN)self_7313370)->elements[4];
+-c_7317720.elements[5] = ((closureN)self_7313370)->elements[5];
+-c_7317720.elements[6] = ((closureN)self_7313370)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7317708,__lambda_372, &c_7317720);;
++pair_type local_7316504;
++return_direct_with_clo1(data,(closure)&c_7316400,__lambda_1318, set_cell_as_expr(&local_7316504, ((closureN)self_7312113)->elements[3]));;
+ }
+
+-static void __lambda_373(void *data, object self_7313371, int argc, object *args) /* object self_7313371, object r_735172 */
++static void __lambda_1318(void *data, object self_7312114, int argc, object *args) /* object self_7312114, object port_73504_732784 */
+ {
+- object r_735172 = args[0];
++ object port_73504_732784 = args[0];
++
++closureN_type c_7316402;
++object e_7316496 [6];
++c_7316402.hdr.mark = gc_color_red;
++ c_7316402.hdr.grayed = 0;
++c_7316402.tag = closureN_tag;
++ c_7316402.fn = (function_type)__lambda_1317;
++c_7316402.num_args = 1;
++c_7316402.num_elements = 6;
++c_7316402.elements = (object *)e_7316496;
++c_7316402.elements[0] = ((closureN)self_7312114)->elements[0];
++c_7316402.elements[1] = ((closureN)self_7312114)->elements[1];
++c_7316402.elements[2] = ((closureN)self_7312114)->elements[2];
++c_7316402.elements[3] = ((closureN)self_7312114)->elements[3];
++c_7316402.elements[4] = port_73504_732784;
++c_7316402.elements[5] = ((closureN)self_7312114)->elements[5];
++
++
++pair_type local_7316499;
++return_direct_with_clo1(data,(closure)&c_7316402,__lambda_1317, set_cell_as_expr(&local_7316499, ((closureN)self_7312114)->elements[4]));;
++}
++
++static void __lambda_1317(void *data, object self_7312115, int argc, object *args) /* object self_7312115, object start_73505_732785 */
++ {
++ object start_73505_732785 = args[0];
++
++closureN_type c_7316404;
++object e_7316491 [6];
++c_7316404.hdr.mark = gc_color_red;
++ c_7316404.hdr.grayed = 0;
++c_7316404.tag = closureN_tag;
++ c_7316404.fn = (function_type)__lambda_1316;
++c_7316404.num_args = 1;
++c_7316404.num_elements = 6;
++c_7316404.elements = (object *)e_7316491;
++c_7316404.elements[0] = ((closureN)self_7312115)->elements[1];
++c_7316404.elements[1] = ((closureN)self_7312115)->elements[2];
++c_7316404.elements[2] = ((closureN)self_7312115)->elements[3];
++c_7316404.elements[3] = ((closureN)self_7312115)->elements[4];
++c_7316404.elements[4] = start_73505_732785;
++c_7316404.elements[5] = ((closureN)self_7312115)->elements[5];
++
++
++pair_type local_7316494;
++return_direct_with_clo1(data,(closure)&c_7316404,__lambda_1316, set_cell_as_expr(&local_7316494, ((closureN)self_7312115)->elements[0]));;
++}
++
++static void __lambda_1316(void *data, object self_7312116, int argc, object *args) /* object self_7312116, object end_73506_732786 */
++ {
++ object end_73506_732786 = args[0];
++
++closureN_type c_7316406;
++object e_7316484 [7];
++c_7316406.hdr.mark = gc_color_red;
++ c_7316406.hdr.grayed = 0;
++c_7316406.tag = closureN_tag;
++ c_7316406.fn = (function_type)__lambda_371;
++c_7316406.num_args = 1;
++c_7316406.num_elements = 7;
++c_7316406.elements = (object *)e_7316484;
++c_7316406.elements[0] = end_73506_732786;
++c_7316406.elements[1] = ((closureN)self_7312116)->elements[0];
++c_7316406.elements[2] = ((closureN)self_7312116)->elements[1];
++c_7316406.elements[3] = ((closureN)self_7312116)->elements[2];
++c_7316406.elements[4] = ((closureN)self_7312116)->elements[3];
++c_7316406.elements[5] = ((closureN)self_7312116)->elements[4];
++c_7316406.elements[6] = ((closureN)self_7312116)->elements[5];
++
++
++
++
++
++return_direct_with_clo1(data,(closure)&c_7316406,__lambda_371, Cyc_set_cell(data, ((closureN)self_7312116)->elements[1], Cyc_bytevector_length(data, ((closureN)self_7312116)->elements[5])));;
++}
++
++static void __lambda_371(void *data, object self_7312117, int argc, object *args) /* object self_7312117, object r_734708 */
++ {
++
++
++closureN_type c_7316408;
++object e_7316419 [1];
++c_7316408.hdr.mark = gc_color_red;
++ c_7316408.hdr.grayed = 0;
++c_7316408.tag = closureN_tag;
++ c_7316408.fn = (function_type)__lambda_372;
++c_7316408.num_args = 0;
++c_7316408.num_elements = 1;
++c_7316408.elements = (object *)e_7316419;
++c_7316408.elements[0] = ((closureN)self_7312117)->elements[3];
++
++
++closureN_type c_7316420;
++object e_7316483 [7];
++c_7316420.hdr.mark = gc_color_red;
++ c_7316420.hdr.grayed = 0;
++c_7316420.tag = closureN_tag;
++ c_7316420.fn = (function_type)__lambda_373;
++c_7316420.num_args = 1;
++c_7316420.num_elements = 7;
++c_7316420.elements = (object *)e_7316483;
++c_7316420.elements[0] = ((closureN)self_7312117)->elements[0];
++c_7316420.elements[1] = ((closureN)self_7312117)->elements[1];
++c_7316420.elements[2] = ((closureN)self_7312117)->elements[2];
++c_7316420.elements[3] = ((closureN)self_7312117)->elements[3];
++c_7316420.elements[4] = ((closureN)self_7312117)->elements[4];
++c_7316420.elements[5] = ((closureN)self_7312117)->elements[5];
++c_7316420.elements[6] = ((closureN)self_7312117)->elements[6];
++
++return_direct_with_clo1(data,(closure)&c_7316408,__lambda_372, &c_7316420);;
++}
++
++static void __lambda_373(void *data, object self_7312118, int argc, object *args) /* object self_7312118, object r_734720 */
++ {
++ object r_734720 = args[0];
+
+-closureN_type c_7317722;
+-object e_7317779 [7];
+-c_7317722.hdr.mark = gc_color_red;
+- c_7317722.hdr.grayed = 0;
+-c_7317722.tag = closureN_tag;
+- c_7317722.fn = (function_type)__lambda_374;
+-c_7317722.num_args = 1;
+-c_7317722.num_elements = 7;
+-c_7317722.elements = (object *)e_7317779;
+-c_7317722.elements[0] = ((closureN)self_7313371)->elements[0];
+-c_7317722.elements[1] = ((closureN)self_7313371)->elements[1];
+-c_7317722.elements[2] = ((closureN)self_7313371)->elements[2];
+-c_7317722.elements[3] = ((closureN)self_7313371)->elements[3];
+-c_7317722.elements[4] = ((closureN)self_7313371)->elements[4];
+-c_7317722.elements[5] = ((closureN)self_7313371)->elements[5];
+-c_7317722.elements[6] = ((closureN)self_7313371)->elements[6];
++closureN_type c_7316422;
++object e_7316479 [7];
++c_7316422.hdr.mark = gc_color_red;
++ c_7316422.hdr.grayed = 0;
++c_7316422.tag = closureN_tag;
++ c_7316422.fn = (function_type)__lambda_374;
++c_7316422.num_args = 1;
++c_7316422.num_elements = 7;
++c_7316422.elements = (object *)e_7316479;
++c_7316422.elements[0] = ((closureN)self_7312118)->elements[0];
++c_7316422.elements[1] = ((closureN)self_7312118)->elements[1];
++c_7316422.elements[2] = ((closureN)self_7312118)->elements[2];
++c_7316422.elements[3] = ((closureN)self_7312118)->elements[3];
++c_7316422.elements[4] = ((closureN)self_7312118)->elements[4];
++c_7316422.elements[5] = ((closureN)self_7312118)->elements[5];
++c_7316422.elements[6] = ((closureN)self_7312118)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317722,__lambda_374, Cyc_set_cell(data, ((closureN)self_7313371)->elements[4], r_735172));;
++return_direct_with_clo1(data,(closure)&c_7316422,__lambda_374, Cyc_set_cell(data, ((closureN)self_7312118)->elements[4], r_734720));;
+ }
+
+-static void __lambda_374(void *data, object self_7313372, int argc, object *args) /* object self_7313372, object r_735161 */
++static void __lambda_374(void *data, object self_7312119, int argc, object *args) /* object self_7312119, object r_734709 */
+ {
+
+- object r_735168;
++ object r_734716;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313372)->elements[3]), obj_int2obj(1))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312119)->elements[3]), obj_int2obj(1))) ){
+
+- r_735168 = Cyc_cadr(data, ((closureN)self_7313372)->elements[3]);
++ r_734716 = Cyc_cadr(data, ((closureN)self_7312119)->elements[3]);
+ } else {
+- r_735168 = obj_int2obj(0);}
++ r_734716 = obj_int2obj(0);}
+ ;
+-closureN_type c_7317735;
+-object e_7317775 [7];
+-c_7317735.hdr.mark = gc_color_red;
+- c_7317735.hdr.grayed = 0;
+-c_7317735.tag = closureN_tag;
+- c_7317735.fn = (function_type)__lambda_375;
+-c_7317735.num_args = 1;
+-c_7317735.num_elements = 7;
+-c_7317735.elements = (object *)e_7317775;
+-c_7317735.elements[0] = ((closureN)self_7313372)->elements[0];
+-c_7317735.elements[1] = ((closureN)self_7313372)->elements[1];
+-c_7317735.elements[2] = ((closureN)self_7313372)->elements[2];
+-c_7317735.elements[3] = ((closureN)self_7313372)->elements[3];
+-c_7317735.elements[4] = ((closureN)self_7313372)->elements[4];
+-c_7317735.elements[5] = ((closureN)self_7313372)->elements[5];
+-c_7317735.elements[6] = ((closureN)self_7313372)->elements[6];
++closureN_type c_7316435;
++object e_7316475 [7];
++c_7316435.hdr.mark = gc_color_red;
++ c_7316435.hdr.grayed = 0;
++c_7316435.tag = closureN_tag;
++ c_7316435.fn = (function_type)__lambda_375;
++c_7316435.num_args = 1;
++c_7316435.num_elements = 7;
++c_7316435.elements = (object *)e_7316475;
++c_7316435.elements[0] = ((closureN)self_7312119)->elements[0];
++c_7316435.elements[1] = ((closureN)self_7312119)->elements[1];
++c_7316435.elements[2] = ((closureN)self_7312119)->elements[2];
++c_7316435.elements[3] = ((closureN)self_7312119)->elements[3];
++c_7316435.elements[4] = ((closureN)self_7312119)->elements[4];
++c_7316435.elements[5] = ((closureN)self_7312119)->elements[5];
++c_7316435.elements[6] = ((closureN)self_7312119)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317735,__lambda_375, Cyc_set_cell(data, ((closureN)self_7313372)->elements[5], r_735168));;
++return_direct_with_clo1(data,(closure)&c_7316435,__lambda_375, Cyc_set_cell(data, ((closureN)self_7312119)->elements[5], r_734716));;
+ }
+
+-static void __lambda_375(void *data, object self_7313373, int argc, object *args) /* object self_7313373, object r_735162 */
++static void __lambda_375(void *data, object self_7312120, int argc, object *args) /* object self_7312120, object r_734710 */
+ {
+
+
+-closureN_type c_7317737;
+-object e_7317751 [2];
+-c_7317737.hdr.mark = gc_color_red;
+- c_7317737.hdr.grayed = 0;
+-c_7317737.tag = closureN_tag;
+- c_7317737.fn = (function_type)__lambda_376;
+-c_7317737.num_args = 0;
+-c_7317737.num_elements = 2;
+-c_7317737.elements = (object *)e_7317751;
+-c_7317737.elements[0] = ((closureN)self_7313373)->elements[2];
+-c_7317737.elements[1] = ((closureN)self_7313373)->elements[3];
++closureN_type c_7316437;
++object e_7316451 [2];
++c_7316437.hdr.mark = gc_color_red;
++ c_7316437.hdr.grayed = 0;
++c_7316437.tag = closureN_tag;
++ c_7316437.fn = (function_type)__lambda_376;
++c_7316437.num_args = 0;
++c_7316437.num_elements = 2;
++c_7316437.elements = (object *)e_7316451;
++c_7316437.elements[0] = ((closureN)self_7312120)->elements[2];
++c_7316437.elements[1] = ((closureN)self_7312120)->elements[3];
+
+
+-closureN_type c_7317752;
+-object e_7317774 [5];
+-c_7317752.hdr.mark = gc_color_red;
+- c_7317752.hdr.grayed = 0;
+-c_7317752.tag = closureN_tag;
+- c_7317752.fn = (function_type)__lambda_377;
+-c_7317752.num_args = 1;
+-c_7317752.num_elements = 5;
+-c_7317752.elements = (object *)e_7317774;
+-c_7317752.elements[0] = ((closureN)self_7313373)->elements[0];
+-c_7317752.elements[1] = ((closureN)self_7313373)->elements[1];
+-c_7317752.elements[2] = ((closureN)self_7313373)->elements[4];
+-c_7317752.elements[3] = ((closureN)self_7313373)->elements[5];
+-c_7317752.elements[4] = ((closureN)self_7313373)->elements[6];
++closureN_type c_7316452;
++object e_7316474 [5];
++c_7316452.hdr.mark = gc_color_red;
++ c_7316452.hdr.grayed = 0;
++c_7316452.tag = closureN_tag;
++ c_7316452.fn = (function_type)__lambda_377;
++c_7316452.num_args = 1;
++c_7316452.num_elements = 5;
++c_7316452.elements = (object *)e_7316474;
++c_7316452.elements[0] = ((closureN)self_7312120)->elements[0];
++c_7316452.elements[1] = ((closureN)self_7312120)->elements[1];
++c_7316452.elements[2] = ((closureN)self_7312120)->elements[4];
++c_7316452.elements[3] = ((closureN)self_7312120)->elements[5];
++c_7316452.elements[4] = ((closureN)self_7312120)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7317737,__lambda_376, &c_7317752);;
++return_direct_with_clo1(data,(closure)&c_7316437,__lambda_376, &c_7316452);;
+ }
+
+-static void __lambda_377(void *data, object self_7313374, int argc, object *args) /* object self_7313374, object r_735164 */
++static void __lambda_377(void *data, object self_7312121, int argc, object *args) /* object self_7312121, object r_734712 */
+ {
+- object r_735164 = args[0];
++ object r_734712 = args[0];
+
+-closureN_type c_7317754;
+-object e_7317770 [5];
+-c_7317754.hdr.mark = gc_color_red;
+- c_7317754.hdr.grayed = 0;
+-c_7317754.tag = closureN_tag;
+- c_7317754.fn = (function_type)__lambda_378;
+-c_7317754.num_args = 1;
+-c_7317754.num_elements = 5;
+-c_7317754.elements = (object *)e_7317770;
+-c_7317754.elements[0] = ((closureN)self_7313374)->elements[0];
+-c_7317754.elements[1] = ((closureN)self_7313374)->elements[1];
+-c_7317754.elements[2] = ((closureN)self_7313374)->elements[2];
+-c_7317754.elements[3] = ((closureN)self_7313374)->elements[3];
+-c_7317754.elements[4] = ((closureN)self_7313374)->elements[4];
++closureN_type c_7316454;
++object e_7316470 [5];
++c_7316454.hdr.mark = gc_color_red;
++ c_7316454.hdr.grayed = 0;
++c_7316454.tag = closureN_tag;
++ c_7316454.fn = (function_type)__lambda_378;
++c_7316454.num_args = 1;
++c_7316454.num_elements = 5;
++c_7316454.elements = (object *)e_7316470;
++c_7316454.elements[0] = ((closureN)self_7312121)->elements[0];
++c_7316454.elements[1] = ((closureN)self_7312121)->elements[1];
++c_7316454.elements[2] = ((closureN)self_7312121)->elements[2];
++c_7316454.elements[3] = ((closureN)self_7312121)->elements[3];
++c_7316454.elements[4] = ((closureN)self_7312121)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317754,__lambda_378, Cyc_set_cell(data, ((closureN)self_7313374)->elements[0], r_735164));;
++return_direct_with_clo1(data,(closure)&c_7316454,__lambda_378, Cyc_set_cell(data, ((closureN)self_7312121)->elements[0], r_734712));;
+ }
+
+-static void __lambda_378(void *data, object self_7313375, int argc, object *args) /* object self_7313375, object r_735163 */
++static void __lambda_378(void *data, object self_7312122, int argc, object *args) /* object self_7312122, object r_734711 */
+ {
+
+
+-complex_num_type local_7317759;
++complex_num_type local_7316459;
+
+
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313375)->elements[1], (((closure) ((closureN)self_7313375)->elements[1])->fn), ((inline_function_type)
+- ((closure)__glo__75write_91bytevector_191_191inline_191_191_scheme_base)->fn)(data,&local_7317759, ((closureN)self_7313375)->elements[4], car(((closureN)self_7313375)->elements[2]), car(((closureN)self_7313375)->elements[3]), car(((closureN)self_7313375)->elements[0])));;
++return_direct_with_clo1(data, ((closureN)self_7312122)->elements[1], (((closure) ((closureN)self_7312122)->elements[1])->fn), ((inline_function_type)
++ ((closure)__glo__75write_91bytevector_191_191inline_191_191_scheme_base)->fn)(data,&local_7316459, ((closureN)self_7312122)->elements[4], car(((closureN)self_7312122)->elements[2]), car(((closureN)self_7312122)->elements[3]), car(((closureN)self_7312122)->elements[0])));;
+ }
+
+-static void __lambda_376(void *data, object self_7313376, int argc, object *args) /* object self_7313376, object k_735165 */
++static void __lambda_376(void *data, object self_7312123, int argc, object *args) /* object self_7312123, object k_734713 */
+ {
+- object k_735165 = args[0];
++ object k_734713 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313376)->elements[1]), obj_int2obj(2))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312123)->elements[1]), obj_int2obj(2))) ){
+
+
+-return_direct_with_clo1(data, k_735165,__lambda_377, Cyc_caddr(data, ((closureN)self_7313376)->elements[1]));
++return_direct_with_clo1(data, k_734713,__lambda_377, Cyc_caddr(data, ((closureN)self_7312123)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, k_735165,__lambda_377, car(((closureN)self_7313376)->elements[0]));}
++return_direct_with_clo1(data, k_734713,__lambda_377, car(((closureN)self_7312123)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_372(void *data, object self_7313377, int argc, object *args) /* object self_7313377, object k_735173 */
++static void __lambda_372(void *data, object self_7312124, int argc, object *args) /* object self_7312124, object k_734721 */
+ {
+- object k_735173 = args[0];
++ object k_734721 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313377)->elements[0]), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312124)->elements[0]), obj_int2obj(0))) ){
+
+
+-return_direct_with_clo1(data, k_735173, (((closure) k_735173)->fn), Cyc_car(data, ((closureN)self_7313377)->elements[0]));
++return_direct_with_clo1(data, k_734721, (((closure) k_734721)->fn), Cyc_car(data, ((closureN)self_7312124)->elements[0]));
+ } else {
+- return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), k_735173);}
++ return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), k_734721);}
+ ;;
+ }
+
+-static void __lambda_352(void *data, object _, int argc, object *args) /* closure _,object k_735128, object vec_73473_733117, object o_73474_733118_raw, ... */
++static void __lambda_352(void *data, object _, int argc, object *args) /* closure _,object k_734676, object vec_73473_732770, object o_73474_732771_raw, ... */
+ {
+-object k_735128 = args[0]; object vec_73473_733117 = args[1];
+-load_varargs(o_73474_733118, args, 2, argc - 2);
++object k_734676 = args[0]; object vec_73473_732770 = args[1];
++load_varargs(o_73474_732771, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:read-bytevector!");
+
+-closureN_type c_7317551;
+-object e_7317560 [1];
+-c_7317551.hdr.mark = gc_color_red;
+- c_7317551.hdr.grayed = 0;
+-c_7317551.tag = closureN_tag;
+- c_7317551.fn = (function_type)__lambda_353;
+-c_7317551.num_args = 0;
+-c_7317551.num_elements = 1;
+-c_7317551.elements = (object *)e_7317560;
+-c_7317551.elements[0] = o_73474_733118;
++closureN_type c_7316251;
++object e_7316260 [1];
++c_7316251.hdr.mark = gc_color_red;
++ c_7316251.hdr.grayed = 0;
++c_7316251.tag = closureN_tag;
++ c_7316251.fn = (function_type)__lambda_353;
++c_7316251.num_args = 0;
++c_7316251.num_elements = 1;
++c_7316251.elements = (object *)e_7316260;
++c_7316251.elements[0] = o_73474_732771;
+
+
+-closureN_type c_7317561;
+-object e_7317693 [3];
+-c_7317561.hdr.mark = gc_color_red;
+- c_7317561.hdr.grayed = 0;
+-c_7317561.tag = closureN_tag;
+- c_7317561.fn = (function_type)__lambda_354;
+-c_7317561.num_args = 1;
+-c_7317561.num_elements = 3;
+-c_7317561.elements = (object *)e_7317693;
+-c_7317561.elements[0] = k_735128;
+-c_7317561.elements[1] = o_73474_733118;
+-c_7317561.elements[2] = vec_73473_733117;
++closureN_type c_7316261;
++object e_7316393 [3];
++c_7316261.hdr.mark = gc_color_red;
++ c_7316261.hdr.grayed = 0;
++c_7316261.tag = closureN_tag;
++ c_7316261.fn = (function_type)__lambda_354;
++c_7316261.num_args = 1;
++c_7316261.num_elements = 3;
++c_7316261.elements = (object *)e_7316393;
++c_7316261.elements[0] = k_734676;
++c_7316261.elements[1] = o_73474_732771;
++c_7316261.elements[2] = vec_73473_732770;
+
+-return_direct_with_clo1(data,(closure)&c_7317551,__lambda_353, &c_7317561);;
++return_direct_with_clo1(data,(closure)&c_7316251,__lambda_353, &c_7316261);;
+ }
+
+-static void __lambda_354(void *data, object self_7313348, int argc, object *args) /* object self_7313348, object in_73477_733119 */
++static void __lambda_354(void *data, object self_7312095, int argc, object *args) /* object self_7312095, object in_73477_732772 */
+ {
+- object in_73477_733119 = args[0];
+- object o_73480_733120;
++ object in_73477_732772 = args[0];
++ object o_73480_732773;
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313348)->elements[1])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312095)->elements[1])) ){
+
+- o_73480_733120 = Cyc_cdr(data, ((closureN)self_7313348)->elements[1]);
++ o_73480_732773 = Cyc_cdr(data, ((closureN)self_7312095)->elements[1]);
+ } else {
+- o_73480_733120 = ((closureN)self_7313348)->elements[1];}
++ o_73480_732773 = ((closureN)self_7312095)->elements[1];}
+ ;
+-closureN_type c_7317573;
+-object e_7317582 [1];
+-c_7317573.hdr.mark = gc_color_red;
+- c_7317573.hdr.grayed = 0;
+-c_7317573.tag = closureN_tag;
+- c_7317573.fn = (function_type)__lambda_355;
+-c_7317573.num_args = 0;
+-c_7317573.num_elements = 1;
+-c_7317573.elements = (object *)e_7317582;
+-c_7317573.elements[0] = o_73480_733120;
++closureN_type c_7316273;
++object e_7316282 [1];
++c_7316273.hdr.mark = gc_color_red;
++ c_7316273.hdr.grayed = 0;
++c_7316273.tag = closureN_tag;
++ c_7316273.fn = (function_type)__lambda_355;
++c_7316273.num_args = 0;
++c_7316273.num_elements = 1;
++c_7316273.elements = (object *)e_7316282;
++c_7316273.elements[0] = o_73480_732773;
+
+
+-closureN_type c_7317583;
+-object e_7317692 [4];
+-c_7317583.hdr.mark = gc_color_red;
+- c_7317583.hdr.grayed = 0;
+-c_7317583.tag = closureN_tag;
+- c_7317583.fn = (function_type)__lambda_356;
+-c_7317583.num_args = 1;
+-c_7317583.num_elements = 4;
+-c_7317583.elements = (object *)e_7317692;
+-c_7317583.elements[0] = in_73477_733119;
+-c_7317583.elements[1] = ((closureN)self_7313348)->elements[0];
+-c_7317583.elements[2] = o_73480_733120;
+-c_7317583.elements[3] = ((closureN)self_7313348)->elements[2];
++closureN_type c_7316283;
++object e_7316392 [4];
++c_7316283.hdr.mark = gc_color_red;
++ c_7316283.hdr.grayed = 0;
++c_7316283.tag = closureN_tag;
++ c_7316283.fn = (function_type)__lambda_356;
++c_7316283.num_args = 1;
++c_7316283.num_elements = 4;
++c_7316283.elements = (object *)e_7316392;
++c_7316283.elements[0] = in_73477_732772;
++c_7316283.elements[1] = ((closureN)self_7312095)->elements[0];
++c_7316283.elements[2] = o_73480_732773;
++c_7316283.elements[3] = ((closureN)self_7312095)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7317573,__lambda_355, &c_7317583);;
++return_direct_with_clo1(data,(closure)&c_7316273,__lambda_355, &c_7316283);;
+ }
+
+-static void __lambda_356(void *data, object self_7313349, int argc, object *args) /* object self_7313349, object start_73483_733121 */
++static void __lambda_356(void *data, object self_7312096, int argc, object *args) /* object self_7312096, object start_73483_732774 */
+ {
+- object start_73483_733121 = args[0];
++ object start_73483_732774 = args[0];
+
+-closureN_type c_7317585;
+-object e_7317611 [2];
+-c_7317585.hdr.mark = gc_color_red;
+- c_7317585.hdr.grayed = 0;
+-c_7317585.tag = closureN_tag;
+- c_7317585.fn = (function_type)__lambda_357;
+-c_7317585.num_args = 0;
+-c_7317585.num_elements = 2;
+-c_7317585.elements = (object *)e_7317611;
+-c_7317585.elements[0] = ((closureN)self_7313349)->elements[2];
+-c_7317585.elements[1] = ((closureN)self_7313349)->elements[3];
++closureN_type c_7316285;
++object e_7316311 [2];
++c_7316285.hdr.mark = gc_color_red;
++ c_7316285.hdr.grayed = 0;
++c_7316285.tag = closureN_tag;
++ c_7316285.fn = (function_type)__lambda_357;
++c_7316285.num_args = 0;
++c_7316285.num_elements = 2;
++c_7316285.elements = (object *)e_7316311;
++c_7316285.elements[0] = ((closureN)self_7312096)->elements[2];
++c_7316285.elements[1] = ((closureN)self_7312096)->elements[3];
+
+
+-closureN_type c_7317612;
+-object e_7317691 [4];
+-c_7317612.hdr.mark = gc_color_red;
+- c_7317612.hdr.grayed = 0;
+-c_7317612.tag = closureN_tag;
+- c_7317612.fn = (function_type)__lambda_360;
+-c_7317612.num_args = 1;
+-c_7317612.num_elements = 4;
+-c_7317612.elements = (object *)e_7317691;
+-c_7317612.elements[0] = ((closureN)self_7313349)->elements[0];
+-c_7317612.elements[1] = ((closureN)self_7313349)->elements[1];
+-c_7317612.elements[2] = start_73483_733121;
+-c_7317612.elements[3] = ((closureN)self_7313349)->elements[3];
++closureN_type c_7316312;
++object e_7316391 [4];
++c_7316312.hdr.mark = gc_color_red;
++ c_7316312.hdr.grayed = 0;
++c_7316312.tag = closureN_tag;
++ c_7316312.fn = (function_type)__lambda_360;
++c_7316312.num_args = 1;
++c_7316312.num_elements = 4;
++c_7316312.elements = (object *)e_7316391;
++c_7316312.elements[0] = ((closureN)self_7312096)->elements[0];
++c_7316312.elements[1] = ((closureN)self_7312096)->elements[1];
++c_7316312.elements[2] = start_73483_732774;
++c_7316312.elements[3] = ((closureN)self_7312096)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7317585,__lambda_357, &c_7317612);;
++return_direct_with_clo1(data,(closure)&c_7316285,__lambda_357, &c_7316312);;
+ }
+
+-static void __lambda_360(void *data, object self_7313350, int argc, object *args) /* object self_7313350, object end_73486_733122 */
++static void __lambda_360(void *data, object self_7312097, int argc, object *args) /* object self_7312097, object end_73486_732775 */
+ {
+- object end_73486_733122 = args[0];
++ object end_73486_732775 = args[0];
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, ((closureN)self_7313350)->elements[2], end_73486_733122)) ){
+- return_direct_with_clo1(data, ((closureN)self_7313350)->elements[1], (((closure) ((closureN)self_7313350)->elements[1])->fn), obj_int2obj(0));
++if( (boolean_f != Cyc_num_fast_gte_op(data, ((closureN)self_7312097)->elements[2], end_73486_732775)) ){
++ return_direct_with_clo1(data, ((closureN)self_7312097)->elements[1], (((closure) ((closureN)self_7312097)->elements[1])->fn), obj_int2obj(0));
+ } else {
+
+-closureN_type c_7317619;
+-object e_7317685 [3];
+-c_7317619.hdr.mark = gc_color_red;
+- c_7317619.hdr.grayed = 0;
+-c_7317619.tag = closureN_tag;
+- c_7317619.fn = (function_type)__lambda_361;
+-c_7317619.num_args = 1;
+-c_7317619.num_elements = 3;
+-c_7317619.elements = (object *)e_7317685;
+-c_7317619.elements[0] = ((closureN)self_7313350)->elements[1];
+-c_7317619.elements[1] = ((closureN)self_7313350)->elements[2];
+-c_7317619.elements[2] = ((closureN)self_7313350)->elements[3];
++closureN_type c_7316319;
++object e_7316385 [3];
++c_7316319.hdr.mark = gc_color_red;
++ c_7316319.hdr.grayed = 0;
++c_7316319.tag = closureN_tag;
++ c_7316319.fn = (function_type)__lambda_361;
++c_7316319.num_args = 1;
++c_7316319.num_elements = 3;
++c_7316319.elements = (object *)e_7316385;
++c_7316319.elements[0] = ((closureN)self_7312097)->elements[1];
++c_7316319.elements[1] = ((closureN)self_7312097)->elements[2];
++c_7316319.elements[2] = ((closureN)self_7312097)->elements[3];
+
+
+-complex_num_type local_7317688;
+-return_direct_with_clo3(data, __glo_read_91bytevector_scheme_base, (((closure) __glo_read_91bytevector_scheme_base)->fn), &c_7317619, Cyc_fast_sub(data,&local_7317688, end_73486_733122, ((closureN)self_7313350)->elements[2]), ((closureN)self_7313350)->elements[0]);}
++complex_num_type local_7316388;
++return_direct_with_clo3(data, __glo_read_91bytevector_scheme_base, (((closure) __glo_read_91bytevector_scheme_base)->fn), &c_7316319, Cyc_fast_sub(data,&local_7316388, end_73486_732775, ((closureN)self_7312097)->elements[2]), ((closureN)self_7312097)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_361(void *data, object self_7313351, int argc, object *args) /* object self_7313351, object res_73488_733123 */
++static void __lambda_361(void *data, object self_7312098, int argc, object *args) /* object self_7312098, object res_73488_732776 */
+ {
+- object res_73488_733123 = args[0];
++ object res_73488_732776 = args[0];
+
+-if( (boolean_f != Cyc_is_eof_object(res_73488_733123)) ){
+- return_direct_with_clo1(data, ((closureN)self_7313351)->elements[0], (((closure) ((closureN)self_7313351)->elements[0])->fn), res_73488_733123);
++if( (boolean_f != Cyc_is_eof_object(res_73488_732776)) ){
++ return_direct_with_clo1(data, ((closureN)self_7312098)->elements[0], (((closure) ((closureN)self_7312098)->elements[0])->fn), res_73488_732776);
+ } else {
+
+-closureN_type c_7317625;
+-object e_7317682 [4];
+-c_7317625.hdr.mark = gc_color_red;
+- c_7317625.hdr.grayed = 0;
+-c_7317625.tag = closureN_tag;
+- c_7317625.fn = (function_type)__lambda_362;
+-c_7317625.num_args = 1;
+-c_7317625.num_elements = 4;
+-c_7317625.elements = (object *)e_7317682;
+-c_7317625.elements[0] = ((closureN)self_7313351)->elements[0];
+-c_7317625.elements[1] = res_73488_733123;
+-c_7317625.elements[2] = ((closureN)self_7313351)->elements[1];
+-c_7317625.elements[3] = ((closureN)self_7313351)->elements[2];
++closureN_type c_7316325;
++object e_7316382 [4];
++c_7316325.hdr.mark = gc_color_red;
++ c_7316325.hdr.grayed = 0;
++c_7316325.tag = closureN_tag;
++ c_7316325.fn = (function_type)__lambda_362;
++c_7316325.num_args = 1;
++c_7316325.num_elements = 4;
++c_7316325.elements = (object *)e_7316382;
++c_7316325.elements[0] = ((closureN)self_7312098)->elements[0];
++c_7316325.elements[1] = res_73488_732776;
++c_7316325.elements[2] = ((closureN)self_7312098)->elements[1];
++c_7316325.elements[3] = ((closureN)self_7312098)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317625,__lambda_362, Cyc_bytevector_length(data, res_73488_733123));}
++return_direct_with_clo1(data,(closure)&c_7316325,__lambda_362, Cyc_bytevector_length(data, res_73488_732776));}
+ ;;
+ }
+
+-static void __lambda_362(void *data, object self_7313352, int argc, object *args) /* object self_7313352, object len_73493_733124 */
++static void __lambda_362(void *data, object self_7312099, int argc, object *args) /* object self_7312099, object len_73493_732777 */
+ {
+- object len_73493_733124 = args[0];
++ object len_73493_732777 = args[0];
+
+-closureN_type c_7317627;
+-object e_7317681 [5];
+-c_7317627.hdr.mark = gc_color_red;
+- c_7317627.hdr.grayed = 0;
+-c_7317627.tag = closureN_tag;
+- c_7317627.fn = (function_type)__lambda_363;
+-c_7317627.num_args = 1;
+-c_7317627.num_elements = 5;
+-c_7317627.elements = (object *)e_7317681;
+-c_7317627.elements[0] = ((closureN)self_7313352)->elements[0];
+-c_7317627.elements[1] = len_73493_733124;
+-c_7317627.elements[2] = ((closureN)self_7313352)->elements[1];
+-c_7317627.elements[3] = ((closureN)self_7313352)->elements[2];
+-c_7317627.elements[4] = ((closureN)self_7313352)->elements[3];
++closureN_type c_7316327;
++object e_7316381 [5];
++c_7316327.hdr.mark = gc_color_red;
++ c_7316327.hdr.grayed = 0;
++c_7316327.tag = closureN_tag;
++ c_7316327.fn = (function_type)__lambda_363;
++c_7316327.num_args = 1;
++c_7316327.num_elements = 5;
++c_7316327.elements = (object *)e_7316381;
++c_7316327.elements[0] = ((closureN)self_7312099)->elements[0];
++c_7316327.elements[1] = len_73493_732777;
++c_7316327.elements[2] = ((closureN)self_7312099)->elements[1];
++c_7316327.elements[3] = ((closureN)self_7312099)->elements[2];
++c_7316327.elements[4] = ((closureN)self_7312099)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7317627,__lambda_363, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7316327,__lambda_363, boolean_f);;
+ }
+
+-static void __lambda_363(void *data, object self_7313353, int argc, object *args) /* object self_7313353, object lp_73494_73498_733126 */
++static void __lambda_363(void *data, object self_7312100, int argc, object *args) /* object self_7312100, object lp_73494_73498_732779 */
+ {
+- object lp_73494_73498_733126 = args[0];
++ object lp_73494_73498_732779 = args[0];
+
+-closureN_type c_7317629;
+-object e_7317677 [5];
+-c_7317629.hdr.mark = gc_color_red;
+- c_7317629.hdr.grayed = 0;
+-c_7317629.tag = closureN_tag;
+- c_7317629.fn = (function_type)__lambda_1362;
+-c_7317629.num_args = 1;
+-c_7317629.num_elements = 5;
+-c_7317629.elements = (object *)e_7317677;
+-c_7317629.elements[0] = ((closureN)self_7313353)->elements[0];
+-c_7317629.elements[1] = ((closureN)self_7313353)->elements[1];
+-c_7317629.elements[2] = ((closureN)self_7313353)->elements[2];
+-c_7317629.elements[3] = ((closureN)self_7313353)->elements[3];
+-c_7317629.elements[4] = ((closureN)self_7313353)->elements[4];
++closureN_type c_7316329;
++object e_7316377 [5];
++c_7316329.hdr.mark = gc_color_red;
++ c_7316329.hdr.grayed = 0;
++c_7316329.tag = closureN_tag;
++ c_7316329.fn = (function_type)__lambda_1315;
++c_7316329.num_args = 1;
++c_7316329.num_elements = 5;
++c_7316329.elements = (object *)e_7316377;
++c_7316329.elements[0] = ((closureN)self_7312100)->elements[0];
++c_7316329.elements[1] = ((closureN)self_7312100)->elements[1];
++c_7316329.elements[2] = ((closureN)self_7312100)->elements[2];
++c_7316329.elements[3] = ((closureN)self_7312100)->elements[3];
++c_7316329.elements[4] = ((closureN)self_7312100)->elements[4];
+
+
+-pair_type local_7317680;
+-return_direct_with_clo1(data,(closure)&c_7317629,__lambda_1362, set_cell_as_expr(&local_7317680, lp_73494_73498_733126));;
++pair_type local_7316380;
++return_direct_with_clo1(data,(closure)&c_7316329,__lambda_1315, set_cell_as_expr(&local_7316380, lp_73494_73498_732779));;
+ }
+
+-static void __lambda_1362(void *data, object self_7313354, int argc, object *args) /* object self_7313354, object lp_73494_73498_733126 */
++static void __lambda_1315(void *data, object self_7312101, int argc, object *args) /* object self_7312101, object lp_73494_73498_732779 */
+ {
+- object lp_73494_73498_733126 = args[0];
++ object lp_73494_73498_732779 = args[0];
+
+-closureN_type c_7317631;
+-object e_7317643 [2];
+-c_7317631.hdr.mark = gc_color_red;
+- c_7317631.hdr.grayed = 0;
+-c_7317631.tag = closureN_tag;
+- c_7317631.fn = (function_type)__lambda_364;
+-c_7317631.num_args = 1;
+-c_7317631.num_elements = 2;
+-c_7317631.elements = (object *)e_7317643;
+-c_7317631.elements[0] = ((closureN)self_7313354)->elements[0];
+-c_7317631.elements[1] = lp_73494_73498_733126;
++closureN_type c_7316331;
++object e_7316343 [2];
++c_7316331.hdr.mark = gc_color_red;
++ c_7316331.hdr.grayed = 0;
++c_7316331.tag = closureN_tag;
++ c_7316331.fn = (function_type)__lambda_364;
++c_7316331.num_args = 1;
++c_7316331.num_elements = 2;
++c_7316331.elements = (object *)e_7316343;
++c_7316331.elements[0] = ((closureN)self_7312101)->elements[0];
++c_7316331.elements[1] = lp_73494_73498_732779;
+
+
+-closureN_type c_7317644;
+-object e_7317676 [5];
+-c_7317644.hdr.mark = gc_color_red;
+- c_7317644.hdr.grayed = 0;
+-c_7317644.tag = closureN_tag;
+- c_7317644.fn = (function_type)__lambda_366;
+-c_7317644.num_args = 1;
+-c_7317644.num_elements = 5;
+-c_7317644.elements = (object *)e_7317676;
+-c_7317644.elements[0] = ((closureN)self_7313354)->elements[1];
+-c_7317644.elements[1] = lp_73494_73498_733126;
+-c_7317644.elements[2] = ((closureN)self_7313354)->elements[2];
+-c_7317644.elements[3] = ((closureN)self_7313354)->elements[3];
+-c_7317644.elements[4] = ((closureN)self_7313354)->elements[4];
++closureN_type c_7316344;
++object e_7316376 [5];
++c_7316344.hdr.mark = gc_color_red;
++ c_7316344.hdr.grayed = 0;
++c_7316344.tag = closureN_tag;
++ c_7316344.fn = (function_type)__lambda_366;
++c_7316344.num_args = 1;
++c_7316344.num_elements = 5;
++c_7316344.elements = (object *)e_7316376;
++c_7316344.elements[0] = ((closureN)self_7312101)->elements[1];
++c_7316344.elements[1] = lp_73494_73498_732779;
++c_7316344.elements[2] = ((closureN)self_7312101)->elements[2];
++c_7316344.elements[3] = ((closureN)self_7312101)->elements[3];
++c_7316344.elements[4] = ((closureN)self_7312101)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7317631,__lambda_364, &c_7317644);;
++return_direct_with_clo1(data,(closure)&c_7316331,__lambda_364, &c_7316344);;
+ }
+
+-static void __lambda_366(void *data, object self_7313355, int argc, object *args) /* object self_7313355, object k_735139, object i_73499_733127 */
++static void __lambda_366(void *data, object self_7312102, int argc, object *args) /* object self_7312102, object k_734687, object i_73499_732780 */
+ {
+- object k_735139 = args[0]; object i_73499_733127 = args[1];
++ object k_734687 = args[0]; object i_73499_732780 = args[1];
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, i_73499_733127, ((closureN)self_7313355)->elements[0])) ){
+- return_direct_with_clo1(data, k_735139, (((closure) k_735139)->fn), ((closureN)self_7313355)->elements[0]);
++if( (boolean_f != Cyc_num_fast_gte_op(data, i_73499_732780, ((closureN)self_7312102)->elements[0])) ){
++ return_direct_with_clo1(data, k_734687, (((closure) k_734687)->fn), ((closureN)self_7312102)->elements[0]);
+ } else {
+
+-closureN_type c_7317651;
+-object e_7317672 [5];
+-c_7317651.hdr.mark = gc_color_red;
+- c_7317651.hdr.grayed = 0;
+-c_7317651.tag = closureN_tag;
+- c_7317651.fn = (function_type)__lambda_367;
+-c_7317651.num_args = 1;
+-c_7317651.num_elements = 5;
+-c_7317651.elements = (object *)e_7317672;
+-c_7317651.elements[0] = i_73499_733127;
+-c_7317651.elements[1] = k_735139;
+-c_7317651.elements[2] = ((closureN)self_7313355)->elements[1];
+-c_7317651.elements[3] = ((closureN)self_7313355)->elements[3];
+-c_7317651.elements[4] = ((closureN)self_7313355)->elements[4];
++closureN_type c_7316351;
++object e_7316372 [5];
++c_7316351.hdr.mark = gc_color_red;
++ c_7316351.hdr.grayed = 0;
++c_7316351.tag = closureN_tag;
++ c_7316351.fn = (function_type)__lambda_367;
++c_7316351.num_args = 1;
++c_7316351.num_elements = 5;
++c_7316351.elements = (object *)e_7316372;
++c_7316351.elements[0] = i_73499_732780;
++c_7316351.elements[1] = k_734687;
++c_7316351.elements[2] = ((closureN)self_7312102)->elements[1];
++c_7316351.elements[3] = ((closureN)self_7312102)->elements[3];
++c_7316351.elements[4] = ((closureN)self_7312102)->elements[4];
+
+
+
+-return_closcall1(data,(closure)&c_7317651, Cyc_bytevector_u8_ref(data, ((closureN)self_7313355)->elements[2], i_73499_733127));}
++return_closcall1(data,(closure)&c_7316351, Cyc_bytevector_u8_ref(data, ((closureN)self_7312102)->elements[2], i_73499_732780));}
+ ;;
+ }
+
+-static void __lambda_367(void *data, object self_7313356, int argc, object *args) /* object self_7313356, object r_735144 */
++static void __lambda_367(void *data, object self_7312103, int argc, object *args) /* object self_7312103, object r_734692 */
+ {
+- object r_735144 = args[0];
++ object r_734692 = args[0];
+
+-closureN_type c_7317653;
+-object e_7317663 [3];
+-c_7317653.hdr.mark = gc_color_red;
+- c_7317653.hdr.grayed = 0;
+-c_7317653.tag = closureN_tag;
+- c_7317653.fn = (function_type)__lambda_368;
+-c_7317653.num_args = 1;
+-c_7317653.num_elements = 3;
+-c_7317653.elements = (object *)e_7317663;
+-c_7317653.elements[0] = ((closureN)self_7313356)->elements[0];
+-c_7317653.elements[1] = ((closureN)self_7313356)->elements[1];
+-c_7317653.elements[2] = ((closureN)self_7313356)->elements[2];
++closureN_type c_7316353;
++object e_7316363 [3];
++c_7316353.hdr.mark = gc_color_red;
++ c_7316353.hdr.grayed = 0;
++c_7316353.tag = closureN_tag;
++ c_7316353.fn = (function_type)__lambda_368;
++c_7316353.num_args = 1;
++c_7316353.num_elements = 3;
++c_7316353.elements = (object *)e_7316363;
++c_7316353.elements[0] = ((closureN)self_7312103)->elements[0];
++c_7316353.elements[1] = ((closureN)self_7312103)->elements[1];
++c_7316353.elements[2] = ((closureN)self_7312103)->elements[2];
+
+
+
+
+-complex_num_type local_7317669;
+-return_closcall1(data,(closure)&c_7317653, Cyc_bytevector_u8_set(data, ((closureN)self_7313356)->elements[4], Cyc_fast_sum(data,&local_7317669, ((closureN)self_7313356)->elements[0], ((closureN)self_7313356)->elements[3]), r_735144));;
++complex_num_type local_7316369;
++return_closcall1(data,(closure)&c_7316353, Cyc_bytevector_u8_set(data, ((closureN)self_7312103)->elements[4], Cyc_fast_sum(data,&local_7316369, ((closureN)self_7312103)->elements[0], ((closureN)self_7312103)->elements[3]), r_734692));;
+ }
+
+-static void __lambda_368(void *data, object self_7313357, int argc, object *args) /* object self_7313357, object r_735141 */
++static void __lambda_368(void *data, object self_7312104, int argc, object *args) /* object self_7312104, object r_734689 */
+ {
+
+
+
+
+-complex_num_type local_7317661;
+-return_closcall2(data, car(((closureN)self_7313357)->elements[2]), ((closureN)self_7313357)->elements[1], Cyc_fast_sum(data,&local_7317661, ((closureN)self_7313357)->elements[0], obj_int2obj(1)));;
++complex_num_type local_7316361;
++return_closcall2(data, car(((closureN)self_7312104)->elements[2]), ((closureN)self_7312104)->elements[1], Cyc_fast_sum(data,&local_7316361, ((closureN)self_7312104)->elements[0], obj_int2obj(1)));;
+ }
+
+-static void __lambda_364(void *data, object self_7313358, int argc, object *args) /* object self_7313358, object r_735138 */
++static void __lambda_364(void *data, object self_7312105, int argc, object *args) /* object self_7312105, object r_734686 */
+ {
+- object r_735138 = args[0];
++ object r_734686 = args[0];
+
+-closureN_type c_7317633;
+-object e_7317639 [2];
+-c_7317633.hdr.mark = gc_color_red;
+- c_7317633.hdr.grayed = 0;
+-c_7317633.tag = closureN_tag;
+- c_7317633.fn = (function_type)__lambda_365;
+-c_7317633.num_args = 1;
+-c_7317633.num_elements = 2;
+-c_7317633.elements = (object *)e_7317639;
+-c_7317633.elements[0] = ((closureN)self_7313358)->elements[0];
+-c_7317633.elements[1] = ((closureN)self_7313358)->elements[1];
++closureN_type c_7316333;
++object e_7316339 [2];
++c_7316333.hdr.mark = gc_color_red;
++ c_7316333.hdr.grayed = 0;
++c_7316333.tag = closureN_tag;
++ c_7316333.fn = (function_type)__lambda_365;
++c_7316333.num_args = 1;
++c_7316333.num_elements = 2;
++c_7316333.elements = (object *)e_7316339;
++c_7316333.elements[0] = ((closureN)self_7312105)->elements[0];
++c_7316333.elements[1] = ((closureN)self_7312105)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317633,__lambda_365, Cyc_set_cell(data, ((closureN)self_7313358)->elements[1], r_735138));;
++return_direct_with_clo1(data,(closure)&c_7316333,__lambda_365, Cyc_set_cell(data, ((closureN)self_7312105)->elements[1], r_734686));;
+ }
+
+-static void __lambda_365(void *data, object self_7313359, int argc, object *args) /* object self_7313359, object r_735137 */
++static void __lambda_365(void *data, object self_7312106, int argc, object *args) /* object self_7312106, object r_734685 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313359)->elements[1]), ((closureN)self_7313359)->elements[0], obj_int2obj(0));;
++return_closcall2(data, car(((closureN)self_7312106)->elements[1]), ((closureN)self_7312106)->elements[0], obj_int2obj(0));;
+ }
+
+-static void __lambda_357(void *data, object self_7313360, int argc, object *args) /* object self_7313360, object k_735146 */
++static void __lambda_357(void *data, object self_7312107, int argc, object *args) /* object self_7312107, object k_734694 */
+ {
+- object k_735146 = args[0];
++ object k_734694 = args[0];
+
+-closureN_type c_7317587;
+-object e_7317598 [1];
+-c_7317587.hdr.mark = gc_color_red;
+- c_7317587.hdr.grayed = 0;
+-c_7317587.tag = closureN_tag;
+- c_7317587.fn = (function_type)__lambda_358;
+-c_7317587.num_args = 0;
+-c_7317587.num_elements = 1;
+-c_7317587.elements = (object *)e_7317598;
+-c_7317587.elements[0] = ((closureN)self_7313360)->elements[0];
++closureN_type c_7316287;
++object e_7316298 [1];
++c_7316287.hdr.mark = gc_color_red;
++ c_7316287.hdr.grayed = 0;
++c_7316287.tag = closureN_tag;
++ c_7316287.fn = (function_type)__lambda_358;
++c_7316287.num_args = 0;
++c_7316287.num_elements = 1;
++c_7316287.elements = (object *)e_7316298;
++c_7316287.elements[0] = ((closureN)self_7312107)->elements[0];
+
+
+-closureN_type c_7317599;
+-object e_7317610 [3];
+-c_7317599.hdr.mark = gc_color_red;
+- c_7317599.hdr.grayed = 0;
+-c_7317599.tag = closureN_tag;
+- c_7317599.fn = (function_type)__lambda_359;
+-c_7317599.num_args = 1;
+-c_7317599.num_elements = 3;
+-c_7317599.elements = (object *)e_7317610;
+-c_7317599.elements[0] = k_735146;
+-c_7317599.elements[1] = ((closureN)self_7313360)->elements[0];
+-c_7317599.elements[2] = ((closureN)self_7313360)->elements[1];
++closureN_type c_7316299;
++object e_7316310 [3];
++c_7316299.hdr.mark = gc_color_red;
++ c_7316299.hdr.grayed = 0;
++c_7316299.tag = closureN_tag;
++ c_7316299.fn = (function_type)__lambda_359;
++c_7316299.num_args = 1;
++c_7316299.num_elements = 3;
++c_7316299.elements = (object *)e_7316310;
++c_7316299.elements[0] = k_734694;
++c_7316299.elements[1] = ((closureN)self_7312107)->elements[0];
++c_7316299.elements[2] = ((closureN)self_7312107)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7317587,__lambda_358, &c_7317599);;
++return_direct_with_clo1(data,(closure)&c_7316287,__lambda_358, &c_7316299);;
+ }
+
+-static void __lambda_359(void *data, object self_7313361, int argc, object *args) /* object self_7313361, object r_735147 */
++static void __lambda_359(void *data, object self_7312108, int argc, object *args) /* object self_7312108, object r_734695 */
+ {
+- object r_735147 = args[0];
+- if( (boolean_f != r_735147) ){
++ object r_734695 = args[0];
++ if( (boolean_f != r_734695) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313361)->elements[0], (((closure) ((closureN)self_7313361)->elements[0])->fn), Cyc_cadr(data, ((closureN)self_7313361)->elements[1]));
++return_direct_with_clo1(data, ((closureN)self_7312108)->elements[0], (((closure) ((closureN)self_7312108)->elements[0])->fn), Cyc_cadr(data, ((closureN)self_7312108)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313361)->elements[0], (((closure) ((closureN)self_7313361)->elements[0])->fn), Cyc_bytevector_length(data, ((closureN)self_7313361)->elements[2]));}
++return_direct_with_clo1(data, ((closureN)self_7312108)->elements[0], (((closure) ((closureN)self_7312108)->elements[0])->fn), Cyc_bytevector_length(data, ((closureN)self_7312108)->elements[2]));}
+ ;;
+ }
+
+-static void __lambda_358(void *data, object self_7313362, int argc, object *args) /* object self_7313362, object k_735148 */
++static void __lambda_358(void *data, object self_7312109, int argc, object *args) /* object self_7312109, object k_734696 */
+ {
+- object k_735148 = args[0];
++ object k_734696 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313362)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312109)->elements[0])) ){
+
+
+
+
+-return_direct_with_clo1(data, k_735148,__lambda_359, Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313362)->elements[0])));
++return_direct_with_clo1(data, k_734696,__lambda_359, Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312109)->elements[0])));
+ } else {
+- return_direct_with_clo1(data, k_735148,__lambda_359, boolean_f);}
++ return_direct_with_clo1(data, k_734696,__lambda_359, boolean_f);}
+ ;;
+ }
+
+-static void __lambda_355(void *data, object self_7313363, int argc, object *args) /* object self_7313363, object k_735151 */
++static void __lambda_355(void *data, object self_7312110, int argc, object *args) /* object self_7312110, object k_734699 */
+ {
+- object k_735151 = args[0];
++ object k_734699 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313363)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312110)->elements[0])) ){
+
+
+-return_direct_with_clo1(data, k_735151,__lambda_356, Cyc_car(data, ((closureN)self_7313363)->elements[0]));
++return_direct_with_clo1(data, k_734699,__lambda_356, Cyc_car(data, ((closureN)self_7312110)->elements[0]));
+ } else {
+- return_direct_with_clo1(data, k_735151,__lambda_356, obj_int2obj(0));}
++ return_direct_with_clo1(data, k_734699,__lambda_356, obj_int2obj(0));}
+ ;;
+ }
+
+-static void __lambda_353(void *data, object self_7313364, int argc, object *args) /* object self_7313364, object k_735155 */
++static void __lambda_353(void *data, object self_7312111, int argc, object *args) /* object self_7312111, object k_734703 */
+ {
+- object k_735155 = args[0];
++ object k_734703 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313364)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312111)->elements[0])) ){
+
+
+-return_direct_with_clo1(data, k_735155, (((closure) k_735155)->fn), Cyc_car(data, ((closureN)self_7313364)->elements[0]));
++return_direct_with_clo1(data, k_734703, (((closure) k_734703)->fn), Cyc_car(data, ((closureN)self_7312111)->elements[0]));
+ } else {
+- return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_735155);}
++ return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_734703);}
+ ;;
+ }
+
+-static void __lambda_340(void *data, object _, int argc, object *args) /* closure _,object k_735110, object k_73462_733110, object _191port_73463_733111_raw, ... */
++static void __lambda_340(void *data, object _, int argc, object *args) /* closure _,object k_734658, object k_73462_732763, object _191port_73463_732764_raw, ... */
+ {
+-object k_735110 = args[0]; object k_73462_733110 = args[1];
+-load_varargs(_191port_73463_733111, args, 2, argc - 2);
++object k_734658 = args[0]; object k_73462_732763 = args[1];
++load_varargs(_191port_73463_732764, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:read-bytevector");
+
+-closureN_type c_7317433;
+-object e_7317548 [3];
+-c_7317433.hdr.mark = gc_color_red;
+- c_7317433.hdr.grayed = 0;
+-c_7317433.tag = closureN_tag;
+- c_7317433.fn = (function_type)__lambda_341;
+-c_7317433.num_args = 3;
+-c_7317433.num_elements = 3;
+-c_7317433.elements = (object *)e_7317548;
+-c_7317433.elements[0] = _191port_73463_733111;
+-c_7317433.elements[1] = k_73462_733110;
+-c_7317433.elements[2] = k_735110;
+-
+-return_direct_with_clo3(data,(closure)&c_7317433,__lambda_341, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_341(void *data, object self_7313334, int argc, object *args) /* object self_7313334, object port_73464_733112, object bv_73465_733113, object loop_73466_733114 */
+- {
+- object port_73464_733112 = args[0]; object bv_73465_733113 = args[1]; object loop_73466_733114 = args[2];
+-
+-closureN_type c_7317435;
+-object e_7317544 [5];
+-c_7317435.hdr.mark = gc_color_red;
+- c_7317435.hdr.grayed = 0;
+-c_7317435.tag = closureN_tag;
+- c_7317435.fn = (function_type)__lambda_1361;
+-c_7317435.num_args = 1;
+-c_7317435.num_elements = 5;
+-c_7317435.elements = (object *)e_7317544;
+-c_7317435.elements[0] = ((closureN)self_7313334)->elements[0];
+-c_7317435.elements[1] = bv_73465_733113;
+-c_7317435.elements[2] = ((closureN)self_7313334)->elements[1];
+-c_7317435.elements[3] = ((closureN)self_7313334)->elements[2];
+-c_7317435.elements[4] = loop_73466_733114;
++closureN_type c_7316133;
++object e_7316248 [3];
++c_7316133.hdr.mark = gc_color_red;
++ c_7316133.hdr.grayed = 0;
++c_7316133.tag = closureN_tag;
++ c_7316133.fn = (function_type)__lambda_341;
++c_7316133.num_args = 3;
++c_7316133.num_elements = 3;
++c_7316133.elements = (object *)e_7316248;
++c_7316133.elements[0] = _191port_73463_732764;
++c_7316133.elements[1] = k_73462_732763;
++c_7316133.elements[2] = k_734658;
++
++return_direct_with_clo3(data,(closure)&c_7316133,__lambda_341, boolean_f, boolean_f, boolean_f);;
++}
++
++static void __lambda_341(void *data, object self_7312081, int argc, object *args) /* object self_7312081, object port_73464_732765, object bv_73465_732766, object loop_73466_732767 */
++ {
++ object port_73464_732765 = args[0]; object bv_73465_732766 = args[1]; object loop_73466_732767 = args[2];
++
++closureN_type c_7316135;
++object e_7316244 [5];
++c_7316135.hdr.mark = gc_color_red;
++ c_7316135.hdr.grayed = 0;
++c_7316135.tag = closureN_tag;
++ c_7316135.fn = (function_type)__lambda_1314;
++c_7316135.num_args = 1;
++c_7316135.num_elements = 5;
++c_7316135.elements = (object *)e_7316244;
++c_7316135.elements[0] = ((closureN)self_7312081)->elements[0];
++c_7316135.elements[1] = bv_73465_732766;
++c_7316135.elements[2] = ((closureN)self_7312081)->elements[1];
++c_7316135.elements[3] = ((closureN)self_7312081)->elements[2];
++c_7316135.elements[4] = loop_73466_732767;
+
+
+-pair_type local_7317547;
+-return_direct_with_clo1(data,(closure)&c_7317435,__lambda_1361, set_cell_as_expr(&local_7317547, port_73464_733112));;
++pair_type local_7316247;
++return_direct_with_clo1(data,(closure)&c_7316135,__lambda_1314, set_cell_as_expr(&local_7316247, port_73464_732765));;
+ }
+
+-static void __lambda_1361(void *data, object self_7313335, int argc, object *args) /* object self_7313335, object port_73464_733112 */
++static void __lambda_1314(void *data, object self_7312082, int argc, object *args) /* object self_7312082, object port_73464_732765 */
+ {
+- object port_73464_733112 = args[0];
++ object port_73464_732765 = args[0];
+
+-closureN_type c_7317437;
+-object e_7317539 [5];
+-c_7317437.hdr.mark = gc_color_red;
+- c_7317437.hdr.grayed = 0;
+-c_7317437.tag = closureN_tag;
+- c_7317437.fn = (function_type)__lambda_1360;
+-c_7317437.num_args = 1;
+-c_7317437.num_elements = 5;
+-c_7317437.elements = (object *)e_7317539;
+-c_7317437.elements[0] = ((closureN)self_7313335)->elements[0];
+-c_7317437.elements[1] = ((closureN)self_7313335)->elements[2];
+-c_7317437.elements[2] = ((closureN)self_7313335)->elements[3];
+-c_7317437.elements[3] = ((closureN)self_7313335)->elements[4];
+-c_7317437.elements[4] = port_73464_733112;
++closureN_type c_7316137;
++object e_7316239 [5];
++c_7316137.hdr.mark = gc_color_red;
++ c_7316137.hdr.grayed = 0;
++c_7316137.tag = closureN_tag;
++ c_7316137.fn = (function_type)__lambda_1313;
++c_7316137.num_args = 1;
++c_7316137.num_elements = 5;
++c_7316137.elements = (object *)e_7316239;
++c_7316137.elements[0] = ((closureN)self_7312082)->elements[0];
++c_7316137.elements[1] = ((closureN)self_7312082)->elements[2];
++c_7316137.elements[2] = ((closureN)self_7312082)->elements[3];
++c_7316137.elements[3] = ((closureN)self_7312082)->elements[4];
++c_7316137.elements[4] = port_73464_732765;
+
+
+-pair_type local_7317542;
+-return_direct_with_clo1(data,(closure)&c_7317437,__lambda_1360, set_cell_as_expr(&local_7317542, ((closureN)self_7313335)->elements[1]));;
++pair_type local_7316242;
++return_direct_with_clo1(data,(closure)&c_7316137,__lambda_1313, set_cell_as_expr(&local_7316242, ((closureN)self_7312082)->elements[1]));;
+ }
+
+-static void __lambda_1360(void *data, object self_7313336, int argc, object *args) /* object self_7313336, object bv_73465_733113 */
++static void __lambda_1313(void *data, object self_7312083, int argc, object *args) /* object self_7312083, object bv_73465_732766 */
+ {
+- object bv_73465_733113 = args[0];
++ object bv_73465_732766 = args[0];
+
+-closureN_type c_7317439;
+-object e_7317534 [5];
+-c_7317439.hdr.mark = gc_color_red;
+- c_7317439.hdr.grayed = 0;
+-c_7317439.tag = closureN_tag;
+- c_7317439.fn = (function_type)__lambda_1359;
+-c_7317439.num_args = 1;
+-c_7317439.num_elements = 5;
+-c_7317439.elements = (object *)e_7317534;
+-c_7317439.elements[0] = ((closureN)self_7313336)->elements[0];
+-c_7317439.elements[1] = bv_73465_733113;
+-c_7317439.elements[2] = ((closureN)self_7313336)->elements[1];
+-c_7317439.elements[3] = ((closureN)self_7313336)->elements[2];
+-c_7317439.elements[4] = ((closureN)self_7313336)->elements[4];
++closureN_type c_7316139;
++object e_7316234 [5];
++c_7316139.hdr.mark = gc_color_red;
++ c_7316139.hdr.grayed = 0;
++c_7316139.tag = closureN_tag;
++ c_7316139.fn = (function_type)__lambda_1312;
++c_7316139.num_args = 1;
++c_7316139.num_elements = 5;
++c_7316139.elements = (object *)e_7316234;
++c_7316139.elements[0] = ((closureN)self_7312083)->elements[0];
++c_7316139.elements[1] = bv_73465_732766;
++c_7316139.elements[2] = ((closureN)self_7312083)->elements[1];
++c_7316139.elements[3] = ((closureN)self_7312083)->elements[2];
++c_7316139.elements[4] = ((closureN)self_7312083)->elements[4];
+
+
+-pair_type local_7317537;
+-return_direct_with_clo1(data,(closure)&c_7317439,__lambda_1359, set_cell_as_expr(&local_7317537, ((closureN)self_7313336)->elements[3]));;
++pair_type local_7316237;
++return_direct_with_clo1(data,(closure)&c_7316139,__lambda_1312, set_cell_as_expr(&local_7316237, ((closureN)self_7312083)->elements[3]));;
+ }
+
+-static void __lambda_1359(void *data, object self_7313337, int argc, object *args) /* object self_7313337, object loop_73466_733114 */
++static void __lambda_1312(void *data, object self_7312084, int argc, object *args) /* object self_7312084, object loop_73466_732767 */
+ {
+- object loop_73466_733114 = args[0];
++ object loop_73466_732767 = args[0];
+
+-closureN_type c_7317441;
+-object e_7317452 [2];
+-c_7317441.hdr.mark = gc_color_red;
+- c_7317441.hdr.grayed = 0;
+-c_7317441.tag = closureN_tag;
+- c_7317441.fn = (function_type)__lambda_342;
+-c_7317441.num_args = 0;
+-c_7317441.num_elements = 2;
+-c_7317441.elements = (object *)e_7317452;
+-c_7317441.elements[0] = ((closureN)self_7313337)->elements[0];
+-c_7317441.elements[1] = ((closureN)self_7313337)->elements[4];
++closureN_type c_7316141;
++object e_7316152 [2];
++c_7316141.hdr.mark = gc_color_red;
++ c_7316141.hdr.grayed = 0;
++c_7316141.tag = closureN_tag;
++ c_7316141.fn = (function_type)__lambda_342;
++c_7316141.num_args = 0;
++c_7316141.num_elements = 2;
++c_7316141.elements = (object *)e_7316152;
++c_7316141.elements[0] = ((closureN)self_7312084)->elements[0];
++c_7316141.elements[1] = ((closureN)self_7312084)->elements[4];
+
+
+-closureN_type c_7317453;
+-object e_7317533 [5];
+-c_7317453.hdr.mark = gc_color_red;
+- c_7317453.hdr.grayed = 0;
+-c_7317453.tag = closureN_tag;
+- c_7317453.fn = (function_type)__lambda_343;
+-c_7317453.num_args = 1;
+-c_7317453.num_elements = 5;
+-c_7317453.elements = (object *)e_7317533;
+-c_7317453.elements[0] = ((closureN)self_7313337)->elements[1];
+-c_7317453.elements[1] = ((closureN)self_7313337)->elements[2];
+-c_7317453.elements[2] = ((closureN)self_7313337)->elements[3];
+-c_7317453.elements[3] = loop_73466_733114;
+-c_7317453.elements[4] = ((closureN)self_7313337)->elements[4];
++closureN_type c_7316153;
++object e_7316233 [5];
++c_7316153.hdr.mark = gc_color_red;
++ c_7316153.hdr.grayed = 0;
++c_7316153.tag = closureN_tag;
++ c_7316153.fn = (function_type)__lambda_343;
++c_7316153.num_args = 1;
++c_7316153.num_elements = 5;
++c_7316153.elements = (object *)e_7316233;
++c_7316153.elements[0] = ((closureN)self_7312084)->elements[1];
++c_7316153.elements[1] = ((closureN)self_7312084)->elements[2];
++c_7316153.elements[2] = ((closureN)self_7312084)->elements[3];
++c_7316153.elements[3] = loop_73466_732767;
++c_7316153.elements[4] = ((closureN)self_7312084)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7317441,__lambda_342, &c_7317453);;
++return_direct_with_clo1(data,(closure)&c_7316141,__lambda_342, &c_7316153);;
+ }
+
+-static void __lambda_343(void *data, object self_7313338, int argc, object *args) /* object self_7313338, object r_735123 */
++static void __lambda_343(void *data, object self_7312085, int argc, object *args) /* object self_7312085, object r_734671 */
+ {
+- object r_735123 = args[0];
++ object r_734671 = args[0];
+
+-closureN_type c_7317455;
+-object e_7317529 [5];
+-c_7317455.hdr.mark = gc_color_red;
+- c_7317455.hdr.grayed = 0;
+-c_7317455.tag = closureN_tag;
+- c_7317455.fn = (function_type)__lambda_344;
+-c_7317455.num_args = 1;
+-c_7317455.num_elements = 5;
+-c_7317455.elements = (object *)e_7317529;
+-c_7317455.elements[0] = ((closureN)self_7313338)->elements[0];
+-c_7317455.elements[1] = ((closureN)self_7313338)->elements[1];
+-c_7317455.elements[2] = ((closureN)self_7313338)->elements[2];
+-c_7317455.elements[3] = ((closureN)self_7313338)->elements[3];
+-c_7317455.elements[4] = ((closureN)self_7313338)->elements[4];
++closureN_type c_7316155;
++object e_7316229 [5];
++c_7316155.hdr.mark = gc_color_red;
++ c_7316155.hdr.grayed = 0;
++c_7316155.tag = closureN_tag;
++ c_7316155.fn = (function_type)__lambda_344;
++c_7316155.num_args = 1;
++c_7316155.num_elements = 5;
++c_7316155.elements = (object *)e_7316229;
++c_7316155.elements[0] = ((closureN)self_7312085)->elements[0];
++c_7316155.elements[1] = ((closureN)self_7312085)->elements[1];
++c_7316155.elements[2] = ((closureN)self_7312085)->elements[2];
++c_7316155.elements[3] = ((closureN)self_7312085)->elements[3];
++c_7316155.elements[4] = ((closureN)self_7312085)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317455,__lambda_344, Cyc_set_cell(data, ((closureN)self_7313338)->elements[4], r_735123));;
++return_direct_with_clo1(data,(closure)&c_7316155,__lambda_344, Cyc_set_cell(data, ((closureN)self_7312085)->elements[4], r_734671));;
+ }
+
+-static void __lambda_344(void *data, object self_7313339, int argc, object *args) /* object self_7313339, object r_735111 */
++static void __lambda_344(void *data, object self_7312086, int argc, object *args) /* object self_7312086, object r_734659 */
+ {
+
+
+-closureN_type c_7317457;
+-object e_7317524 [5];
+-c_7317457.hdr.mark = gc_color_red;
+- c_7317457.hdr.grayed = 0;
+-c_7317457.tag = closureN_tag;
+- c_7317457.fn = (function_type)__lambda_345;
+-c_7317457.num_args = 1;
+-c_7317457.num_elements = 5;
+-c_7317457.elements = (object *)e_7317524;
+-c_7317457.elements[0] = ((closureN)self_7313339)->elements[0];
+-c_7317457.elements[1] = ((closureN)self_7313339)->elements[1];
+-c_7317457.elements[2] = ((closureN)self_7313339)->elements[2];
+-c_7317457.elements[3] = ((closureN)self_7313339)->elements[3];
+-c_7317457.elements[4] = ((closureN)self_7313339)->elements[4];
++closureN_type c_7316157;
++object e_7316224 [5];
++c_7316157.hdr.mark = gc_color_red;
++ c_7316157.hdr.grayed = 0;
++c_7316157.tag = closureN_tag;
++ c_7316157.fn = (function_type)__lambda_345;
++c_7316157.num_args = 1;
++c_7316157.num_elements = 5;
++c_7316157.elements = (object *)e_7316224;
++c_7316157.elements[0] = ((closureN)self_7312086)->elements[0];
++c_7316157.elements[1] = ((closureN)self_7312086)->elements[1];
++c_7316157.elements[2] = ((closureN)self_7312086)->elements[2];
++c_7316157.elements[3] = ((closureN)self_7312086)->elements[3];
++c_7316157.elements[4] = ((closureN)self_7312086)->elements[4];
+
+
+-object c_7317527 = Cyc_make_bytevector(data,(closure)&c_7317457,1,((closureN)self_7313339)->elements[1]);
+-return_closcall1(data,(closure)&c_7317457, c_7317527);;
++object c_7316227 = Cyc_make_bytevector(data,(closure)&c_7316157,1,((closureN)self_7312086)->elements[1]);
++return_closcall1(data,(closure)&c_7316157, c_7316227);;
+ }
+
+-static void __lambda_345(void *data, object self_7313340, int argc, object *args) /* object self_7313340, object r_735122 */
++static void __lambda_345(void *data, object self_7312087, int argc, object *args) /* object self_7312087, object r_734670 */
+ {
+- object r_735122 = args[0];
++ object r_734670 = args[0];
+
+-closureN_type c_7317459;
+-object e_7317520 [5];
+-c_7317459.hdr.mark = gc_color_red;
+- c_7317459.hdr.grayed = 0;
+-c_7317459.tag = closureN_tag;
+- c_7317459.fn = (function_type)__lambda_346;
+-c_7317459.num_args = 1;
+-c_7317459.num_elements = 5;
+-c_7317459.elements = (object *)e_7317520;
+-c_7317459.elements[0] = ((closureN)self_7313340)->elements[0];
+-c_7317459.elements[1] = ((closureN)self_7313340)->elements[1];
+-c_7317459.elements[2] = ((closureN)self_7313340)->elements[2];
+-c_7317459.elements[3] = ((closureN)self_7313340)->elements[3];
+-c_7317459.elements[4] = ((closureN)self_7313340)->elements[4];
++closureN_type c_7316159;
++object e_7316220 [5];
++c_7316159.hdr.mark = gc_color_red;
++ c_7316159.hdr.grayed = 0;
++c_7316159.tag = closureN_tag;
++ c_7316159.fn = (function_type)__lambda_346;
++c_7316159.num_args = 1;
++c_7316159.num_elements = 5;
++c_7316159.elements = (object *)e_7316220;
++c_7316159.elements[0] = ((closureN)self_7312087)->elements[0];
++c_7316159.elements[1] = ((closureN)self_7312087)->elements[1];
++c_7316159.elements[2] = ((closureN)self_7312087)->elements[2];
++c_7316159.elements[3] = ((closureN)self_7312087)->elements[3];
++c_7316159.elements[4] = ((closureN)self_7312087)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317459,__lambda_346, Cyc_set_cell(data, ((closureN)self_7313340)->elements[0], r_735122));;
++return_direct_with_clo1(data,(closure)&c_7316159,__lambda_346, Cyc_set_cell(data, ((closureN)self_7312087)->elements[0], r_734670));;
+ }
+
+-static void __lambda_346(void *data, object self_7313341, int argc, object *args) /* object self_7313341, object r_735112 */
++static void __lambda_346(void *data, object self_7312088, int argc, object *args) /* object self_7312088, object r_734660 */
+ {
+
+
+-closureN_type c_7317461;
+-object e_7317473 [2];
+-c_7317461.hdr.mark = gc_color_red;
+- c_7317461.hdr.grayed = 0;
+-c_7317461.tag = closureN_tag;
+- c_7317461.fn = (function_type)__lambda_347;
+-c_7317461.num_args = 1;
+-c_7317461.num_elements = 2;
+-c_7317461.elements = (object *)e_7317473;
+-c_7317461.elements[0] = ((closureN)self_7313341)->elements[2];
+-c_7317461.elements[1] = ((closureN)self_7313341)->elements[3];
++closureN_type c_7316161;
++object e_7316173 [2];
++c_7316161.hdr.mark = gc_color_red;
++ c_7316161.hdr.grayed = 0;
++c_7316161.tag = closureN_tag;
++ c_7316161.fn = (function_type)__lambda_347;
++c_7316161.num_args = 1;
++c_7316161.num_elements = 2;
++c_7316161.elements = (object *)e_7316173;
++c_7316161.elements[0] = ((closureN)self_7312088)->elements[2];
++c_7316161.elements[1] = ((closureN)self_7312088)->elements[3];
+
+
+-closureN_type c_7317474;
+-object e_7317519 [4];
+-c_7317474.hdr.mark = gc_color_red;
+- c_7317474.hdr.grayed = 0;
+-c_7317474.tag = closureN_tag;
+- c_7317474.fn = (function_type)__lambda_349;
+-c_7317474.num_args = 1;
+-c_7317474.num_elements = 4;
+-c_7317474.elements = (object *)e_7317519;
+-c_7317474.elements[0] = ((closureN)self_7313341)->elements[0];
+-c_7317474.elements[1] = ((closureN)self_7313341)->elements[1];
+-c_7317474.elements[2] = ((closureN)self_7313341)->elements[3];
+-c_7317474.elements[3] = ((closureN)self_7313341)->elements[4];
++closureN_type c_7316174;
++object e_7316219 [4];
++c_7316174.hdr.mark = gc_color_red;
++ c_7316174.hdr.grayed = 0;
++c_7316174.tag = closureN_tag;
++ c_7316174.fn = (function_type)__lambda_349;
++c_7316174.num_args = 1;
++c_7316174.num_elements = 4;
++c_7316174.elements = (object *)e_7316219;
++c_7316174.elements[0] = ((closureN)self_7312088)->elements[0];
++c_7316174.elements[1] = ((closureN)self_7312088)->elements[1];
++c_7316174.elements[2] = ((closureN)self_7312088)->elements[3];
++c_7316174.elements[3] = ((closureN)self_7312088)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7317461,__lambda_347, &c_7317474);;
++return_direct_with_clo1(data,(closure)&c_7316161,__lambda_347, &c_7316174);;
+ }
+
+-static void __lambda_349(void *data, object self_7313342, int argc, object *args) /* object self_7313342, object k_735115, object n_73467_733115 */
++static void __lambda_349(void *data, object self_7312089, int argc, object *args) /* object self_7312089, object k_734663, object n_73467_732768 */
+ {
+- object k_735115 = args[0]; object n_73467_733115 = args[1];
++ object k_734663 = args[0]; object n_73467_732768 = args[1];
+
+-if( (boolean_f != Cyc_num_fast_gte_op(data, n_73467_733115, ((closureN)self_7313342)->elements[1])) ){
++if( (boolean_f != Cyc_num_fast_gte_op(data, n_73467_732768, ((closureN)self_7312089)->elements[1])) ){
+
+
+-return_direct_with_clo1(data, k_735115, (((closure) k_735115)->fn), car(((closureN)self_7313342)->elements[0]));
++return_direct_with_clo1(data, k_734663, (((closure) k_734663)->fn), car(((closureN)self_7312089)->elements[0]));
+ } else {
+
+-closureN_type c_7317483;
+-object e_7317515 [4];
+-c_7317483.hdr.mark = gc_color_red;
+- c_7317483.hdr.grayed = 0;
+-c_7317483.tag = closureN_tag;
+- c_7317483.fn = (function_type)__lambda_350;
+-c_7317483.num_args = 1;
+-c_7317483.num_elements = 4;
+-c_7317483.elements = (object *)e_7317515;
+-c_7317483.elements[0] = ((closureN)self_7313342)->elements[0];
+-c_7317483.elements[1] = k_735115;
+-c_7317483.elements[2] = ((closureN)self_7313342)->elements[2];
+-c_7317483.elements[3] = n_73467_733115;
++closureN_type c_7316183;
++object e_7316215 [4];
++c_7316183.hdr.mark = gc_color_red;
++ c_7316183.hdr.grayed = 0;
++c_7316183.tag = closureN_tag;
++ c_7316183.fn = (function_type)__lambda_350;
++c_7316183.num_args = 1;
++c_7316183.num_elements = 4;
++c_7316183.elements = (object *)e_7316215;
++c_7316183.elements[0] = ((closureN)self_7312089)->elements[0];
++c_7316183.elements[1] = k_734663;
++c_7316183.elements[2] = ((closureN)self_7312089)->elements[2];
++c_7316183.elements[3] = n_73467_732768;
+
+
+
+-return_direct_with_clo2(data, __glo_read_91u8_scheme_base, (((closure) __glo_read_91u8_scheme_base)->fn), &c_7317483, car(((closureN)self_7313342)->elements[3]));}
++return_direct_with_clo2(data, __glo_read_91u8_scheme_base, (((closure) __glo_read_91u8_scheme_base)->fn), &c_7316183, car(((closureN)self_7312089)->elements[3]));}
+ ;;
+ }
+
+-static void __lambda_350(void *data, object self_7313343, int argc, object *args) /* object self_7313343, object b_73468_733116 */
++static void __lambda_350(void *data, object self_7312090, int argc, object *args) /* object self_7312090, object b_73468_732769 */
+ {
+- object b_73468_733116 = args[0];
++ object b_73468_732769 = args[0];
+
+-if( (boolean_f != Cyc_is_eof_object(b_73468_733116)) ){
++if( (boolean_f != Cyc_is_eof_object(b_73468_732769)) ){
+
+-if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_7313343)->elements[3], obj_int2obj(0))) ){
+- return_direct_with_clo1(data, ((closureN)self_7313343)->elements[1], (((closure) ((closureN)self_7313343)->elements[1])->fn), b_73468_733116);
++if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_7312090)->elements[3], obj_int2obj(0))) ){
++ return_direct_with_clo1(data, ((closureN)self_7312090)->elements[1], (((closure) ((closureN)self_7312090)->elements[1])->fn), b_73468_732769);
+ } else {
+
+
+-return_direct_with_clo4(data, __glo_bytevector_91copy_scheme_base, (((closure) __glo_bytevector_91copy_scheme_base)->fn), ((closureN)self_7313343)->elements[1], car(((closureN)self_7313343)->elements[0]), obj_int2obj(0), ((closureN)self_7313343)->elements[3]);}
++return_direct_with_clo4(data, __glo_bytevector_91copy_scheme_base, (((closure) __glo_bytevector_91copy_scheme_base)->fn), ((closureN)self_7312090)->elements[1], car(((closureN)self_7312090)->elements[0]), obj_int2obj(0), ((closureN)self_7312090)->elements[3]);}
+ ;
+ } else {
+
+-closureN_type c_7317498;
+-object e_7317508 [3];
+-c_7317498.hdr.mark = gc_color_red;
+- c_7317498.hdr.grayed = 0;
+-c_7317498.tag = closureN_tag;
+- c_7317498.fn = (function_type)__lambda_351;
+-c_7317498.num_args = 1;
+-c_7317498.num_elements = 3;
+-c_7317498.elements = (object *)e_7317508;
+-c_7317498.elements[0] = ((closureN)self_7313343)->elements[1];
+-c_7317498.elements[1] = ((closureN)self_7313343)->elements[2];
+-c_7317498.elements[2] = ((closureN)self_7313343)->elements[3];
++closureN_type c_7316198;
++object e_7316208 [3];
++c_7316198.hdr.mark = gc_color_red;
++ c_7316198.hdr.grayed = 0;
++c_7316198.tag = closureN_tag;
++ c_7316198.fn = (function_type)__lambda_351;
++c_7316198.num_args = 1;
++c_7316198.num_elements = 3;
++c_7316198.elements = (object *)e_7316208;
++c_7316198.elements[0] = ((closureN)self_7312090)->elements[1];
++c_7316198.elements[1] = ((closureN)self_7312090)->elements[2];
++c_7316198.elements[2] = ((closureN)self_7312090)->elements[3];
+
+
+
+
+
+-return_closcall1(data,(closure)&c_7317498, Cyc_bytevector_u8_set(data, car(((closureN)self_7313343)->elements[0]), ((closureN)self_7313343)->elements[3], b_73468_733116));}
++return_closcall1(data,(closure)&c_7316198, Cyc_bytevector_u8_set(data, car(((closureN)self_7312090)->elements[0]), ((closureN)self_7312090)->elements[3], b_73468_732769));}
+ ;;
+ }
+
+-static void __lambda_351(void *data, object self_7313344, int argc, object *args) /* object self_7313344, object r_735120 */
++static void __lambda_351(void *data, object self_7312091, int argc, object *args) /* object self_7312091, object r_734668 */
+ {
+
+
+
+
+-complex_num_type local_7317506;
+-return_closcall2(data, car(((closureN)self_7313344)->elements[1]), ((closureN)self_7313344)->elements[0], Cyc_fast_sum(data,&local_7317506, ((closureN)self_7313344)->elements[2], obj_int2obj(1)));;
++complex_num_type local_7316206;
++return_closcall2(data, car(((closureN)self_7312091)->elements[1]), ((closureN)self_7312091)->elements[0], Cyc_fast_sum(data,&local_7316206, ((closureN)self_7312091)->elements[2], obj_int2obj(1)));;
+ }
+
+-static void __lambda_347(void *data, object self_7313345, int argc, object *args) /* object self_7313345, object r_735114 */
++static void __lambda_347(void *data, object self_7312092, int argc, object *args) /* object self_7312092, object r_734662 */
+ {
+- object r_735114 = args[0];
++ object r_734662 = args[0];
+
+-closureN_type c_7317463;
+-object e_7317469 [2];
+-c_7317463.hdr.mark = gc_color_red;
+- c_7317463.hdr.grayed = 0;
+-c_7317463.tag = closureN_tag;
+- c_7317463.fn = (function_type)__lambda_348;
+-c_7317463.num_args = 1;
+-c_7317463.num_elements = 2;
+-c_7317463.elements = (object *)e_7317469;
+-c_7317463.elements[0] = ((closureN)self_7313345)->elements[0];
+-c_7317463.elements[1] = ((closureN)self_7313345)->elements[1];
++closureN_type c_7316163;
++object e_7316169 [2];
++c_7316163.hdr.mark = gc_color_red;
++ c_7316163.hdr.grayed = 0;
++c_7316163.tag = closureN_tag;
++ c_7316163.fn = (function_type)__lambda_348;
++c_7316163.num_args = 1;
++c_7316163.num_elements = 2;
++c_7316163.elements = (object *)e_7316169;
++c_7316163.elements[0] = ((closureN)self_7312092)->elements[0];
++c_7316163.elements[1] = ((closureN)self_7312092)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317463,__lambda_348, Cyc_set_cell(data, ((closureN)self_7313345)->elements[1], r_735114));;
++return_direct_with_clo1(data,(closure)&c_7316163,__lambda_348, Cyc_set_cell(data, ((closureN)self_7312092)->elements[1], r_734662));;
+ }
+
+-static void __lambda_348(void *data, object self_7313346, int argc, object *args) /* object self_7313346, object r_735113 */
++static void __lambda_348(void *data, object self_7312093, int argc, object *args) /* object self_7312093, object r_734661 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313346)->elements[1]), ((closureN)self_7313346)->elements[0], obj_int2obj(0));;
++return_closcall2(data, car(((closureN)self_7312093)->elements[1]), ((closureN)self_7312093)->elements[0], obj_int2obj(0));;
+ }
+
+-static void __lambda_342(void *data, object self_7313347, int argc, object *args) /* object self_7313347, object k_735124 */
++static void __lambda_342(void *data, object self_7312094, int argc, object *args) /* object self_7312094, object k_734672 */
+ {
+- object k_735124 = args[0];
++ object k_734672 = args[0];
+
+
+-if( (boolean_f != Cyc_is_null(car(((closureN)self_7313347)->elements[1]))) ){
+- return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_735124);
++if( (boolean_f != Cyc_is_null(car(((closureN)self_7312094)->elements[1]))) ){
++ return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_734672);
+ } else {
+
+
+-return_direct_with_clo1(data, k_735124, (((closure) k_735124)->fn), Cyc_car(data, ((closureN)self_7313347)->elements[0]));}
++return_direct_with_clo1(data, k_734672, (((closure) k_734672)->fn), Cyc_car(data, ((closureN)self_7312094)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_336(void *data, object _, int argc, object *args) /* closure _,object k_735095, object str_73451_733106, object opts_73452_733107_raw, ... */
++static void __lambda_336(void *data, object _, int argc, object *args) /* closure _,object k_734643, object str_73451_732759, object opts_73452_732760_raw, ... */
+ {
+-object k_735095 = args[0]; object str_73451_733106 = args[1];
+-load_varargs(opts_73452_733107, args, 2, argc - 2);
++object k_734643 = args[0]; object str_73451_732759 = args[1];
++load_varargs(opts_73452_732760, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:write-string");
+
+-if( (boolean_f != Cyc_is_null(opts_73452_733107)) ){
++if( (boolean_f != Cyc_is_null(opts_73452_732760)) ){
+
+-closureN_type c_7317385;
+-object e_7317391 [2];
+-c_7317385.hdr.mark = gc_color_red;
+- c_7317385.hdr.grayed = 0;
+-c_7317385.tag = closureN_tag;
+- c_7317385.fn = (function_type)__lambda_337;
+-c_7317385.num_args = 1;
+-c_7317385.num_elements = 2;
+-c_7317385.elements = (object *)e_7317391;
+-c_7317385.elements[0] = k_735095;
+-c_7317385.elements[1] = str_73451_733106;
++closureN_type c_7316085;
++object e_7316091 [2];
++c_7316085.hdr.mark = gc_color_red;
++ c_7316085.hdr.grayed = 0;
++c_7316085.tag = closureN_tag;
++ c_7316085.fn = (function_type)__lambda_337;
++c_7316085.num_args = 1;
++c_7316085.num_elements = 2;
++c_7316085.elements = (object *)e_7316091;
++c_7316085.elements[0] = k_734643;
++c_7316085.elements[1] = str_73451_732759;
+
+-return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7317385);
++return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7316085);
+ } else {
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, opts_73452_733107))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, opts_73452_732760))) ){
+
+
+
+
+-return_direct_with_clo1(data, k_735095, (((closure) k_735095)->fn), Cyc_display_va(data, 2,str_73451_733106, Cyc_car(data, opts_73452_733107)));
++return_direct_with_clo1(data, k_734643, (((closure) k_734643)->fn), Cyc_display_va(data, 2,str_73451_732759, Cyc_car(data, opts_73452_732760)));
+ } else {
+- object r_735101;
++ object r_734649;
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, opts_73452_733107), obj_int2obj(2))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, opts_73452_732760), obj_int2obj(2))) ){
+
+- r_735101 = Cyc_caddr(data, opts_73452_733107);
++ r_734649 = Cyc_caddr(data, opts_73452_732760);
+ } else {
+
+- r_735101 = Cyc_string_length(data, str_73451_733106);}
++ r_734649 = Cyc_string_length(data, str_73451_732759);}
+ ;
+-closureN_type c_7317413;
+-object e_7317428 [3];
+-c_7317413.hdr.mark = gc_color_red;
+- c_7317413.hdr.grayed = 0;
+-c_7317413.tag = closureN_tag;
+- c_7317413.fn = (function_type)__lambda_338;
+-c_7317413.num_args = 2;
+-c_7317413.num_elements = 3;
+-c_7317413.elements = (object *)e_7317428;
+-c_7317413.elements[0] = k_735095;
+-c_7317413.elements[1] = opts_73452_733107;
+-c_7317413.elements[2] = str_73451_733106;
++closureN_type c_7316113;
++object e_7316128 [3];
++c_7316113.hdr.mark = gc_color_red;
++ c_7316113.hdr.grayed = 0;
++c_7316113.tag = closureN_tag;
++ c_7316113.fn = (function_type)__lambda_338;
++c_7316113.num_args = 2;
++c_7316113.num_elements = 3;
++c_7316113.elements = (object *)e_7316128;
++c_7316113.elements[0] = k_734643;
++c_7316113.elements[1] = opts_73452_732760;
++c_7316113.elements[2] = str_73451_732759;
+
+
+
+-return_direct_with_clo2(data,(closure)&c_7317413,__lambda_338, Cyc_cadr(data, opts_73452_733107), r_735101);}
++return_direct_with_clo2(data,(closure)&c_7316113,__lambda_338, Cyc_cadr(data, opts_73452_732760), r_734649);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_338(void *data, object self_7313332, int argc, object *args) /* object self_7313332, object start_73460_733108, object end_73461_733109 */
++static void __lambda_338(void *data, object self_7312079, int argc, object *args) /* object self_7312079, object start_73460_732761, object end_73461_732762 */
+ {
+- object start_73460_733108 = args[0]; object end_73461_733109 = args[1];
++ object start_73460_732761 = args[0]; object end_73461_732762 = args[1];
+
+-closureN_type c_7317415;
+-object e_7317423 [2];
+-c_7317415.hdr.mark = gc_color_red;
+- c_7317415.hdr.grayed = 0;
+-c_7317415.tag = closureN_tag;
+- c_7317415.fn = (function_type)__lambda_339;
+-c_7317415.num_args = 1;
+-c_7317415.num_elements = 2;
+-c_7317415.elements = (object *)e_7317423;
+-c_7317415.elements[0] = ((closureN)self_7313332)->elements[0];
+-c_7317415.elements[1] = ((closureN)self_7313332)->elements[1];
++closureN_type c_7316115;
++object e_7316123 [2];
++c_7316115.hdr.mark = gc_color_red;
++ c_7316115.hdr.grayed = 0;
++c_7316115.tag = closureN_tag;
++ c_7316115.fn = (function_type)__lambda_339;
++c_7316115.num_args = 1;
++c_7316115.num_elements = 2;
++c_7316115.elements = (object *)e_7316123;
++c_7316115.elements[0] = ((closureN)self_7312079)->elements[0];
++c_7316115.elements[1] = ((closureN)self_7312079)->elements[1];
+
+
+-object c_7317426 = Cyc_substring(data,(closure)&c_7317415,((closureN)self_7313332)->elements[2], start_73460_733108, end_73461_733109);
+-return_closcall1(data,(closure)&c_7317415, c_7317426);;
++object c_7316126 = Cyc_substring(data,(closure)&c_7316115,((closureN)self_7312079)->elements[2], start_73460_732761, end_73461_732762);
++return_closcall1(data,(closure)&c_7316115, c_7316126);;
+ }
+
+-static void __lambda_339(void *data, object self_7313333, int argc, object *args) /* object self_7313333, object r_735102 */
++static void __lambda_339(void *data, object self_7312080, int argc, object *args) /* object self_7312080, object r_734650 */
+ {
+- object r_735102 = args[0];
++ object r_734650 = args[0];
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313333)->elements[0], (((closure) ((closureN)self_7313333)->elements[0])->fn), Cyc_display_va(data, 2,r_735102, Cyc_car(data, ((closureN)self_7313333)->elements[1])));;
++return_direct_with_clo1(data, ((closureN)self_7312080)->elements[0], (((closure) ((closureN)self_7312080)->elements[0])->fn), Cyc_display_va(data, 2,r_734650, Cyc_car(data, ((closureN)self_7312080)->elements[1])));;
+ }
+
+-static void __lambda_337(void *data, object self_7313331, int argc, object *args) /* object self_7313331, object r_735097 */
++static void __lambda_337(void *data, object self_7312078, int argc, object *args) /* object self_7312078, object r_734645 */
+ {
+- object r_735097 = args[0];
++ object r_734645 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313331)->elements[0], (((closure) ((closureN)self_7313331)->elements[0])->fn), Cyc_display_va(data, 2,((closureN)self_7313331)->elements[1], r_735097));;
++return_direct_with_clo1(data, ((closureN)self_7312078)->elements[0], (((closure) ((closureN)self_7312078)->elements[0])->fn), Cyc_display_va(data, 2,((closureN)self_7312078)->elements[1], r_734645));;
+ }
+
+-static void __lambda_335(void *data, object _, int argc, object *args) /* closure _,object k_735092, object str_73449_733104, object port_73450_733105 */
++static void __lambda_335(void *data, object _, int argc, object *args) /* closure _,object k_734640, object str_73449_732757, object port_73450_732758 */
+ {
+-object k_735092 = args[0]; object str_73449_733104 = args[1]; object port_73450_733105 = args[2];
++object k_734640 = args[0]; object str_73449_732757 = args[1]; object port_73450_732758 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:write-string-2");
+
+
+-return_direct_with_clo1(data, k_735092, (((closure) k_735092)->fn), Cyc_display_va(data, 2,str_73449_733104, port_73450_733105));;
++return_direct_with_clo1(data, k_734640, (((closure) k_734640)->fn), Cyc_display_va(data, 2,str_73449_732757, port_73450_732758));;
+ }
+
+-static void __lambda_333(void *data, object _, int argc, object *args) /* closure _,object k_735088, object str_73448_733103 */
++static void __lambda_333(void *data, object _, int argc, object *args) /* closure _,object k_734636, object str_73448_732756 */
+ {
+-object k_735088 = args[0]; object str_73448_733103 = args[1];
++object k_734636 = args[0]; object str_73448_732756 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:write-string-1");
+
+-closureN_type c_7317370;
+-object e_7317376 [2];
+-c_7317370.hdr.mark = gc_color_red;
+- c_7317370.hdr.grayed = 0;
+-c_7317370.tag = closureN_tag;
+- c_7317370.fn = (function_type)__lambda_334;
+-c_7317370.num_args = 1;
+-c_7317370.num_elements = 2;
+-c_7317370.elements = (object *)e_7317376;
+-c_7317370.elements[0] = k_735088;
+-c_7317370.elements[1] = str_73448_733103;
++closureN_type c_7316070;
++object e_7316076 [2];
++c_7316070.hdr.mark = gc_color_red;
++ c_7316070.hdr.grayed = 0;
++c_7316070.tag = closureN_tag;
++ c_7316070.fn = (function_type)__lambda_334;
++c_7316070.num_args = 1;
++c_7316070.num_elements = 2;
++c_7316070.elements = (object *)e_7316076;
++c_7316070.elements[0] = k_734636;
++c_7316070.elements[1] = str_73448_732756;
+
+-return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7317370);;
++return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7316070);;
+ }
+
+-static void __lambda_334(void *data, object self_7313330, int argc, object *args) /* object self_7313330, object r_735089 */
++static void __lambda_334(void *data, object self_7312077, int argc, object *args) /* object self_7312077, object r_734637 */
+ {
+- object r_735089 = args[0];
++ object r_734637 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313330)->elements[0], (((closure) ((closureN)self_7313330)->elements[0])->fn), Cyc_display_va(data, 2,((closureN)self_7313330)->elements[1], r_735089));;
++return_direct_with_clo1(data, ((closureN)self_7312077)->elements[0], (((closure) ((closureN)self_7312077)->elements[0])->fn), Cyc_display_va(data, 2,((closureN)self_7312077)->elements[1], r_734637));;
+ }
+
+-static void __lambda_331(void *data, object _, int argc, object *args) /* closure _,object k_735082, object port_73447_733102_raw, ... */
++static void __lambda_331(void *data, object _, int argc, object *args) /* closure _,object k_734630, object port_73447_732755_raw, ... */
+ {
+-object k_735082 = args[0];
+-load_varargs(port_73447_733102, args, 1, argc - 1);
++object k_734630 = args[0];
++load_varargs(port_73447_732755, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:flush-output-port");
+
+-if( (boolean_f != Cyc_is_null(port_73447_733102)) ){
++if( (boolean_f != Cyc_is_null(port_73447_732755)) ){
+
+-closureN_type c_7317357;
+-object e_7317362 [1];
+-c_7317357.hdr.mark = gc_color_red;
+- c_7317357.hdr.grayed = 0;
+-c_7317357.tag = closureN_tag;
+- c_7317357.fn = (function_type)__lambda_332;
+-c_7317357.num_args = 1;
+-c_7317357.num_elements = 1;
+-c_7317357.elements = (object *)e_7317362;
+-c_7317357.elements[0] = k_735082;
++closureN_type c_7316057;
++object e_7316062 [1];
++c_7316057.hdr.mark = gc_color_red;
++ c_7316057.hdr.grayed = 0;
++c_7316057.tag = closureN_tag;
++ c_7316057.fn = (function_type)__lambda_332;
++c_7316057.num_args = 1;
++c_7316057.num_elements = 1;
++c_7316057.elements = (object *)e_7316062;
++c_7316057.elements[0] = k_734630;
+
+-return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7317357);
++return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7316057);
+ } else {
+
+
+
+
+-return_direct_with_clo1(data, k_735082, (((closure) k_735082)->fn), Cyc_io_flush_output_port(data, Cyc_car(data, port_73447_733102)));}
++return_direct_with_clo1(data, k_734630, (((closure) k_734630)->fn), Cyc_io_flush_output_port(data, Cyc_car(data, port_73447_732755)));}
+ ;;
+ }
+
+-static void __lambda_332(void *data, object self_7313329, int argc, object *args) /* object self_7313329, object r_735084 */
++static void __lambda_332(void *data, object self_7312076, int argc, object *args) /* object self_7312076, object r_734632 */
+ {
+- object r_735084 = args[0];
++ object r_734632 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313329)->elements[0], (((closure) ((closureN)self_7313329)->elements[0])->fn), Cyc_io_flush_output_port(data, r_735084));;
++return_direct_with_clo1(data, ((closureN)self_7312076)->elements[0], (((closure) ((closureN)self_7312076)->elements[0])->fn), Cyc_io_flush_output_port(data, r_734632));;
+ }
+
+-static void __lambda_329(void *data, object _, int argc, object *args) /* closure _,object k_735077, object obj_73445_733101 */
++static void __lambda_329(void *data, object _, int argc, object *args) /* closure _,object k_734625, object obj_73445_732754 */
+ {
+-object k_735077 = args[0]; object obj_73445_733101 = args[1];
++object k_734625 = args[0]; object obj_73445_732754 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:textual-port?");
+
+-if( (boolean_f != Cyc_is_port(obj_73445_733101)) ){
++if( (boolean_f != Cyc_is_port(obj_73445_732754)) ){
+
+-if( (boolean_f != Cyc_is_port(obj_73445_733101)) ){
++if( (boolean_f != Cyc_is_port(obj_73445_732754)) ){
+
+-closureN_type c_7317345;
+-object e_7317350 [1];
+-c_7317345.hdr.mark = gc_color_red;
+- c_7317345.hdr.grayed = 0;
+-c_7317345.tag = closureN_tag;
+- c_7317345.fn = (function_type)__lambda_330;
+-c_7317345.num_args = 1;
+-c_7317345.num_elements = 1;
+-c_7317345.elements = (object *)e_7317350;
+-c_7317345.elements[0] = k_735077;
++closureN_type c_7316045;
++object e_7316050 [1];
++c_7316045.hdr.mark = gc_color_red;
++ c_7316045.hdr.grayed = 0;
++c_7316045.tag = closureN_tag;
++ c_7316045.fn = (function_type)__lambda_330;
++c_7316045.num_args = 1;
++c_7316045.num_elements = 1;
++c_7316045.elements = (object *)e_7316050;
++c_7316045.elements[0] = k_734625;
+
+-return_direct_with_clo2(data, __glo__191binary_91port_127_scheme_base, (((closure) __glo__191binary_91port_127_scheme_base)->fn), &c_7317345, obj_73445_733101);
++return_direct_with_clo2(data, __glo__191binary_91port_127_scheme_base, (((closure) __glo__191binary_91port_127_scheme_base)->fn), &c_7316045, obj_73445_732754);
+ } else {
+- return_direct_with_clo1(data, k_735077, (((closure) k_735077)->fn), boolean_t);}
++ return_direct_with_clo1(data, k_734625, (((closure) k_734625)->fn), boolean_t);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_735077, (((closure) k_735077)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_734625, (((closure) k_734625)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_330(void *data, object self_7313328, int argc, object *args) /* object self_7313328, object r_735079_7312725 */
++static void __lambda_330(void *data, object self_7312075, int argc, object *args) /* object self_7312075, object r_734627_7311472 */
+ {
+- object r_735079_7312725 = args[0];
+- if( (boolean_f != r_735079_7312725) ){
+- return_direct_with_clo1(data, ((closureN)self_7313328)->elements[0], (((closure) ((closureN)self_7313328)->elements[0])->fn), boolean_f);
++ object r_734627_7311472 = args[0];
++ if( (boolean_f != r_734627_7311472) ){
++ return_direct_with_clo1(data, ((closureN)self_7312075)->elements[0], (((closure) ((closureN)self_7312075)->elements[0])->fn), boolean_f);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313328)->elements[0], (((closure) ((closureN)self_7313328)->elements[0])->fn), boolean_t);}
++ return_direct_with_clo1(data, ((closureN)self_7312075)->elements[0], (((closure) ((closureN)self_7312075)->elements[0])->fn), boolean_t);}
+ ;;
+ }
+
+-static void __lambda_328(void *data, object _, int argc, object *args) /* closure _,object k_735073, object obj_73443_733100 */
++static void __lambda_328(void *data, object _, int argc, object *args) /* closure _,object k_734621, object obj_73443_732753 */
+ {
+-object k_735073 = args[0]; object obj_73443_733100 = args[1];
++object k_734621 = args[0]; object obj_73443_732753 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:binary-port?");
+
+-if( (boolean_f != Cyc_is_port(obj_73443_733100)) ){
+- return_direct_with_clo2(data, __glo__191binary_91port_127_scheme_base, (((closure) __glo__191binary_91port_127_scheme_base)->fn), k_735073, obj_73443_733100);
++if( (boolean_f != Cyc_is_port(obj_73443_732753)) ){
++ return_direct_with_clo2(data, __glo__191binary_91port_127_scheme_base, (((closure) __glo__191binary_91port_127_scheme_base)->fn), k_734621, obj_73443_732753);
+ } else {
+- return_direct_with_clo1(data, k_735073, (((closure) k_735073)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_734621, (((closure) k_734621)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_1454(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; object rv = boolean_f;
++static void __lambda_1407(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; object rv = boolean_f;
+ port_type *p = (port_type *)obj;
+ if (p->flags & CYC_BINARY_PORT_FLAG) {
+ rv = boolean_t;
+ }
+ return_closcall1(data, k, rv); }
+-static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_735051, object k_73425_733090, object opts_73426_733091_raw, ... */
++static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_734599, object k_73425_732743, object opts_73426_732744_raw, ... */
+ {
+-object k_735051 = args[0]; object k_73425_733090 = args[1];
+-load_varargs(opts_73426_733091, args, 2, argc - 2);
++object k_734599 = args[0]; object k_73425_732743 = args[1];
++load_varargs(opts_73426_732744, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:read-string");
+
+-closureN_type c_7317228;
+-object e_7317237 [1];
+-c_7317228.hdr.mark = gc_color_red;
+- c_7317228.hdr.grayed = 0;
+-c_7317228.tag = closureN_tag;
+- c_7317228.fn = (function_type)__lambda_317;
+-c_7317228.num_args = 0;
+-c_7317228.num_elements = 1;
+-c_7317228.elements = (object *)e_7317237;
+-c_7317228.elements[0] = opts_73426_733091;
+-
+-
+-closureN_type c_7317238;
+-object e_7317332 [2];
+-c_7317238.hdr.mark = gc_color_red;
+- c_7317238.hdr.grayed = 0;
+-c_7317238.tag = closureN_tag;
+- c_7317238.fn = (function_type)__lambda_318;
+-c_7317238.num_args = 1;
+-c_7317238.num_elements = 2;
+-c_7317238.elements = (object *)e_7317332;
+-c_7317238.elements[0] = k_73425_733090;
+-c_7317238.elements[1] = k_735051;
+-
+-return_direct_with_clo1(data,(closure)&c_7317228,__lambda_317, &c_7317238);;
+-}
+-
+-static void __lambda_318(void *data, object self_7313316, int argc, object *args) /* object self_7313316, object port_73427_733092 */
+- {
+- object port_73427_733092 = args[0];
+-
+-closureN_type c_7317240;
+-object e_7317328 [3];
+-c_7317240.hdr.mark = gc_color_red;
+- c_7317240.hdr.grayed = 0;
+-c_7317240.tag = closureN_tag;
+- c_7317240.fn = (function_type)__lambda_319;
+-c_7317240.num_args = 1;
+-c_7317240.num_elements = 3;
+-c_7317240.elements = (object *)e_7317328;
+-c_7317240.elements[0] = ((closureN)self_7313316)->elements[0];
+-c_7317240.elements[1] = ((closureN)self_7313316)->elements[1];
+-c_7317240.elements[2] = port_73427_733092;
+-
+-
+-object c_7317331 = Cyc_io_peek_char(data,(closure)&c_7317240,port_73427_733092);
+-return_closcall1(data,(closure)&c_7317240, c_7317331);;
+-}
+-
+-static void __lambda_319(void *data, object self_7313317, int argc, object *args) /* object self_7313317, object r_735068 */
+- {
+- object r_735068 = args[0];
+-
+-if( (boolean_f != Cyc_is_eof_object(r_735068)) ){
+-
+-complex_num_type local_7317247;
+-return_direct_with_clo1(data, ((closureN)self_7313317)->elements[1], (((closure) ((closureN)self_7313317)->elements[1])->fn), ((inline_function_type)
+- ((closure)__glo_eof_91object_191_191inline_191_191_scheme_base)->fn)(data,&local_7317247));
+-} else {
+-
+-closureN_type c_7317249;
+-object e_7317326 [2];
+-c_7317249.hdr.mark = gc_color_red;
+- c_7317249.hdr.grayed = 0;
+-c_7317249.tag = closureN_tag;
+- c_7317249.fn = (function_type)__lambda_320;
+-c_7317249.num_args = 2;
+-c_7317249.num_elements = 2;
+-c_7317249.elements = (object *)e_7317326;
+-c_7317249.elements[0] = ((closureN)self_7313317)->elements[1];
+-c_7317249.elements[1] = ((closureN)self_7313317)->elements[2];
+-
+-return_direct_with_clo2(data,(closure)&c_7317249,__lambda_320, NULL, ((closureN)self_7313317)->elements[0]);}
+-;;
+-}
+-
+-static void __lambda_320(void *data, object self_7313318, int argc, object *args) /* object self_7313318, object acc_73429_733093, object i_73430_733094 */
+- {
+- object acc_73429_733093 = args[0]; object i_73430_733094 = args[1];
+-
+-closureN_type c_7317251;
+-object e_7317325 [4];
+-c_7317251.hdr.mark = gc_color_red;
+- c_7317251.hdr.grayed = 0;
+-c_7317251.tag = closureN_tag;
+- c_7317251.fn = (function_type)__lambda_321;
+-c_7317251.num_args = 1;
+-c_7317251.num_elements = 4;
+-c_7317251.elements = (object *)e_7317325;
+-c_7317251.elements[0] = acc_73429_733093;
+-c_7317251.elements[1] = i_73430_733094;
+-c_7317251.elements[2] = ((closureN)self_7313318)->elements[0];
+-c_7317251.elements[3] = ((closureN)self_7313318)->elements[1];
+-
+-return_direct_with_clo1(data,(closure)&c_7317251,__lambda_321, boolean_f);;
+-}
+-
+-static void __lambda_321(void *data, object self_7313319, int argc, object *args) /* object self_7313319, object loop_73432_733096 */
+- {
+- object loop_73432_733096 = args[0];
+-
+-closureN_type c_7317253;
+-object e_7317321 [4];
+-c_7317253.hdr.mark = gc_color_red;
+- c_7317253.hdr.grayed = 0;
+-c_7317253.tag = closureN_tag;
+- c_7317253.fn = (function_type)__lambda_1358;
+-c_7317253.num_args = 1;
+-c_7317253.num_elements = 4;
+-c_7317253.elements = (object *)e_7317321;
+-c_7317253.elements[0] = ((closureN)self_7313319)->elements[0];
+-c_7317253.elements[1] = ((closureN)self_7313319)->elements[1];
+-c_7317253.elements[2] = ((closureN)self_7313319)->elements[2];
+-c_7317253.elements[3] = ((closureN)self_7313319)->elements[3];
+-
+-
+-pair_type local_7317324;
+-return_direct_with_clo1(data,(closure)&c_7317253,__lambda_1358, set_cell_as_expr(&local_7317324, loop_73432_733096));;
+-}
+-
+-static void __lambda_1358(void *data, object self_7313320, int argc, object *args) /* object self_7313320, object loop_73432_733096 */
+- {
+- object loop_73432_733096 = args[0];
+-
+-closureN_type c_7317255;
+-object e_7317269 [4];
+-c_7317255.hdr.mark = gc_color_red;
+- c_7317255.hdr.grayed = 0;
+-c_7317255.tag = closureN_tag;
+- c_7317255.fn = (function_type)__lambda_322;
+-c_7317255.num_args = 1;
+-c_7317255.num_elements = 4;
+-c_7317255.elements = (object *)e_7317269;
+-c_7317255.elements[0] = ((closureN)self_7313320)->elements[0];
+-c_7317255.elements[1] = ((closureN)self_7313320)->elements[1];
+-c_7317255.elements[2] = ((closureN)self_7313320)->elements[2];
+-c_7317255.elements[3] = loop_73432_733096;
+-
+-
+-closureN_type c_7317270;
+-object e_7317320 [2];
+-c_7317270.hdr.mark = gc_color_red;
+- c_7317270.hdr.grayed = 0;
+-c_7317270.tag = closureN_tag;
+- c_7317270.fn = (function_type)__lambda_324;
+-c_7317270.num_args = 3;
+-c_7317270.num_elements = 2;
+-c_7317270.elements = (object *)e_7317320;
+-c_7317270.elements[0] = loop_73432_733096;
+-c_7317270.elements[1] = ((closureN)self_7313320)->elements[3];
+-
+-return_direct_with_clo1(data,(closure)&c_7317255,__lambda_322, &c_7317270);;
+-}
+-
+-static void __lambda_324(void *data, object self_7313321, int argc, object *args) /* object self_7313321, object k_735057, object acc_73433_733097, object i_73434_733098, object chr_73435_733099 */
+- {
+- object k_735057 = args[0]; object acc_73433_733097 = args[1]; object i_73434_733098 = args[2]; object chr_73435_733099 = args[3];
+-
+-if( (boolean_f != Cyc_is_eof_object(chr_73435_733099)) ){
+-
+-closureN_type c_7317274;
+-object e_7317280 [1];
+-c_7317274.hdr.mark = gc_color_red;
+- c_7317274.hdr.grayed = 0;
+-c_7317274.tag = closureN_tag;
+- c_7317274.fn = (function_type)__lambda_325;
+-c_7317274.num_args = 1;
+-c_7317274.num_elements = 1;
+-c_7317274.elements = (object *)e_7317280;
+-c_7317274.elements[0] = k_735057;
+-
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7317274, primitive_cons, NULL, acc_73433_733097);
+-} else {
+-
+-if( (boolean_f != Cyc_num_fast_eq_op(data, i_73434_733098, obj_int2obj(0))) ){
+- object r_735062_738417;
+- if( (boolean_f != chr_73435_733099) ){
+- object local_7317287 = alloca(sizeof(pair_type));
+- r_735062_738417 = set_pair_as_expr(local_7317287, chr_73435_733099, acc_73433_733097);
+-} else {
+- r_735062_738417 = acc_73433_733097;}
+-;
+-closureN_type c_7317290;
+-object e_7317296 [1];
+-c_7317290.hdr.mark = gc_color_red;
+- c_7317290.hdr.grayed = 0;
+-c_7317290.tag = closureN_tag;
+- c_7317290.fn = (function_type)__lambda_326;
+-c_7317290.num_args = 1;
+-c_7317290.num_elements = 1;
+-c_7317290.elements = (object *)e_7317296;
+-c_7317290.elements[0] = k_735057;
+-
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7317290, primitive_cons, NULL, r_735062_738417);
+-} else {
+- object r_735064_738420;
+- if( (boolean_f != chr_73435_733099) ){
+- object local_7317301 = alloca(sizeof(pair_type));
+- r_735064_738420 = set_pair_as_expr(local_7317301, chr_73435_733099, acc_73433_733097);
+-} else {
+- r_735064_738420 = acc_73433_733097;}
+-;
+-closureN_type c_7317304;
+-object e_7317315 [4];
+-c_7317304.hdr.mark = gc_color_red;
+- c_7317304.hdr.grayed = 0;
+-c_7317304.tag = closureN_tag;
+- c_7317304.fn = (function_type)__lambda_327;
+-c_7317304.num_args = 1;
+-c_7317304.num_elements = 4;
+-c_7317304.elements = (object *)e_7317315;
+-c_7317304.elements[0] = i_73434_733098;
+-c_7317304.elements[1] = k_735057;
+-c_7317304.elements[2] = ((closureN)self_7313321)->elements[0];
+-c_7317304.elements[3] = r_735064_738420;
++closureN_type c_7315928;
++object e_7315937 [1];
++c_7315928.hdr.mark = gc_color_red;
++ c_7315928.hdr.grayed = 0;
++c_7315928.tag = closureN_tag;
++ c_7315928.fn = (function_type)__lambda_317;
++c_7315928.num_args = 0;
++c_7315928.num_elements = 1;
++c_7315928.elements = (object *)e_7315937;
++c_7315928.elements[0] = opts_73426_732744;
++
++
++closureN_type c_7315938;
++object e_7316032 [2];
++c_7315938.hdr.mark = gc_color_red;
++ c_7315938.hdr.grayed = 0;
++c_7315938.tag = closureN_tag;
++ c_7315938.fn = (function_type)__lambda_318;
++c_7315938.num_args = 1;
++c_7315938.num_elements = 2;
++c_7315938.elements = (object *)e_7316032;
++c_7315938.elements[0] = k_73425_732743;
++c_7315938.elements[1] = k_734599;
++
++return_direct_with_clo1(data,(closure)&c_7315928,__lambda_317, &c_7315938);;
++}
++
++static void __lambda_318(void *data, object self_7312063, int argc, object *args) /* object self_7312063, object port_73427_732745 */
++ {
++ object port_73427_732745 = args[0];
++
++closureN_type c_7315940;
++object e_7316028 [3];
++c_7315940.hdr.mark = gc_color_red;
++ c_7315940.hdr.grayed = 0;
++c_7315940.tag = closureN_tag;
++ c_7315940.fn = (function_type)__lambda_319;
++c_7315940.num_args = 1;
++c_7315940.num_elements = 3;
++c_7315940.elements = (object *)e_7316028;
++c_7315940.elements[0] = ((closureN)self_7312063)->elements[0];
++c_7315940.elements[1] = ((closureN)self_7312063)->elements[1];
++c_7315940.elements[2] = port_73427_732745;
++
++
++object c_7316031 = Cyc_io_peek_char(data,(closure)&c_7315940,port_73427_732745);
++return_closcall1(data,(closure)&c_7315940, c_7316031);;
++}
++
++static void __lambda_319(void *data, object self_7312064, int argc, object *args) /* object self_7312064, object r_734616 */
++ {
++ object r_734616 = args[0];
++
++if( (boolean_f != Cyc_is_eof_object(r_734616)) ){
++
++complex_num_type local_7315947;
++return_direct_with_clo1(data, ((closureN)self_7312064)->elements[1], (((closure) ((closureN)self_7312064)->elements[1])->fn), ((inline_function_type)
++ ((closure)__glo_eof_91object_191_191inline_191_191_scheme_base)->fn)(data,&local_7315947));
++} else {
++
++closureN_type c_7315949;
++object e_7316026 [2];
++c_7315949.hdr.mark = gc_color_red;
++ c_7315949.hdr.grayed = 0;
++c_7315949.tag = closureN_tag;
++ c_7315949.fn = (function_type)__lambda_320;
++c_7315949.num_args = 2;
++c_7315949.num_elements = 2;
++c_7315949.elements = (object *)e_7316026;
++c_7315949.elements[0] = ((closureN)self_7312064)->elements[1];
++c_7315949.elements[1] = ((closureN)self_7312064)->elements[2];
++
++return_direct_with_clo2(data,(closure)&c_7315949,__lambda_320, NULL, ((closureN)self_7312064)->elements[0]);}
++;;
++}
++
++static void __lambda_320(void *data, object self_7312065, int argc, object *args) /* object self_7312065, object acc_73429_732746, object i_73430_732747 */
++ {
++ object acc_73429_732746 = args[0]; object i_73430_732747 = args[1];
++
++closureN_type c_7315951;
++object e_7316025 [4];
++c_7315951.hdr.mark = gc_color_red;
++ c_7315951.hdr.grayed = 0;
++c_7315951.tag = closureN_tag;
++ c_7315951.fn = (function_type)__lambda_321;
++c_7315951.num_args = 1;
++c_7315951.num_elements = 4;
++c_7315951.elements = (object *)e_7316025;
++c_7315951.elements[0] = acc_73429_732746;
++c_7315951.elements[1] = i_73430_732747;
++c_7315951.elements[2] = ((closureN)self_7312065)->elements[0];
++c_7315951.elements[3] = ((closureN)self_7312065)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7315951,__lambda_321, boolean_f);;
++}
++
++static void __lambda_321(void *data, object self_7312066, int argc, object *args) /* object self_7312066, object loop_73432_732749 */
++ {
++ object loop_73432_732749 = args[0];
++
++closureN_type c_7315953;
++object e_7316021 [4];
++c_7315953.hdr.mark = gc_color_red;
++ c_7315953.hdr.grayed = 0;
++c_7315953.tag = closureN_tag;
++ c_7315953.fn = (function_type)__lambda_1311;
++c_7315953.num_args = 1;
++c_7315953.num_elements = 4;
++c_7315953.elements = (object *)e_7316021;
++c_7315953.elements[0] = ((closureN)self_7312066)->elements[0];
++c_7315953.elements[1] = ((closureN)self_7312066)->elements[1];
++c_7315953.elements[2] = ((closureN)self_7312066)->elements[2];
++c_7315953.elements[3] = ((closureN)self_7312066)->elements[3];
++
++
++pair_type local_7316024;
++return_direct_with_clo1(data,(closure)&c_7315953,__lambda_1311, set_cell_as_expr(&local_7316024, loop_73432_732749));;
++}
++
++static void __lambda_1311(void *data, object self_7312067, int argc, object *args) /* object self_7312067, object loop_73432_732749 */
++ {
++ object loop_73432_732749 = args[0];
++
++closureN_type c_7315955;
++object e_7315969 [4];
++c_7315955.hdr.mark = gc_color_red;
++ c_7315955.hdr.grayed = 0;
++c_7315955.tag = closureN_tag;
++ c_7315955.fn = (function_type)__lambda_322;
++c_7315955.num_args = 1;
++c_7315955.num_elements = 4;
++c_7315955.elements = (object *)e_7315969;
++c_7315955.elements[0] = ((closureN)self_7312067)->elements[0];
++c_7315955.elements[1] = ((closureN)self_7312067)->elements[1];
++c_7315955.elements[2] = ((closureN)self_7312067)->elements[2];
++c_7315955.elements[3] = loop_73432_732749;
++
++
++closureN_type c_7315970;
++object e_7316020 [2];
++c_7315970.hdr.mark = gc_color_red;
++ c_7315970.hdr.grayed = 0;
++c_7315970.tag = closureN_tag;
++ c_7315970.fn = (function_type)__lambda_324;
++c_7315970.num_args = 3;
++c_7315970.num_elements = 2;
++c_7315970.elements = (object *)e_7316020;
++c_7315970.elements[0] = loop_73432_732749;
++c_7315970.elements[1] = ((closureN)self_7312067)->elements[3];
++
++return_direct_with_clo1(data,(closure)&c_7315955,__lambda_322, &c_7315970);;
++}
++
++static void __lambda_324(void *data, object self_7312068, int argc, object *args) /* object self_7312068, object k_734605, object acc_73433_732750, object i_73434_732751, object chr_73435_732752 */
++ {
++ object k_734605 = args[0]; object acc_73433_732750 = args[1]; object i_73434_732751 = args[2]; object chr_73435_732752 = args[3];
++
++if( (boolean_f != Cyc_is_eof_object(chr_73435_732752)) ){
++
++closureN_type c_7315974;
++object e_7315980 [1];
++c_7315974.hdr.mark = gc_color_red;
++ c_7315974.hdr.grayed = 0;
++c_7315974.tag = closureN_tag;
++ c_7315974.fn = (function_type)__lambda_325;
++c_7315974.num_args = 1;
++c_7315974.num_elements = 1;
++c_7315974.elements = (object *)e_7315980;
++c_7315974.elements[0] = k_734605;
++
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7315974, primitive_cons, NULL, acc_73433_732750);
++} else {
++
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73434_732751, obj_int2obj(0))) ){
++ object r_734610_737642;
++ if( (boolean_f != chr_73435_732752) ){
++ object local_7315987 = alloca(sizeof(pair_type));
++ r_734610_737642 = set_pair_as_expr(local_7315987, chr_73435_732752, acc_73433_732750);
++} else {
++ r_734610_737642 = acc_73433_732750;}
++;
++closureN_type c_7315990;
++object e_7315996 [1];
++c_7315990.hdr.mark = gc_color_red;
++ c_7315990.hdr.grayed = 0;
++c_7315990.tag = closureN_tag;
++ c_7315990.fn = (function_type)__lambda_326;
++c_7315990.num_args = 1;
++c_7315990.num_elements = 1;
++c_7315990.elements = (object *)e_7315996;
++c_7315990.elements[0] = k_734605;
++
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7315990, primitive_cons, NULL, r_734610_737642);
++} else {
++ object r_734612_737645;
++ if( (boolean_f != chr_73435_732752) ){
++ object local_7316001 = alloca(sizeof(pair_type));
++ r_734612_737645 = set_pair_as_expr(local_7316001, chr_73435_732752, acc_73433_732750);
++} else {
++ r_734612_737645 = acc_73433_732750;}
++;
++closureN_type c_7316004;
++object e_7316015 [4];
++c_7316004.hdr.mark = gc_color_red;
++ c_7316004.hdr.grayed = 0;
++c_7316004.tag = closureN_tag;
++ c_7316004.fn = (function_type)__lambda_327;
++c_7316004.num_args = 1;
++c_7316004.num_elements = 4;
++c_7316004.elements = (object *)e_7316015;
++c_7316004.elements[0] = i_73434_732751;
++c_7316004.elements[1] = k_734605;
++c_7316004.elements[2] = ((closureN)self_7312068)->elements[0];
++c_7316004.elements[3] = r_734612_737645;
+
+
+-object c_7317318 = Cyc_io_read_char(data,(closure)&c_7317304,((closureN)self_7313321)->elements[1]);
+-return_closcall1(data,(closure)&c_7317304, c_7317318);}
++object c_7316018 = Cyc_io_read_char(data,(closure)&c_7316004,((closureN)self_7312068)->elements[1]);
++return_closcall1(data,(closure)&c_7316004, c_7316018);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_327(void *data, object self_7313324, int argc, object *args) /* object self_7313324, object r_735066_738421 */
++static void __lambda_327(void *data, object self_7312071, int argc, object *args) /* object self_7312071, object r_734614_737646 */
+ {
+- object r_735066_738421 = args[0];
++ object r_734614_737646 = args[0];
+
+
+
+-complex_num_type local_7317313;
+-return_closcall4(data, car(((closureN)self_7313324)->elements[2]), ((closureN)self_7313324)->elements[1], ((closureN)self_7313324)->elements[3], Cyc_fast_sub(data,&local_7317313, ((closureN)self_7313324)->elements[0], obj_int2obj(1)), r_735066_738421);;
++complex_num_type local_7316013;
++return_closcall4(data, car(((closureN)self_7312071)->elements[2]), ((closureN)self_7312071)->elements[1], ((closureN)self_7312071)->elements[3], Cyc_fast_sub(data,&local_7316013, ((closureN)self_7312071)->elements[0], obj_int2obj(1)), r_734614_737646);;
+ }
+
+-static void __lambda_326(void *data, object self_7313323, int argc, object *args) /* object self_7313323, object r_735061_738418_7312724 */
++static void __lambda_326(void *data, object self_7312070, int argc, object *args) /* object self_7312070, object r_734609_737643_7311471 */
+ {
+- object r_735061_738418_7312724 = args[0];
++ object r_734609_737643_7311471 = args[0];
+
+-object c_7317295 = Cyc_list2string(data, ((closureN)self_7313323)->elements[0],r_735061_738418_7312724);
+-return_direct_with_clo1(data, ((closureN)self_7313323)->elements[0], (((closure) ((closureN)self_7313323)->elements[0])->fn), c_7317295);;
++object c_7315995 = Cyc_list2string(data, ((closureN)self_7312070)->elements[0],r_734609_737643_7311471);
++return_direct_with_clo1(data, ((closureN)self_7312070)->elements[0], (((closure) ((closureN)self_7312070)->elements[0])->fn), c_7315995);;
+ }
+
+-static void __lambda_325(void *data, object self_7313322, int argc, object *args) /* object self_7313322, object r_735059_7312723 */
++static void __lambda_325(void *data, object self_7312069, int argc, object *args) /* object self_7312069, object r_734607_7311470 */
+ {
+- object r_735059_7312723 = args[0];
++ object r_734607_7311470 = args[0];
+
+-object c_7317279 = Cyc_list2string(data, ((closureN)self_7313322)->elements[0],r_735059_7312723);
+-return_direct_with_clo1(data, ((closureN)self_7313322)->elements[0], (((closure) ((closureN)self_7313322)->elements[0])->fn), c_7317279);;
++object c_7315979 = Cyc_list2string(data, ((closureN)self_7312069)->elements[0],r_734607_7311470);
++return_direct_with_clo1(data, ((closureN)self_7312069)->elements[0], (((closure) ((closureN)self_7312069)->elements[0])->fn), c_7315979);;
+ }
+
+-static void __lambda_322(void *data, object self_7313325, int argc, object *args) /* object self_7313325, object r_735056 */
++static void __lambda_322(void *data, object self_7312072, int argc, object *args) /* object self_7312072, object r_734604 */
+ {
+- object r_735056 = args[0];
++ object r_734604 = args[0];
+
+-closureN_type c_7317257;
+-object e_7317265 [4];
+-c_7317257.hdr.mark = gc_color_red;
+- c_7317257.hdr.grayed = 0;
+-c_7317257.tag = closureN_tag;
+- c_7317257.fn = (function_type)__lambda_323;
+-c_7317257.num_args = 1;
+-c_7317257.num_elements = 4;
+-c_7317257.elements = (object *)e_7317265;
+-c_7317257.elements[0] = ((closureN)self_7313325)->elements[0];
+-c_7317257.elements[1] = ((closureN)self_7313325)->elements[1];
+-c_7317257.elements[2] = ((closureN)self_7313325)->elements[2];
+-c_7317257.elements[3] = ((closureN)self_7313325)->elements[3];
++closureN_type c_7315957;
++object e_7315965 [4];
++c_7315957.hdr.mark = gc_color_red;
++ c_7315957.hdr.grayed = 0;
++c_7315957.tag = closureN_tag;
++ c_7315957.fn = (function_type)__lambda_323;
++c_7315957.num_args = 1;
++c_7315957.num_elements = 4;
++c_7315957.elements = (object *)e_7315965;
++c_7315957.elements[0] = ((closureN)self_7312072)->elements[0];
++c_7315957.elements[1] = ((closureN)self_7312072)->elements[1];
++c_7315957.elements[2] = ((closureN)self_7312072)->elements[2];
++c_7315957.elements[3] = ((closureN)self_7312072)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317257,__lambda_323, Cyc_set_cell(data, ((closureN)self_7313325)->elements[3], r_735056));;
++return_direct_with_clo1(data,(closure)&c_7315957,__lambda_323, Cyc_set_cell(data, ((closureN)self_7312072)->elements[3], r_734604));;
+ }
+
+-static void __lambda_323(void *data, object self_7313326, int argc, object *args) /* object self_7313326, object r_735055 */
++static void __lambda_323(void *data, object self_7312073, int argc, object *args) /* object self_7312073, object r_734603 */
+ {
+
+
+
+-return_closcall4(data, car(((closureN)self_7313326)->elements[3]), ((closureN)self_7313326)->elements[2], ((closureN)self_7313326)->elements[0], ((closureN)self_7313326)->elements[1], boolean_f);;
++return_closcall4(data, car(((closureN)self_7312073)->elements[3]), ((closureN)self_7312073)->elements[2], ((closureN)self_7312073)->elements[0], ((closureN)self_7312073)->elements[1], boolean_f);;
+ }
+
+-static void __lambda_317(void *data, object self_7313327, int argc, object *args) /* object self_7313327, object k_735069 */
++static void __lambda_317(void *data, object self_7312074, int argc, object *args) /* object self_7312074, object k_734617 */
+ {
+- object k_735069 = args[0];
++ object k_734617 = args[0];
+
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313327)->elements[0])) ){
+- return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_735069);
++if( (boolean_f != Cyc_is_null(((closureN)self_7312074)->elements[0])) ){
++ return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_734617);
+ } else {
+
+
+-return_direct_with_clo1(data, k_735069, (((closure) k_735069)->fn), Cyc_car(data, ((closureN)self_7313327)->elements[0]));}
++return_direct_with_clo1(data, k_734617, (((closure) k_734617)->fn), Cyc_car(data, ((closureN)self_7312074)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_306(void *data, object _, int argc, object *args) /* closure _,object k_735035, object str_73410_733083, object port_73411_733084 */
++static void __lambda_306(void *data, object _, int argc, object *args) /* closure _,object k_734583, object str_73410_732736, object port_73411_732737 */
+ {
+-object k_735035 = args[0]; object str_73410_733083 = args[1]; object port_73411_733084 = args[2];
++object k_734583 = args[0]; object str_73410_732736 = args[1]; object port_73411_732737 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:_read-line");
+
+-closureN_type c_7317145;
+-object e_7317222 [3];
+-c_7317145.hdr.mark = gc_color_red;
+- c_7317145.hdr.grayed = 0;
+-c_7317145.tag = closureN_tag;
+- c_7317145.fn = (function_type)__lambda_307;
+-c_7317145.num_args = 1;
+-c_7317145.num_elements = 3;
+-c_7317145.elements = (object *)e_7317222;
+-c_7317145.elements[0] = k_735035;
+-c_7317145.elements[1] = port_73411_733084;
+-c_7317145.elements[2] = str_73410_733083;
+-
+-
+-object c_7317225 = Cyc_io_read_line(data,(closure)&c_7317145,port_73411_733084);
+-return_closcall1(data,(closure)&c_7317145, c_7317225);;
+-}
+-
+-static void __lambda_307(void *data, object self_7313306, int argc, object *args) /* object self_7313306, object r_735037 */
+- {
+- object r_735037 = args[0];
+-
+-closureN_type c_7317147;
+-object e_7317217 [2];
+-c_7317147.hdr.mark = gc_color_red;
+- c_7317147.hdr.grayed = 0;
+-c_7317147.tag = closureN_tag;
+- c_7317147.fn = (function_type)__lambda_308;
+-c_7317147.num_args = 2;
+-c_7317147.num_elements = 2;
+-c_7317147.elements = (object *)e_7317217;
+-c_7317147.elements[0] = ((closureN)self_7313306)->elements[0];
+-c_7317147.elements[1] = ((closureN)self_7313306)->elements[1];
+-
+-
+-pair_type local_7317220;
+-return_direct_with_clo2(data,(closure)&c_7317147,__lambda_308, set_cell_as_expr(&local_7317220, ((closureN)self_7313306)->elements[2]), r_735037);;
+-}
+-
+-static void __lambda_308(void *data, object self_7313307, int argc, object *args) /* object self_7313307, object lis_73413_733085, object str_73414_733086 */
+- {
+- object lis_73413_733085 = args[0]; object str_73414_733086 = args[1];
+-
+-closureN_type c_7317149;
+-object e_7317216 [4];
+-c_7317149.hdr.mark = gc_color_red;
+- c_7317149.hdr.grayed = 0;
+-c_7317149.tag = closureN_tag;
+- c_7317149.fn = (function_type)__lambda_309;
+-c_7317149.num_args = 1;
+-c_7317149.num_elements = 4;
+-c_7317149.elements = (object *)e_7317216;
+-c_7317149.elements[0] = ((closureN)self_7313307)->elements[0];
+-c_7317149.elements[1] = lis_73413_733085;
+-c_7317149.elements[2] = ((closureN)self_7313307)->elements[1];
+-c_7317149.elements[3] = str_73414_733086;
+-
+-return_direct_with_clo1(data,(closure)&c_7317149,__lambda_309, boolean_f);;
+-}
+-
+-static void __lambda_309(void *data, object self_7313308, int argc, object *args) /* object self_7313308, object loop_73415_733087 */
+- {
+- object loop_73415_733087 = args[0];
+-
+-closureN_type c_7317151;
+-object e_7317212 [4];
+-c_7317151.hdr.mark = gc_color_red;
+- c_7317151.hdr.grayed = 0;
+-c_7317151.tag = closureN_tag;
+- c_7317151.fn = (function_type)__lambda_1357;
+-c_7317151.num_args = 1;
+-c_7317151.num_elements = 4;
+-c_7317151.elements = (object *)e_7317212;
+-c_7317151.elements[0] = ((closureN)self_7313308)->elements[0];
+-c_7317151.elements[1] = ((closureN)self_7313308)->elements[1];
+-c_7317151.elements[2] = ((closureN)self_7313308)->elements[2];
+-c_7317151.elements[3] = ((closureN)self_7313308)->elements[3];
+-
+-
+-pair_type local_7317215;
+-return_direct_with_clo1(data,(closure)&c_7317151,__lambda_1357, set_cell_as_expr(&local_7317215, loop_73415_733087));;
+-}
+-
+-static void __lambda_1357(void *data, object self_7313309, int argc, object *args) /* object self_7313309, object loop_73415_733087 */
+- {
+- object loop_73415_733087 = args[0];
+-
+-closureN_type c_7317153;
+-object e_7317167 [4];
+-c_7317153.hdr.mark = gc_color_red;
+- c_7317153.hdr.grayed = 0;
+-c_7317153.tag = closureN_tag;
+- c_7317153.fn = (function_type)__lambda_310;
+-c_7317153.num_args = 1;
+-c_7317153.num_elements = 4;
+-c_7317153.elements = (object *)e_7317167;
+-c_7317153.elements[0] = ((closureN)self_7313309)->elements[0];
+-c_7317153.elements[1] = ((closureN)self_7313309)->elements[1];
+-c_7317153.elements[2] = loop_73415_733087;
+-c_7317153.elements[3] = ((closureN)self_7313309)->elements[3];
+-
+-
+-closureN_type c_7317168;
+-object e_7317211 [2];
+-c_7317168.hdr.mark = gc_color_red;
+- c_7317168.hdr.grayed = 0;
+-c_7317168.tag = closureN_tag;
+- c_7317168.fn = (function_type)__lambda_312;
+-c_7317168.num_args = 2;
+-c_7317168.num_elements = 2;
+-c_7317168.elements = (object *)e_7317211;
+-c_7317168.elements[0] = loop_73415_733087;
+-c_7317168.elements[1] = ((closureN)self_7313309)->elements[2];
+-
+-return_direct_with_clo1(data,(closure)&c_7317153,__lambda_310, &c_7317168);;
+-}
+-
+-static void __lambda_312(void *data, object self_7313310, int argc, object *args) /* object self_7313310, object k_735040, object lis_73416_733088, object str_73417_733089 */
+- {
+- object k_735040 = args[0]; object lis_73416_733088 = args[1]; object str_73417_733089 = args[2];
+-
+-if( (boolean_f != Cyc_is_eof_object(str_73417_733089)) ){
+-
+-closureN_type c_7317172;
+-object e_7317178 [1];
+-c_7317172.hdr.mark = gc_color_red;
+- c_7317172.hdr.grayed = 0;
+-c_7317172.tag = closureN_tag;
+- c_7317172.fn = (function_type)__lambda_313;
+-c_7317172.num_args = 1;
+-c_7317172.num_elements = 1;
+-c_7317172.elements = (object *)e_7317178;
+-c_7317172.elements[0] = k_735040;
+-
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7317172, primitive_cons, NULL, lis_73416_733088);
+-} else {
+-
+-
+-if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_string_length(data, str_73417_733089), obj_int2obj(1022))) ){
+-
+-closureN_type c_7317184;
+-object e_7317190 [1];
+-c_7317184.hdr.mark = gc_color_red;
+- c_7317184.hdr.grayed = 0;
+-c_7317184.tag = closureN_tag;
+- c_7317184.fn = (function_type)__lambda_314;
+-c_7317184.num_args = 1;
+-c_7317184.num_elements = 1;
+-c_7317184.elements = (object *)e_7317190;
+-c_7317184.elements[0] = k_735040;
+-
+-
+-pair_type local_7317193;
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7317184, primitive_cons, NULL, set_pair_as_expr(&local_7317193, str_73417_733089, lis_73416_733088));
+-} else {
+-
+-closureN_type c_7317195;
+-object e_7317206 [4];
+-c_7317195.hdr.mark = gc_color_red;
+- c_7317195.hdr.grayed = 0;
+-c_7317195.tag = closureN_tag;
+- c_7317195.fn = (function_type)__lambda_315;
+-c_7317195.num_args = 1;
+-c_7317195.num_elements = 4;
+-c_7317195.elements = (object *)e_7317206;
+-c_7317195.elements[0] = k_735040;
+-c_7317195.elements[1] = lis_73416_733088;
+-c_7317195.elements[2] = ((closureN)self_7313310)->elements[0];
+-c_7317195.elements[3] = str_73417_733089;
++closureN_type c_7315845;
++object e_7315922 [3];
++c_7315845.hdr.mark = gc_color_red;
++ c_7315845.hdr.grayed = 0;
++c_7315845.tag = closureN_tag;
++ c_7315845.fn = (function_type)__lambda_307;
++c_7315845.num_args = 1;
++c_7315845.num_elements = 3;
++c_7315845.elements = (object *)e_7315922;
++c_7315845.elements[0] = k_734583;
++c_7315845.elements[1] = port_73411_732737;
++c_7315845.elements[2] = str_73410_732736;
++
++
++object c_7315925 = Cyc_io_read_line(data,(closure)&c_7315845,port_73411_732737);
++return_closcall1(data,(closure)&c_7315845, c_7315925);;
++}
++
++static void __lambda_307(void *data, object self_7312053, int argc, object *args) /* object self_7312053, object r_734585 */
++ {
++ object r_734585 = args[0];
++
++closureN_type c_7315847;
++object e_7315917 [2];
++c_7315847.hdr.mark = gc_color_red;
++ c_7315847.hdr.grayed = 0;
++c_7315847.tag = closureN_tag;
++ c_7315847.fn = (function_type)__lambda_308;
++c_7315847.num_args = 2;
++c_7315847.num_elements = 2;
++c_7315847.elements = (object *)e_7315917;
++c_7315847.elements[0] = ((closureN)self_7312053)->elements[0];
++c_7315847.elements[1] = ((closureN)self_7312053)->elements[1];
++
++
++pair_type local_7315920;
++return_direct_with_clo2(data,(closure)&c_7315847,__lambda_308, set_cell_as_expr(&local_7315920, ((closureN)self_7312053)->elements[2]), r_734585);;
++}
++
++static void __lambda_308(void *data, object self_7312054, int argc, object *args) /* object self_7312054, object lis_73413_732738, object str_73414_732739 */
++ {
++ object lis_73413_732738 = args[0]; object str_73414_732739 = args[1];
++
++closureN_type c_7315849;
++object e_7315916 [4];
++c_7315849.hdr.mark = gc_color_red;
++ c_7315849.hdr.grayed = 0;
++c_7315849.tag = closureN_tag;
++ c_7315849.fn = (function_type)__lambda_309;
++c_7315849.num_args = 1;
++c_7315849.num_elements = 4;
++c_7315849.elements = (object *)e_7315916;
++c_7315849.elements[0] = ((closureN)self_7312054)->elements[0];
++c_7315849.elements[1] = lis_73413_732738;
++c_7315849.elements[2] = ((closureN)self_7312054)->elements[1];
++c_7315849.elements[3] = str_73414_732739;
++
++return_direct_with_clo1(data,(closure)&c_7315849,__lambda_309, boolean_f);;
++}
++
++static void __lambda_309(void *data, object self_7312055, int argc, object *args) /* object self_7312055, object loop_73415_732740 */
++ {
++ object loop_73415_732740 = args[0];
++
++closureN_type c_7315851;
++object e_7315912 [4];
++c_7315851.hdr.mark = gc_color_red;
++ c_7315851.hdr.grayed = 0;
++c_7315851.tag = closureN_tag;
++ c_7315851.fn = (function_type)__lambda_1310;
++c_7315851.num_args = 1;
++c_7315851.num_elements = 4;
++c_7315851.elements = (object *)e_7315912;
++c_7315851.elements[0] = ((closureN)self_7312055)->elements[0];
++c_7315851.elements[1] = ((closureN)self_7312055)->elements[1];
++c_7315851.elements[2] = ((closureN)self_7312055)->elements[2];
++c_7315851.elements[3] = ((closureN)self_7312055)->elements[3];
++
++
++pair_type local_7315915;
++return_direct_with_clo1(data,(closure)&c_7315851,__lambda_1310, set_cell_as_expr(&local_7315915, loop_73415_732740));;
++}
++
++static void __lambda_1310(void *data, object self_7312056, int argc, object *args) /* object self_7312056, object loop_73415_732740 */
++ {
++ object loop_73415_732740 = args[0];
++
++closureN_type c_7315853;
++object e_7315867 [4];
++c_7315853.hdr.mark = gc_color_red;
++ c_7315853.hdr.grayed = 0;
++c_7315853.tag = closureN_tag;
++ c_7315853.fn = (function_type)__lambda_310;
++c_7315853.num_args = 1;
++c_7315853.num_elements = 4;
++c_7315853.elements = (object *)e_7315867;
++c_7315853.elements[0] = ((closureN)self_7312056)->elements[0];
++c_7315853.elements[1] = ((closureN)self_7312056)->elements[1];
++c_7315853.elements[2] = loop_73415_732740;
++c_7315853.elements[3] = ((closureN)self_7312056)->elements[3];
++
++
++closureN_type c_7315868;
++object e_7315911 [2];
++c_7315868.hdr.mark = gc_color_red;
++ c_7315868.hdr.grayed = 0;
++c_7315868.tag = closureN_tag;
++ c_7315868.fn = (function_type)__lambda_312;
++c_7315868.num_args = 2;
++c_7315868.num_elements = 2;
++c_7315868.elements = (object *)e_7315911;
++c_7315868.elements[0] = loop_73415_732740;
++c_7315868.elements[1] = ((closureN)self_7312056)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7315853,__lambda_310, &c_7315868);;
++}
++
++static void __lambda_312(void *data, object self_7312057, int argc, object *args) /* object self_7312057, object k_734588, object lis_73416_732741, object str_73417_732742 */
++ {
++ object k_734588 = args[0]; object lis_73416_732741 = args[1]; object str_73417_732742 = args[2];
++
++if( (boolean_f != Cyc_is_eof_object(str_73417_732742)) ){
++
++closureN_type c_7315872;
++object e_7315878 [1];
++c_7315872.hdr.mark = gc_color_red;
++ c_7315872.hdr.grayed = 0;
++c_7315872.tag = closureN_tag;
++ c_7315872.fn = (function_type)__lambda_313;
++c_7315872.num_args = 1;
++c_7315872.num_elements = 1;
++c_7315872.elements = (object *)e_7315878;
++c_7315872.elements[0] = k_734588;
++
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7315872, primitive_cons, NULL, lis_73416_732741);
++} else {
++
++
++if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_string_length(data, str_73417_732742), obj_int2obj(1022))) ){
++
++closureN_type c_7315884;
++object e_7315890 [1];
++c_7315884.hdr.mark = gc_color_red;
++ c_7315884.hdr.grayed = 0;
++c_7315884.tag = closureN_tag;
++ c_7315884.fn = (function_type)__lambda_314;
++c_7315884.num_args = 1;
++c_7315884.num_elements = 1;
++c_7315884.elements = (object *)e_7315890;
++c_7315884.elements[0] = k_734588;
++
++
++pair_type local_7315893;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), &c_7315884, primitive_cons, NULL, set_pair_as_expr(&local_7315893, str_73417_732742, lis_73416_732741));
++} else {
++
++closureN_type c_7315895;
++object e_7315906 [4];
++c_7315895.hdr.mark = gc_color_red;
++ c_7315895.hdr.grayed = 0;
++c_7315895.tag = closureN_tag;
++ c_7315895.fn = (function_type)__lambda_315;
++c_7315895.num_args = 1;
++c_7315895.num_elements = 4;
++c_7315895.elements = (object *)e_7315906;
++c_7315895.elements[0] = k_734588;
++c_7315895.elements[1] = lis_73416_732741;
++c_7315895.elements[2] = ((closureN)self_7312057)->elements[0];
++c_7315895.elements[3] = str_73417_732742;
+
+
+-object c_7317209 = Cyc_io_read_line(data,(closure)&c_7317195,((closureN)self_7313310)->elements[1]);
+-return_closcall1(data,(closure)&c_7317195, c_7317209);}
++object c_7315909 = Cyc_io_read_line(data,(closure)&c_7315895,((closureN)self_7312057)->elements[1]);
++return_closcall1(data,(closure)&c_7315895, c_7315909);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_315(void *data, object self_7313313, int argc, object *args) /* object self_7313313, object r_735047 */
++static void __lambda_315(void *data, object self_7312060, int argc, object *args) /* object self_7312060, object r_734595 */
+ {
+- object r_735047 = args[0];
++ object r_734595 = args[0];
+
+
+
+-pair_type local_7317203;
+-return_closcall3(data, car(((closureN)self_7313313)->elements[2]), ((closureN)self_7313313)->elements[0], set_pair_as_expr(&local_7317203, ((closureN)self_7313313)->elements[3], ((closureN)self_7313313)->elements[1]), r_735047);;
++pair_type local_7315903;
++return_closcall3(data, car(((closureN)self_7312060)->elements[2]), ((closureN)self_7312060)->elements[0], set_pair_as_expr(&local_7315903, ((closureN)self_7312060)->elements[3], ((closureN)self_7312060)->elements[1]), r_734595);;
+ }
+
+-static void __lambda_314(void *data, object self_7313312, int argc, object *args) /* object self_7313312, object r_735044_7312722 */
++static void __lambda_314(void *data, object self_7312059, int argc, object *args) /* object self_7312059, object r_734592_7311469 */
+ {
+- object r_735044_7312722 = args[0];
++ object r_734592_7311469 = args[0];
+
+-object c_7317189 = apply(data, ((closureN)self_7313312)->elements[0],primitive_string_91append, r_735044_7312722);
+-return_direct_with_clo1(data, ((closureN)self_7313312)->elements[0], (((closure) ((closureN)self_7313312)->elements[0])->fn), c_7317189);;
++object c_7315889 = apply(data, ((closureN)self_7312059)->elements[0],primitive_string_91append, r_734592_7311469);
++return_direct_with_clo1(data, ((closureN)self_7312059)->elements[0], (((closure) ((closureN)self_7312059)->elements[0])->fn), c_7315889);;
+ }
+
+-static void __lambda_313(void *data, object self_7313311, int argc, object *args) /* object self_7313311, object r_735042_7312721 */
++static void __lambda_313(void *data, object self_7312058, int argc, object *args) /* object self_7312058, object r_734590_7311468 */
+ {
+- object r_735042_7312721 = args[0];
++ object r_734590_7311468 = args[0];
+
+-object c_7317177 = apply(data, ((closureN)self_7313311)->elements[0],primitive_string_91append, r_735042_7312721);
+-return_direct_with_clo1(data, ((closureN)self_7313311)->elements[0], (((closure) ((closureN)self_7313311)->elements[0])->fn), c_7317177);;
++object c_7315877 = apply(data, ((closureN)self_7312058)->elements[0],primitive_string_91append, r_734590_7311468);
++return_direct_with_clo1(data, ((closureN)self_7312058)->elements[0], (((closure) ((closureN)self_7312058)->elements[0])->fn), c_7315877);;
+ }
+
+-static void __lambda_310(void *data, object self_7313314, int argc, object *args) /* object self_7313314, object r_735039 */
++static void __lambda_310(void *data, object self_7312061, int argc, object *args) /* object self_7312061, object r_734587 */
+ {
+- object r_735039 = args[0];
++ object r_734587 = args[0];
+
+-closureN_type c_7317155;
+-object e_7317163 [4];
+-c_7317155.hdr.mark = gc_color_red;
+- c_7317155.hdr.grayed = 0;
+-c_7317155.tag = closureN_tag;
+- c_7317155.fn = (function_type)__lambda_311;
+-c_7317155.num_args = 1;
+-c_7317155.num_elements = 4;
+-c_7317155.elements = (object *)e_7317163;
+-c_7317155.elements[0] = ((closureN)self_7313314)->elements[0];
+-c_7317155.elements[1] = ((closureN)self_7313314)->elements[1];
+-c_7317155.elements[2] = ((closureN)self_7313314)->elements[2];
+-c_7317155.elements[3] = ((closureN)self_7313314)->elements[3];
++closureN_type c_7315855;
++object e_7315863 [4];
++c_7315855.hdr.mark = gc_color_red;
++ c_7315855.hdr.grayed = 0;
++c_7315855.tag = closureN_tag;
++ c_7315855.fn = (function_type)__lambda_311;
++c_7315855.num_args = 1;
++c_7315855.num_elements = 4;
++c_7315855.elements = (object *)e_7315863;
++c_7315855.elements[0] = ((closureN)self_7312061)->elements[0];
++c_7315855.elements[1] = ((closureN)self_7312061)->elements[1];
++c_7315855.elements[2] = ((closureN)self_7312061)->elements[2];
++c_7315855.elements[3] = ((closureN)self_7312061)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317155,__lambda_311, Cyc_set_cell(data, ((closureN)self_7313314)->elements[2], r_735039));;
++return_direct_with_clo1(data,(closure)&c_7315855,__lambda_311, Cyc_set_cell(data, ((closureN)self_7312061)->elements[2], r_734587));;
+ }
+
+-static void __lambda_311(void *data, object self_7313315, int argc, object *args) /* object self_7313315, object r_735038 */
++static void __lambda_311(void *data, object self_7312062, int argc, object *args) /* object self_7312062, object r_734586 */
+ {
+
+
+
+-return_closcall3(data, car(((closureN)self_7313315)->elements[2]), ((closureN)self_7313315)->elements[0], ((closureN)self_7313315)->elements[1], ((closureN)self_7313315)->elements[3]);;
++return_closcall3(data, car(((closureN)self_7312062)->elements[2]), ((closureN)self_7312062)->elements[0], ((closureN)self_7312062)->elements[1], ((closureN)self_7312062)->elements[3]);;
+ }
+
+-static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_735025, object o_73395_733080_raw, ... */
++static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_734573, object o_73395_732733_raw, ... */
+ {
+-object k_735025 = args[0];
+-load_varargs(o_73395_733080, args, 1, argc - 1);
++object k_734573 = args[0];
++load_varargs(o_73395_732733, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:read-line");
+
+-closureN_type c_7317107;
+-object e_7317116 [1];
+-c_7317107.hdr.mark = gc_color_red;
+- c_7317107.hdr.grayed = 0;
+-c_7317107.tag = closureN_tag;
+- c_7317107.fn = (function_type)__lambda_302;
+-c_7317107.num_args = 0;
+-c_7317107.num_elements = 1;
+-c_7317107.elements = (object *)e_7317116;
+-c_7317107.elements[0] = o_73395_733080;
+-
+-
+-closureN_type c_7317117;
+-object e_7317142 [1];
+-c_7317117.hdr.mark = gc_color_red;
+- c_7317117.hdr.grayed = 0;
+-c_7317117.tag = closureN_tag;
+- c_7317117.fn = (function_type)__lambda_303;
+-c_7317117.num_args = 1;
+-c_7317117.num_elements = 1;
+-c_7317117.elements = (object *)e_7317142;
+-c_7317117.elements[0] = k_735025;
++closureN_type c_7315807;
++object e_7315816 [1];
++c_7315807.hdr.mark = gc_color_red;
++ c_7315807.hdr.grayed = 0;
++c_7315807.tag = closureN_tag;
++ c_7315807.fn = (function_type)__lambda_302;
++c_7315807.num_args = 0;
++c_7315807.num_elements = 1;
++c_7315807.elements = (object *)e_7315816;
++c_7315807.elements[0] = o_73395_732733;
++
++
++closureN_type c_7315817;
++object e_7315842 [1];
++c_7315817.hdr.mark = gc_color_red;
++ c_7315817.hdr.grayed = 0;
++c_7315817.tag = closureN_tag;
++ c_7315817.fn = (function_type)__lambda_303;
++c_7315817.num_args = 1;
++c_7315817.num_elements = 1;
++c_7315817.elements = (object *)e_7315842;
++c_7315817.elements[0] = k_734573;
+
+-return_direct_with_clo1(data,(closure)&c_7317107,__lambda_302, &c_7317117);;
++return_direct_with_clo1(data,(closure)&c_7315807,__lambda_302, &c_7315817);;
+ }
+
+-static void __lambda_303(void *data, object self_7313302, int argc, object *args) /* object self_7313302, object port_73398_733081 */
++static void __lambda_303(void *data, object self_7312049, int argc, object *args) /* object self_7312049, object port_73398_732734 */
+ {
+- object port_73398_733081 = args[0];
++ object port_73398_732734 = args[0];
+
+-closureN_type c_7317119;
+-object e_7317138 [2];
+-c_7317119.hdr.mark = gc_color_red;
+- c_7317119.hdr.grayed = 0;
+-c_7317119.tag = closureN_tag;
+- c_7317119.fn = (function_type)__lambda_304;
+-c_7317119.num_args = 1;
+-c_7317119.num_elements = 2;
+-c_7317119.elements = (object *)e_7317138;
+-c_7317119.elements[0] = ((closureN)self_7313302)->elements[0];
+-c_7317119.elements[1] = port_73398_733081;
++closureN_type c_7315819;
++object e_7315838 [2];
++c_7315819.hdr.mark = gc_color_red;
++ c_7315819.hdr.grayed = 0;
++c_7315819.tag = closureN_tag;
++ c_7315819.fn = (function_type)__lambda_304;
++c_7315819.num_args = 1;
++c_7315819.num_elements = 2;
++c_7315819.elements = (object *)e_7315838;
++c_7315819.elements[0] = ((closureN)self_7312049)->elements[0];
++c_7315819.elements[1] = port_73398_732734;
+
+
+-object c_7317141 = Cyc_io_read_line(data,(closure)&c_7317119,port_73398_733081);
+-return_closcall1(data,(closure)&c_7317119, c_7317141);;
++object c_7315841 = Cyc_io_read_line(data,(closure)&c_7315819,port_73398_732734);
++return_closcall1(data,(closure)&c_7315819, c_7315841);;
+ }
+
+-static void __lambda_304(void *data, object self_7313303, int argc, object *args) /* object self_7313303, object str_73401_733082 */
++static void __lambda_304(void *data, object self_7312050, int argc, object *args) /* object self_7312050, object str_73401_732735 */
+ {
+- object str_73401_733082 = args[0];
++ object str_73401_732735 = args[0];
+
+-if( (boolean_f != Cyc_is_eof_object(str_73401_733082)) ){
+- return_direct_with_clo1(data, ((closureN)self_7313303)->elements[0], (((closure) ((closureN)self_7313303)->elements[0])->fn), str_73401_733082);
++if( (boolean_f != Cyc_is_eof_object(str_73401_732735)) ){
++ return_direct_with_clo1(data, ((closureN)self_7312050)->elements[0], (((closure) ((closureN)self_7312050)->elements[0])->fn), str_73401_732735);
+ } else {
+
+-closureN_type c_7317125;
+-object e_7317135 [3];
+-c_7317125.hdr.mark = gc_color_red;
+- c_7317125.hdr.grayed = 0;
+-c_7317125.tag = closureN_tag;
+- c_7317125.fn = (function_type)__lambda_305;
+-c_7317125.num_args = 1;
+-c_7317125.num_elements = 3;
+-c_7317125.elements = (object *)e_7317135;
+-c_7317125.elements[0] = ((closureN)self_7313303)->elements[0];
+-c_7317125.elements[1] = ((closureN)self_7313303)->elements[1];
+-c_7317125.elements[2] = str_73401_733082;
++closureN_type c_7315825;
++object e_7315835 [3];
++c_7315825.hdr.mark = gc_color_red;
++ c_7315825.hdr.grayed = 0;
++c_7315825.tag = closureN_tag;
++ c_7315825.fn = (function_type)__lambda_305;
++c_7315825.num_args = 1;
++c_7315825.num_elements = 3;
++c_7315825.elements = (object *)e_7315835;
++c_7315825.elements[0] = ((closureN)self_7312050)->elements[0];
++c_7315825.elements[1] = ((closureN)self_7312050)->elements[1];
++c_7315825.elements[2] = str_73401_732735;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7317125,__lambda_305, Cyc_string_length(data, str_73401_733082));}
++return_direct_with_clo1(data,(closure)&c_7315825,__lambda_305, Cyc_string_length(data, str_73401_732735));}
+ ;;
+ }
+
+-static void __lambda_305(void *data, object self_7313304, int argc, object *args) /* object self_7313304, object r_735030 */
++static void __lambda_305(void *data, object self_7312051, int argc, object *args) /* object self_7312051, object r_734578 */
+ {
+- object r_735030 = args[0];
++ object r_734578 = args[0];
+
+-if( (boolean_f != Cyc_num_fast_lt_op(data, r_735030, obj_int2obj(1022))) ){
+- return_direct_with_clo1(data, ((closureN)self_7313304)->elements[0], (((closure) ((closureN)self_7313304)->elements[0])->fn), ((closureN)self_7313304)->elements[2]);
++if( (boolean_f != Cyc_num_fast_lt_op(data, r_734578, obj_int2obj(1022))) ){
++ return_direct_with_clo1(data, ((closureN)self_7312051)->elements[0], (((closure) ((closureN)self_7312051)->elements[0])->fn), ((closureN)self_7312051)->elements[2]);
+ } else {
+- return_direct_with_clo3(data, __glo__191read_91line_scheme_base, (((closure) __glo__191read_91line_scheme_base)->fn), ((closureN)self_7313304)->elements[0], ((closureN)self_7313304)->elements[2], ((closureN)self_7313304)->elements[1]);}
++ return_direct_with_clo3(data, __glo__191read_91line_scheme_base, (((closure) __glo__191read_91line_scheme_base)->fn), ((closureN)self_7312051)->elements[0], ((closureN)self_7312051)->elements[2], ((closureN)self_7312051)->elements[1]);}
+ ;;
+ }
+
+-static void __lambda_302(void *data, object self_7313305, int argc, object *args) /* object self_7313305, object k_735031 */
++static void __lambda_302(void *data, object self_7312052, int argc, object *args) /* object self_7312052, object k_734579 */
+ {
+- object k_735031 = args[0];
++ object k_734579 = args[0];
+
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313305)->elements[0])) ){
+- return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_735031);
++if( (boolean_f != Cyc_is_null(((closureN)self_7312052)->elements[0])) ){
++ return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), k_734579);
+ } else {
+
+
+-return_direct_with_clo1(data, k_735031, (((closure) k_735031)->fn), Cyc_car(data, ((closureN)self_7313305)->elements[0]));}
++return_direct_with_clo1(data, k_734579, (((closure) k_734579)->fn), Cyc_car(data, ((closureN)self_7312052)->elements[0]));}
+ ;;
+ }
+
+-static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_735019, object port_73394_733079_raw, ... */
++static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_734567, object port_73394_732732_raw, ... */
+ {
+-object k_735019 = args[0];
+-load_varargs(port_73394_733079, args, 1, argc - 1);
++object k_734567 = args[0];
++load_varargs(port_73394_732732, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:read-char");
+
+-if( (boolean_f != Cyc_is_null(port_73394_733079)) ){
++if( (boolean_f != Cyc_is_null(port_73394_732732)) ){
+
+-closureN_type c_7317092;
+-object e_7317098 [1];
+-c_7317092.hdr.mark = gc_color_red;
+- c_7317092.hdr.grayed = 0;
+-c_7317092.tag = closureN_tag;
+- c_7317092.fn = (function_type)__lambda_300;
+-c_7317092.num_args = 1;
+-c_7317092.num_elements = 1;
+-c_7317092.elements = (object *)e_7317098;
+-c_7317092.elements[0] = k_735019;
++closureN_type c_7315792;
++object e_7315798 [1];
++c_7315792.hdr.mark = gc_color_red;
++ c_7315792.hdr.grayed = 0;
++c_7315792.tag = closureN_tag;
++ c_7315792.fn = (function_type)__lambda_300;
++c_7315792.num_args = 1;
++c_7315792.num_elements = 1;
++c_7315792.elements = (object *)e_7315798;
++c_7315792.elements[0] = k_734567;
+
+-return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7317092);
++return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7315792);
+ } else {
+
+
+
+-object c_7317102 = Cyc_io_read_char(data, k_735019,Cyc_car(data, port_73394_733079));
+-return_direct_with_clo1(data, k_735019, (((closure) k_735019)->fn), c_7317102);}
++object c_7315802 = Cyc_io_read_char(data, k_734567,Cyc_car(data, port_73394_732732));
++return_direct_with_clo1(data, k_734567, (((closure) k_734567)->fn), c_7315802);}
+ ;;
+ }
+
+-static void __lambda_300(void *data, object self_7313301, int argc, object *args) /* object self_7313301, object r_735021 */
++static void __lambda_300(void *data, object self_7312048, int argc, object *args) /* object self_7312048, object r_734569 */
+ {
+- object r_735021 = args[0];
++ object r_734569 = args[0];
+
+-object c_7317097 = Cyc_io_read_char(data, ((closureN)self_7313301)->elements[0],r_735021);
+-return_direct_with_clo1(data, ((closureN)self_7313301)->elements[0], (((closure) ((closureN)self_7313301)->elements[0])->fn), c_7317097);;
++object c_7315797 = Cyc_io_read_char(data, ((closureN)self_7312048)->elements[0],r_734569);
++return_direct_with_clo1(data, ((closureN)self_7312048)->elements[0], (((closure) ((closureN)self_7312048)->elements[0])->fn), c_7315797);;
+ }
+
+-static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_735013, object port_73393_733078_raw, ... */
++static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_734561, object port_73393_732731_raw, ... */
+ {
+-object k_735013 = args[0];
+-load_varargs(port_73393_733078, args, 1, argc - 1);
++object k_734561 = args[0];
++load_varargs(port_73393_732731, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:peek-char");
+
+-if( (boolean_f != Cyc_is_null(port_73393_733078)) ){
++if( (boolean_f != Cyc_is_null(port_73393_732731)) ){
+
+-closureN_type c_7317075;
+-object e_7317081 [1];
+-c_7317075.hdr.mark = gc_color_red;
+- c_7317075.hdr.grayed = 0;
+-c_7317075.tag = closureN_tag;
+- c_7317075.fn = (function_type)__lambda_298;
+-c_7317075.num_args = 1;
+-c_7317075.num_elements = 1;
+-c_7317075.elements = (object *)e_7317081;
+-c_7317075.elements[0] = k_735013;
++closureN_type c_7315775;
++object e_7315781 [1];
++c_7315775.hdr.mark = gc_color_red;
++ c_7315775.hdr.grayed = 0;
++c_7315775.tag = closureN_tag;
++ c_7315775.fn = (function_type)__lambda_298;
++c_7315775.num_args = 1;
++c_7315775.num_elements = 1;
++c_7315775.elements = (object *)e_7315781;
++c_7315775.elements[0] = k_734561;
+
+-return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7317075);
++return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7315775);
+ } else {
+
+
+
+-object c_7317085 = Cyc_io_peek_char(data, k_735013,Cyc_car(data, port_73393_733078));
+-return_direct_with_clo1(data, k_735013, (((closure) k_735013)->fn), c_7317085);}
++object c_7315785 = Cyc_io_peek_char(data, k_734561,Cyc_car(data, port_73393_732731));
++return_direct_with_clo1(data, k_734561, (((closure) k_734561)->fn), c_7315785);}
+ ;;
+ }
+
+-static void __lambda_298(void *data, object self_7313300, int argc, object *args) /* object self_7313300, object r_735015 */
++static void __lambda_298(void *data, object self_7312047, int argc, object *args) /* object self_7312047, object r_734563 */
+ {
+- object r_735015 = args[0];
++ object r_734563 = args[0];
+
+-object c_7317080 = Cyc_io_peek_char(data, ((closureN)self_7313300)->elements[0],r_735015);
+-return_direct_with_clo1(data, ((closureN)self_7313300)->elements[0], (((closure) ((closureN)self_7313300)->elements[0])->fn), c_7317080);;
++object c_7315780 = Cyc_io_peek_char(data, ((closureN)self_7312047)->elements[0],r_734563);
++return_direct_with_clo1(data, ((closureN)self_7312047)->elements[0], (((closure) ((closureN)self_7312047)->elements[0])->fn), c_7315780);;
+ }
+
+-static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_735007, object port_73392_733077_raw, ... */
++static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_734555, object port_73392_732730_raw, ... */
+ {
+-object k_735007 = args[0];
+-load_varargs(port_73392_733077, args, 1, argc - 1);
++object k_734555 = args[0];
++load_varargs(port_73392_732730, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:char-ready?");
+
+-if( (boolean_f != Cyc_is_null(port_73392_733077)) ){
++if( (boolean_f != Cyc_is_null(port_73392_732730)) ){
+
+-closureN_type c_7317064;
+-object e_7317067 [1];
+-c_7317064.hdr.mark = gc_color_red;
+- c_7317064.hdr.grayed = 0;
+-c_7317064.tag = closureN_tag;
+- c_7317064.fn = (function_type)__lambda_296;
+-c_7317064.num_args = 1;
+-c_7317064.num_elements = 1;
+-c_7317064.elements = (object *)e_7317067;
+-c_7317064.elements[0] = k_735007;
++closureN_type c_7315764;
++object e_7315767 [1];
++c_7315764.hdr.mark = gc_color_red;
++ c_7315764.hdr.grayed = 0;
++c_7315764.tag = closureN_tag;
++ c_7315764.fn = (function_type)__lambda_296;
++c_7315764.num_args = 1;
++c_7315764.num_elements = 1;
++c_7315764.elements = (object *)e_7315767;
++c_7315764.elements[0] = k_734555;
+
+-return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7317064);
++return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7315764);
+ } else {
+
+
+-return_direct_with_clo2(data, __glo_Cyc_91char_91ready_127_scheme_base, (((closure) __glo_Cyc_91char_91ready_127_scheme_base)->fn), k_735007, Cyc_car(data, port_73392_733077));}
++return_direct_with_clo2(data, __glo_Cyc_91char_91ready_127_scheme_base, (((closure) __glo_Cyc_91char_91ready_127_scheme_base)->fn), k_734555, Cyc_car(data, port_73392_732730));}
+ ;;
+ }
+
+-static void __lambda_296(void *data, object self_7313299, int argc, object *args) /* object self_7313299, object r_735009 */
++static void __lambda_296(void *data, object self_7312046, int argc, object *args) /* object self_7312046, object r_734557 */
+ {
+- object r_735009 = args[0];
+- return_direct_with_clo2(data, __glo_Cyc_91char_91ready_127_scheme_base, (((closure) __glo_Cyc_91char_91ready_127_scheme_base)->fn), ((closureN)self_7313299)->elements[0], r_735009);;
++ object r_734557 = args[0];
++ return_direct_with_clo2(data, __glo_Cyc_91char_91ready_127_scheme_base, (((closure) __glo_Cyc_91char_91ready_127_scheme_base)->fn), ((closureN)self_7312046)->elements[0], r_734557);;
+ }
+
+-static void __lambda_1453(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; object rv = Cyc_io_char_ready(data, port);
++static void __lambda_1406(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; object rv = Cyc_io_char_ready(data, port);
+ return_closcall1(data, k, rv); }
+-static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_735001, object chr_73390_733075, object port_73391_733076_raw, ... */
++static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_734549, object chr_73390_732728, object port_73391_732729_raw, ... */
+ {
+-object k_735001 = args[0]; object chr_73390_733075 = args[1];
+-load_varargs(port_73391_733076, args, 2, argc - 2);
++object k_734549 = args[0]; object chr_73390_732728 = args[1];
++load_varargs(port_73391_732729, args, 2, argc - 2);
+ Cyc_st_add(data, "scheme/base.sld:write-u8");
+
+-if( (boolean_f != Cyc_is_null(port_73391_733076)) ){
++if( (boolean_f != Cyc_is_null(port_73391_732729)) ){
+
+-closureN_type c_7317051;
+-object e_7317055 [2];
+-c_7317051.hdr.mark = gc_color_red;
+- c_7317051.hdr.grayed = 0;
+-c_7317051.tag = closureN_tag;
+- c_7317051.fn = (function_type)__lambda_294;
+-c_7317051.num_args = 1;
+-c_7317051.num_elements = 2;
+-c_7317051.elements = (object *)e_7317055;
+-c_7317051.elements[0] = chr_73390_733075;
+-c_7317051.elements[1] = k_735001;
++closureN_type c_7315751;
++object e_7315755 [2];
++c_7315751.hdr.mark = gc_color_red;
++ c_7315751.hdr.grayed = 0;
++c_7315751.tag = closureN_tag;
++ c_7315751.fn = (function_type)__lambda_294;
++c_7315751.num_args = 1;
++c_7315751.num_elements = 2;
++c_7315751.elements = (object *)e_7315755;
++c_7315751.elements[0] = chr_73390_732728;
++c_7315751.elements[1] = k_734549;
+
+-return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7317051);
++return_direct_with_clo1(data, __glo_current_91output_91port_scheme_base, (((closure) __glo_current_91output_91port_scheme_base)->fn), &c_7315751);
+ } else {
+
+
+-return_direct_with_clo3(data, __glo__191write_91u8_scheme_base, (((closure) __glo__191write_91u8_scheme_base)->fn), k_735001, chr_73390_733075, Cyc_car(data, port_73391_733076));}
++return_direct_with_clo3(data, __glo__191write_91u8_scheme_base, (((closure) __glo__191write_91u8_scheme_base)->fn), k_734549, chr_73390_732728, Cyc_car(data, port_73391_732729));}
+ ;;
+ }
+
+-static void __lambda_294(void *data, object self_7313298, int argc, object *args) /* object self_7313298, object r_735003 */
++static void __lambda_294(void *data, object self_7312045, int argc, object *args) /* object self_7312045, object r_734551 */
+ {
+- object r_735003 = args[0];
+- return_direct_with_clo3(data, __glo__191write_91u8_scheme_base, (((closure) __glo__191write_91u8_scheme_base)->fn), ((closureN)self_7313298)->elements[1], ((closureN)self_7313298)->elements[0], r_735003);;
++ object r_734551 = args[0];
++ return_direct_with_clo3(data, __glo__191write_91u8_scheme_base, (((closure) __glo__191write_91u8_scheme_base)->fn), ((closureN)self_7312045)->elements[1], ((closureN)self_7312045)->elements[0], r_734551);;
+ }
+
+-static void __lambda_291(void *data, object _, int argc, object *args) /* closure _,object k_734995, object port_73389_733074_raw, ... */
++static void __lambda_291(void *data, object _, int argc, object *args) /* closure _,object k_734543, object port_73389_732727_raw, ... */
+ {
+-object k_734995 = args[0];
+-load_varargs(port_73389_733074, args, 1, argc - 1);
++object k_734543 = args[0];
++load_varargs(port_73389_732727, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:peek-u8");
+
+-if( (boolean_f != Cyc_is_null(port_73389_733074)) ){
++if( (boolean_f != Cyc_is_null(port_73389_732727)) ){
+
+-closureN_type c_7317040;
+-object e_7317043 [1];
+-c_7317040.hdr.mark = gc_color_red;
+- c_7317040.hdr.grayed = 0;
+-c_7317040.tag = closureN_tag;
+- c_7317040.fn = (function_type)__lambda_292;
+-c_7317040.num_args = 1;
+-c_7317040.num_elements = 1;
+-c_7317040.elements = (object *)e_7317043;
+-c_7317040.elements[0] = k_734995;
++closureN_type c_7315740;
++object e_7315743 [1];
++c_7315740.hdr.mark = gc_color_red;
++ c_7315740.hdr.grayed = 0;
++c_7315740.tag = closureN_tag;
++ c_7315740.fn = (function_type)__lambda_292;
++c_7315740.num_args = 1;
++c_7315740.num_elements = 1;
++c_7315740.elements = (object *)e_7315743;
++c_7315740.elements[0] = k_734543;
+
+-return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7317040);
++return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7315740);
+ } else {
+
+
+-return_direct_with_clo2(data, __glo__191peek_91u8_scheme_base, (((closure) __glo__191peek_91u8_scheme_base)->fn), k_734995, Cyc_car(data, port_73389_733074));}
++return_direct_with_clo2(data, __glo__191peek_91u8_scheme_base, (((closure) __glo__191peek_91u8_scheme_base)->fn), k_734543, Cyc_car(data, port_73389_732727));}
+ ;;
+ }
+
+-static void __lambda_292(void *data, object self_7313297, int argc, object *args) /* object self_7313297, object r_734997 */
++static void __lambda_292(void *data, object self_7312044, int argc, object *args) /* object self_7312044, object r_734545 */
+ {
+- object r_734997 = args[0];
+- return_direct_with_clo2(data, __glo__191peek_91u8_scheme_base, (((closure) __glo__191peek_91u8_scheme_base)->fn), ((closureN)self_7313297)->elements[0], r_734997);;
++ object r_734545 = args[0];
++ return_direct_with_clo2(data, __glo__191peek_91u8_scheme_base, (((closure) __glo__191peek_91u8_scheme_base)->fn), ((closureN)self_7312044)->elements[0], r_734545);;
+ }
+
+-static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_734989, object port_73388_733073_raw, ... */
++static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_734537, object port_73388_732726_raw, ... */
+ {
+-object k_734989 = args[0];
+-load_varargs(port_73388_733073, args, 1, argc - 1);
++object k_734537 = args[0];
++load_varargs(port_73388_732726, args, 1, argc - 1);
+ Cyc_st_add(data, "scheme/base.sld:read-u8");
+
+-if( (boolean_f != Cyc_is_null(port_73388_733073)) ){
++if( (boolean_f != Cyc_is_null(port_73388_732726)) ){
+
+-closureN_type c_7317029;
+-object e_7317032 [1];
+-c_7317029.hdr.mark = gc_color_red;
+- c_7317029.hdr.grayed = 0;
+-c_7317029.tag = closureN_tag;
+- c_7317029.fn = (function_type)__lambda_290;
+-c_7317029.num_args = 1;
+-c_7317029.num_elements = 1;
+-c_7317029.elements = (object *)e_7317032;
+-c_7317029.elements[0] = k_734989;
++closureN_type c_7315729;
++object e_7315732 [1];
++c_7315729.hdr.mark = gc_color_red;
++ c_7315729.hdr.grayed = 0;
++c_7315729.tag = closureN_tag;
++ c_7315729.fn = (function_type)__lambda_290;
++c_7315729.num_args = 1;
++c_7315729.num_elements = 1;
++c_7315729.elements = (object *)e_7315732;
++c_7315729.elements[0] = k_734537;
+
+-return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7317029);
++return_direct_with_clo1(data, __glo_current_91input_91port_scheme_base, (((closure) __glo_current_91input_91port_scheme_base)->fn), &c_7315729);
+ } else {
+
+
+-return_direct_with_clo2(data, __glo__191read_91u8_scheme_base, (((closure) __glo__191read_91u8_scheme_base)->fn), k_734989, Cyc_car(data, port_73388_733073));}
++return_direct_with_clo2(data, __glo__191read_91u8_scheme_base, (((closure) __glo__191read_91u8_scheme_base)->fn), k_734537, Cyc_car(data, port_73388_732726));}
+ ;;
+ }
+
+-static void __lambda_290(void *data, object self_7313296, int argc, object *args) /* object self_7313296, object r_734991 */
++static void __lambda_290(void *data, object self_7312043, int argc, object *args) /* object self_7312043, object r_734539 */
+ {
+- object r_734991 = args[0];
+- return_direct_with_clo2(data, __glo__191read_91u8_scheme_base, (((closure) __glo__191read_91u8_scheme_base)->fn), ((closureN)self_7313296)->elements[0], r_734991);;
++ object r_734539 = args[0];
++ return_direct_with_clo2(data, __glo__191read_91u8_scheme_base, (((closure) __glo__191read_91u8_scheme_base)->fn), ((closureN)self_7312043)->elements[0], r_734539);;
+ }
+
+-static void __lambda_1452(void *data, object _, int argc, object *args) {object k = args[0];object chr = args[1];object port = args[2]; return_closcall1(data, k, Cyc_write_u8(data, chr, port)); }
+-static void __lambda_1451(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_peek_u8(data, k, port); }
+-static void __lambda_1450(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_read_u8(data, k, port); }
+-static void __lambda_287(void *data, object _, int argc, object *args) /* closure _,object k_734982, object func_73385_733070, object end_73386_733071, object lst_73387_733072 */
++static void __lambda_1405(void *data, object _, int argc, object *args) {object k = args[0];object chr = args[1];object port = args[2]; return_closcall1(data, k, Cyc_write_u8(data, chr, port)); }
++static void __lambda_1404(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_peek_u8(data, k, port); }
++static void __lambda_1403(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_read_u8(data, k, port); }
++static void __lambda_287(void *data, object _, int argc, object *args) /* closure _,object k_734530, object func_73385_732723, object end_73386_732724, object lst_73387_732725 */
+ {
+-object k_734982 = args[0]; object func_73385_733070 = args[1]; object end_73386_733071 = args[2]; object lst_73387_733072 = args[3];
++object k_734530 = args[0]; object func_73385_732723 = args[1]; object end_73386_732724 = args[2]; object lst_73387_732725 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:foldr");
+
+-if( (boolean_f != Cyc_is_null(lst_73387_733072)) ){
+- return_direct_with_clo1(data, k_734982, (((closure) k_734982)->fn), end_73386_733071);
++if( (boolean_f != Cyc_is_null(lst_73387_732725)) ){
++ return_direct_with_clo1(data, k_734530, (((closure) k_734530)->fn), end_73386_732724);
+ } else {
+
+-closureN_type c_7317012;
+-object e_7317019 [3];
+-c_7317012.hdr.mark = gc_color_red;
+- c_7317012.hdr.grayed = 0;
+-c_7317012.tag = closureN_tag;
+- c_7317012.fn = (function_type)__lambda_288;
+-c_7317012.num_args = 1;
+-c_7317012.num_elements = 3;
+-c_7317012.elements = (object *)e_7317019;
+-c_7317012.elements[0] = func_73385_733070;
+-c_7317012.elements[1] = k_734982;
+-c_7317012.elements[2] = lst_73387_733072;
++closureN_type c_7315712;
++object e_7315719 [3];
++c_7315712.hdr.mark = gc_color_red;
++ c_7315712.hdr.grayed = 0;
++c_7315712.tag = closureN_tag;
++ c_7315712.fn = (function_type)__lambda_288;
++c_7315712.num_args = 1;
++c_7315712.num_elements = 3;
++c_7315712.elements = (object *)e_7315719;
++c_7315712.elements[0] = func_73385_732723;
++c_7315712.elements[1] = k_734530;
++c_7315712.elements[2] = lst_73387_732725;
+
+
+
+-return_direct_with_clo4(data, __glo_foldr_scheme_base, (((closure) __glo_foldr_scheme_base)->fn), &c_7317012, func_73385_733070, end_73386_733071, Cyc_cdr(data, lst_73387_733072));}
++return_direct_with_clo4(data, __glo_foldr_scheme_base, (((closure) __glo_foldr_scheme_base)->fn), &c_7315712, func_73385_732723, end_73386_732724, Cyc_cdr(data, lst_73387_732725));}
+ ;;
+ }
+
+-static void __lambda_288(void *data, object self_7313295, int argc, object *args) /* object self_7313295, object r_734985 */
++static void __lambda_288(void *data, object self_7312042, int argc, object *args) /* object self_7312042, object r_734533 */
+ {
+- object r_734985 = args[0];
++ object r_734533 = args[0];
+
+
+-return_closcall3(data, ((closureN)self_7313295)->elements[0], ((closureN)self_7313295)->elements[1], Cyc_car(data, ((closureN)self_7313295)->elements[2]), r_734985);;
++return_closcall3(data, ((closureN)self_7312042)->elements[0], ((closureN)self_7312042)->elements[1], Cyc_car(data, ((closureN)self_7312042)->elements[2]), r_734533);;
+ }
+
+-static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_734975, object func_73382_733067, object accum_73383_733068, object lst_73384_733069 */
++static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_734523, object func_73382_732720, object accum_73383_732721, object lst_73384_732722 */
+ {
+-object k_734975 = args[0]; object func_73382_733067 = args[1]; object accum_73383_733068 = args[2]; object lst_73384_733069 = args[3];
++object k_734523 = args[0]; object func_73382_732720 = args[1]; object accum_73383_732721 = args[2]; object lst_73384_732722 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:foldl");
+
+-if( (boolean_f != Cyc_is_null(lst_73384_733069)) ){
+- return_direct_with_clo1(data, k_734975, (((closure) k_734975)->fn), accum_73383_733068);
++if( (boolean_f != Cyc_is_null(lst_73384_732722)) ){
++ return_direct_with_clo1(data, k_734523, (((closure) k_734523)->fn), accum_73383_732721);
+ } else {
+
+-closureN_type c_7316997;
+-object e_7317004 [3];
+-c_7316997.hdr.mark = gc_color_red;
+- c_7316997.hdr.grayed = 0;
+-c_7316997.tag = closureN_tag;
+- c_7316997.fn = (function_type)__lambda_286;
+-c_7316997.num_args = 1;
+-c_7316997.num_elements = 3;
+-c_7316997.elements = (object *)e_7317004;
+-c_7316997.elements[0] = func_73382_733067;
+-c_7316997.elements[1] = k_734975;
+-c_7316997.elements[2] = lst_73384_733069;
++closureN_type c_7315697;
++object e_7315704 [3];
++c_7315697.hdr.mark = gc_color_red;
++ c_7315697.hdr.grayed = 0;
++c_7315697.tag = closureN_tag;
++ c_7315697.fn = (function_type)__lambda_286;
++c_7315697.num_args = 1;
++c_7315697.num_elements = 3;
++c_7315697.elements = (object *)e_7315704;
++c_7315697.elements[0] = func_73382_732720;
++c_7315697.elements[1] = k_734523;
++c_7315697.elements[2] = lst_73384_732722;
+
+
+
+-return_closcall3(data, func_73382_733067, &c_7316997, Cyc_car(data, lst_73384_733069), accum_73383_733068);}
++return_closcall3(data, func_73382_732720, &c_7315697, Cyc_car(data, lst_73384_732722), accum_73383_732721);}
+ ;;
+ }
+
+-static void __lambda_286(void *data, object self_7313294, int argc, object *args) /* object self_7313294, object r_734977 */
++static void __lambda_286(void *data, object self_7312041, int argc, object *args) /* object self_7312041, object r_734525 */
+ {
+- object r_734977 = args[0];
++ object r_734525 = args[0];
+
+
+-return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7313294)->elements[1], ((closureN)self_7313294)->elements[0], r_734977, Cyc_cdr(data, ((closureN)self_7313294)->elements[2]));;
++return_direct_with_clo4(data, __glo_foldl_scheme_base, (((closure) __glo_foldl_scheme_base)->fn), ((closureN)self_7312041)->elements[1], ((closureN)self_7312041)->elements[0], r_734525, Cyc_cdr(data, ((closureN)self_7312041)->elements[2]));;
+ }
+
+-static void __lambda_284(void *data, object _, int argc, object *args) /* closure _,object k_734970, object obj_73379_733064, object alist_73380_733065, object compare_73381_733066_raw, ... */
++static void __lambda_284(void *data, object _, int argc, object *args) /* closure _,object k_734518, object obj_73379_732717, object alist_73380_732718, object compare_73381_732719_raw, ... */
+ {
+-object k_734970 = args[0]; object obj_73379_733064 = args[1]; object alist_73380_733065 = args[2];
+-load_varargs(compare_73381_733066, args, 3, argc - 3);
++object k_734518 = args[0]; object obj_73379_732717 = args[1]; object alist_73380_732718 = args[2];
++load_varargs(compare_73381_732719, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:assoc");
+
+-if( (boolean_f != Cyc_is_pair(compare_73381_733066)) ){
++if( (boolean_f != Cyc_is_pair(compare_73381_732719)) ){
+
+
+-return_direct_with_clo4(data, __glo_assoc_91helper_scheme_base, (((closure) __glo_assoc_91helper_scheme_base)->fn), k_734970, obj_73379_733064, alist_73380_733065, Cyc_car(data, compare_73381_733066));
++return_direct_with_clo4(data, __glo_assoc_91helper_scheme_base, (((closure) __glo_assoc_91helper_scheme_base)->fn), k_734518, obj_73379_732717, alist_73380_732718, Cyc_car(data, compare_73381_732719));
+ } else {
+- return_direct_with_clo4(data, __glo_assoc_91helper_scheme_base, (((closure) __glo_assoc_91helper_scheme_base)->fn), k_734970, obj_73379_733064, alist_73380_733065, primitive_equal_127);}
++ return_direct_with_clo4(data, __glo_assoc_91helper_scheme_base, (((closure) __glo_assoc_91helper_scheme_base)->fn), k_734518, obj_73379_732717, alist_73380_732718, primitive_equal_127);}
+ ;;
+ }
+
+-static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_734959, object obj_73368_733061, object lst_73369_733062, object cmp_127_73370_733063 */
++static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_734507, object obj_73368_732714, object lst_73369_732715, object cmp_127_73370_732716 */
+ {
+-object k_734959 = args[0]; object obj_73368_733061 = args[1]; object lst_73369_733062 = args[2]; object cmp_127_73370_733063 = args[3];
++object k_734507 = args[0]; object obj_73368_732714 = args[1]; object lst_73369_732715 = args[2]; object cmp_127_73370_732716 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:assoc-helper");
+
+-if( (boolean_f != Cyc_is_null(lst_73369_733062)) ){
+- return_direct_with_clo1(data, k_734959, (((closure) k_734959)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(lst_73369_732715)) ){
++ return_direct_with_clo1(data, k_734507, (((closure) k_734507)->fn), boolean_f);
+ } else {
+
+-closureN_type c_7316955;
+-object e_7316970 [3];
+-c_7316955.hdr.mark = gc_color_red;
+- c_7316955.hdr.grayed = 0;
+-c_7316955.tag = closureN_tag;
+- c_7316955.fn = (function_type)__lambda_282;
+-c_7316955.num_args = 0;
+-c_7316955.num_elements = 3;
+-c_7316955.elements = (object *)e_7316970;
+-c_7316955.elements[0] = cmp_127_73370_733063;
+-c_7316955.elements[1] = lst_73369_733062;
+-c_7316955.elements[2] = obj_73368_733061;
++closureN_type c_7315655;
++object e_7315670 [3];
++c_7315655.hdr.mark = gc_color_red;
++ c_7315655.hdr.grayed = 0;
++c_7315655.tag = closureN_tag;
++ c_7315655.fn = (function_type)__lambda_282;
++c_7315655.num_args = 0;
++c_7315655.num_elements = 3;
++c_7315655.elements = (object *)e_7315670;
++c_7315655.elements[0] = cmp_127_73370_732716;
++c_7315655.elements[1] = lst_73369_732715;
++c_7315655.elements[2] = obj_73368_732714;
+
+
+-closureN_type c_7316971;
+-object e_7316984 [4];
+-c_7316971.hdr.mark = gc_color_red;
+- c_7316971.hdr.grayed = 0;
+-c_7316971.tag = closureN_tag;
+- c_7316971.fn = (function_type)__lambda_283;
+-c_7316971.num_args = 1;
+-c_7316971.num_elements = 4;
+-c_7316971.elements = (object *)e_7316984;
+-c_7316971.elements[0] = cmp_127_73370_733063;
+-c_7316971.elements[1] = k_734959;
+-c_7316971.elements[2] = lst_73369_733062;
+-c_7316971.elements[3] = obj_73368_733061;
++closureN_type c_7315671;
++object e_7315684 [4];
++c_7315671.hdr.mark = gc_color_red;
++ c_7315671.hdr.grayed = 0;
++c_7315671.tag = closureN_tag;
++ c_7315671.fn = (function_type)__lambda_283;
++c_7315671.num_args = 1;
++c_7315671.num_elements = 4;
++c_7315671.elements = (object *)e_7315684;
++c_7315671.elements[0] = cmp_127_73370_732716;
++c_7315671.elements[1] = k_734507;
++c_7315671.elements[2] = lst_73369_732715;
++c_7315671.elements[3] = obj_73368_732714;
+
+-return_direct_with_clo1(data,(closure)&c_7316955,__lambda_282, &c_7316971);}
++return_direct_with_clo1(data,(closure)&c_7315655,__lambda_282, &c_7315671);}
+ ;;
+ }
+
+-static void __lambda_283(void *data, object self_7313292, int argc, object *args) /* object self_7313292, object r_734961 */
++static void __lambda_283(void *data, object self_7312039, int argc, object *args) /* object self_7312039, object r_734509 */
+ {
+- object r_734961 = args[0];
+- if( (boolean_f != r_734961) ){
++ object r_734509 = args[0];
++ if( (boolean_f != r_734509) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313292)->elements[1], (((closure) ((closureN)self_7313292)->elements[1])->fn), Cyc_car(data, ((closureN)self_7313292)->elements[2]));
++return_direct_with_clo1(data, ((closureN)self_7312039)->elements[1], (((closure) ((closureN)self_7312039)->elements[1])->fn), Cyc_car(data, ((closureN)self_7312039)->elements[2]));
+ } else {
+
+
+-return_direct_with_clo4(data, __glo_assoc_91helper_scheme_base, (((closure) __glo_assoc_91helper_scheme_base)->fn), ((closureN)self_7313292)->elements[1], ((closureN)self_7313292)->elements[3], Cyc_cdr(data, ((closureN)self_7313292)->elements[2]), ((closureN)self_7313292)->elements[0]);}
++return_direct_with_clo4(data, __glo_assoc_91helper_scheme_base, (((closure) __glo_assoc_91helper_scheme_base)->fn), ((closureN)self_7312039)->elements[1], ((closureN)self_7312039)->elements[3], Cyc_cdr(data, ((closureN)self_7312039)->elements[2]), ((closureN)self_7312039)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_282(void *data, object self_7313293, int argc, object *args) /* object self_7313293, object k_734963 */
++static void __lambda_282(void *data, object self_7312040, int argc, object *args) /* object self_7312040, object k_734511 */
+ {
+- object k_734963 = args[0];
++ object k_734511 = args[0];
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313293)->elements[1]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312040)->elements[1]))) ){
+
+
+
+
+-return_closcall3(data, ((closureN)self_7313293)->elements[0], k_734963, ((closureN)self_7313293)->elements[2], Cyc_car(data, Cyc_car(data, ((closureN)self_7313293)->elements[1])));
++return_closcall3(data, ((closureN)self_7312040)->elements[0], k_734511, ((closureN)self_7312040)->elements[2], Cyc_car(data, Cyc_car(data, ((closureN)self_7312040)->elements[1])));
+ } else {
+- return_direct_with_clo1(data, k_734963, (((closure) k_734963)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_734511, (((closure) k_734511)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_280(void *data, object _, int argc, object *args) /* closure _,object k_734954, object obj_73365_733058, object lst_73366_733059, object compare_73367_733060_raw, ... */
++static void __lambda_280(void *data, object _, int argc, object *args) /* closure _,object k_734502, object obj_73365_732711, object lst_73366_732712, object compare_73367_732713_raw, ... */
+ {
+-object k_734954 = args[0]; object obj_73365_733058 = args[1]; object lst_73366_733059 = args[2];
+-load_varargs(compare_73367_733060, args, 3, argc - 3);
++object k_734502 = args[0]; object obj_73365_732711 = args[1]; object lst_73366_732712 = args[2];
++load_varargs(compare_73367_732713, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:member");
+
+-if( (boolean_f != Cyc_is_pair(compare_73367_733060)) ){
++if( (boolean_f != Cyc_is_pair(compare_73367_732713)) ){
+
+
+-return_direct_with_clo4(data, __glo_member_91helper_scheme_base, (((closure) __glo_member_91helper_scheme_base)->fn), k_734954, obj_73365_733058, lst_73366_733059, Cyc_car(data, compare_73367_733060));
++return_direct_with_clo4(data, __glo_member_91helper_scheme_base, (((closure) __glo_member_91helper_scheme_base)->fn), k_734502, obj_73365_732711, lst_73366_732712, Cyc_car(data, compare_73367_732713));
+ } else {
+- return_direct_with_clo4(data, __glo_member_91helper_scheme_base, (((closure) __glo_member_91helper_scheme_base)->fn), k_734954, obj_73365_733058, lst_73366_733059, primitive_equal_127);}
++ return_direct_with_clo4(data, __glo_member_91helper_scheme_base, (((closure) __glo_member_91helper_scheme_base)->fn), k_734502, obj_73365_732711, lst_73366_732712, primitive_equal_127);}
+ ;;
+ }
+
+-static void __lambda_278(void *data, object _, int argc, object *args) /* closure _,object k_734947, object obj_73355_733055, object lst_73356_733056, object cmp_91proc_73357_733057 */
++static void __lambda_278(void *data, object _, int argc, object *args) /* closure _,object k_734495, object obj_73355_732708, object lst_73356_732709, object cmp_91proc_73357_732710 */
+ {
+-object k_734947 = args[0]; object obj_73355_733055 = args[1]; object lst_73356_733056 = args[2]; object cmp_91proc_73357_733057 = args[3];
++object k_734495 = args[0]; object obj_73355_732708 = args[1]; object lst_73356_732709 = args[2]; object cmp_91proc_73357_732710 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:member-helper");
+
+-if( (boolean_f != Cyc_is_null(lst_73356_733056)) ){
+- return_direct_with_clo1(data, k_734947, (((closure) k_734947)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(lst_73356_732709)) ){
++ return_direct_with_clo1(data, k_734495, (((closure) k_734495)->fn), boolean_f);
+ } else {
+
+-closureN_type c_7316929;
+-object e_7316940 [4];
+-c_7316929.hdr.mark = gc_color_red;
+- c_7316929.hdr.grayed = 0;
+-c_7316929.tag = closureN_tag;
+- c_7316929.fn = (function_type)__lambda_279;
+-c_7316929.num_args = 1;
+-c_7316929.num_elements = 4;
+-c_7316929.elements = (object *)e_7316940;
+-c_7316929.elements[0] = cmp_91proc_73357_733057;
+-c_7316929.elements[1] = k_734947;
+-c_7316929.elements[2] = lst_73356_733056;
+-c_7316929.elements[3] = obj_73355_733055;
++closureN_type c_7315629;
++object e_7315640 [4];
++c_7315629.hdr.mark = gc_color_red;
++ c_7315629.hdr.grayed = 0;
++c_7315629.tag = closureN_tag;
++ c_7315629.fn = (function_type)__lambda_279;
++c_7315629.num_args = 1;
++c_7315629.num_elements = 4;
++c_7315629.elements = (object *)e_7315640;
++c_7315629.elements[0] = cmp_91proc_73357_732710;
++c_7315629.elements[1] = k_734495;
++c_7315629.elements[2] = lst_73356_732709;
++c_7315629.elements[3] = obj_73355_732708;
+
+
+
+-return_closcall3(data, cmp_91proc_73357_733057, &c_7316929, obj_73355_733055, Cyc_car(data, lst_73356_733056));}
++return_closcall3(data, cmp_91proc_73357_732710, &c_7315629, obj_73355_732708, Cyc_car(data, lst_73356_732709));}
+ ;;
+ }
+
+-static void __lambda_279(void *data, object self_7313291, int argc, object *args) /* object self_7313291, object r_734949 */
++static void __lambda_279(void *data, object self_7312038, int argc, object *args) /* object self_7312038, object r_734497 */
+ {
+- object r_734949 = args[0];
+- if( (boolean_f != r_734949) ){
+- return_direct_with_clo1(data, ((closureN)self_7313291)->elements[1], (((closure) ((closureN)self_7313291)->elements[1])->fn), ((closureN)self_7313291)->elements[2]);
++ object r_734497 = args[0];
++ if( (boolean_f != r_734497) ){
++ return_direct_with_clo1(data, ((closureN)self_7312038)->elements[1], (((closure) ((closureN)self_7312038)->elements[1])->fn), ((closureN)self_7312038)->elements[2]);
+ } else {
+
+
+-return_direct_with_clo4(data, __glo_member_91helper_scheme_base, (((closure) __glo_member_91helper_scheme_base)->fn), ((closureN)self_7313291)->elements[1], ((closureN)self_7313291)->elements[3], Cyc_cdr(data, ((closureN)self_7313291)->elements[2]), ((closureN)self_7313291)->elements[0]);}
++return_direct_with_clo4(data, __glo_member_91helper_scheme_base, (((closure) __glo_member_91helper_scheme_base)->fn), ((closureN)self_7312038)->elements[1], ((closureN)self_7312038)->elements[3], Cyc_cdr(data, ((closureN)self_7312038)->elements[2]), ((closureN)self_7312038)->elements[0]);}
+ ;;
+ }
+
+-static object __lambda_1449(void *data, object ptr,object str1_73353_733053, object str2_73354_733054) {
++static object __lambda_1402(void *data, object ptr,object str1_73353_732706, object str2_73354_732707) {
+
+ Cyc_st_add(data, "scheme/base.sld:fast-string>=?");
+
+
+
+
+-return_copy(ptr, Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_733053, str2_73354_733054), obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_732706, str2_73354_732707), obj_int2obj(0)));;
+ }
+
+-static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_734943, object str1_73353_733053, object str2_73354_733054 */
++static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_734491, object str1_73353_732706, object str2_73354_732707 */
+ {
+-object k_734943 = args[0]; object str1_73353_733053 = args[1]; object str2_73354_733054 = args[2];
++object k_734491 = args[0]; object str1_73353_732706 = args[1]; object str2_73354_732707 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:fast-string>=?");
+
+
+
+
+-return_direct_with_clo1(data, k_734943, (((closure) k_734943)->fn), Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_733053, str2_73354_733054), obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734491, (((closure) k_734491)->fn), Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_732706, str2_73354_732707), obj_int2obj(0)));;
+ }
+
+-static object __lambda_1448(void *data, object ptr,object str1_73351_733051, object str2_73352_733052) {
++static object __lambda_1401(void *data, object ptr,object str1_73351_732704, object str2_73352_732705) {
+
+ Cyc_st_add(data, "scheme/base.sld:fast-string>?");
+
+
+
+
+-return_copy(ptr, Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_733051, str2_73352_733052), obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_732704, str2_73352_732705), obj_int2obj(0)));;
+ }
+
+-static void __lambda_276(void *data, object _, int argc, object *args) /* closure _,object k_734939, object str1_73351_733051, object str2_73352_733052 */
++static void __lambda_276(void *data, object _, int argc, object *args) /* closure _,object k_734487, object str1_73351_732704, object str2_73352_732705 */
+ {
+-object k_734939 = args[0]; object str1_73351_733051 = args[1]; object str2_73352_733052 = args[2];
++object k_734487 = args[0]; object str1_73351_732704 = args[1]; object str2_73352_732705 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:fast-string>?");
+
+
+
+
+-return_direct_with_clo1(data, k_734939, (((closure) k_734939)->fn), Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_733051, str2_73352_733052), obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734487, (((closure) k_734487)->fn), Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_732704, str2_73352_732705), obj_int2obj(0)));;
+ }
+
+-static object __lambda_1447(void *data, object ptr,object str1_73349_733049, object str2_73350_733050) {
++static object __lambda_1400(void *data, object ptr,object str1_73349_732702, object str2_73350_732703) {
+
+ Cyc_st_add(data, "scheme/base.sld:fast-string<=?");
+
+
+
+
+-return_copy(ptr, Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_733049, str2_73350_733050), obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_732702, str2_73350_732703), obj_int2obj(0)));;
+ }
+
+-static void __lambda_275(void *data, object _, int argc, object *args) /* closure _,object k_734935, object str1_73349_733049, object str2_73350_733050 */
++static void __lambda_275(void *data, object _, int argc, object *args) /* closure _,object k_734483, object str1_73349_732702, object str2_73350_732703 */
+ {
+-object k_734935 = args[0]; object str1_73349_733049 = args[1]; object str2_73350_733050 = args[2];
++object k_734483 = args[0]; object str1_73349_732702 = args[1]; object str2_73350_732703 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:fast-string<=?");
+
+
+
+
+-return_direct_with_clo1(data, k_734935, (((closure) k_734935)->fn), Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_733049, str2_73350_733050), obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734483, (((closure) k_734483)->fn), Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_732702, str2_73350_732703), obj_int2obj(0)));;
+ }
+
+-static object __lambda_1446(void *data, object ptr,object str1_73347_733047, object str2_73348_733048) {
++static object __lambda_1399(void *data, object ptr,object str1_73347_732700, object str2_73348_732701) {
+
+ Cyc_st_add(data, "scheme/base.sld:fast-string<?");
+
+
+
+
+-return_copy(ptr, Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_733047, str2_73348_733048), obj_int2obj(0)));;
++return_copy(ptr, Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_732700, str2_73348_732701), obj_int2obj(0)));;
+ }
+
+-static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_734931, object str1_73347_733047, object str2_73348_733048 */
++static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_734479, object str1_73347_732700, object str2_73348_732701 */
+ {
+-object k_734931 = args[0]; object str1_73347_733047 = args[1]; object str2_73348_733048 = args[2];
++object k_734479 = args[0]; object str1_73347_732700 = args[1]; object str2_73348_732701 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:fast-string<?");
+
+
+
+
+-return_direct_with_clo1(data, k_734931, (((closure) k_734931)->fn), Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_733047, str2_73348_733048), obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734479, (((closure) k_734479)->fn), Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_732700, str2_73348_732701), obj_int2obj(0)));;
+ }
+
+-static object __lambda_1445(void *data, object ptr,object str1_73345_733045, object str2_73346_733046) {
++static object __lambda_1398(void *data, object ptr,object str1_73345_732698, object str2_73346_732699) {
+
+ Cyc_st_add(data, "scheme/base.sld:fast-string=?");
+
+
+
+
+-return_copy(ptr, equalp(Cyc_string_cmp(data, str1_73345_733045, str2_73346_733046), obj_int2obj(0)));;
++return_copy(ptr, equalp(Cyc_string_cmp(data, str1_73345_732698, str2_73346_732699), obj_int2obj(0)));;
+ }
+
+-static void __lambda_273(void *data, object _, int argc, object *args) /* closure _,object k_734927, object str1_73345_733045, object str2_73346_733046 */
++static void __lambda_273(void *data, object _, int argc, object *args) /* closure _,object k_734475, object str1_73345_732698, object str2_73346_732699 */
+ {
+-object k_734927 = args[0]; object str1_73345_733045 = args[1]; object str2_73346_733046 = args[2];
++object k_734475 = args[0]; object str1_73345_732698 = args[1]; object str2_73346_732699 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:fast-string=?");
+
+
+
+
+-return_direct_with_clo1(data, k_734927, (((closure) k_734927)->fn), equalp(Cyc_string_cmp(data, str1_73345_733045, str2_73346_733046), obj_int2obj(0)));;
++return_direct_with_clo1(data, k_734475, (((closure) k_734475)->fn), equalp(Cyc_string_cmp(data, str1_73345_732698, str2_73346_732699), obj_int2obj(0)));;
+ }
+
+-static void __lambda_272(void *data, object _, int argc, object *args) /* closure _,object k_734923, object str1_73342_733042, object str2_73343_733043, object strs_73344_733044_raw, ... */
++static void __lambda_272(void *data, object _, int argc, object *args) /* closure _,object k_734471, object str1_73342_732695, object str2_73343_732696, object strs_73344_732697_raw, ... */
+ {
+-object k_734923 = args[0]; object str1_73342_733042 = args[1]; object str2_73343_733043 = args[2];
+-load_varargs(strs_73344_733044, args, 3, argc - 3);
++object k_734471 = args[0]; object str1_73342_732695 = args[1]; object str2_73343_732696 = args[2];
++load_varargs(strs_73344_732697, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string>=?");
+
+-pair_type local_7316863;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734923, __glo_fast_91string_125_123_127_scheme_base, str1_73342_733042, set_pair_as_expr(&local_7316863, str2_73343_733043, strs_73344_733044));;
++pair_type local_7315563;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734471, __glo_fast_91string_125_123_127_scheme_base, str1_73342_732695, set_pair_as_expr(&local_7315563, str2_73343_732696, strs_73344_732697));;
+ }
+
+-static void __lambda_271(void *data, object _, int argc, object *args) /* closure _,object k_734919, object str1_73339_733039, object str2_73340_733040, object strs_73341_733041_raw, ... */
++static void __lambda_271(void *data, object _, int argc, object *args) /* closure _,object k_734467, object str1_73339_732692, object str2_73340_732693, object strs_73341_732694_raw, ... */
+ {
+-object k_734919 = args[0]; object str1_73339_733039 = args[1]; object str2_73340_733040 = args[2];
+-load_varargs(strs_73341_733041, args, 3, argc - 3);
++object k_734467 = args[0]; object str1_73339_732692 = args[1]; object str2_73340_732693 = args[2];
++load_varargs(strs_73341_732694, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string>?");
+
+-pair_type local_7316858;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734919, __glo_fast_91string_125_127_scheme_base, str1_73339_733039, set_pair_as_expr(&local_7316858, str2_73340_733040, strs_73341_733041));;
++pair_type local_7315558;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734467, __glo_fast_91string_125_127_scheme_base, str1_73339_732692, set_pair_as_expr(&local_7315558, str2_73340_732693, strs_73341_732694));;
+ }
+
+-static void __lambda_270(void *data, object _, int argc, object *args) /* closure _,object k_734915, object str1_73336_733036, object str2_73337_733037, object strs_73338_733038_raw, ... */
++static void __lambda_270(void *data, object _, int argc, object *args) /* closure _,object k_734463, object str1_73336_732689, object str2_73337_732690, object strs_73338_732691_raw, ... */
+ {
+-object k_734915 = args[0]; object str1_73336_733036 = args[1]; object str2_73337_733037 = args[2];
+-load_varargs(strs_73338_733038, args, 3, argc - 3);
++object k_734463 = args[0]; object str1_73336_732689 = args[1]; object str2_73337_732690 = args[2];
++load_varargs(strs_73338_732691, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string<=?");
+
+-pair_type local_7316853;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734915, __glo_fast_91string_121_123_127_scheme_base, str1_73336_733036, set_pair_as_expr(&local_7316853, str2_73337_733037, strs_73338_733038));;
++pair_type local_7315553;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734463, __glo_fast_91string_121_123_127_scheme_base, str1_73336_732689, set_pair_as_expr(&local_7315553, str2_73337_732690, strs_73338_732691));;
+ }
+
+-static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_734911, object str1_73333_733033, object str2_73334_733034, object strs_73335_733035_raw, ... */
++static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_734459, object str1_73333_732686, object str2_73334_732687, object strs_73335_732688_raw, ... */
+ {
+-object k_734911 = args[0]; object str1_73333_733033 = args[1]; object str2_73334_733034 = args[2];
+-load_varargs(strs_73335_733035, args, 3, argc - 3);
++object k_734459 = args[0]; object str1_73333_732686 = args[1]; object str2_73334_732687 = args[2];
++load_varargs(strs_73335_732688, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string<?");
+
+-pair_type local_7316848;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734911, __glo_fast_91string_121_127_scheme_base, str1_73333_733033, set_pair_as_expr(&local_7316848, str2_73334_733034, strs_73335_733035));;
++pair_type local_7315548;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734459, __glo_fast_91string_121_127_scheme_base, str1_73333_732686, set_pair_as_expr(&local_7315548, str2_73334_732687, strs_73335_732688));;
+ }
+
+-static void __lambda_268(void *data, object _, int argc, object *args) /* closure _,object k_734907, object str1_73330_733030, object str2_73331_733031, object strs_73332_733032_raw, ... */
++static void __lambda_268(void *data, object _, int argc, object *args) /* closure _,object k_734455, object str1_73330_732683, object str2_73331_732684, object strs_73332_732685_raw, ... */
+ {
+-object k_734907 = args[0]; object str1_73330_733030 = args[1]; object str2_73331_733031 = args[2];
+-load_varargs(strs_73332_733032, args, 3, argc - 3);
++object k_734455 = args[0]; object str1_73330_732683 = args[1]; object str2_73331_732684 = args[2];
++load_varargs(strs_73332_732685, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:string=?");
+
+-pair_type local_7316843;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734907, __glo_fast_91string_123_127_scheme_base, str1_73330_733030, set_pair_as_expr(&local_7316843, str2_73331_733031, strs_73332_733032));;
++pair_type local_7315543;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), k_734455, __glo_fast_91string_123_127_scheme_base, str1_73330_732683, set_pair_as_expr(&local_7315543, str2_73331_732684, strs_73332_732685));;
+ }
+
+-static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_734903, object c1_73327_733027, object c2_73328_733028, object cs_73329_733029_raw, ... */
++static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_734451, object c1_73327_732680, object c2_73328_732681, object cs_73329_732682_raw, ... */
+ {
+-object k_734903 = args[0]; object c1_73327_733027 = args[1]; object c2_73328_733028 = args[2];
+-load_varargs(cs_73329_733029, args, 3, argc - 3);
++object k_734451 = args[0]; object c1_73327_732680 = args[1]; object c2_73328_732681 = args[2];
++load_varargs(cs_73329_732682, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:char>=?");
+
+-pair_type local_7316838;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734903, primitive__125_123, c1_73327_733027, set_pair_as_expr(&local_7316838, c2_73328_733028, cs_73329_733029));;
++pair_type local_7315538;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734451, primitive__125_123, c1_73327_732680, set_pair_as_expr(&local_7315538, c2_73328_732681, cs_73329_732682));;
+ }
+
+-static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_734899, object c1_73324_733024, object c2_73325_733025, object cs_73326_733026_raw, ... */
++static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_734447, object c1_73324_732677, object c2_73325_732678, object cs_73326_732679_raw, ... */
+ {
+-object k_734899 = args[0]; object c1_73324_733024 = args[1]; object c2_73325_733025 = args[2];
+-load_varargs(cs_73326_733026, args, 3, argc - 3);
++object k_734447 = args[0]; object c1_73324_732677 = args[1]; object c2_73325_732678 = args[2];
++load_varargs(cs_73326_732679, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:char<=?");
+
+-pair_type local_7316833;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734899, primitive__121_123, c1_73324_733024, set_pair_as_expr(&local_7316833, c2_73325_733025, cs_73326_733026));;
++pair_type local_7315533;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734447, primitive__121_123, c1_73324_732677, set_pair_as_expr(&local_7315533, c2_73325_732678, cs_73326_732679));;
+ }
+
+-static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_734895, object c1_73321_733021, object c2_73322_733022, object cs_73323_733023_raw, ... */
++static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_734443, object c1_73321_732674, object c2_73322_732675, object cs_73323_732676_raw, ... */
+ {
+-object k_734895 = args[0]; object c1_73321_733021 = args[1]; object c2_73322_733022 = args[2];
+-load_varargs(cs_73323_733023, args, 3, argc - 3);
++object k_734443 = args[0]; object c1_73321_732674 = args[1]; object c2_73322_732675 = args[2];
++load_varargs(cs_73323_732676, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:char>?");
+
+-pair_type local_7316828;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734895, primitive__125, c1_73321_733021, set_pair_as_expr(&local_7316828, c2_73322_733022, cs_73323_733023));;
++pair_type local_7315528;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734443, primitive__125, c1_73321_732674, set_pair_as_expr(&local_7315528, c2_73322_732675, cs_73323_732676));;
+ }
+
+-static void __lambda_264(void *data, object _, int argc, object *args) /* closure _,object k_734891, object c1_73318_733018, object c2_73319_733019, object cs_73320_733020_raw, ... */
++static void __lambda_264(void *data, object _, int argc, object *args) /* closure _,object k_734439, object c1_73318_732671, object c2_73319_732672, object cs_73320_732673_raw, ... */
+ {
+-object k_734891 = args[0]; object c1_73318_733018 = args[1]; object c2_73319_733019 = args[2];
+-load_varargs(cs_73320_733020, args, 3, argc - 3);
++object k_734439 = args[0]; object c1_73318_732671 = args[1]; object c2_73319_732672 = args[2];
++load_varargs(cs_73320_732673, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:char<?");
+
+-pair_type local_7316823;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734891, primitive__121, c1_73318_733018, set_pair_as_expr(&local_7316823, c2_73319_733019, cs_73320_733020));;
++pair_type local_7315523;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734439, primitive__121, c1_73318_732671, set_pair_as_expr(&local_7315523, c2_73319_732672, cs_73320_732673));;
+ }
+
+-static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_734887, object c1_73315_733015, object c2_73316_733016, object cs_73317_733017_raw, ... */
++static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_734435, object c1_73315_732668, object c2_73316_732669, object cs_73317_732670_raw, ... */
+ {
+-object k_734887 = args[0]; object c1_73315_733015 = args[1]; object c2_73316_733016 = args[2];
+-load_varargs(cs_73317_733017, args, 3, argc - 3);
++object k_734435 = args[0]; object c1_73315_732668 = args[1]; object c2_73316_732669 = args[2];
++load_varargs(cs_73317_732670, args, 3, argc - 3);
+ Cyc_st_add(data, "scheme/base.sld:char=?");
+
+-pair_type local_7316818;
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734887, primitive__123, c1_73315_733015, set_pair_as_expr(&local_7316818, c2_73316_733016, cs_73317_733017));;
++pair_type local_7315518;
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_91char_scheme_base, (((closure) __glo_Cyc_91bin_91op_91char_scheme_base)->fn), k_734435, primitive__123, c1_73315_732668, set_pair_as_expr(&local_7315518, c2_73316_732669, cs_73317_732670));;
+ }
+
+-static void __lambda_260(void *data, object _, int argc, object *args) /* closure _,object k_734880, object cmp_73310_733010, object c_73311_733011, object cs_73312_733012 */
++static void __lambda_260(void *data, object _, int argc, object *args) /* closure _,object k_734428, object cmp_73310_732663, object c_73311_732664, object cs_73312_732665 */
+ {
+-object k_734880 = args[0]; object cmp_73310_733010 = args[1]; object c_73311_733011 = args[2]; object cs_73312_733012 = args[3];
++object k_734428 = args[0]; object cmp_73310_732663 = args[1]; object c_73311_732664 = args[2]; object cs_73312_732665 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op-char");
+
+-closureN_type c_7316800;
+-object e_7316805 [3];
+-c_7316800.hdr.mark = gc_color_red;
+- c_7316800.hdr.grayed = 0;
+-c_7316800.tag = closureN_tag;
+- c_7316800.fn = (function_type)__lambda_261;
+-c_7316800.num_args = 1;
+-c_7316800.num_elements = 3;
+-c_7316800.elements = (object *)e_7316805;
+-c_7316800.elements[0] = c_73311_733011;
+-c_7316800.elements[1] = cs_73312_733012;
+-c_7316800.elements[2] = k_734880;
++closureN_type c_7315500;
++object e_7315505 [3];
++c_7315500.hdr.mark = gc_color_red;
++ c_7315500.hdr.grayed = 0;
++c_7315500.tag = closureN_tag;
++ c_7315500.fn = (function_type)__lambda_261;
++c_7315500.num_args = 1;
++c_7315500.num_elements = 3;
++c_7315500.elements = (object *)e_7315505;
++c_7315500.elements[0] = c_73311_732664;
++c_7315500.elements[1] = cs_73312_732665;
++c_7315500.elements[2] = k_734428;
+
+
+-closureN_type c_7316806;
+-object e_7316813 [1];
+-c_7316806.hdr.mark = gc_color_red;
+- c_7316806.hdr.grayed = 0;
+-c_7316806.tag = closureN_tag;
+- c_7316806.fn = (function_type)__lambda_262;
+-c_7316806.num_args = 2;
+-c_7316806.num_elements = 1;
+-c_7316806.elements = (object *)e_7316813;
+-c_7316806.elements[0] = cmp_73310_733010;
++closureN_type c_7315506;
++object e_7315513 [1];
++c_7315506.hdr.mark = gc_color_red;
++ c_7315506.hdr.grayed = 0;
++c_7315506.tag = closureN_tag;
++ c_7315506.fn = (function_type)__lambda_262;
++c_7315506.num_args = 2;
++c_7315506.num_elements = 1;
++c_7315506.elements = (object *)e_7315513;
++c_7315506.elements[0] = cmp_73310_732663;
+
+-return_direct_with_clo1(data,(closure)&c_7316800,__lambda_261, &c_7316806);;
++return_direct_with_clo1(data,(closure)&c_7315500,__lambda_261, &c_7315506);;
+ }
+
+-static void __lambda_262(void *data, object self_7313289, int argc, object *args) /* object self_7313289, object k_734882, object x_73313_733013, object y_73314_733014 */
++static void __lambda_262(void *data, object self_7312036, int argc, object *args) /* object self_7312036, object k_734430, object x_73313_732666, object y_73314_732667 */
+ {
+- object k_734882 = args[0]; object x_73313_733013 = args[1]; object y_73314_733014 = args[2];
++ object k_734430 = args[0]; object x_73313_732666 = args[1]; object y_73314_732667 = args[2];
+
+
+
+
+-return_closcall3(data, ((closureN)self_7313289)->elements[0], k_734882, Cyc_char2integer(x_73313_733013), Cyc_char2integer(y_73314_733014));;
++return_closcall3(data, ((closureN)self_7312036)->elements[0], k_734430, Cyc_char2integer(x_73313_732666), Cyc_char2integer(y_73314_732667));;
+ }
+
+-static void __lambda_261(void *data, object self_7313290, int argc, object *args) /* object self_7313290, object r_734881 */
++static void __lambda_261(void *data, object self_7312037, int argc, object *args) /* object self_7312037, object r_734429 */
+ {
+- object r_734881 = args[0];
+- return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), ((closureN)self_7313290)->elements[2], r_734881, ((closureN)self_7313290)->elements[0], ((closureN)self_7313290)->elements[1]);;
++ object r_734429 = args[0];
++ return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), ((closureN)self_7312037)->elements[2], r_734429, ((closureN)self_7312037)->elements[0], ((closureN)self_7312037)->elements[1]);;
+ }
+
+-static void __lambda_258(void *data, object _, int argc, object *args) /* closure _,object k_734872, object cmp_73300_733007, object x_73301_733008, object lst_73302_733009 */
++static void __lambda_258(void *data, object _, int argc, object *args) /* closure _,object k_734420, object cmp_73300_732660, object x_73301_732661, object lst_73302_732662 */
+ {
+-object k_734872 = args[0]; object cmp_73300_733007 = args[1]; object x_73301_733008 = args[2]; object lst_73302_733009 = args[3];
++object k_734420 = args[0]; object cmp_73300_732660 = args[1]; object x_73301_732661 = args[2]; object lst_73302_732662 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op");
+
+-if( (boolean_f != Cyc_is_null(lst_73302_733009)) ){
+- return_direct_with_clo1(data, k_734872, (((closure) k_734872)->fn), boolean_t);
++if( (boolean_f != Cyc_is_null(lst_73302_732662)) ){
++ return_direct_with_clo1(data, k_734420, (((closure) k_734420)->fn), boolean_t);
+ } else {
+
+-closureN_type c_7316783;
+-object e_7316795 [3];
+-c_7316783.hdr.mark = gc_color_red;
+- c_7316783.hdr.grayed = 0;
+-c_7316783.tag = closureN_tag;
+- c_7316783.fn = (function_type)__lambda_259;
+-c_7316783.num_args = 1;
+-c_7316783.num_elements = 3;
+-c_7316783.elements = (object *)e_7316795;
+-c_7316783.elements[0] = cmp_73300_733007;
+-c_7316783.elements[1] = k_734872;
+-c_7316783.elements[2] = lst_73302_733009;
++closureN_type c_7315483;
++object e_7315495 [3];
++c_7315483.hdr.mark = gc_color_red;
++ c_7315483.hdr.grayed = 0;
++c_7315483.tag = closureN_tag;
++ c_7315483.fn = (function_type)__lambda_259;
++c_7315483.num_args = 1;
++c_7315483.num_elements = 3;
++c_7315483.elements = (object *)e_7315495;
++c_7315483.elements[0] = cmp_73300_732660;
++c_7315483.elements[1] = k_734420;
++c_7315483.elements[2] = lst_73302_732662;
+
+
+
+-return_closcall3(data, cmp_73300_733007, &c_7316783, x_73301_733008, Cyc_car(data, lst_73302_733009));}
++return_closcall3(data, cmp_73300_732660, &c_7315483, x_73301_732661, Cyc_car(data, lst_73302_732662));}
+ ;;
+ }
+
+-static void __lambda_259(void *data, object self_7313288, int argc, object *args) /* object self_7313288, object r_734874 */
++static void __lambda_259(void *data, object self_7312035, int argc, object *args) /* object self_7312035, object r_734422 */
+ {
+- object r_734874 = args[0];
+- if( (boolean_f != r_734874) ){
++ object r_734422 = args[0];
++ if( (boolean_f != r_734422) ){
+
+
+
+
+-return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), ((closureN)self_7313288)->elements[1], ((closureN)self_7313288)->elements[0], Cyc_car(data, ((closureN)self_7313288)->elements[2]), Cyc_cdr(data, ((closureN)self_7313288)->elements[2]));
++return_direct_with_clo4(data, __glo_Cyc_91bin_91op_scheme_base, (((closure) __glo_Cyc_91bin_91op_scheme_base)->fn), ((closureN)self_7312035)->elements[1], ((closureN)self_7312035)->elements[0], Cyc_car(data, ((closureN)self_7312035)->elements[2]), Cyc_cdr(data, ((closureN)self_7312035)->elements[2]));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313288)->elements[1], (((closure) ((closureN)self_7313288)->elements[1])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7312035)->elements[1], (((closure) ((closureN)self_7312035)->elements[1])->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_734867, object port_73297_733004, object proc_73298_733005 */
++static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_734415, object port_73297_732657, object proc_73298_732658 */
+ {
+-object k_734867 = args[0]; object port_73297_733004 = args[1]; object proc_73298_733005 = args[2];
++object k_734415 = args[0]; object port_73297_732657 = args[1]; object proc_73298_732658 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:call-with-port");
+
+-closureN_type c_7316770;
+-object e_7316777 [2];
+-c_7316770.hdr.mark = gc_color_red;
+- c_7316770.hdr.grayed = 0;
+-c_7316770.tag = closureN_tag;
+- c_7316770.fn = (function_type)__lambda_257;
+-c_7316770.num_args = 1;
+-c_7316770.num_elements = 2;
+-c_7316770.elements = (object *)e_7316777;
+-c_7316770.elements[0] = k_734867;
+-c_7316770.elements[1] = port_73297_733004;
++closureN_type c_7315470;
++object e_7315477 [2];
++c_7315470.hdr.mark = gc_color_red;
++ c_7315470.hdr.grayed = 0;
++c_7315470.tag = closureN_tag;
++ c_7315470.fn = (function_type)__lambda_257;
++c_7315470.num_args = 1;
++c_7315470.num_elements = 2;
++c_7315470.elements = (object *)e_7315477;
++c_7315470.elements[0] = k_734415;
++c_7315470.elements[1] = port_73297_732657;
+
+-return_closcall2(data, proc_73298_733005, &c_7316770, port_73297_733004);;
++return_closcall2(data, proc_73298_732658, &c_7315470, port_73297_732657);;
+ }
+
+-static void __lambda_257(void *data, object self_7313287, int argc, object *args) /* object self_7313287, object result_73299_733006 */
++static void __lambda_257(void *data, object self_7312034, int argc, object *args) /* object self_7312034, object result_73299_732659 */
+ {
+- object result_73299_733006 = args[0];
++ object result_73299_732659 = args[0];
+
+- Cyc_io_close_port(data, ((closureN)self_7313287)->elements[1]);return_direct_with_clo1(data, ((closureN)self_7313287)->elements[0], (((closure) ((closureN)self_7313287)->elements[0])->fn), result_73299_733006);;;
++ Cyc_io_close_port(data, ((closureN)self_7312034)->elements[1]);return_direct_with_clo1(data, ((closureN)self_7312034)->elements[0], (((closure) ((closureN)self_7312034)->elements[0])->fn), result_73299_732659);;;
+ }
+
+-static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_734861, object before_73293_733000, object thunk_73294_733001, object after_73295_733002 */
++static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_734409, object before_73293_732653, object thunk_73294_732654, object after_73295_732655 */
+ {
+-object k_734861 = args[0]; object before_73293_733000 = args[1]; object thunk_73294_733001 = args[2]; object after_73295_733002 = args[3];
++object k_734409 = args[0]; object before_73293_732653 = args[1]; object thunk_73294_732654 = args[2]; object after_73295_732655 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:dynamic-wind");
+
+-closureN_type c_7316755;
+-object e_7316767 [3];
+-c_7316755.hdr.mark = gc_color_red;
+- c_7316755.hdr.grayed = 0;
+-c_7316755.tag = closureN_tag;
+- c_7316755.fn = (function_type)__lambda_253;
+-c_7316755.num_args = 1;
+-c_7316755.num_elements = 3;
+-c_7316755.elements = (object *)e_7316767;
+-c_7316755.elements[0] = after_73295_733002;
+-c_7316755.elements[1] = k_734861;
+-c_7316755.elements[2] = thunk_73294_733001;
++closureN_type c_7315455;
++object e_7315467 [3];
++c_7315455.hdr.mark = gc_color_red;
++ c_7315455.hdr.grayed = 0;
++c_7315455.tag = closureN_tag;
++ c_7315455.fn = (function_type)__lambda_253;
++c_7315455.num_args = 1;
++c_7315455.num_elements = 3;
++c_7315455.elements = (object *)e_7315467;
++c_7315455.elements[0] = after_73295_732655;
++c_7315455.elements[1] = k_734409;
++c_7315455.elements[2] = thunk_73294_732654;
+
+-return_closcall1(data, before_73293_733000, &c_7316755);;
++return_closcall1(data, before_73293_732653, &c_7315455);;
+ }
+
+-static void __lambda_253(void *data, object self_7313284, int argc, object *args) /* object self_7313284, object r_734862 */
++static void __lambda_253(void *data, object self_7312031, int argc, object *args) /* object self_7312031, object r_734410 */
+ {
+
+
+-closureN_type c_7316758;
+-object e_7316766 [2];
+-c_7316758.hdr.mark = gc_color_red;
+- c_7316758.hdr.grayed = 0;
+-c_7316758.tag = closureN_tag;
+- c_7316758.fn = (function_type)__lambda_254;
+-c_7316758.num_args = 1;
+-c_7316758.num_elements = 2;
+-c_7316758.elements = (object *)e_7316766;
+-c_7316758.elements[0] = ((closureN)self_7313284)->elements[0];
+-c_7316758.elements[1] = ((closureN)self_7313284)->elements[1];
++closureN_type c_7315458;
++object e_7315466 [2];
++c_7315458.hdr.mark = gc_color_red;
++ c_7315458.hdr.grayed = 0;
++c_7315458.tag = closureN_tag;
++ c_7315458.fn = (function_type)__lambda_254;
++c_7315458.num_args = 1;
++c_7315458.num_elements = 2;
++c_7315458.elements = (object *)e_7315466;
++c_7315458.elements[0] = ((closureN)self_7312031)->elements[0];
++c_7315458.elements[1] = ((closureN)self_7312031)->elements[1];
+
+-return_closcall1(data, ((closureN)self_7313284)->elements[2], &c_7316758);;
++return_closcall1(data, ((closureN)self_7312031)->elements[2], &c_7315458);;
+ }
+
+-static void __lambda_254(void *data, object self_7313285, int argc, object *args) /* object self_7313285, object result_73296_733003 */
++static void __lambda_254(void *data, object self_7312032, int argc, object *args) /* object self_7312032, object result_73296_732656 */
+ {
+- object result_73296_733003 = args[0];
++ object result_73296_732656 = args[0];
+
+-closureN_type c_7316761;
+-object e_7316765 [2];
+-c_7316761.hdr.mark = gc_color_red;
+- c_7316761.hdr.grayed = 0;
+-c_7316761.tag = closureN_tag;
+- c_7316761.fn = (function_type)__lambda_255;
+-c_7316761.num_args = 1;
+-c_7316761.num_elements = 2;
+-c_7316761.elements = (object *)e_7316765;
+-c_7316761.elements[0] = ((closureN)self_7313285)->elements[1];
+-c_7316761.elements[1] = result_73296_733003;
++closureN_type c_7315461;
++object e_7315465 [2];
++c_7315461.hdr.mark = gc_color_red;
++ c_7315461.hdr.grayed = 0;
++c_7315461.tag = closureN_tag;
++ c_7315461.fn = (function_type)__lambda_255;
++c_7315461.num_args = 1;
++c_7315461.num_elements = 2;
++c_7315461.elements = (object *)e_7315465;
++c_7315461.elements[0] = ((closureN)self_7312032)->elements[1];
++c_7315461.elements[1] = result_73296_732656;
+
+-return_closcall1(data, ((closureN)self_7313285)->elements[0], &c_7316761);;
++return_closcall1(data, ((closureN)self_7312032)->elements[0], &c_7315461);;
+ }
+
+-static void __lambda_255(void *data, object self_7313286, int argc, object *args) /* object self_7313286, object r_734864 */
++static void __lambda_255(void *data, object self_7312033, int argc, object *args) /* object self_7312033, object r_734412 */
+ {
+
+- return_direct_with_clo1(data, ((closureN)self_7313286)->elements[0], (((closure) ((closureN)self_7313286)->elements[0])->fn), ((closureN)self_7313286)->elements[1]);;
++ return_direct_with_clo1(data, ((closureN)self_7312033)->elements[0], (((closure) ((closureN)self_7312033)->elements[0])->fn), ((closureN)self_7312033)->elements[1]);;
+ }
+
+-static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_734849, object producer_73289_732997, object consumer_73290_732998 */
++static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_734397, object producer_73289_732650, object consumer_73290_732651 */
+ {
+-object k_734849 = args[0]; object producer_73289_732997 = args[1]; object consumer_73290_732998 = args[2];
++object k_734397 = args[0]; object producer_73289_732650 = args[1]; object consumer_73290_732651 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:call-with-values");
+
+-closureN_type c_7316728;
+-object e_7316752 [2];
+-c_7316728.hdr.mark = gc_color_red;
+- c_7316728.hdr.grayed = 0;
+-c_7316728.tag = closureN_tag;
+- c_7316728.fn = (function_type)__lambda_251;
+-c_7316728.num_args = 1;
+-c_7316728.num_elements = 2;
+-c_7316728.elements = (object *)e_7316752;
+-c_7316728.elements[0] = consumer_73290_732998;
+-c_7316728.elements[1] = k_734849;
++closureN_type c_7315428;
++object e_7315452 [2];
++c_7315428.hdr.mark = gc_color_red;
++ c_7315428.hdr.grayed = 0;
++c_7315428.tag = closureN_tag;
++ c_7315428.fn = (function_type)__lambda_251;
++c_7315428.num_args = 1;
++c_7315428.num_elements = 2;
++c_7315428.elements = (object *)e_7315452;
++c_7315428.elements[0] = consumer_73290_732651;
++c_7315428.elements[1] = k_734397;
+
+-return_closcall1(data, producer_73289_732997, &c_7316728);;
++return_closcall1(data, producer_73289_732650, &c_7315428);;
+ }
+
+-static void __lambda_251(void *data, object self_7313283, int argc, object *args) /* object self_7313283, object x_73291_732999 */
++static void __lambda_251(void *data, object self_7312030, int argc, object *args) /* object self_7312030, object x_73291_732652 */
+ {
+- object x_73291_732999 = args[0];
+- object r_734851;
++ object x_73291_732652 = args[0];
++ object r_734399;
+
+-if( (boolean_f != Cyc_is_pair(x_73291_732999)) ){
++if( (boolean_f != Cyc_is_pair(x_73291_732652)) ){
+
+
+- object local_7316739 = alloca(sizeof(pair_type));
+- r_734851 = equalp(Cyc_car(data, x_73291_732999), set_pair_as_expr(local_7316739, quote_multiple, quote_values));
++ object local_7315439 = alloca(sizeof(pair_type));
++ r_734399 = equalp(Cyc_car(data, x_73291_732652), set_pair_as_expr(local_7315439, quote_multiple, quote_values));
+ } else {
+- r_734851 = boolean_f;}
+-;if( (boolean_f != r_734851) ){
++ r_734399 = boolean_f;}
++;if( (boolean_f != r_734399) ){
+
+
+
+-object c_7316745 = apply(data, ((closureN)self_7313283)->elements[1],((closureN)self_7313283)->elements[0], Cyc_cdr(data, x_73291_732999));
+-return_direct_with_clo1(data, ((closureN)self_7313283)->elements[1], (((closure) ((closureN)self_7313283)->elements[1])->fn), c_7316745);
++object c_7315445 = apply(data, ((closureN)self_7312030)->elements[1],((closureN)self_7312030)->elements[0], Cyc_cdr(data, x_73291_732652));
++return_direct_with_clo1(data, ((closureN)self_7312030)->elements[1], (((closure) ((closureN)self_7312030)->elements[1])->fn), c_7315445);
+ } else {
+- return_closcall2(data, ((closureN)self_7313283)->elements[0], ((closureN)self_7313283)->elements[1], x_73291_732999);}
++ return_closcall2(data, ((closureN)self_7312030)->elements[0], ((closureN)self_7312030)->elements[1], x_73291_732652);}
+ ;;
+ }
+
+-static void __lambda_249(void *data, object _, int argc, object *args) /* closure _,object k_734839, object args_73287_732996_raw, ... */
++static void __lambda_249(void *data, object _, int argc, object *args) /* closure _,object k_734387, object args_73287_732649_raw, ... */
+ {
+-object k_734839 = args[0];
+-load_varargs(args_73287_732996, args, 1, argc - 1);
+- object r_734840;
++object k_734387 = args[0];
++load_varargs(args_73287_732649, args, 1, argc - 1);
++ object r_734388;
+ Cyc_st_add(data, "scheme/base.sld:values");
+
+-if( (boolean_f != Cyc_is_null(args_73287_732996)) ){
+- r_734840 = boolean_f;
++if( (boolean_f != Cyc_is_null(args_73287_732649)) ){
++ r_734388 = boolean_f;
+ } else {
+
+
+- r_734840 = Cyc_is_null(Cyc_cdr(data, args_73287_732996));}
+-;if( (boolean_f != r_734840) ){
++ r_734388 = Cyc_is_null(Cyc_cdr(data, args_73287_732649));}
++;if( (boolean_f != r_734388) ){
+
+
+-return_direct_with_clo1(data, k_734839, (((closure) k_734839)->fn), Cyc_car(data, args_73287_732996));
++return_direct_with_clo1(data, k_734387, (((closure) k_734387)->fn), Cyc_car(data, args_73287_732649));
+ } else {
+
+-pair_type local_7316722;
++pair_type local_7315422;
+
+-pair_type local_7316725;
+-return_direct_with_clo1(data, k_734839, (((closure) k_734839)->fn), set_pair_as_expr(&local_7316722, set_pair_as_expr(&local_7316725, quote_multiple, quote_values), args_73287_732996));}
++pair_type local_7315425;
++return_direct_with_clo1(data, k_734387, (((closure) k_734387)->fn), set_pair_as_expr(&local_7315422, set_pair_as_expr(&local_7315425, quote_multiple, quote_values), args_73287_732649));}
+ ;;
+ }
+
+-static void __lambda_248(void *data, object _, int argc, object *args) /* closure _,object k_734833, object expr_73284_732993, object rename_73285_732994, object compare_73286_732995 */
++static void __lambda_248(void *data, object _, int argc, object *args) /* closure _,object k_734381, object expr_73284_732646, object rename_73285_732647, object compare_73286_732648 */
+ {
+-object k_734833 = args[0]; object expr_73284_732993 = args[1];
++object k_734381 = args[0]; object expr_73284_732646 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:syntax-error");
+
+
+
+-object c_7316703 = apply(data, k_734833,__glo_error_scheme_base, Cyc_cdr(data, expr_73284_732993));
+-return_direct_with_clo1(data, k_734833, (((closure) k_734833)->fn), c_7316703);;
++object c_7315403 = apply(data, k_734381,__glo_error_scheme_base, Cyc_cdr(data, expr_73284_732646));
++return_direct_with_clo1(data, k_734381, (((closure) k_734381)->fn), c_7315403);;
+ }
+
+-static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_734745, object expr_73254_732985, object rename_73255_732986, object compare_73256_732987 */
++static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_734293, object expr_73254_732638, object rename_73255_732639, object compare_73256_732640 */
+ {
+-object k_734745 = args[0]; object expr_73254_732985 = args[1]; object rename_73255_732986 = args[2]; object compare_73256_732987 = args[3];
++object k_734293 = args[0]; object expr_73254_732638 = args[1]; object rename_73255_732639 = args[2]; object compare_73256_732640 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:quasiquote");
+
+-closureN_type c_7316368;
+-object e_7316698 [4];
+-c_7316368.hdr.mark = gc_color_red;
+- c_7316368.hdr.grayed = 0;
+-c_7316368.tag = closureN_tag;
+- c_7316368.fn = (function_type)__lambda_214;
+-c_7316368.num_args = 1;
+-c_7316368.num_elements = 4;
+-c_7316368.elements = (object *)e_7316698;
+-c_7316368.elements[0] = compare_73256_732987;
+-c_7316368.elements[1] = expr_73254_732985;
+-c_7316368.elements[2] = k_734745;
+-c_7316368.elements[3] = rename_73255_732986;
+-
+-return_direct_with_clo1(data,(closure)&c_7316368,__lambda_214, boolean_f);;
+-}
+-
+-static void __lambda_214(void *data, object self_7313248, int argc, object *args) /* object self_7313248, object qq_732989 */
+- {
+- object qq_732989 = args[0];
+-
+-closureN_type c_7316370;
+-object e_7316694 [4];
+-c_7316370.hdr.mark = gc_color_red;
+- c_7316370.hdr.grayed = 0;
+-c_7316370.tag = closureN_tag;
+- c_7316370.fn = (function_type)__lambda_1356;
+-c_7316370.num_args = 1;
+-c_7316370.num_elements = 4;
+-c_7316370.elements = (object *)e_7316694;
+-c_7316370.elements[0] = ((closureN)self_7313248)->elements[0];
+-c_7316370.elements[1] = ((closureN)self_7313248)->elements[1];
+-c_7316370.elements[2] = ((closureN)self_7313248)->elements[2];
+-c_7316370.elements[3] = ((closureN)self_7313248)->elements[3];
+-
+-
+-pair_type local_7316697;
+-return_direct_with_clo1(data,(closure)&c_7316370,__lambda_1356, set_cell_as_expr(&local_7316697, qq_732989));;
+-}
+-
+-static void __lambda_1356(void *data, object self_7313249, int argc, object *args) /* object self_7313249, object qq_732989 */
+- {
+- object qq_732989 = args[0];
+-
+-closureN_type c_7316372;
+-object e_7316387 [3];
+-c_7316372.hdr.mark = gc_color_red;
+- c_7316372.hdr.grayed = 0;
+-c_7316372.tag = closureN_tag;
+- c_7316372.fn = (function_type)__lambda_215;
+-c_7316372.num_args = 1;
+-c_7316372.num_elements = 3;
+-c_7316372.elements = (object *)e_7316387;
+-c_7316372.elements[0] = ((closureN)self_7313249)->elements[1];
+-c_7316372.elements[1] = ((closureN)self_7313249)->elements[2];
+-c_7316372.elements[2] = qq_732989;
+-
+-
+-closureN_type c_7316388;
+-object e_7316693 [3];
+-c_7316388.hdr.mark = gc_color_red;
+- c_7316388.hdr.grayed = 0;
+-c_7316388.tag = closureN_tag;
+- c_7316388.fn = (function_type)__lambda_217;
+-c_7316388.num_args = 2;
+-c_7316388.num_elements = 3;
+-c_7316388.elements = (object *)e_7316693;
+-c_7316388.elements[0] = ((closureN)self_7313249)->elements[0];
+-c_7316388.elements[1] = qq_732989;
+-c_7316388.elements[2] = ((closureN)self_7313249)->elements[3];
+-
+-return_direct_with_clo1(data,(closure)&c_7316372,__lambda_215, &c_7316388);;
+-}
+-
+-static void __lambda_217(void *data, object self_7313250, int argc, object *args) /* object self_7313250, object k_734749, object x_73257_732991, object d_73258_732992 */
+- {
+- object k_734749 = args[0]; object x_73257_732991 = args[1]; object d_73258_732992 = args[2];
+-
+-if( (boolean_f != Cyc_is_pair(x_73257_732991)) ){
+-
+-closureN_type c_7316393;
+-object e_7316651 [6];
+-c_7316393.hdr.mark = gc_color_red;
+- c_7316393.hdr.grayed = 0;
+-c_7316393.tag = closureN_tag;
+- c_7316393.fn = (function_type)__lambda_218;
+-c_7316393.num_args = 1;
+-c_7316393.num_elements = 6;
+-c_7316393.elements = (object *)e_7316651;
+-c_7316393.elements[0] = ((closureN)self_7313250)->elements[0];
+-c_7316393.elements[1] = d_73258_732992;
+-c_7316393.elements[2] = k_734749;
+-c_7316393.elements[3] = ((closureN)self_7313250)->elements[1];
+-c_7316393.elements[4] = ((closureN)self_7313250)->elements[2];
+-c_7316393.elements[5] = x_73257_732991;
+-
+-return_closcall2(data, ((closureN)self_7313250)->elements[2], &c_7316393, quote_unquote);
+-} else {
+-
+-if( (boolean_f != Cyc_is_vector_not_record_type(x_73257_732991)) ){
+-
+-closureN_type c_7316656;
+-object e_7316674 [4];
+-c_7316656.hdr.mark = gc_color_red;
+- c_7316656.hdr.grayed = 0;
+-c_7316656.tag = closureN_tag;
+- c_7316656.fn = (function_type)__lambda_244;
+-c_7316656.num_args = 1;
+-c_7316656.num_elements = 4;
+-c_7316656.elements = (object *)e_7316674;
+-c_7316656.elements[0] = d_73258_732992;
+-c_7316656.elements[1] = k_734749;
+-c_7316656.elements[2] = ((closureN)self_7313250)->elements[1];
+-c_7316656.elements[3] = x_73257_732991;
+-
+-return_closcall2(data, ((closureN)self_7313250)->elements[2], &c_7316656, quote_list_91_125vector);
+-} else {
+- object r_734826;
+-
+-if( (boolean_f != Cyc_is_symbol(x_73257_732991)) ){
+- r_734826 = boolean_t;
+-} else {
+-
+- r_734826 = Cyc_is_null(x_73257_732991);}
+-;if( (boolean_f != r_734826) ){
+-
+-closureN_type c_7316684;
+-object e_7316691 [2];
+-c_7316684.hdr.mark = gc_color_red;
+- c_7316684.hdr.grayed = 0;
+-c_7316684.tag = closureN_tag;
+- c_7316684.fn = (function_type)__lambda_247;
+-c_7316684.num_args = 1;
+-c_7316684.num_elements = 2;
+-c_7316684.elements = (object *)e_7316691;
+-c_7316684.elements[0] = k_734749;
+-c_7316684.elements[1] = x_73257_732991;
++closureN_type c_7315068;
++object e_7315398 [4];
++c_7315068.hdr.mark = gc_color_red;
++ c_7315068.hdr.grayed = 0;
++c_7315068.tag = closureN_tag;
++ c_7315068.fn = (function_type)__lambda_214;
++c_7315068.num_args = 1;
++c_7315068.num_elements = 4;
++c_7315068.elements = (object *)e_7315398;
++c_7315068.elements[0] = compare_73256_732640;
++c_7315068.elements[1] = expr_73254_732638;
++c_7315068.elements[2] = k_734293;
++c_7315068.elements[3] = rename_73255_732639;
++
++return_direct_with_clo1(data,(closure)&c_7315068,__lambda_214, boolean_f);;
++}
++
++static void __lambda_214(void *data, object self_7311995, int argc, object *args) /* object self_7311995, object qq_732642 */
++ {
++ object qq_732642 = args[0];
++
++closureN_type c_7315070;
++object e_7315394 [4];
++c_7315070.hdr.mark = gc_color_red;
++ c_7315070.hdr.grayed = 0;
++c_7315070.tag = closureN_tag;
++ c_7315070.fn = (function_type)__lambda_1309;
++c_7315070.num_args = 1;
++c_7315070.num_elements = 4;
++c_7315070.elements = (object *)e_7315394;
++c_7315070.elements[0] = ((closureN)self_7311995)->elements[0];
++c_7315070.elements[1] = ((closureN)self_7311995)->elements[1];
++c_7315070.elements[2] = ((closureN)self_7311995)->elements[2];
++c_7315070.elements[3] = ((closureN)self_7311995)->elements[3];
++
++
++pair_type local_7315397;
++return_direct_with_clo1(data,(closure)&c_7315070,__lambda_1309, set_cell_as_expr(&local_7315397, qq_732642));;
++}
++
++static void __lambda_1309(void *data, object self_7311996, int argc, object *args) /* object self_7311996, object qq_732642 */
++ {
++ object qq_732642 = args[0];
++
++closureN_type c_7315072;
++object e_7315087 [3];
++c_7315072.hdr.mark = gc_color_red;
++ c_7315072.hdr.grayed = 0;
++c_7315072.tag = closureN_tag;
++ c_7315072.fn = (function_type)__lambda_215;
++c_7315072.num_args = 1;
++c_7315072.num_elements = 3;
++c_7315072.elements = (object *)e_7315087;
++c_7315072.elements[0] = ((closureN)self_7311996)->elements[1];
++c_7315072.elements[1] = ((closureN)self_7311996)->elements[2];
++c_7315072.elements[2] = qq_732642;
++
++
++closureN_type c_7315088;
++object e_7315393 [3];
++c_7315088.hdr.mark = gc_color_red;
++ c_7315088.hdr.grayed = 0;
++c_7315088.tag = closureN_tag;
++ c_7315088.fn = (function_type)__lambda_217;
++c_7315088.num_args = 2;
++c_7315088.num_elements = 3;
++c_7315088.elements = (object *)e_7315393;
++c_7315088.elements[0] = ((closureN)self_7311996)->elements[0];
++c_7315088.elements[1] = qq_732642;
++c_7315088.elements[2] = ((closureN)self_7311996)->elements[3];
++
++return_direct_with_clo1(data,(closure)&c_7315072,__lambda_215, &c_7315088);;
++}
++
++static void __lambda_217(void *data, object self_7311997, int argc, object *args) /* object self_7311997, object k_734297, object x_73257_732644, object d_73258_732645 */
++ {
++ object k_734297 = args[0]; object x_73257_732644 = args[1]; object d_73258_732645 = args[2];
++
++if( (boolean_f != Cyc_is_pair(x_73257_732644)) ){
++
++closureN_type c_7315093;
++object e_7315351 [6];
++c_7315093.hdr.mark = gc_color_red;
++ c_7315093.hdr.grayed = 0;
++c_7315093.tag = closureN_tag;
++ c_7315093.fn = (function_type)__lambda_218;
++c_7315093.num_args = 1;
++c_7315093.num_elements = 6;
++c_7315093.elements = (object *)e_7315351;
++c_7315093.elements[0] = ((closureN)self_7311997)->elements[0];
++c_7315093.elements[1] = d_73258_732645;
++c_7315093.elements[2] = k_734297;
++c_7315093.elements[3] = ((closureN)self_7311997)->elements[1];
++c_7315093.elements[4] = ((closureN)self_7311997)->elements[2];
++c_7315093.elements[5] = x_73257_732644;
++
++return_closcall2(data, ((closureN)self_7311997)->elements[2], &c_7315093, quote_unquote);
++} else {
++
++if( (boolean_f != Cyc_is_vector_not_record_type(x_73257_732644)) ){
++
++closureN_type c_7315356;
++object e_7315374 [4];
++c_7315356.hdr.mark = gc_color_red;
++ c_7315356.hdr.grayed = 0;
++c_7315356.tag = closureN_tag;
++ c_7315356.fn = (function_type)__lambda_244;
++c_7315356.num_args = 1;
++c_7315356.num_elements = 4;
++c_7315356.elements = (object *)e_7315374;
++c_7315356.elements[0] = d_73258_732645;
++c_7315356.elements[1] = k_734297;
++c_7315356.elements[2] = ((closureN)self_7311997)->elements[1];
++c_7315356.elements[3] = x_73257_732644;
++
++return_closcall2(data, ((closureN)self_7311997)->elements[2], &c_7315356, quote_list_91_125vector);
++} else {
++ object r_734374;
++
++if( (boolean_f != Cyc_is_symbol(x_73257_732644)) ){
++ r_734374 = boolean_t;
++} else {
++
++ r_734374 = Cyc_is_null(x_73257_732644);}
++;if( (boolean_f != r_734374) ){
++
++closureN_type c_7315384;
++object e_7315391 [2];
++c_7315384.hdr.mark = gc_color_red;
++ c_7315384.hdr.grayed = 0;
++c_7315384.tag = closureN_tag;
++ c_7315384.fn = (function_type)__lambda_247;
++c_7315384.num_args = 1;
++c_7315384.num_elements = 2;
++c_7315384.elements = (object *)e_7315391;
++c_7315384.elements[0] = k_734297;
++c_7315384.elements[1] = x_73257_732644;
+
+-return_closcall2(data, ((closureN)self_7313250)->elements[2], &c_7316684, quote_quote);
++return_closcall2(data, ((closureN)self_7311997)->elements[2], &c_7315384, quote_quote);
+ } else {
+- return_direct_with_clo1(data, k_734749, (((closure) k_734749)->fn), x_73257_732991);}
++ return_direct_with_clo1(data, k_734297, (((closure) k_734297)->fn), x_73257_732644);}
+ ;}
+ ;}
+ ;;
+ }
+
+-static void __lambda_247(void *data, object self_7313280, int argc, object *args) /* object self_7313280, object r_734827 */
++static void __lambda_247(void *data, object self_7312027, int argc, object *args) /* object self_7312027, object r_734375 */
+ {
+- object r_734827 = args[0];
++ object r_734375 = args[0];
+
+-list_2_type local_7316689;
+-return_direct_with_clo1(data, ((closureN)self_7313280)->elements[0], (((closure) ((closureN)self_7313280)->elements[0])->fn), Cyc_fast_list_2(&local_7316689, r_734827, ((closureN)self_7313280)->elements[1]));;
++list_2_type local_7315389;
++return_direct_with_clo1(data, ((closureN)self_7312027)->elements[0], (((closure) ((closureN)self_7312027)->elements[0])->fn), Cyc_fast_list_2(&local_7315389, r_734375, ((closureN)self_7312027)->elements[1]));;
+ }
+
+-static void __lambda_244(void *data, object self_7313277, int argc, object *args) /* object self_7313277, object r_734822 */
++static void __lambda_244(void *data, object self_7312024, int argc, object *args) /* object self_7312024, object r_734370 */
+ {
+- object r_734822 = args[0];
++ object r_734370 = args[0];
+
+-closureN_type c_7316658;
+-object e_7316672 [4];
+-c_7316658.hdr.mark = gc_color_red;
+- c_7316658.hdr.grayed = 0;
+-c_7316658.tag = closureN_tag;
+- c_7316658.fn = (function_type)__lambda_245;
+-c_7316658.num_args = 1;
+-c_7316658.num_elements = 4;
+-c_7316658.elements = (object *)e_7316672;
+-c_7316658.elements[0] = ((closureN)self_7313277)->elements[0];
+-c_7316658.elements[1] = ((closureN)self_7313277)->elements[1];
+-c_7316658.elements[2] = ((closureN)self_7313277)->elements[2];
+-c_7316658.elements[3] = r_734822;
++closureN_type c_7315358;
++object e_7315372 [4];
++c_7315358.hdr.mark = gc_color_red;
++ c_7315358.hdr.grayed = 0;
++c_7315358.tag = closureN_tag;
++ c_7315358.fn = (function_type)__lambda_245;
++c_7315358.num_args = 1;
++c_7315358.num_elements = 4;
++c_7315358.elements = (object *)e_7315372;
++c_7315358.elements[0] = ((closureN)self_7312024)->elements[0];
++c_7315358.elements[1] = ((closureN)self_7312024)->elements[1];
++c_7315358.elements[2] = ((closureN)self_7312024)->elements[2];
++c_7315358.elements[3] = r_734370;
+
+-return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7316658, ((closureN)self_7313277)->elements[3]);;
++return_direct_with_clo2(data, __glo_vector_91_125list_scheme_base, (((closure) __glo_vector_91_125list_scheme_base)->fn), &c_7315358, ((closureN)self_7312024)->elements[3]);;
+ }
+
+-static void __lambda_245(void *data, object self_7313278, int argc, object *args) /* object self_7313278, object r_734824 */
++static void __lambda_245(void *data, object self_7312025, int argc, object *args) /* object self_7312025, object r_734372 */
+ {
+- object r_734824 = args[0];
++ object r_734372 = args[0];
+
+
+
+-closureN_type c_7316663;
+-object e_7316670 [2];
+-c_7316663.hdr.mark = gc_color_red;
+- c_7316663.hdr.grayed = 0;
+-c_7316663.tag = closureN_tag;
+- c_7316663.fn = (function_type)__lambda_246;
+-c_7316663.num_args = 1;
+-c_7316663.num_elements = 2;
+-c_7316663.elements = (object *)e_7316670;
+-c_7316663.elements[0] = ((closureN)self_7313278)->elements[1];
+-c_7316663.elements[1] = ((closureN)self_7313278)->elements[3];
++closureN_type c_7315363;
++object e_7315370 [2];
++c_7315363.hdr.mark = gc_color_red;
++ c_7315363.hdr.grayed = 0;
++c_7315363.tag = closureN_tag;
++ c_7315363.fn = (function_type)__lambda_246;
++c_7315363.num_args = 1;
++c_7315363.num_elements = 2;
++c_7315363.elements = (object *)e_7315370;
++c_7315363.elements[0] = ((closureN)self_7312025)->elements[1];
++c_7315363.elements[1] = ((closureN)self_7312025)->elements[3];
+
+-return_closcall3(data, car(((closureN)self_7313278)->elements[2]), &c_7316663, r_734824, ((closureN)self_7313278)->elements[0]);;
++return_closcall3(data, car(((closureN)self_7312025)->elements[2]), &c_7315363, r_734372, ((closureN)self_7312025)->elements[0]);;
+ }
+
+-static void __lambda_246(void *data, object self_7313279, int argc, object *args) /* object self_7313279, object r_734823 */
++static void __lambda_246(void *data, object self_7312026, int argc, object *args) /* object self_7312026, object r_734371 */
+ {
+- object r_734823 = args[0];
++ object r_734371 = args[0];
+
+-list_2_type local_7316668;
+-return_direct_with_clo1(data, ((closureN)self_7313279)->elements[0], (((closure) ((closureN)self_7313279)->elements[0])->fn), Cyc_fast_list_2(&local_7316668, ((closureN)self_7313279)->elements[1], r_734823));;
++list_2_type local_7315368;
++return_direct_with_clo1(data, ((closureN)self_7312026)->elements[0], (((closure) ((closureN)self_7312026)->elements[0])->fn), Cyc_fast_list_2(&local_7315368, ((closureN)self_7312026)->elements[1], r_734371));;
+ }
+
+-static void __lambda_218(void *data, object self_7313251, int argc, object *args) /* object self_7313251, object r_734818 */
++static void __lambda_218(void *data, object self_7311998, int argc, object *args) /* object self_7311998, object r_734366 */
+ {
+- object r_734818 = args[0];
++ object r_734366 = args[0];
+
+-closureN_type c_7316396;
+-object e_7316647 [6];
+-c_7316396.hdr.mark = gc_color_red;
+- c_7316396.hdr.grayed = 0;
+-c_7316396.tag = closureN_tag;
+- c_7316396.fn = (function_type)__lambda_219;
+-c_7316396.num_args = 1;
+-c_7316396.num_elements = 6;
+-c_7316396.elements = (object *)e_7316647;
+-c_7316396.elements[0] = ((closureN)self_7313251)->elements[0];
+-c_7316396.elements[1] = ((closureN)self_7313251)->elements[1];
+-c_7316396.elements[2] = ((closureN)self_7313251)->elements[2];
+-c_7316396.elements[3] = ((closureN)self_7313251)->elements[3];
+-c_7316396.elements[4] = ((closureN)self_7313251)->elements[4];
+-c_7316396.elements[5] = ((closureN)self_7313251)->elements[5];
++closureN_type c_7315096;
++object e_7315347 [6];
++c_7315096.hdr.mark = gc_color_red;
++ c_7315096.hdr.grayed = 0;
++c_7315096.tag = closureN_tag;
++ c_7315096.fn = (function_type)__lambda_219;
++c_7315096.num_args = 1;
++c_7315096.num_elements = 6;
++c_7315096.elements = (object *)e_7315347;
++c_7315096.elements[0] = ((closureN)self_7311998)->elements[0];
++c_7315096.elements[1] = ((closureN)self_7311998)->elements[1];
++c_7315096.elements[2] = ((closureN)self_7311998)->elements[2];
++c_7315096.elements[3] = ((closureN)self_7311998)->elements[3];
++c_7315096.elements[4] = ((closureN)self_7311998)->elements[4];
++c_7315096.elements[5] = ((closureN)self_7311998)->elements[5];
+
+
+
+-return_closcall3(data, ((closureN)self_7313251)->elements[0], &c_7316396, r_734818, Cyc_car(data, ((closureN)self_7313251)->elements[5]));;
++return_closcall3(data, ((closureN)self_7311998)->elements[0], &c_7315096, r_734366, Cyc_car(data, ((closureN)self_7311998)->elements[5]));;
+ }
+
+-static void __lambda_219(void *data, object self_7313252, int argc, object *args) /* object self_7313252, object r_734751 */
++static void __lambda_219(void *data, object self_7311999, int argc, object *args) /* object self_7311999, object r_734299 */
+ {
+- object r_734751 = args[0];
+- if( (boolean_f != r_734751) ){
++ object r_734299 = args[0];
++ if( (boolean_f != r_734299) ){
+
+-if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313252)->elements[1], obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311999)->elements[1], obj_int2obj(0))) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313252)->elements[2], (((closure) ((closureN)self_7313252)->elements[2])->fn), Cyc_cadr(data, ((closureN)self_7313252)->elements[5]));
++return_direct_with_clo1(data, ((closureN)self_7311999)->elements[2], (((closure) ((closureN)self_7311999)->elements[2])->fn), Cyc_cadr(data, ((closureN)self_7311999)->elements[5]));
+ } else {
+
+-closureN_type c_7316407;
+-object e_7316435 [5];
+-c_7316407.hdr.mark = gc_color_red;
+- c_7316407.hdr.grayed = 0;
+-c_7316407.tag = closureN_tag;
+- c_7316407.fn = (function_type)__lambda_220;
+-c_7316407.num_args = 1;
+-c_7316407.num_elements = 5;
+-c_7316407.elements = (object *)e_7316435;
+-c_7316407.elements[0] = ((closureN)self_7313252)->elements[1];
+-c_7316407.elements[1] = ((closureN)self_7313252)->elements[2];
+-c_7316407.elements[2] = ((closureN)self_7313252)->elements[3];
+-c_7316407.elements[3] = ((closureN)self_7313252)->elements[4];
+-c_7316407.elements[4] = ((closureN)self_7313252)->elements[5];
++closureN_type c_7315107;
++object e_7315135 [5];
++c_7315107.hdr.mark = gc_color_red;
++ c_7315107.hdr.grayed = 0;
++c_7315107.tag = closureN_tag;
++ c_7315107.fn = (function_type)__lambda_220;
++c_7315107.num_args = 1;
++c_7315107.num_elements = 5;
++c_7315107.elements = (object *)e_7315135;
++c_7315107.elements[0] = ((closureN)self_7311999)->elements[1];
++c_7315107.elements[1] = ((closureN)self_7311999)->elements[2];
++c_7315107.elements[2] = ((closureN)self_7311999)->elements[3];
++c_7315107.elements[3] = ((closureN)self_7311999)->elements[4];
++c_7315107.elements[4] = ((closureN)self_7311999)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313252)->elements[4], &c_7316407, quote__list);}
++return_closcall2(data, ((closureN)self_7311999)->elements[4], &c_7315107, quote__list);}
+ ;
+ } else {
+
+-closureN_type c_7316438;
+-object e_7316646 [6];
+-c_7316438.hdr.mark = gc_color_red;
+- c_7316438.hdr.grayed = 0;
+-c_7316438.tag = closureN_tag;
+- c_7316438.fn = (function_type)__lambda_223;
+-c_7316438.num_args = 1;
+-c_7316438.num_elements = 6;
+-c_7316438.elements = (object *)e_7316646;
+-c_7316438.elements[0] = ((closureN)self_7313252)->elements[0];
+-c_7316438.elements[1] = ((closureN)self_7313252)->elements[1];
+-c_7316438.elements[2] = ((closureN)self_7313252)->elements[2];
+-c_7316438.elements[3] = ((closureN)self_7313252)->elements[3];
+-c_7316438.elements[4] = ((closureN)self_7313252)->elements[4];
+-c_7316438.elements[5] = ((closureN)self_7313252)->elements[5];
++closureN_type c_7315138;
++object e_7315346 [6];
++c_7315138.hdr.mark = gc_color_red;
++ c_7315138.hdr.grayed = 0;
++c_7315138.tag = closureN_tag;
++ c_7315138.fn = (function_type)__lambda_223;
++c_7315138.num_args = 1;
++c_7315138.num_elements = 6;
++c_7315138.elements = (object *)e_7315346;
++c_7315138.elements[0] = ((closureN)self_7311999)->elements[0];
++c_7315138.elements[1] = ((closureN)self_7311999)->elements[1];
++c_7315138.elements[2] = ((closureN)self_7311999)->elements[2];
++c_7315138.elements[3] = ((closureN)self_7311999)->elements[3];
++c_7315138.elements[4] = ((closureN)self_7311999)->elements[4];
++c_7315138.elements[5] = ((closureN)self_7311999)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313252)->elements[4], &c_7316438, quote_unquote_91splicing);}
++return_closcall2(data, ((closureN)self_7311999)->elements[4], &c_7315138, quote_unquote_91splicing);}
+ ;;
+ }
+
+-static void __lambda_223(void *data, object self_7313256, int argc, object *args) /* object self_7313256, object r_734815 */
++static void __lambda_223(void *data, object self_7312003, int argc, object *args) /* object self_7312003, object r_734363 */
+ {
+- object r_734815 = args[0];
++ object r_734363 = args[0];
+
+-closureN_type c_7316441;
+-object e_7316642 [6];
+-c_7316441.hdr.mark = gc_color_red;
+- c_7316441.hdr.grayed = 0;
+-c_7316441.tag = closureN_tag;
+- c_7316441.fn = (function_type)__lambda_224;
+-c_7316441.num_args = 1;
+-c_7316441.num_elements = 6;
+-c_7316441.elements = (object *)e_7316642;
+-c_7316441.elements[0] = ((closureN)self_7313256)->elements[0];
+-c_7316441.elements[1] = ((closureN)self_7313256)->elements[1];
+-c_7316441.elements[2] = ((closureN)self_7313256)->elements[2];
+-c_7316441.elements[3] = ((closureN)self_7313256)->elements[3];
+-c_7316441.elements[4] = ((closureN)self_7313256)->elements[4];
+-c_7316441.elements[5] = ((closureN)self_7313256)->elements[5];
++closureN_type c_7315141;
++object e_7315342 [6];
++c_7315141.hdr.mark = gc_color_red;
++ c_7315141.hdr.grayed = 0;
++c_7315141.tag = closureN_tag;
++ c_7315141.fn = (function_type)__lambda_224;
++c_7315141.num_args = 1;
++c_7315141.num_elements = 6;
++c_7315141.elements = (object *)e_7315342;
++c_7315141.elements[0] = ((closureN)self_7312003)->elements[0];
++c_7315141.elements[1] = ((closureN)self_7312003)->elements[1];
++c_7315141.elements[2] = ((closureN)self_7312003)->elements[2];
++c_7315141.elements[3] = ((closureN)self_7312003)->elements[3];
++c_7315141.elements[4] = ((closureN)self_7312003)->elements[4];
++c_7315141.elements[5] = ((closureN)self_7312003)->elements[5];
+
+
+
+-return_closcall3(data, ((closureN)self_7313256)->elements[0], &c_7316441, r_734815, Cyc_car(data, ((closureN)self_7313256)->elements[5]));;
++return_closcall3(data, ((closureN)self_7312003)->elements[0], &c_7315141, r_734363, Cyc_car(data, ((closureN)self_7312003)->elements[5]));;
+ }
+
+-static void __lambda_224(void *data, object self_7313257, int argc, object *args) /* object self_7313257, object r_734762 */
++static void __lambda_224(void *data, object self_7312004, int argc, object *args) /* object self_7312004, object r_734310 */
+ {
+- object r_734762 = args[0];
+- if( (boolean_f != r_734762) ){
++ object r_734310 = args[0];
++ if( (boolean_f != r_734310) ){
+
+-if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313257)->elements[1], obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7312004)->elements[1], obj_int2obj(0))) ){
+
+-closureN_type c_7316447;
+-object e_7316475 [4];
+-c_7316447.hdr.mark = gc_color_red;
+- c_7316447.hdr.grayed = 0;
+-c_7316447.tag = closureN_tag;
+- c_7316447.fn = (function_type)__lambda_225;
+-c_7316447.num_args = 1;
+-c_7316447.num_elements = 4;
+-c_7316447.elements = (object *)e_7316475;
+-c_7316447.elements[0] = ((closureN)self_7313257)->elements[1];
+-c_7316447.elements[1] = ((closureN)self_7313257)->elements[2];
+-c_7316447.elements[2] = ((closureN)self_7313257)->elements[3];
+-c_7316447.elements[3] = ((closureN)self_7313257)->elements[5];
++closureN_type c_7315147;
++object e_7315175 [4];
++c_7315147.hdr.mark = gc_color_red;
++ c_7315147.hdr.grayed = 0;
++c_7315147.tag = closureN_tag;
++ c_7315147.fn = (function_type)__lambda_225;
++c_7315147.num_args = 1;
++c_7315147.num_elements = 4;
++c_7315147.elements = (object *)e_7315175;
++c_7315147.elements[0] = ((closureN)self_7312004)->elements[1];
++c_7315147.elements[1] = ((closureN)self_7312004)->elements[2];
++c_7315147.elements[2] = ((closureN)self_7312004)->elements[3];
++c_7315147.elements[3] = ((closureN)self_7312004)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313257)->elements[4], &c_7316447, quote_cons);
++return_closcall2(data, ((closureN)self_7312004)->elements[4], &c_7315147, quote_cons);
+ } else {
+
+-closureN_type c_7316478;
+-object e_7316506 [5];
+-c_7316478.hdr.mark = gc_color_red;
+- c_7316478.hdr.grayed = 0;
+-c_7316478.tag = closureN_tag;
+- c_7316478.fn = (function_type)__lambda_228;
+-c_7316478.num_args = 1;
+-c_7316478.num_elements = 5;
+-c_7316478.elements = (object *)e_7316506;
+-c_7316478.elements[0] = ((closureN)self_7313257)->elements[1];
+-c_7316478.elements[1] = ((closureN)self_7313257)->elements[2];
+-c_7316478.elements[2] = ((closureN)self_7313257)->elements[3];
+-c_7316478.elements[3] = ((closureN)self_7313257)->elements[4];
+-c_7316478.elements[4] = ((closureN)self_7313257)->elements[5];
++closureN_type c_7315178;
++object e_7315206 [5];
++c_7315178.hdr.mark = gc_color_red;
++ c_7315178.hdr.grayed = 0;
++c_7315178.tag = closureN_tag;
++ c_7315178.fn = (function_type)__lambda_228;
++c_7315178.num_args = 1;
++c_7315178.num_elements = 5;
++c_7315178.elements = (object *)e_7315206;
++c_7315178.elements[0] = ((closureN)self_7312004)->elements[1];
++c_7315178.elements[1] = ((closureN)self_7312004)->elements[2];
++c_7315178.elements[2] = ((closureN)self_7312004)->elements[3];
++c_7315178.elements[3] = ((closureN)self_7312004)->elements[4];
++c_7315178.elements[4] = ((closureN)self_7312004)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313257)->elements[4], &c_7316478, quote__list);}
++return_closcall2(data, ((closureN)self_7312004)->elements[4], &c_7315178, quote__list);}
+ ;
+ } else {
+
+-closureN_type c_7316509;
+-object e_7316641 [6];
+-c_7316509.hdr.mark = gc_color_red;
+- c_7316509.hdr.grayed = 0;
+-c_7316509.tag = closureN_tag;
+- c_7316509.fn = (function_type)__lambda_231;
+-c_7316509.num_args = 1;
+-c_7316509.num_elements = 6;
+-c_7316509.elements = (object *)e_7316641;
+-c_7316509.elements[0] = ((closureN)self_7313257)->elements[0];
+-c_7316509.elements[1] = ((closureN)self_7313257)->elements[1];
+-c_7316509.elements[2] = ((closureN)self_7313257)->elements[2];
+-c_7316509.elements[3] = ((closureN)self_7313257)->elements[3];
+-c_7316509.elements[4] = ((closureN)self_7313257)->elements[4];
+-c_7316509.elements[5] = ((closureN)self_7313257)->elements[5];
++closureN_type c_7315209;
++object e_7315341 [6];
++c_7315209.hdr.mark = gc_color_red;
++ c_7315209.hdr.grayed = 0;
++c_7315209.tag = closureN_tag;
++ c_7315209.fn = (function_type)__lambda_231;
++c_7315209.num_args = 1;
++c_7315209.num_elements = 6;
++c_7315209.elements = (object *)e_7315341;
++c_7315209.elements[0] = ((closureN)self_7312004)->elements[0];
++c_7315209.elements[1] = ((closureN)self_7312004)->elements[1];
++c_7315209.elements[2] = ((closureN)self_7312004)->elements[2];
++c_7315209.elements[3] = ((closureN)self_7312004)->elements[3];
++c_7315209.elements[4] = ((closureN)self_7312004)->elements[4];
++c_7315209.elements[5] = ((closureN)self_7312004)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313257)->elements[4], &c_7316509, quote_quasiquote);}
++return_closcall2(data, ((closureN)self_7312004)->elements[4], &c_7315209, quote_quasiquote);}
+ ;;
+ }
+
+-static void __lambda_231(void *data, object self_7313264, int argc, object *args) /* object self_7313264, object r_734812 */
++static void __lambda_231(void *data, object self_7312011, int argc, object *args) /* object self_7312011, object r_734360 */
+ {
+- object r_734812 = args[0];
++ object r_734360 = args[0];
+
+-closureN_type c_7316512;
+-object e_7316637 [6];
+-c_7316512.hdr.mark = gc_color_red;
+- c_7316512.hdr.grayed = 0;
+-c_7316512.tag = closureN_tag;
+- c_7316512.fn = (function_type)__lambda_232;
+-c_7316512.num_args = 1;
+-c_7316512.num_elements = 6;
+-c_7316512.elements = (object *)e_7316637;
+-c_7316512.elements[0] = ((closureN)self_7313264)->elements[0];
+-c_7316512.elements[1] = ((closureN)self_7313264)->elements[1];
+-c_7316512.elements[2] = ((closureN)self_7313264)->elements[2];
+-c_7316512.elements[3] = ((closureN)self_7313264)->elements[3];
+-c_7316512.elements[4] = ((closureN)self_7313264)->elements[4];
+-c_7316512.elements[5] = ((closureN)self_7313264)->elements[5];
++closureN_type c_7315212;
++object e_7315337 [6];
++c_7315212.hdr.mark = gc_color_red;
++ c_7315212.hdr.grayed = 0;
++c_7315212.tag = closureN_tag;
++ c_7315212.fn = (function_type)__lambda_232;
++c_7315212.num_args = 1;
++c_7315212.num_elements = 6;
++c_7315212.elements = (object *)e_7315337;
++c_7315212.elements[0] = ((closureN)self_7312011)->elements[0];
++c_7315212.elements[1] = ((closureN)self_7312011)->elements[1];
++c_7315212.elements[2] = ((closureN)self_7312011)->elements[2];
++c_7315212.elements[3] = ((closureN)self_7312011)->elements[3];
++c_7315212.elements[4] = ((closureN)self_7312011)->elements[4];
++c_7315212.elements[5] = ((closureN)self_7312011)->elements[5];
+
+
+
+-return_closcall3(data, ((closureN)self_7313264)->elements[0], &c_7316512, r_734812, Cyc_car(data, ((closureN)self_7313264)->elements[5]));;
++return_closcall3(data, ((closureN)self_7312011)->elements[0], &c_7315212, r_734360, Cyc_car(data, ((closureN)self_7312011)->elements[5]));;
+ }
+
+-static void __lambda_232(void *data, object self_7313265, int argc, object *args) /* object self_7313265, object r_734779 */
++static void __lambda_232(void *data, object self_7312012, int argc, object *args) /* object self_7312012, object r_734327 */
+ {
+- object r_734779 = args[0];
+- if( (boolean_f != r_734779) ){
++ object r_734327 = args[0];
++ if( (boolean_f != r_734327) ){
+
+-closureN_type c_7316515;
+-object e_7316543 [5];
+-c_7316515.hdr.mark = gc_color_red;
+- c_7316515.hdr.grayed = 0;
+-c_7316515.tag = closureN_tag;
+- c_7316515.fn = (function_type)__lambda_233;
+-c_7316515.num_args = 1;
+-c_7316515.num_elements = 5;
+-c_7316515.elements = (object *)e_7316543;
+-c_7316515.elements[0] = ((closureN)self_7313265)->elements[1];
+-c_7316515.elements[1] = ((closureN)self_7313265)->elements[2];
+-c_7316515.elements[2] = ((closureN)self_7313265)->elements[3];
+-c_7316515.elements[3] = ((closureN)self_7313265)->elements[4];
+-c_7316515.elements[4] = ((closureN)self_7313265)->elements[5];
++closureN_type c_7315215;
++object e_7315243 [5];
++c_7315215.hdr.mark = gc_color_red;
++ c_7315215.hdr.grayed = 0;
++c_7315215.tag = closureN_tag;
++ c_7315215.fn = (function_type)__lambda_233;
++c_7315215.num_args = 1;
++c_7315215.num_elements = 5;
++c_7315215.elements = (object *)e_7315243;
++c_7315215.elements[0] = ((closureN)self_7312012)->elements[1];
++c_7315215.elements[1] = ((closureN)self_7312012)->elements[2];
++c_7315215.elements[2] = ((closureN)self_7312012)->elements[3];
++c_7315215.elements[3] = ((closureN)self_7312012)->elements[4];
++c_7315215.elements[4] = ((closureN)self_7312012)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313265)->elements[4], &c_7316515, quote__list);
++return_closcall2(data, ((closureN)self_7312012)->elements[4], &c_7315215, quote__list);
+ } else {
+
+-closureN_type c_7316545;
+-object e_7316566 [4];
+-c_7316545.hdr.mark = gc_color_red;
+- c_7316545.hdr.grayed = 0;
+-c_7316545.tag = closureN_tag;
+- c_7316545.fn = (function_type)__lambda_236;
+-c_7316545.num_args = 0;
+-c_7316545.num_elements = 4;
+-c_7316545.elements = (object *)e_7316566;
+-c_7316545.elements[0] = ((closureN)self_7313265)->elements[0];
+-c_7316545.elements[1] = ((closureN)self_7313265)->elements[1];
+-c_7316545.elements[2] = ((closureN)self_7313265)->elements[4];
+-c_7316545.elements[3] = ((closureN)self_7313265)->elements[5];
++closureN_type c_7315245;
++object e_7315266 [4];
++c_7315245.hdr.mark = gc_color_red;
++ c_7315245.hdr.grayed = 0;
++c_7315245.tag = closureN_tag;
++ c_7315245.fn = (function_type)__lambda_236;
++c_7315245.num_args = 0;
++c_7315245.num_elements = 4;
++c_7315245.elements = (object *)e_7315266;
++c_7315245.elements[0] = ((closureN)self_7312012)->elements[0];
++c_7315245.elements[1] = ((closureN)self_7312012)->elements[1];
++c_7315245.elements[2] = ((closureN)self_7312012)->elements[4];
++c_7315245.elements[3] = ((closureN)self_7312012)->elements[5];
+
+
+-closureN_type c_7316567;
+-object e_7316636 [5];
+-c_7316567.hdr.mark = gc_color_red;
+- c_7316567.hdr.grayed = 0;
+-c_7316567.tag = closureN_tag;
+- c_7316567.fn = (function_type)__lambda_238;
+-c_7316567.num_args = 1;
+-c_7316567.num_elements = 5;
+-c_7316567.elements = (object *)e_7316636;
+-c_7316567.elements[0] = ((closureN)self_7313265)->elements[1];
+-c_7316567.elements[1] = ((closureN)self_7313265)->elements[2];
+-c_7316567.elements[2] = ((closureN)self_7313265)->elements[3];
+-c_7316567.elements[3] = ((closureN)self_7313265)->elements[4];
+-c_7316567.elements[4] = ((closureN)self_7313265)->elements[5];
++closureN_type c_7315267;
++object e_7315336 [5];
++c_7315267.hdr.mark = gc_color_red;
++ c_7315267.hdr.grayed = 0;
++c_7315267.tag = closureN_tag;
++ c_7315267.fn = (function_type)__lambda_238;
++c_7315267.num_args = 1;
++c_7315267.num_elements = 5;
++c_7315267.elements = (object *)e_7315336;
++c_7315267.elements[0] = ((closureN)self_7312012)->elements[1];
++c_7315267.elements[1] = ((closureN)self_7312012)->elements[2];
++c_7315267.elements[2] = ((closureN)self_7312012)->elements[3];
++c_7315267.elements[3] = ((closureN)self_7312012)->elements[4];
++c_7315267.elements[4] = ((closureN)self_7312012)->elements[5];
+
+-return_direct_with_clo1(data,(closure)&c_7316545,__lambda_236, &c_7316567);}
++return_direct_with_clo1(data,(closure)&c_7315245,__lambda_236, &c_7315267);}
+ ;;
+ }
+
+-static void __lambda_238(void *data, object self_7313269, int argc, object *args) /* object self_7313269, object r_734789 */
++static void __lambda_238(void *data, object self_7312016, int argc, object *args) /* object self_7312016, object r_734337 */
+ {
+- object r_734789 = args[0];
+- if( (boolean_f != r_734789) ){
++ object r_734337 = args[0];
++ if( (boolean_f != r_734337) ){
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313269)->elements[4]))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312016)->elements[4]))) ){
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313269)->elements[1], (((closure) ((closureN)self_7313269)->elements[1])->fn), Cyc_cadr(data, Cyc_car(data, ((closureN)self_7313269)->elements[4])));
++return_direct_with_clo1(data, ((closureN)self_7312016)->elements[1], (((closure) ((closureN)self_7312016)->elements[1])->fn), Cyc_cadr(data, Cyc_car(data, ((closureN)self_7312016)->elements[4])));
+ } else {
+
+-closureN_type c_7316582;
+-object e_7316604 [4];
+-c_7316582.hdr.mark = gc_color_red;
+- c_7316582.hdr.grayed = 0;
+-c_7316582.tag = closureN_tag;
+- c_7316582.fn = (function_type)__lambda_239;
+-c_7316582.num_args = 1;
+-c_7316582.num_elements = 4;
+-c_7316582.elements = (object *)e_7316604;
+-c_7316582.elements[0] = ((closureN)self_7313269)->elements[0];
+-c_7316582.elements[1] = ((closureN)self_7313269)->elements[1];
+-c_7316582.elements[2] = ((closureN)self_7313269)->elements[2];
+-c_7316582.elements[3] = ((closureN)self_7313269)->elements[4];
++closureN_type c_7315282;
++object e_7315304 [4];
++c_7315282.hdr.mark = gc_color_red;
++ c_7315282.hdr.grayed = 0;
++c_7315282.tag = closureN_tag;
++ c_7315282.fn = (function_type)__lambda_239;
++c_7315282.num_args = 1;
++c_7315282.num_elements = 4;
++c_7315282.elements = (object *)e_7315304;
++c_7315282.elements[0] = ((closureN)self_7312016)->elements[0];
++c_7315282.elements[1] = ((closureN)self_7312016)->elements[1];
++c_7315282.elements[2] = ((closureN)self_7312016)->elements[2];
++c_7315282.elements[3] = ((closureN)self_7312016)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313269)->elements[3], &c_7316582, quote_append);}
++return_closcall2(data, ((closureN)self_7312016)->elements[3], &c_7315282, quote_append);}
+ ;
+ } else {
+
+-closureN_type c_7316607;
+-object e_7316635 [4];
+-c_7316607.hdr.mark = gc_color_red;
+- c_7316607.hdr.grayed = 0;
+-c_7316607.tag = closureN_tag;
+- c_7316607.fn = (function_type)__lambda_241;
+-c_7316607.num_args = 1;
+-c_7316607.num_elements = 4;
+-c_7316607.elements = (object *)e_7316635;
+-c_7316607.elements[0] = ((closureN)self_7313269)->elements[0];
+-c_7316607.elements[1] = ((closureN)self_7313269)->elements[1];
+-c_7316607.elements[2] = ((closureN)self_7313269)->elements[2];
+-c_7316607.elements[3] = ((closureN)self_7313269)->elements[4];
++closureN_type c_7315307;
++object e_7315335 [4];
++c_7315307.hdr.mark = gc_color_red;
++ c_7315307.hdr.grayed = 0;
++c_7315307.tag = closureN_tag;
++ c_7315307.fn = (function_type)__lambda_241;
++c_7315307.num_args = 1;
++c_7315307.num_elements = 4;
++c_7315307.elements = (object *)e_7315335;
++c_7315307.elements[0] = ((closureN)self_7312016)->elements[0];
++c_7315307.elements[1] = ((closureN)self_7312016)->elements[1];
++c_7315307.elements[2] = ((closureN)self_7312016)->elements[2];
++c_7315307.elements[3] = ((closureN)self_7312016)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313269)->elements[3], &c_7316607, quote_cons);}
++return_closcall2(data, ((closureN)self_7312016)->elements[3], &c_7315307, quote_cons);}
+ ;;
+ }
+
+-static void __lambda_241(void *data, object self_7313272, int argc, object *args) /* object self_7313272, object r_734799 */
++static void __lambda_241(void *data, object self_7312019, int argc, object *args) /* object self_7312019, object r_734347 */
+ {
+- object r_734799 = args[0];
++ object r_734347 = args[0];
+
+
+
+-closureN_type c_7316612;
+-object e_7316630 [5];
+-c_7316612.hdr.mark = gc_color_red;
+- c_7316612.hdr.grayed = 0;
+-c_7316612.tag = closureN_tag;
+- c_7316612.fn = (function_type)__lambda_242;
+-c_7316612.num_args = 1;
+-c_7316612.num_elements = 5;
+-c_7316612.elements = (object *)e_7316630;
+-c_7316612.elements[0] = ((closureN)self_7313272)->elements[0];
+-c_7316612.elements[1] = ((closureN)self_7313272)->elements[1];
+-c_7316612.elements[2] = ((closureN)self_7313272)->elements[2];
+-c_7316612.elements[3] = r_734799;
+-c_7316612.elements[4] = ((closureN)self_7313272)->elements[3];
++closureN_type c_7315312;
++object e_7315330 [5];
++c_7315312.hdr.mark = gc_color_red;
++ c_7315312.hdr.grayed = 0;
++c_7315312.tag = closureN_tag;
++ c_7315312.fn = (function_type)__lambda_242;
++c_7315312.num_args = 1;
++c_7315312.num_elements = 5;
++c_7315312.elements = (object *)e_7315330;
++c_7315312.elements[0] = ((closureN)self_7312019)->elements[0];
++c_7315312.elements[1] = ((closureN)self_7312019)->elements[1];
++c_7315312.elements[2] = ((closureN)self_7312019)->elements[2];
++c_7315312.elements[3] = r_734347;
++c_7315312.elements[4] = ((closureN)self_7312019)->elements[3];
+
+
+
+-return_closcall3(data, car(((closureN)self_7313272)->elements[2]), &c_7316612, Cyc_car(data, ((closureN)self_7313272)->elements[3]), ((closureN)self_7313272)->elements[0]);;
++return_closcall3(data, car(((closureN)self_7312019)->elements[2]), &c_7315312, Cyc_car(data, ((closureN)self_7312019)->elements[3]), ((closureN)self_7312019)->elements[0]);;
+ }
+
+-static void __lambda_242(void *data, object self_7313273, int argc, object *args) /* object self_7313273, object r_734800 */
++static void __lambda_242(void *data, object self_7312020, int argc, object *args) /* object self_7312020, object r_734348 */
+ {
+- object r_734800 = args[0];
++ object r_734348 = args[0];
+
+
+
+-closureN_type c_7316617;
+-object e_7316625 [3];
+-c_7316617.hdr.mark = gc_color_red;
+- c_7316617.hdr.grayed = 0;
+-c_7316617.tag = closureN_tag;
+- c_7316617.fn = (function_type)__lambda_243;
+-c_7316617.num_args = 1;
+-c_7316617.num_elements = 3;
+-c_7316617.elements = (object *)e_7316625;
+-c_7316617.elements[0] = ((closureN)self_7313273)->elements[1];
+-c_7316617.elements[1] = ((closureN)self_7313273)->elements[3];
+-c_7316617.elements[2] = r_734800;
++closureN_type c_7315317;
++object e_7315325 [3];
++c_7315317.hdr.mark = gc_color_red;
++ c_7315317.hdr.grayed = 0;
++c_7315317.tag = closureN_tag;
++ c_7315317.fn = (function_type)__lambda_243;
++c_7315317.num_args = 1;
++c_7315317.num_elements = 3;
++c_7315317.elements = (object *)e_7315325;
++c_7315317.elements[0] = ((closureN)self_7312020)->elements[1];
++c_7315317.elements[1] = ((closureN)self_7312020)->elements[3];
++c_7315317.elements[2] = r_734348;
+
+
+
+-return_closcall3(data, car(((closureN)self_7313273)->elements[2]), &c_7316617, Cyc_cdr(data, ((closureN)self_7313273)->elements[4]), ((closureN)self_7313273)->elements[0]);;
++return_closcall3(data, car(((closureN)self_7312020)->elements[2]), &c_7315317, Cyc_cdr(data, ((closureN)self_7312020)->elements[4]), ((closureN)self_7312020)->elements[0]);;
+ }
+
+-static void __lambda_243(void *data, object self_7313274, int argc, object *args) /* object self_7313274, object r_734801 */
++static void __lambda_243(void *data, object self_7312021, int argc, object *args) /* object self_7312021, object r_734349 */
+ {
+- object r_734801 = args[0];
++ object r_734349 = args[0];
+
+-list_3_type local_7316622;
+-return_direct_with_clo1(data, ((closureN)self_7313274)->elements[0], (((closure) ((closureN)self_7313274)->elements[0])->fn), Cyc_fast_list_3(&local_7316622, ((closureN)self_7313274)->elements[1], ((closureN)self_7313274)->elements[2], r_734801));;
++list_3_type local_7315322;
++return_direct_with_clo1(data, ((closureN)self_7312021)->elements[0], (((closure) ((closureN)self_7312021)->elements[0])->fn), Cyc_fast_list_3(&local_7315322, ((closureN)self_7312021)->elements[1], ((closureN)self_7312021)->elements[2], r_734349));;
+ }
+
+-static void __lambda_239(void *data, object self_7313270, int argc, object *args) /* object self_7313270, object r_734792 */
++static void __lambda_239(void *data, object self_7312017, int argc, object *args) /* object self_7312017, object r_734340 */
+ {
+- object r_734792 = args[0];
++ object r_734340 = args[0];
+
+
+
+-closureN_type c_7316587;
+-object e_7316599 [3];
+-c_7316587.hdr.mark = gc_color_red;
+- c_7316587.hdr.grayed = 0;
+-c_7316587.tag = closureN_tag;
+- c_7316587.fn = (function_type)__lambda_240;
+-c_7316587.num_args = 1;
+-c_7316587.num_elements = 3;
+-c_7316587.elements = (object *)e_7316599;
+-c_7316587.elements[0] = ((closureN)self_7313270)->elements[1];
+-c_7316587.elements[1] = r_734792;
+-c_7316587.elements[2] = ((closureN)self_7313270)->elements[3];
++closureN_type c_7315287;
++object e_7315299 [3];
++c_7315287.hdr.mark = gc_color_red;
++ c_7315287.hdr.grayed = 0;
++c_7315287.tag = closureN_tag;
++ c_7315287.fn = (function_type)__lambda_240;
++c_7315287.num_args = 1;
++c_7315287.num_elements = 3;
++c_7315287.elements = (object *)e_7315299;
++c_7315287.elements[0] = ((closureN)self_7312017)->elements[1];
++c_7315287.elements[1] = r_734340;
++c_7315287.elements[2] = ((closureN)self_7312017)->elements[3];
+
+
+
+-return_closcall3(data, car(((closureN)self_7313270)->elements[2]), &c_7316587, Cyc_cdr(data, ((closureN)self_7313270)->elements[3]), ((closureN)self_7313270)->elements[0]);;
++return_closcall3(data, car(((closureN)self_7312017)->elements[2]), &c_7315287, Cyc_cdr(data, ((closureN)self_7312017)->elements[3]), ((closureN)self_7312017)->elements[0]);;
+ }
+
+-static void __lambda_240(void *data, object self_7313271, int argc, object *args) /* object self_7313271, object r_734794 */
++static void __lambda_240(void *data, object self_7312018, int argc, object *args) /* object self_7312018, object r_734342 */
+ {
+- object r_734794 = args[0];
++ object r_734342 = args[0];
+
+-list_3_type local_7316592;
++list_3_type local_7315292;
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313271)->elements[0], (((closure) ((closureN)self_7313271)->elements[0])->fn), Cyc_fast_list_3(&local_7316592, ((closureN)self_7313271)->elements[1], Cyc_cadr(data, Cyc_car(data, ((closureN)self_7313271)->elements[2])), r_734794));;
++return_direct_with_clo1(data, ((closureN)self_7312018)->elements[0], (((closure) ((closureN)self_7312018)->elements[0])->fn), Cyc_fast_list_3(&local_7315292, ((closureN)self_7312018)->elements[1], Cyc_cadr(data, Cyc_car(data, ((closureN)self_7312018)->elements[2])), r_734342));;
+ }
+
+-static void __lambda_236(void *data, object self_7313275, int argc, object *args) /* object self_7313275, object k_734805 */
++static void __lambda_236(void *data, object self_7312022, int argc, object *args) /* object self_7312022, object k_734353 */
+ {
+- object k_734805 = args[0];
++ object k_734353 = args[0];
+
+-if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313275)->elements[1], obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7312022)->elements[1], obj_int2obj(0))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313275)->elements[3]))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312022)->elements[3]))) ){
+
+-closureN_type c_7316556;
+-object e_7316563 [3];
+-c_7316556.hdr.mark = gc_color_red;
+- c_7316556.hdr.grayed = 0;
+-c_7316556.tag = closureN_tag;
+- c_7316556.fn = (function_type)__lambda_237;
+-c_7316556.num_args = 1;
+-c_7316556.num_elements = 3;
+-c_7316556.elements = (object *)e_7316563;
+-c_7316556.elements[0] = ((closureN)self_7313275)->elements[0];
+-c_7316556.elements[1] = k_734805;
+-c_7316556.elements[2] = ((closureN)self_7313275)->elements[3];
++closureN_type c_7315256;
++object e_7315263 [3];
++c_7315256.hdr.mark = gc_color_red;
++ c_7315256.hdr.grayed = 0;
++c_7315256.tag = closureN_tag;
++ c_7315256.fn = (function_type)__lambda_237;
++c_7315256.num_args = 1;
++c_7315256.num_elements = 3;
++c_7315256.elements = (object *)e_7315263;
++c_7315256.elements[0] = ((closureN)self_7312022)->elements[0];
++c_7315256.elements[1] = k_734353;
++c_7315256.elements[2] = ((closureN)self_7312022)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313275)->elements[2], &c_7316556, quote_unquote_91splicing);
++return_closcall2(data, ((closureN)self_7312022)->elements[2], &c_7315256, quote_unquote_91splicing);
+ } else {
+- return_direct_with_clo1(data, k_734805, (((closure) k_734805)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_734353, (((closure) k_734353)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_734805, (((closure) k_734805)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_734353, (((closure) k_734353)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_237(void *data, object self_7313276, int argc, object *args) /* object self_7313276, object r_734808 */
++static void __lambda_237(void *data, object self_7312023, int argc, object *args) /* object self_7312023, object r_734356 */
+ {
+- object r_734808 = args[0];
++ object r_734356 = args[0];
+
+
+-return_closcall3(data, ((closureN)self_7313276)->elements[0], ((closureN)self_7313276)->elements[1], r_734808, Cyc_caar(data, ((closureN)self_7313276)->elements[2]));;
++return_closcall3(data, ((closureN)self_7312023)->elements[0], ((closureN)self_7312023)->elements[1], r_734356, Cyc_caar(data, ((closureN)self_7312023)->elements[2]));;
+ }
+
+-static void __lambda_233(void *data, object self_7313266, int argc, object *args) /* object self_7313266, object r_734780 */
++static void __lambda_233(void *data, object self_7312013, int argc, object *args) /* object self_7312013, object r_734328 */
+ {
+- object r_734780 = args[0];
++ object r_734328 = args[0];
+
+-closureN_type c_7316518;
+-object e_7316542 [5];
+-c_7316518.hdr.mark = gc_color_red;
+- c_7316518.hdr.grayed = 0;
+-c_7316518.tag = closureN_tag;
+- c_7316518.fn = (function_type)__lambda_234;
+-c_7316518.num_args = 1;
+-c_7316518.num_elements = 5;
+-c_7316518.elements = (object *)e_7316542;
+-c_7316518.elements[0] = ((closureN)self_7313266)->elements[0];
+-c_7316518.elements[1] = ((closureN)self_7313266)->elements[1];
+-c_7316518.elements[2] = ((closureN)self_7313266)->elements[2];
+-c_7316518.elements[3] = r_734780;
+-c_7316518.elements[4] = ((closureN)self_7313266)->elements[4];
++closureN_type c_7315218;
++object e_7315242 [5];
++c_7315218.hdr.mark = gc_color_red;
++ c_7315218.hdr.grayed = 0;
++c_7315218.tag = closureN_tag;
++ c_7315218.fn = (function_type)__lambda_234;
++c_7315218.num_args = 1;
++c_7315218.num_elements = 5;
++c_7315218.elements = (object *)e_7315242;
++c_7315218.elements[0] = ((closureN)self_7312013)->elements[0];
++c_7315218.elements[1] = ((closureN)self_7312013)->elements[1];
++c_7315218.elements[2] = ((closureN)self_7312013)->elements[2];
++c_7315218.elements[3] = r_734328;
++c_7315218.elements[4] = ((closureN)self_7312013)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313266)->elements[3], &c_7316518, quote_quote);;
++return_closcall2(data, ((closureN)self_7312013)->elements[3], &c_7315218, quote_quote);;
+ }
+
+-static void __lambda_234(void *data, object self_7313267, int argc, object *args) /* object self_7313267, object r_734785 */
++static void __lambda_234(void *data, object self_7312014, int argc, object *args) /* object self_7312014, object r_734333 */
+ {
+- object r_734785 = args[0];
++ object r_734333 = args[0];
+
+
+
+-closureN_type c_7316523;
+-object e_7316534 [3];
+-c_7316523.hdr.mark = gc_color_red;
+- c_7316523.hdr.grayed = 0;
+-c_7316523.tag = closureN_tag;
+- c_7316523.fn = (function_type)__lambda_235;
+-c_7316523.num_args = 1;
+-c_7316523.num_elements = 3;
+-c_7316523.elements = (object *)e_7316534;
+-c_7316523.elements[0] = ((closureN)self_7313267)->elements[1];
+-c_7316523.elements[1] = ((closureN)self_7313267)->elements[3];
+-c_7316523.elements[2] = r_734785;
++closureN_type c_7315223;
++object e_7315234 [3];
++c_7315223.hdr.mark = gc_color_red;
++ c_7315223.hdr.grayed = 0;
++c_7315223.tag = closureN_tag;
++ c_7315223.fn = (function_type)__lambda_235;
++c_7315223.num_args = 1;
++c_7315223.num_elements = 3;
++c_7315223.elements = (object *)e_7315234;
++c_7315223.elements[0] = ((closureN)self_7312014)->elements[1];
++c_7315223.elements[1] = ((closureN)self_7312014)->elements[3];
++c_7315223.elements[2] = r_734333;
+
+
+
+
+-complex_num_type local_7316540;
+-return_closcall3(data, car(((closureN)self_7313267)->elements[2]), &c_7316523, Cyc_cadr(data, ((closureN)self_7313267)->elements[4]), Cyc_fast_sum(data,&local_7316540, ((closureN)self_7313267)->elements[0], obj_int2obj(1)));;
++complex_num_type local_7315240;
++return_closcall3(data, car(((closureN)self_7312014)->elements[2]), &c_7315223, Cyc_cadr(data, ((closureN)self_7312014)->elements[4]), Cyc_fast_sum(data,&local_7315240, ((closureN)self_7312014)->elements[0], obj_int2obj(1)));;
+ }
+
+-static void __lambda_235(void *data, object self_7313268, int argc, object *args) /* object self_7313268, object r_734782 */
++static void __lambda_235(void *data, object self_7312015, int argc, object *args) /* object self_7312015, object r_734330 */
+ {
+- object r_734782 = args[0];
++ object r_734330 = args[0];
+
+-list_3_type local_7316528;
++list_3_type local_7315228;
+
+-list_2_type local_7316532;
+-return_direct_with_clo1(data, ((closureN)self_7313268)->elements[0], (((closure) ((closureN)self_7313268)->elements[0])->fn), Cyc_fast_list_3(&local_7316528, ((closureN)self_7313268)->elements[1], Cyc_fast_list_2(&local_7316532, ((closureN)self_7313268)->elements[2], quote_quasiquote), r_734782));;
++list_2_type local_7315232;
++return_direct_with_clo1(data, ((closureN)self_7312015)->elements[0], (((closure) ((closureN)self_7312015)->elements[0])->fn), Cyc_fast_list_3(&local_7315228, ((closureN)self_7312015)->elements[1], Cyc_fast_list_2(&local_7315232, ((closureN)self_7312015)->elements[2], quote_quasiquote), r_734330));;
+ }
+
+-static void __lambda_228(void *data, object self_7313261, int argc, object *args) /* object self_7313261, object r_734770 */
++static void __lambda_228(void *data, object self_7312008, int argc, object *args) /* object self_7312008, object r_734318 */
+ {
+- object r_734770 = args[0];
++ object r_734318 = args[0];
+
+-closureN_type c_7316481;
+-object e_7316505 [5];
+-c_7316481.hdr.mark = gc_color_red;
+- c_7316481.hdr.grayed = 0;
+-c_7316481.tag = closureN_tag;
+- c_7316481.fn = (function_type)__lambda_229;
+-c_7316481.num_args = 1;
+-c_7316481.num_elements = 5;
+-c_7316481.elements = (object *)e_7316505;
+-c_7316481.elements[0] = ((closureN)self_7313261)->elements[0];
+-c_7316481.elements[1] = ((closureN)self_7313261)->elements[1];
+-c_7316481.elements[2] = ((closureN)self_7313261)->elements[2];
+-c_7316481.elements[3] = r_734770;
+-c_7316481.elements[4] = ((closureN)self_7313261)->elements[4];
++closureN_type c_7315181;
++object e_7315205 [5];
++c_7315181.hdr.mark = gc_color_red;
++ c_7315181.hdr.grayed = 0;
++c_7315181.tag = closureN_tag;
++ c_7315181.fn = (function_type)__lambda_229;
++c_7315181.num_args = 1;
++c_7315181.num_elements = 5;
++c_7315181.elements = (object *)e_7315205;
++c_7315181.elements[0] = ((closureN)self_7312008)->elements[0];
++c_7315181.elements[1] = ((closureN)self_7312008)->elements[1];
++c_7315181.elements[2] = ((closureN)self_7312008)->elements[2];
++c_7315181.elements[3] = r_734318;
++c_7315181.elements[4] = ((closureN)self_7312008)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313261)->elements[3], &c_7316481, quote_quote);;
++return_closcall2(data, ((closureN)self_7312008)->elements[3], &c_7315181, quote_quote);;
+ }
+
+-static void __lambda_229(void *data, object self_7313262, int argc, object *args) /* object self_7313262, object r_734775 */
++static void __lambda_229(void *data, object self_7312009, int argc, object *args) /* object self_7312009, object r_734323 */
+ {
+- object r_734775 = args[0];
++ object r_734323 = args[0];
+
+
+
+-closureN_type c_7316486;
+-object e_7316497 [3];
+-c_7316486.hdr.mark = gc_color_red;
+- c_7316486.hdr.grayed = 0;
+-c_7316486.tag = closureN_tag;
+- c_7316486.fn = (function_type)__lambda_230;
+-c_7316486.num_args = 1;
+-c_7316486.num_elements = 3;
+-c_7316486.elements = (object *)e_7316497;
+-c_7316486.elements[0] = ((closureN)self_7313262)->elements[1];
+-c_7316486.elements[1] = ((closureN)self_7313262)->elements[3];
+-c_7316486.elements[2] = r_734775;
++closureN_type c_7315186;
++object e_7315197 [3];
++c_7315186.hdr.mark = gc_color_red;
++ c_7315186.hdr.grayed = 0;
++c_7315186.tag = closureN_tag;
++ c_7315186.fn = (function_type)__lambda_230;
++c_7315186.num_args = 1;
++c_7315186.num_elements = 3;
++c_7315186.elements = (object *)e_7315197;
++c_7315186.elements[0] = ((closureN)self_7312009)->elements[1];
++c_7315186.elements[1] = ((closureN)self_7312009)->elements[3];
++c_7315186.elements[2] = r_734323;
+
+
+
+
+-complex_num_type local_7316503;
+-return_closcall3(data, car(((closureN)self_7313262)->elements[2]), &c_7316486, Cyc_cadr(data, ((closureN)self_7313262)->elements[4]), Cyc_fast_sub(data,&local_7316503, ((closureN)self_7313262)->elements[0], obj_int2obj(1)));;
++complex_num_type local_7315203;
++return_closcall3(data, car(((closureN)self_7312009)->elements[2]), &c_7315186, Cyc_cadr(data, ((closureN)self_7312009)->elements[4]), Cyc_fast_sub(data,&local_7315203, ((closureN)self_7312009)->elements[0], obj_int2obj(1)));;
+ }
+
+-static void __lambda_230(void *data, object self_7313263, int argc, object *args) /* object self_7313263, object r_734772 */
++static void __lambda_230(void *data, object self_7312010, int argc, object *args) /* object self_7312010, object r_734320 */
+ {
+- object r_734772 = args[0];
++ object r_734320 = args[0];
+
+-list_3_type local_7316491;
++list_3_type local_7315191;
+
+-list_2_type local_7316495;
+-return_direct_with_clo1(data, ((closureN)self_7313263)->elements[0], (((closure) ((closureN)self_7313263)->elements[0])->fn), Cyc_fast_list_3(&local_7316491, ((closureN)self_7313263)->elements[1], Cyc_fast_list_2(&local_7316495, ((closureN)self_7313263)->elements[2], quote_unquote_91splicing), r_734772));;
++list_2_type local_7315195;
++return_direct_with_clo1(data, ((closureN)self_7312010)->elements[0], (((closure) ((closureN)self_7312010)->elements[0])->fn), Cyc_fast_list_3(&local_7315191, ((closureN)self_7312010)->elements[1], Cyc_fast_list_2(&local_7315195, ((closureN)self_7312010)->elements[2], quote_unquote_91splicing), r_734320));;
+ }
+
+-static void __lambda_225(void *data, object self_7313258, int argc, object *args) /* object self_7313258, object r_734764 */
++static void __lambda_225(void *data, object self_7312005, int argc, object *args) /* object self_7312005, object r_734312 */
+ {
+- object r_734764 = args[0];
++ object r_734312 = args[0];
+
+
+
+-closureN_type c_7316452;
+-object e_7316470 [5];
+-c_7316452.hdr.mark = gc_color_red;
+- c_7316452.hdr.grayed = 0;
+-c_7316452.tag = closureN_tag;
+- c_7316452.fn = (function_type)__lambda_226;
+-c_7316452.num_args = 1;
+-c_7316452.num_elements = 5;
+-c_7316452.elements = (object *)e_7316470;
+-c_7316452.elements[0] = ((closureN)self_7313258)->elements[0];
+-c_7316452.elements[1] = ((closureN)self_7313258)->elements[1];
+-c_7316452.elements[2] = ((closureN)self_7313258)->elements[2];
+-c_7316452.elements[3] = r_734764;
+-c_7316452.elements[4] = ((closureN)self_7313258)->elements[3];
++closureN_type c_7315152;
++object e_7315170 [5];
++c_7315152.hdr.mark = gc_color_red;
++ c_7315152.hdr.grayed = 0;
++c_7315152.tag = closureN_tag;
++ c_7315152.fn = (function_type)__lambda_226;
++c_7315152.num_args = 1;
++c_7315152.num_elements = 5;
++c_7315152.elements = (object *)e_7315170;
++c_7315152.elements[0] = ((closureN)self_7312005)->elements[0];
++c_7315152.elements[1] = ((closureN)self_7312005)->elements[1];
++c_7315152.elements[2] = ((closureN)self_7312005)->elements[2];
++c_7315152.elements[3] = r_734312;
++c_7315152.elements[4] = ((closureN)self_7312005)->elements[3];
+
+
+
+-return_closcall3(data, car(((closureN)self_7313258)->elements[2]), &c_7316452, Cyc_car(data, ((closureN)self_7313258)->elements[3]), ((closureN)self_7313258)->elements[0]);;
++return_closcall3(data, car(((closureN)self_7312005)->elements[2]), &c_7315152, Cyc_car(data, ((closureN)self_7312005)->elements[3]), ((closureN)self_7312005)->elements[0]);;
+ }
+
+-static void __lambda_226(void *data, object self_7313259, int argc, object *args) /* object self_7313259, object r_734765 */
++static void __lambda_226(void *data, object self_7312006, int argc, object *args) /* object self_7312006, object r_734313 */
+ {
+- object r_734765 = args[0];
++ object r_734313 = args[0];
+
+
+
+-closureN_type c_7316457;
+-object e_7316465 [3];
+-c_7316457.hdr.mark = gc_color_red;
+- c_7316457.hdr.grayed = 0;
+-c_7316457.tag = closureN_tag;
+- c_7316457.fn = (function_type)__lambda_227;
+-c_7316457.num_args = 1;
+-c_7316457.num_elements = 3;
+-c_7316457.elements = (object *)e_7316465;
+-c_7316457.elements[0] = ((closureN)self_7313259)->elements[1];
+-c_7316457.elements[1] = ((closureN)self_7313259)->elements[3];
+-c_7316457.elements[2] = r_734765;
++closureN_type c_7315157;
++object e_7315165 [3];
++c_7315157.hdr.mark = gc_color_red;
++ c_7315157.hdr.grayed = 0;
++c_7315157.tag = closureN_tag;
++ c_7315157.fn = (function_type)__lambda_227;
++c_7315157.num_args = 1;
++c_7315157.num_elements = 3;
++c_7315157.elements = (object *)e_7315165;
++c_7315157.elements[0] = ((closureN)self_7312006)->elements[1];
++c_7315157.elements[1] = ((closureN)self_7312006)->elements[3];
++c_7315157.elements[2] = r_734313;
+
+
+
+-return_closcall3(data, car(((closureN)self_7313259)->elements[2]), &c_7316457, Cyc_cdr(data, ((closureN)self_7313259)->elements[4]), ((closureN)self_7313259)->elements[0]);;
++return_closcall3(data, car(((closureN)self_7312006)->elements[2]), &c_7315157, Cyc_cdr(data, ((closureN)self_7312006)->elements[4]), ((closureN)self_7312006)->elements[0]);;
+ }
+
+-static void __lambda_227(void *data, object self_7313260, int argc, object *args) /* object self_7313260, object r_734766 */
++static void __lambda_227(void *data, object self_7312007, int argc, object *args) /* object self_7312007, object r_734314 */
+ {
+- object r_734766 = args[0];
++ object r_734314 = args[0];
+
+-list_3_type local_7316462;
+-return_direct_with_clo1(data, ((closureN)self_7313260)->elements[0], (((closure) ((closureN)self_7313260)->elements[0])->fn), Cyc_fast_list_3(&local_7316462, ((closureN)self_7313260)->elements[1], ((closureN)self_7313260)->elements[2], r_734766));;
++list_3_type local_7315162;
++return_direct_with_clo1(data, ((closureN)self_7312007)->elements[0], (((closure) ((closureN)self_7312007)->elements[0])->fn), Cyc_fast_list_3(&local_7315162, ((closureN)self_7312007)->elements[1], ((closureN)self_7312007)->elements[2], r_734314));;
+ }
+
+-static void __lambda_220(void *data, object self_7313253, int argc, object *args) /* object self_7313253, object r_734753 */
++static void __lambda_220(void *data, object self_7312000, int argc, object *args) /* object self_7312000, object r_734301 */
+ {
+- object r_734753 = args[0];
++ object r_734301 = args[0];
+
+-closureN_type c_7316410;
+-object e_7316434 [5];
+-c_7316410.hdr.mark = gc_color_red;
+- c_7316410.hdr.grayed = 0;
+-c_7316410.tag = closureN_tag;
+- c_7316410.fn = (function_type)__lambda_221;
+-c_7316410.num_args = 1;
+-c_7316410.num_elements = 5;
+-c_7316410.elements = (object *)e_7316434;
+-c_7316410.elements[0] = ((closureN)self_7313253)->elements[0];
+-c_7316410.elements[1] = ((closureN)self_7313253)->elements[1];
+-c_7316410.elements[2] = ((closureN)self_7313253)->elements[2];
+-c_7316410.elements[3] = r_734753;
+-c_7316410.elements[4] = ((closureN)self_7313253)->elements[4];
++closureN_type c_7315110;
++object e_7315134 [5];
++c_7315110.hdr.mark = gc_color_red;
++ c_7315110.hdr.grayed = 0;
++c_7315110.tag = closureN_tag;
++ c_7315110.fn = (function_type)__lambda_221;
++c_7315110.num_args = 1;
++c_7315110.num_elements = 5;
++c_7315110.elements = (object *)e_7315134;
++c_7315110.elements[0] = ((closureN)self_7312000)->elements[0];
++c_7315110.elements[1] = ((closureN)self_7312000)->elements[1];
++c_7315110.elements[2] = ((closureN)self_7312000)->elements[2];
++c_7315110.elements[3] = r_734301;
++c_7315110.elements[4] = ((closureN)self_7312000)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313253)->elements[3], &c_7316410, quote_quote);;
++return_closcall2(data, ((closureN)self_7312000)->elements[3], &c_7315110, quote_quote);;
+ }
+
+-static void __lambda_221(void *data, object self_7313254, int argc, object *args) /* object self_7313254, object r_734758 */
++static void __lambda_221(void *data, object self_7312001, int argc, object *args) /* object self_7312001, object r_734306 */
+ {
+- object r_734758 = args[0];
++ object r_734306 = args[0];
+
+
+
+-closureN_type c_7316415;
+-object e_7316426 [3];
+-c_7316415.hdr.mark = gc_color_red;
+- c_7316415.hdr.grayed = 0;
+-c_7316415.tag = closureN_tag;
+- c_7316415.fn = (function_type)__lambda_222;
+-c_7316415.num_args = 1;
+-c_7316415.num_elements = 3;
+-c_7316415.elements = (object *)e_7316426;
+-c_7316415.elements[0] = ((closureN)self_7313254)->elements[1];
+-c_7316415.elements[1] = ((closureN)self_7313254)->elements[3];
+-c_7316415.elements[2] = r_734758;
++closureN_type c_7315115;
++object e_7315126 [3];
++c_7315115.hdr.mark = gc_color_red;
++ c_7315115.hdr.grayed = 0;
++c_7315115.tag = closureN_tag;
++ c_7315115.fn = (function_type)__lambda_222;
++c_7315115.num_args = 1;
++c_7315115.num_elements = 3;
++c_7315115.elements = (object *)e_7315126;
++c_7315115.elements[0] = ((closureN)self_7312001)->elements[1];
++c_7315115.elements[1] = ((closureN)self_7312001)->elements[3];
++c_7315115.elements[2] = r_734306;
+
+
+
+
+-complex_num_type local_7316432;
+-return_closcall3(data, car(((closureN)self_7313254)->elements[2]), &c_7316415, Cyc_cadr(data, ((closureN)self_7313254)->elements[4]), Cyc_fast_sub(data,&local_7316432, ((closureN)self_7313254)->elements[0], obj_int2obj(1)));;
++complex_num_type local_7315132;
++return_closcall3(data, car(((closureN)self_7312001)->elements[2]), &c_7315115, Cyc_cadr(data, ((closureN)self_7312001)->elements[4]), Cyc_fast_sub(data,&local_7315132, ((closureN)self_7312001)->elements[0], obj_int2obj(1)));;
+ }
+
+-static void __lambda_222(void *data, object self_7313255, int argc, object *args) /* object self_7313255, object r_734755 */
++static void __lambda_222(void *data, object self_7312002, int argc, object *args) /* object self_7312002, object r_734303 */
+ {
+- object r_734755 = args[0];
++ object r_734303 = args[0];
+
+-list_3_type local_7316420;
++list_3_type local_7315120;
+
+-list_2_type local_7316424;
+-return_direct_with_clo1(data, ((closureN)self_7313255)->elements[0], (((closure) ((closureN)self_7313255)->elements[0])->fn), Cyc_fast_list_3(&local_7316420, ((closureN)self_7313255)->elements[1], Cyc_fast_list_2(&local_7316424, ((closureN)self_7313255)->elements[2], quote_unquote), r_734755));;
++list_2_type local_7315124;
++return_direct_with_clo1(data, ((closureN)self_7312002)->elements[0], (((closure) ((closureN)self_7312002)->elements[0])->fn), Cyc_fast_list_3(&local_7315120, ((closureN)self_7312002)->elements[1], Cyc_fast_list_2(&local_7315124, ((closureN)self_7312002)->elements[2], quote_unquote), r_734303));;
+ }
+
+-static void __lambda_215(void *data, object self_7313281, int argc, object *args) /* object self_7313281, object r_734748 */
++static void __lambda_215(void *data, object self_7312028, int argc, object *args) /* object self_7312028, object r_734296 */
+ {
+- object r_734748 = args[0];
++ object r_734296 = args[0];
+
+-closureN_type c_7316374;
+-object e_7316383 [3];
+-c_7316374.hdr.mark = gc_color_red;
+- c_7316374.hdr.grayed = 0;
+-c_7316374.tag = closureN_tag;
+- c_7316374.fn = (function_type)__lambda_216;
+-c_7316374.num_args = 1;
+-c_7316374.num_elements = 3;
+-c_7316374.elements = (object *)e_7316383;
+-c_7316374.elements[0] = ((closureN)self_7313281)->elements[0];
+-c_7316374.elements[1] = ((closureN)self_7313281)->elements[1];
+-c_7316374.elements[2] = ((closureN)self_7313281)->elements[2];
++closureN_type c_7315074;
++object e_7315083 [3];
++c_7315074.hdr.mark = gc_color_red;
++ c_7315074.hdr.grayed = 0;
++c_7315074.tag = closureN_tag;
++ c_7315074.fn = (function_type)__lambda_216;
++c_7315074.num_args = 1;
++c_7315074.num_elements = 3;
++c_7315074.elements = (object *)e_7315083;
++c_7315074.elements[0] = ((closureN)self_7312028)->elements[0];
++c_7315074.elements[1] = ((closureN)self_7312028)->elements[1];
++c_7315074.elements[2] = ((closureN)self_7312028)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7316374,__lambda_216, Cyc_set_cell(data, ((closureN)self_7313281)->elements[2], r_734748));;
++return_direct_with_clo1(data,(closure)&c_7315074,__lambda_216, Cyc_set_cell(data, ((closureN)self_7312028)->elements[2], r_734296));;
+ }
+
+-static void __lambda_216(void *data, object self_7313282, int argc, object *args) /* object self_7313282, object r_734746 */
++static void __lambda_216(void *data, object self_7312029, int argc, object *args) /* object self_7312029, object r_734294 */
+ {
+
+
+
+
+
+-return_closcall3(data, car(((closureN)self_7313282)->elements[2]), ((closureN)self_7313282)->elements[1], Cyc_cadr(data, ((closureN)self_7313282)->elements[0]), obj_int2obj(0));;
++return_closcall3(data, car(((closureN)self_7312029)->elements[2]), ((closureN)self_7312029)->elements[1], Cyc_cadr(data, ((closureN)self_7312029)->elements[0]), obj_int2obj(0));;
+ }
+
+-static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_734666, object expr_73227_732977, object rename_73228_732978, object compare_73229_732979 */
++static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_734214, object expr_73227_732630, object rename_73228_732631, object compare_73229_732632 */
+ {
+-object k_734666 = args[0]; object expr_73227_732977 = args[1]; object rename_73228_732978 = args[2];
++object k_734214 = args[0]; object expr_73227_732630 = args[1]; object rename_73228_732631 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:do");
+
+-closureN_type c_7316133;
+-object e_7316365 [3];
+-c_7316133.hdr.mark = gc_color_red;
+- c_7316133.hdr.grayed = 0;
+-c_7316133.tag = closureN_tag;
+- c_7316133.fn = (function_type)__lambda_190;
+-c_7316133.num_args = 1;
+-c_7316133.num_elements = 3;
+-c_7316133.elements = (object *)e_7316365;
+-c_7316133.elements[0] = expr_73227_732977;
+-c_7316133.elements[1] = k_734666;
+-c_7316133.elements[2] = rename_73228_732978;
++closureN_type c_7314833;
++object e_7315065 [3];
++c_7314833.hdr.mark = gc_color_red;
++ c_7314833.hdr.grayed = 0;
++c_7314833.tag = closureN_tag;
++ c_7314833.fn = (function_type)__lambda_190;
++c_7314833.num_args = 1;
++c_7314833.num_elements = 3;
++c_7314833.elements = (object *)e_7315065;
++c_7314833.elements[0] = expr_73227_732630;
++c_7314833.elements[1] = k_734214;
++c_7314833.elements[2] = rename_73228_732631;
+
+-return_closcall2(data, rename_73228_732978, &c_7316133, quote_begin);;
++return_closcall2(data, rename_73228_732631, &c_7314833, quote_begin);;
+ }
+
+-static void __lambda_190(void *data, object self_7313225, int argc, object *args) /* object self_7313225, object r_734723 */
++static void __lambda_190(void *data, object self_7311972, int argc, object *args) /* object self_7311972, object r_734271 */
+ {
+- object r_734723 = args[0];
++ object r_734271 = args[0];
+
+-closureN_type c_7316136;
+-object e_7316364 [4];
+-c_7316136.hdr.mark = gc_color_red;
+- c_7316136.hdr.grayed = 0;
+-c_7316136.tag = closureN_tag;
+- c_7316136.fn = (function_type)__lambda_191;
+-c_7316136.num_args = 1;
+-c_7316136.num_elements = 4;
+-c_7316136.elements = (object *)e_7316364;
+-c_7316136.elements[0] = ((closureN)self_7313225)->elements[0];
+-c_7316136.elements[1] = ((closureN)self_7313225)->elements[1];
+-c_7316136.elements[2] = r_734723;
+-c_7316136.elements[3] = ((closureN)self_7313225)->elements[2];
++closureN_type c_7314836;
++object e_7315064 [4];
++c_7314836.hdr.mark = gc_color_red;
++ c_7314836.hdr.grayed = 0;
++c_7314836.tag = closureN_tag;
++ c_7314836.fn = (function_type)__lambda_191;
++c_7314836.num_args = 1;
++c_7314836.num_elements = 4;
++c_7314836.elements = (object *)e_7315064;
++c_7314836.elements[0] = ((closureN)self_7311972)->elements[0];
++c_7314836.elements[1] = ((closureN)self_7311972)->elements[1];
++c_7314836.elements[2] = r_734271;
++c_7314836.elements[3] = ((closureN)self_7311972)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313225)->elements[2], &c_7316136, quote_lp);;
++return_closcall2(data, ((closureN)self_7311972)->elements[2], &c_7314836, quote_lp);;
+ }
+
+-static void __lambda_191(void *data, object self_7313226, int argc, object *args) /* object self_7313226, object r_734729 */
++static void __lambda_191(void *data, object self_7311973, int argc, object *args) /* object self_7311973, object r_734277 */
+ {
+- object r_734729 = args[0];
++ object r_734277 = args[0];
+
+-closureN_type c_7316138;
+-object e_7316329 [5];
+-c_7316138.hdr.mark = gc_color_red;
+- c_7316138.hdr.grayed = 0;
+-c_7316138.tag = closureN_tag;
+- c_7316138.fn = (function_type)__lambda_192;
+-c_7316138.num_args = 1;
+-c_7316138.num_elements = 5;
+-c_7316138.elements = (object *)e_7316329;
+-c_7316138.elements[0] = ((closureN)self_7313226)->elements[0];
+-c_7316138.elements[1] = ((closureN)self_7313226)->elements[1];
+-c_7316138.elements[2] = ((closureN)self_7313226)->elements[2];
+-c_7316138.elements[3] = r_734729;
+-c_7316138.elements[4] = ((closureN)self_7313226)->elements[3];
++closureN_type c_7314838;
++object e_7315029 [5];
++c_7314838.hdr.mark = gc_color_red;
++ c_7314838.hdr.grayed = 0;
++c_7314838.tag = closureN_tag;
++ c_7314838.fn = (function_type)__lambda_192;
++c_7314838.num_args = 1;
++c_7314838.num_elements = 5;
++c_7314838.elements = (object *)e_7315029;
++c_7314838.elements[0] = ((closureN)self_7311973)->elements[0];
++c_7314838.elements[1] = ((closureN)self_7311973)->elements[1];
++c_7314838.elements[2] = ((closureN)self_7311973)->elements[2];
++c_7314838.elements[3] = r_734277;
++c_7314838.elements[4] = ((closureN)self_7311973)->elements[3];
+
+
+-mmacro(c_7316330, (function_type)__lambda_210);c_7316330.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7316138,__lambda_192, &c_7316330);;
++mmacro(c_7315030, (function_type)__lambda_210);c_7315030.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7314838,__lambda_192, &c_7315030);;
+ }
+
+-static void __lambda_210(void *data, object self_7313227, int argc, object *args) /* object self_7313227, object k_734733, object x_73253_732984 */
++static void __lambda_210(void *data, object self_7311974, int argc, object *args) /* object self_7311974, object k_734281, object x_73253_732637 */
+ {
+- object k_734733 = args[0]; object x_73253_732984 = args[1];
++ object k_734281 = args[0]; object x_73253_732637 = args[1];
+
+-closureN_type c_7316332;
+-object e_7316361 [2];
+-c_7316332.hdr.mark = gc_color_red;
+- c_7316332.hdr.grayed = 0;
+-c_7316332.tag = closureN_tag;
+- c_7316332.fn = (function_type)__lambda_211;
+-c_7316332.num_args = 1;
+-c_7316332.num_elements = 2;
+-c_7316332.elements = (object *)e_7316361;
+-c_7316332.elements[0] = k_734733;
+-c_7316332.elements[1] = x_73253_732984;
++closureN_type c_7315032;
++object e_7315061 [2];
++c_7315032.hdr.mark = gc_color_red;
++ c_7315032.hdr.grayed = 0;
++c_7315032.tag = closureN_tag;
++ c_7315032.fn = (function_type)__lambda_211;
++c_7315032.num_args = 1;
++c_7315032.num_elements = 2;
++c_7315032.elements = (object *)e_7315061;
++c_7315032.elements[0] = k_734281;
++c_7315032.elements[1] = x_73253_732637;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7316332,__lambda_211, Cyc_cddr(data, x_73253_732984));;
++return_direct_with_clo1(data,(closure)&c_7315032,__lambda_211, Cyc_cddr(data, x_73253_732637));;
+ }
+
+-static void __lambda_211(void *data, object self_7313228, int argc, object *args) /* object self_7313228, object r_734739 */
++static void __lambda_211(void *data, object self_7311975, int argc, object *args) /* object self_7311975, object r_734287 */
+ {
+- object r_734739 = args[0];
++ object r_734287 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(r_734739)) ){
++if( (boolean_f != Cyc_is_pair(r_734287)) ){
+
+-closureN_type c_7316336;
+-object e_7316352 [2];
+-c_7316336.hdr.mark = gc_color_red;
+- c_7316336.hdr.grayed = 0;
+-c_7316336.tag = closureN_tag;
+- c_7316336.fn = (function_type)__lambda_212;
+-c_7316336.num_args = 1;
+-c_7316336.num_elements = 2;
+-c_7316336.elements = (object *)e_7316352;
+-c_7316336.elements[0] = ((closureN)self_7313228)->elements[0];
+-c_7316336.elements[1] = ((closureN)self_7313228)->elements[1];
++closureN_type c_7315036;
++object e_7315052 [2];
++c_7315036.hdr.mark = gc_color_red;
++ c_7315036.hdr.grayed = 0;
++c_7315036.tag = closureN_tag;
++ c_7315036.fn = (function_type)__lambda_212;
++c_7315036.num_args = 1;
++c_7315036.num_elements = 2;
++c_7315036.elements = (object *)e_7315052;
++c_7315036.elements[0] = ((closureN)self_7311975)->elements[0];
++c_7315036.elements[1] = ((closureN)self_7311975)->elements[1];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7316336,__lambda_212, Cyc_cddr(data, ((closureN)self_7313228)->elements[1]));
++return_direct_with_clo1(data,(closure)&c_7315036,__lambda_212, Cyc_cddr(data, ((closureN)self_7311975)->elements[1]));
+ } else {
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313228)->elements[0], (((closure) ((closureN)self_7313228)->elements[0])->fn), Cyc_car(data, ((closureN)self_7313228)->elements[1]));}
++return_direct_with_clo1(data, ((closureN)self_7311975)->elements[0], (((closure) ((closureN)self_7311975)->elements[0])->fn), Cyc_car(data, ((closureN)self_7311975)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_212(void *data, object self_7313229, int argc, object *args) /* object self_7313229, object r_734738 */
++static void __lambda_212(void *data, object self_7311976, int argc, object *args) /* object self_7311976, object r_734286 */
+ {
+- object r_734738 = args[0];
++ object r_734286 = args[0];
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, r_734738))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, r_734286))) ){
+
+-make_utf8_string_with_len(c_7316343, "too many forms in do iterator", 29, 29);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313229)->elements[0], &c_7316343, ((closureN)self_7313229)->elements[1]);
++make_utf8_string_with_len(c_7315043, "too many forms in do iterator", 29, 29);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311976)->elements[0], &c_7315043, ((closureN)self_7311976)->elements[1]);
+ } else {
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313229)->elements[0], (((closure) ((closureN)self_7313229)->elements[0])->fn), Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313229)->elements[1])));}
++return_direct_with_clo1(data, ((closureN)self_7311976)->elements[0], (((closure) ((closureN)self_7311976)->elements[0])->fn), Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311976)->elements[1])));}
+ ;;
+ }
+
+-static void __lambda_192(void *data, object self_7313230, int argc, object *args) /* object self_7313230, object r_734731 */
++static void __lambda_192(void *data, object self_7311977, int argc, object *args) /* object self_7311977, object r_734279 */
+ {
+- object r_734731 = args[0];
++ object r_734279 = args[0];
+
+-closureN_type c_7316140;
+-object e_7316325 [5];
+-c_7316140.hdr.mark = gc_color_red;
+- c_7316140.hdr.grayed = 0;
+-c_7316140.tag = closureN_tag;
+- c_7316140.fn = (function_type)__lambda_193;
+-c_7316140.num_args = 1;
+-c_7316140.num_elements = 5;
+-c_7316140.elements = (object *)e_7316325;
+-c_7316140.elements[0] = ((closureN)self_7313230)->elements[0];
+-c_7316140.elements[1] = ((closureN)self_7313230)->elements[1];
+-c_7316140.elements[2] = ((closureN)self_7313230)->elements[2];
+-c_7316140.elements[3] = ((closureN)self_7313230)->elements[3];
+-c_7316140.elements[4] = ((closureN)self_7313230)->elements[4];
++closureN_type c_7314840;
++object e_7315025 [5];
++c_7314840.hdr.mark = gc_color_red;
++ c_7314840.hdr.grayed = 0;
++c_7314840.tag = closureN_tag;
++ c_7314840.fn = (function_type)__lambda_193;
++c_7314840.num_args = 1;
++c_7314840.num_elements = 5;
++c_7314840.elements = (object *)e_7315025;
++c_7314840.elements[0] = ((closureN)self_7311977)->elements[0];
++c_7314840.elements[1] = ((closureN)self_7311977)->elements[1];
++c_7314840.elements[2] = ((closureN)self_7311977)->elements[2];
++c_7314840.elements[3] = ((closureN)self_7311977)->elements[3];
++c_7314840.elements[4] = ((closureN)self_7311977)->elements[4];
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7316140, r_734731, Cyc_cadr(data, ((closureN)self_7313230)->elements[0]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314840, r_734279, Cyc_cadr(data, ((closureN)self_7311977)->elements[0]));;
+ }
+
+-static void __lambda_193(void *data, object self_7313231, int argc, object *args) /* object self_7313231, object r_734730 */
++static void __lambda_193(void *data, object self_7311978, int argc, object *args) /* object self_7311978, object r_734278 */
+ {
+- object r_734730 = args[0];
++ object r_734278 = args[0];
+
+-closureN_type c_7316142;
+-object e_7316312 [4];
+-c_7316142.hdr.mark = gc_color_red;
+- c_7316142.hdr.grayed = 0;
+-c_7316142.tag = closureN_tag;
+- c_7316142.fn = (function_type)__lambda_194;
+-c_7316142.num_args = 1;
+-c_7316142.num_elements = 4;
+-c_7316142.elements = (object *)e_7316312;
+-c_7316142.elements[0] = ((closureN)self_7313231)->elements[0];
+-c_7316142.elements[1] = ((closureN)self_7313231)->elements[1];
+-c_7316142.elements[2] = ((closureN)self_7313231)->elements[2];
+-c_7316142.elements[3] = ((closureN)self_7313231)->elements[4];
++closureN_type c_7314842;
++object e_7315012 [4];
++c_7314842.hdr.mark = gc_color_red;
++ c_7314842.hdr.grayed = 0;
++c_7314842.tag = closureN_tag;
++ c_7314842.fn = (function_type)__lambda_194;
++c_7314842.num_args = 1;
++c_7314842.num_elements = 4;
++c_7314842.elements = (object *)e_7315012;
++c_7314842.elements[0] = ((closureN)self_7311978)->elements[0];
++c_7314842.elements[1] = ((closureN)self_7311978)->elements[1];
++c_7314842.elements[2] = ((closureN)self_7311978)->elements[2];
++c_7314842.elements[3] = ((closureN)self_7311978)->elements[4];
+
+
+
+
+
+
+-pair_type local_7316320;
++pair_type local_7315020;
+
+-pair_type local_7316323;
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7316142, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7313231)->elements[0])), set_pair_as_expr(&local_7316320, set_pair_as_expr(&local_7316323, ((closureN)self_7313231)->elements[3], r_734730), NULL));;
++pair_type local_7315023;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7314842, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7311978)->elements[0])), set_pair_as_expr(&local_7315020, set_pair_as_expr(&local_7315023, ((closureN)self_7311978)->elements[3], r_734278), NULL));;
+ }
+
+-static void __lambda_194(void *data, object self_7313232, int argc, object *args) /* object self_7313232, object r_734724 */
++static void __lambda_194(void *data, object self_7311979, int argc, object *args) /* object self_7311979, object r_734272 */
+ {
+- object r_734724 = args[0];
++ object r_734272 = args[0];
+
+-closureN_type c_7316144;
+-object e_7316307 [3];
+-c_7316144.hdr.mark = gc_color_red;
+- c_7316144.hdr.grayed = 0;
+-c_7316144.tag = closureN_tag;
+- c_7316144.fn = (function_type)__lambda_195;
+-c_7316144.num_args = 1;
+-c_7316144.num_elements = 3;
+-c_7316144.elements = (object *)e_7316307;
+-c_7316144.elements[0] = ((closureN)self_7313232)->elements[0];
+-c_7316144.elements[1] = ((closureN)self_7313232)->elements[1];
+-c_7316144.elements[2] = ((closureN)self_7313232)->elements[3];
++closureN_type c_7314844;
++object e_7315007 [3];
++c_7314844.hdr.mark = gc_color_red;
++ c_7314844.hdr.grayed = 0;
++c_7314844.tag = closureN_tag;
++ c_7314844.fn = (function_type)__lambda_195;
++c_7314844.num_args = 1;
++c_7314844.num_elements = 3;
++c_7314844.elements = (object *)e_7315007;
++c_7314844.elements[0] = ((closureN)self_7311979)->elements[0];
++c_7314844.elements[1] = ((closureN)self_7311979)->elements[1];
++c_7314844.elements[2] = ((closureN)self_7311979)->elements[3];
+
+
+-pair_type local_7316310;
+-return_direct_with_clo1(data,(closure)&c_7316144,__lambda_195, set_pair_as_expr(&local_7316310, ((closureN)self_7313232)->elements[2], r_734724));;
++pair_type local_7315010;
++return_direct_with_clo1(data,(closure)&c_7314844,__lambda_195, set_pair_as_expr(&local_7315010, ((closureN)self_7311979)->elements[2], r_734272));;
+ }
+
+-static void __lambda_195(void *data, object self_7313233, int argc, object *args) /* object self_7313233, object body_73232_732980 */
++static void __lambda_195(void *data, object self_7311980, int argc, object *args) /* object self_7311980, object body_73232_732633 */
+ {
+- object body_73232_732980 = args[0];
++ object body_73232_732633 = args[0];
+
+-closureN_type c_7316146;
+-object e_7316261 [3];
+-c_7316146.hdr.mark = gc_color_red;
+- c_7316146.hdr.grayed = 0;
+-c_7316146.tag = closureN_tag;
+- c_7316146.fn = (function_type)__lambda_196;
+-c_7316146.num_args = 0;
+-c_7316146.num_elements = 3;
+-c_7316146.elements = (object *)e_7316261;
+-c_7316146.elements[0] = body_73232_732980;
+-c_7316146.elements[1] = ((closureN)self_7313233)->elements[0];
+-c_7316146.elements[2] = ((closureN)self_7313233)->elements[2];
++closureN_type c_7314846;
++object e_7314961 [3];
++c_7314846.hdr.mark = gc_color_red;
++ c_7314846.hdr.grayed = 0;
++c_7314846.tag = closureN_tag;
++ c_7314846.fn = (function_type)__lambda_196;
++c_7314846.num_args = 0;
++c_7314846.num_elements = 3;
++c_7314846.elements = (object *)e_7314961;
++c_7314846.elements[0] = body_73232_732633;
++c_7314846.elements[1] = ((closureN)self_7311980)->elements[0];
++c_7314846.elements[2] = ((closureN)self_7311980)->elements[2];
+
+
+-closureN_type c_7316262;
+-object e_7316306 [3];
+-c_7316262.hdr.mark = gc_color_red;
+- c_7316262.hdr.grayed = 0;
+-c_7316262.tag = closureN_tag;
+- c_7316262.fn = (function_type)__lambda_204;
+-c_7316262.num_args = 1;
+-c_7316262.num_elements = 3;
+-c_7316262.elements = (object *)e_7316306;
+-c_7316262.elements[0] = ((closureN)self_7313233)->elements[0];
+-c_7316262.elements[1] = ((closureN)self_7313233)->elements[1];
+-c_7316262.elements[2] = ((closureN)self_7313233)->elements[2];
++closureN_type c_7314962;
++object e_7315006 [3];
++c_7314962.hdr.mark = gc_color_red;
++ c_7314962.hdr.grayed = 0;
++c_7314962.tag = closureN_tag;
++ c_7314962.fn = (function_type)__lambda_204;
++c_7314962.num_args = 1;
++c_7314962.num_elements = 3;
++c_7314962.elements = (object *)e_7315006;
++c_7314962.elements[0] = ((closureN)self_7311980)->elements[0];
++c_7314962.elements[1] = ((closureN)self_7311980)->elements[1];
++c_7314962.elements[2] = ((closureN)self_7311980)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7316146,__lambda_196, &c_7316262);;
++return_direct_with_clo1(data,(closure)&c_7314846,__lambda_196, &c_7314962);;
+ }
+
+-static void __lambda_204(void *data, object self_7313234, int argc, object *args) /* object self_7313234, object wrap_73238_732982 */
++static void __lambda_204(void *data, object self_7311981, int argc, object *args) /* object self_7311981, object wrap_73238_732635 */
+ {
+- object wrap_73238_732982 = args[0];
++ object wrap_73238_732635 = args[0];
+
+-closureN_type c_7316265;
+-object e_7316305 [4];
+-c_7316265.hdr.mark = gc_color_red;
+- c_7316265.hdr.grayed = 0;
+-c_7316265.tag = closureN_tag;
+- c_7316265.fn = (function_type)__lambda_205;
+-c_7316265.num_args = 1;
+-c_7316265.num_elements = 4;
+-c_7316265.elements = (object *)e_7316305;
+-c_7316265.elements[0] = ((closureN)self_7313234)->elements[0];
+-c_7316265.elements[1] = ((closureN)self_7313234)->elements[1];
+-c_7316265.elements[2] = ((closureN)self_7313234)->elements[2];
+-c_7316265.elements[3] = wrap_73238_732982;
++closureN_type c_7314965;
++object e_7315005 [4];
++c_7314965.hdr.mark = gc_color_red;
++ c_7314965.hdr.grayed = 0;
++c_7314965.tag = closureN_tag;
++ c_7314965.fn = (function_type)__lambda_205;
++c_7314965.num_args = 1;
++c_7314965.num_elements = 4;
++c_7314965.elements = (object *)e_7315005;
++c_7314965.elements[0] = ((closureN)self_7311981)->elements[0];
++c_7314965.elements[1] = ((closureN)self_7311981)->elements[1];
++c_7314965.elements[2] = ((closureN)self_7311981)->elements[2];
++c_7314965.elements[3] = wrap_73238_732635;
+
+-return_closcall2(data, ((closureN)self_7313234)->elements[2], &c_7316265, quote_let);;
++return_closcall2(data, ((closureN)self_7311981)->elements[2], &c_7314965, quote_let);;
+ }
+
+-static void __lambda_205(void *data, object self_7313235, int argc, object *args) /* object self_7313235, object r_734670 */
++static void __lambda_205(void *data, object self_7311982, int argc, object *args) /* object self_7311982, object r_734218 */
+ {
+- object r_734670 = args[0];
++ object r_734218 = args[0];
+
+-closureN_type c_7316268;
+-object e_7316304 [4];
+-c_7316268.hdr.mark = gc_color_red;
+- c_7316268.hdr.grayed = 0;
+-c_7316268.tag = closureN_tag;
+- c_7316268.fn = (function_type)__lambda_206;
+-c_7316268.num_args = 1;
+-c_7316268.num_elements = 4;
+-c_7316268.elements = (object *)e_7316304;
+-c_7316268.elements[0] = ((closureN)self_7313235)->elements[0];
+-c_7316268.elements[1] = ((closureN)self_7313235)->elements[1];
+-c_7316268.elements[2] = r_734670;
+-c_7316268.elements[3] = ((closureN)self_7313235)->elements[3];
++closureN_type c_7314968;
++object e_7315004 [4];
++c_7314968.hdr.mark = gc_color_red;
++ c_7314968.hdr.grayed = 0;
++c_7314968.tag = closureN_tag;
++ c_7314968.fn = (function_type)__lambda_206;
++c_7314968.num_args = 1;
++c_7314968.num_elements = 4;
++c_7314968.elements = (object *)e_7315004;
++c_7314968.elements[0] = ((closureN)self_7311982)->elements[0];
++c_7314968.elements[1] = ((closureN)self_7311982)->elements[1];
++c_7314968.elements[2] = r_734218;
++c_7314968.elements[3] = ((closureN)self_7311982)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313235)->elements[2], &c_7316268, quote_lp);;
++return_closcall2(data, ((closureN)self_7311982)->elements[2], &c_7314968, quote_lp);;
+ }
+
+-static void __lambda_206(void *data, object self_7313236, int argc, object *args) /* object self_7313236, object r_734672 */
++static void __lambda_206(void *data, object self_7311983, int argc, object *args) /* object self_7311983, object r_734220 */
+ {
+- object r_734672 = args[0];
++ object r_734220 = args[0];
+
+-closureN_type c_7316270;
+-object e_7316294 [5];
+-c_7316270.hdr.mark = gc_color_red;
+- c_7316270.hdr.grayed = 0;
+-c_7316270.tag = closureN_tag;
+- c_7316270.fn = (function_type)__lambda_207;
+-c_7316270.num_args = 1;
+-c_7316270.num_elements = 5;
+-c_7316270.elements = (object *)e_7316294;
+-c_7316270.elements[0] = ((closureN)self_7313236)->elements[0];
+-c_7316270.elements[1] = ((closureN)self_7313236)->elements[1];
+-c_7316270.elements[2] = ((closureN)self_7313236)->elements[2];
+-c_7316270.elements[3] = r_734672;
+-c_7316270.elements[4] = ((closureN)self_7313236)->elements[3];
++closureN_type c_7314970;
++object e_7314994 [5];
++c_7314970.hdr.mark = gc_color_red;
++ c_7314970.hdr.grayed = 0;
++c_7314970.tag = closureN_tag;
++ c_7314970.fn = (function_type)__lambda_207;
++c_7314970.num_args = 1;
++c_7314970.num_elements = 5;
++c_7314970.elements = (object *)e_7314994;
++c_7314970.elements[0] = ((closureN)self_7311983)->elements[0];
++c_7314970.elements[1] = ((closureN)self_7311983)->elements[1];
++c_7314970.elements[2] = ((closureN)self_7311983)->elements[2];
++c_7314970.elements[3] = r_734220;
++c_7314970.elements[4] = ((closureN)self_7311983)->elements[3];
+
+
+-mmacro(c_7316295, (function_type)__lambda_209);c_7316295.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7316270,__lambda_207, &c_7316295);;
++mmacro(c_7314995, (function_type)__lambda_209);c_7314995.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7314970,__lambda_207, &c_7314995);;
+ }
+
+-static void __lambda_209(void *data, object self_7313237, int argc, object *args) /* object self_7313237, object k_734679, object x_73243_732983 */
++static void __lambda_209(void *data, object self_7311984, int argc, object *args) /* object self_7311984, object k_734227, object x_73243_732636 */
+ {
+- object k_734679 = args[0]; object x_73243_732983 = args[1];
++ object k_734227 = args[0]; object x_73243_732636 = args[1];
+
+-list_2_type local_7316299;
++list_2_type local_7314999;
+
+
+
+
+-return_direct_with_clo1(data, k_734679, (((closure) k_734679)->fn), Cyc_fast_list_2(&local_7316299, Cyc_car(data, x_73243_732983), Cyc_cadr(data, x_73243_732983)));;
++return_direct_with_clo1(data, k_734227, (((closure) k_734227)->fn), Cyc_fast_list_2(&local_7314999, Cyc_car(data, x_73243_732636), Cyc_cadr(data, x_73243_732636)));;
+ }
+
+-static void __lambda_207(void *data, object self_7313238, int argc, object *args) /* object self_7313238, object r_734677 */
++static void __lambda_207(void *data, object self_7311985, int argc, object *args) /* object self_7311985, object r_734225 */
+ {
+- object r_734677 = args[0];
++ object r_734225 = args[0];
+
+-closureN_type c_7316272;
+-object e_7316290 [4];
+-c_7316272.hdr.mark = gc_color_red;
+- c_7316272.hdr.grayed = 0;
+-c_7316272.tag = closureN_tag;
+- c_7316272.fn = (function_type)__lambda_208;
+-c_7316272.num_args = 1;
+-c_7316272.num_elements = 4;
+-c_7316272.elements = (object *)e_7316290;
+-c_7316272.elements[0] = ((closureN)self_7313238)->elements[1];
+-c_7316272.elements[1] = ((closureN)self_7313238)->elements[2];
+-c_7316272.elements[2] = ((closureN)self_7313238)->elements[3];
+-c_7316272.elements[3] = ((closureN)self_7313238)->elements[4];
++closureN_type c_7314972;
++object e_7314990 [4];
++c_7314972.hdr.mark = gc_color_red;
++ c_7314972.hdr.grayed = 0;
++c_7314972.tag = closureN_tag;
++ c_7314972.fn = (function_type)__lambda_208;
++c_7314972.num_args = 1;
++c_7314972.num_elements = 4;
++c_7314972.elements = (object *)e_7314990;
++c_7314972.elements[0] = ((closureN)self_7311985)->elements[1];
++c_7314972.elements[1] = ((closureN)self_7311985)->elements[2];
++c_7314972.elements[2] = ((closureN)self_7311985)->elements[3];
++c_7314972.elements[3] = ((closureN)self_7311985)->elements[4];
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7316272, r_734677, Cyc_cadr(data, ((closureN)self_7313238)->elements[0]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314972, r_734225, Cyc_cadr(data, ((closureN)self_7311985)->elements[0]));;
+ }
+
+-static void __lambda_208(void *data, object self_7313239, int argc, object *args) /* object self_7313239, object r_734674 */
++static void __lambda_208(void *data, object self_7311986, int argc, object *args) /* object self_7311986, object r_734222 */
+ {
+- object r_734674 = args[0];
++ object r_734222 = args[0];
+
+-pair_type local_7316277;
++pair_type local_7314977;
+
+-pair_type local_7316281;
++pair_type local_7314981;
+
+-pair_type local_7316285;
++pair_type local_7314985;
+
+-pair_type local_7316288;
+-return_direct_with_clo1(data, ((closureN)self_7313239)->elements[0], (((closure) ((closureN)self_7313239)->elements[0])->fn), set_pair_as_expr(&local_7316277, ((closureN)self_7313239)->elements[1], set_pair_as_expr(&local_7316281, ((closureN)self_7313239)->elements[2], set_pair_as_expr(&local_7316285, r_734674, set_pair_as_expr(&local_7316288, ((closureN)self_7313239)->elements[3], NULL)))));;
++pair_type local_7314988;
++return_direct_with_clo1(data, ((closureN)self_7311986)->elements[0], (((closure) ((closureN)self_7311986)->elements[0])->fn), set_pair_as_expr(&local_7314977, ((closureN)self_7311986)->elements[1], set_pair_as_expr(&local_7314981, ((closureN)self_7311986)->elements[2], set_pair_as_expr(&local_7314985, r_734222, set_pair_as_expr(&local_7314988, ((closureN)self_7311986)->elements[3], NULL)))));;
+ }
+
+-static void __lambda_196(void *data, object self_7313240, int argc, object *args) /* object self_7313240, object k_734684 */
++static void __lambda_196(void *data, object self_7311987, int argc, object *args) /* object self_7311987, object k_734232 */
+ {
+- object k_734684 = args[0];
++ object k_734232 = args[0];
+
+
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313240)->elements[1]))))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311987)->elements[1]))))) ){
+
+-closureN_type c_7316158;
+-object e_7316219 [4];
+-c_7316158.hdr.mark = gc_color_red;
+- c_7316158.hdr.grayed = 0;
+-c_7316158.tag = closureN_tag;
+- c_7316158.fn = (function_type)__lambda_197;
+-c_7316158.num_args = 1;
+-c_7316158.num_elements = 4;
+-c_7316158.elements = (object *)e_7316219;
+-c_7316158.elements[0] = ((closureN)self_7313240)->elements[0];
+-c_7316158.elements[1] = ((closureN)self_7313240)->elements[1];
+-c_7316158.elements[2] = k_734684;
+-c_7316158.elements[3] = ((closureN)self_7313240)->elements[2];
++closureN_type c_7314858;
++object e_7314919 [4];
++c_7314858.hdr.mark = gc_color_red;
++ c_7314858.hdr.grayed = 0;
++c_7314858.tag = closureN_tag;
++ c_7314858.fn = (function_type)__lambda_197;
++c_7314858.num_args = 1;
++c_7314858.num_elements = 4;
++c_7314858.elements = (object *)e_7314919;
++c_7314858.elements[0] = ((closureN)self_7311987)->elements[0];
++c_7314858.elements[1] = ((closureN)self_7311987)->elements[1];
++c_7314858.elements[2] = k_734232;
++c_7314858.elements[3] = ((closureN)self_7311987)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313240)->elements[2], &c_7316158, quote_let);
++return_closcall2(data, ((closureN)self_7311987)->elements[2], &c_7314858, quote_let);
+ } else {
+
+-closureN_type c_7316222;
+-object e_7316260 [4];
+-c_7316222.hdr.mark = gc_color_red;
+- c_7316222.hdr.grayed = 0;
+-c_7316222.tag = closureN_tag;
+- c_7316222.fn = (function_type)__lambda_202;
+-c_7316222.num_args = 1;
+-c_7316222.num_elements = 4;
+-c_7316222.elements = (object *)e_7316260;
+-c_7316222.elements[0] = ((closureN)self_7313240)->elements[0];
+-c_7316222.elements[1] = ((closureN)self_7313240)->elements[1];
+-c_7316222.elements[2] = k_734684;
+-c_7316222.elements[3] = ((closureN)self_7313240)->elements[2];
++closureN_type c_7314922;
++object e_7314960 [4];
++c_7314922.hdr.mark = gc_color_red;
++ c_7314922.hdr.grayed = 0;
++c_7314922.tag = closureN_tag;
++ c_7314922.fn = (function_type)__lambda_202;
++c_7314922.num_args = 1;
++c_7314922.num_elements = 4;
++c_7314922.elements = (object *)e_7314960;
++c_7314922.elements[0] = ((closureN)self_7311987)->elements[0];
++c_7314922.elements[1] = ((closureN)self_7311987)->elements[1];
++c_7314922.elements[2] = k_734232;
++c_7314922.elements[3] = ((closureN)self_7311987)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313240)->elements[2], &c_7316222, quote__if);}
++return_closcall2(data, ((closureN)self_7311987)->elements[2], &c_7314922, quote__if);}
+ ;;
+ }
+
+-static void __lambda_202(void *data, object self_7313246, int argc, object *args) /* object self_7313246, object r_734710 */
++static void __lambda_202(void *data, object self_7311993, int argc, object *args) /* object self_7311993, object r_734258 */
+ {
+- object r_734710 = args[0];
++ object r_734258 = args[0];
+
+-closureN_type c_7316225;
+-object e_7316259 [4];
+-c_7316225.hdr.mark = gc_color_red;
+- c_7316225.hdr.grayed = 0;
+-c_7316225.tag = closureN_tag;
+- c_7316225.fn = (function_type)__lambda_203;
+-c_7316225.num_args = 1;
+-c_7316225.num_elements = 4;
+-c_7316225.elements = (object *)e_7316259;
+-c_7316225.elements[0] = ((closureN)self_7313246)->elements[0];
+-c_7316225.elements[1] = ((closureN)self_7313246)->elements[1];
+-c_7316225.elements[2] = ((closureN)self_7313246)->elements[2];
+-c_7316225.elements[3] = r_734710;
++closureN_type c_7314925;
++object e_7314959 [4];
++c_7314925.hdr.mark = gc_color_red;
++ c_7314925.hdr.grayed = 0;
++c_7314925.tag = closureN_tag;
++ c_7314925.fn = (function_type)__lambda_203;
++c_7314925.num_args = 1;
++c_7314925.num_elements = 4;
++c_7314925.elements = (object *)e_7314959;
++c_7314925.elements[0] = ((closureN)self_7311993)->elements[0];
++c_7314925.elements[1] = ((closureN)self_7311993)->elements[1];
++c_7314925.elements[2] = ((closureN)self_7311993)->elements[2];
++c_7314925.elements[3] = r_734258;
+
+-return_closcall2(data, ((closureN)self_7313246)->elements[3], &c_7316225, quote_begin);;
++return_closcall2(data, ((closureN)self_7311993)->elements[3], &c_7314925, quote_begin);;
+ }
+
+-static void __lambda_203(void *data, object self_7313247, int argc, object *args) /* object self_7313247, object r_734717 */
++static void __lambda_203(void *data, object self_7311994, int argc, object *args) /* object self_7311994, object r_734265 */
+ {
+- object r_734717 = args[0];
++ object r_734265 = args[0];
+
+-pair_type local_7316230;
+-
+-pair_type local_7316234;
+-
++pair_type local_7314930;
+
++pair_type local_7314934;
+
+
+
+
+
+-pair_type local_7316244;
+
+-pair_type local_7316247;
+
++pair_type local_7314944;
+
++pair_type local_7314947;
+
+
+
+
+
+-pair_type local_7316257;
+-return_direct_with_clo1(data, ((closureN)self_7313247)->elements[2], (((closure) ((closureN)self_7313247)->elements[2])->fn), set_pair_as_expr(&local_7316230, ((closureN)self_7313247)->elements[3], set_pair_as_expr(&local_7316234, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313247)->elements[1]))), set_pair_as_expr(&local_7316244, set_pair_as_expr(&local_7316247, r_734717, Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313247)->elements[1])))), set_pair_as_expr(&local_7316257, ((closureN)self_7313247)->elements[0], NULL)))));;
+-}
+
+-static void __lambda_197(void *data, object self_7313241, int argc, object *args) /* object self_7313241, object r_734686 */
+- {
+- object r_734686 = args[0];
+-
+-closureN_type c_7316161;
+-object e_7316218 [5];
+-c_7316161.hdr.mark = gc_color_red;
+- c_7316161.hdr.grayed = 0;
+-c_7316161.tag = closureN_tag;
+- c_7316161.fn = (function_type)__lambda_198;
+-c_7316161.num_args = 1;
+-c_7316161.num_elements = 5;
+-c_7316161.elements = (object *)e_7316218;
+-c_7316161.elements[0] = ((closureN)self_7313241)->elements[0];
+-c_7316161.elements[1] = ((closureN)self_7313241)->elements[1];
+-c_7316161.elements[2] = ((closureN)self_7313241)->elements[2];
+-c_7316161.elements[3] = r_734686;
+-c_7316161.elements[4] = ((closureN)self_7313241)->elements[3];
+-
+-return_closcall2(data, ((closureN)self_7313241)->elements[3], &c_7316161, quote_tmp);;
+-}
+-
+-static void __lambda_198(void *data, object self_7313242, int argc, object *args) /* object self_7313242, object r_734704 */
+- {
+- object r_734704 = args[0];
+-
+-closureN_type c_7316164;
+-object e_7316217 [6];
+-c_7316164.hdr.mark = gc_color_red;
+- c_7316164.hdr.grayed = 0;
+-c_7316164.tag = closureN_tag;
+- c_7316164.fn = (function_type)__lambda_199;
+-c_7316164.num_args = 1;
+-c_7316164.num_elements = 6;
+-c_7316164.elements = (object *)e_7316217;
+-c_7316164.elements[0] = ((closureN)self_7313242)->elements[0];
+-c_7316164.elements[1] = ((closureN)self_7313242)->elements[1];
+-c_7316164.elements[2] = ((closureN)self_7313242)->elements[2];
+-c_7316164.elements[3] = ((closureN)self_7313242)->elements[3];
+-c_7316164.elements[4] = r_734704;
+-c_7316164.elements[5] = ((closureN)self_7313242)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313242)->elements[4], &c_7316164, quote__if);;
++pair_type local_7314957;
++return_direct_with_clo1(data, ((closureN)self_7311994)->elements[2], (((closure) ((closureN)self_7311994)->elements[2])->fn), set_pair_as_expr(&local_7314930, ((closureN)self_7311994)->elements[3], set_pair_as_expr(&local_7314934, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311994)->elements[1]))), set_pair_as_expr(&local_7314944, set_pair_as_expr(&local_7314947, r_734265, Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311994)->elements[1])))), set_pair_as_expr(&local_7314957, ((closureN)self_7311994)->elements[0], NULL)))));;
+ }
+
+-static void __lambda_199(void *data, object self_7313243, int argc, object *args) /* object self_7313243, object r_734692 */
++static void __lambda_197(void *data, object self_7311988, int argc, object *args) /* object self_7311988, object r_734234 */
+ {
+- object r_734692 = args[0];
++ object r_734234 = args[0];
+
+-closureN_type c_7316167;
+-object e_7316216 [7];
+-c_7316167.hdr.mark = gc_color_red;
+- c_7316167.hdr.grayed = 0;
+-c_7316167.tag = closureN_tag;
+- c_7316167.fn = (function_type)__lambda_200;
+-c_7316167.num_args = 1;
+-c_7316167.num_elements = 7;
+-c_7316167.elements = (object *)e_7316216;
+-c_7316167.elements[0] = ((closureN)self_7313243)->elements[0];
+-c_7316167.elements[1] = ((closureN)self_7313243)->elements[1];
+-c_7316167.elements[2] = ((closureN)self_7313243)->elements[2];
+-c_7316167.elements[3] = ((closureN)self_7313243)->elements[3];
+-c_7316167.elements[4] = r_734692;
+-c_7316167.elements[5] = ((closureN)self_7313243)->elements[4];
+-c_7316167.elements[6] = ((closureN)self_7313243)->elements[5];
++closureN_type c_7314861;
++object e_7314918 [5];
++c_7314861.hdr.mark = gc_color_red;
++ c_7314861.hdr.grayed = 0;
++c_7314861.tag = closureN_tag;
++ c_7314861.fn = (function_type)__lambda_198;
++c_7314861.num_args = 1;
++c_7314861.num_elements = 5;
++c_7314861.elements = (object *)e_7314918;
++c_7314861.elements[0] = ((closureN)self_7311988)->elements[0];
++c_7314861.elements[1] = ((closureN)self_7311988)->elements[1];
++c_7314861.elements[2] = ((closureN)self_7311988)->elements[2];
++c_7314861.elements[3] = r_734234;
++c_7314861.elements[4] = ((closureN)self_7311988)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313243)->elements[5], &c_7316167, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311988)->elements[3], &c_7314861, quote_tmp);;
+ }
+
+-static void __lambda_200(void *data, object self_7313244, int argc, object *args) /* object self_7313244, object r_734694 */
++static void __lambda_198(void *data, object self_7311989, int argc, object *args) /* object self_7311989, object r_734252 */
+ {
+- object r_734694 = args[0];
++ object r_734252 = args[0];
+
+-closureN_type c_7316170;
+-object e_7316215 [7];
+-c_7316170.hdr.mark = gc_color_red;
+- c_7316170.hdr.grayed = 0;
+-c_7316170.tag = closureN_tag;
+- c_7316170.fn = (function_type)__lambda_201;
+-c_7316170.num_args = 1;
+-c_7316170.num_elements = 7;
+-c_7316170.elements = (object *)e_7316215;
+-c_7316170.elements[0] = ((closureN)self_7313244)->elements[0];
+-c_7316170.elements[1] = ((closureN)self_7313244)->elements[1];
+-c_7316170.elements[2] = ((closureN)self_7313244)->elements[2];
+-c_7316170.elements[3] = ((closureN)self_7313244)->elements[3];
+-c_7316170.elements[4] = ((closureN)self_7313244)->elements[4];
+-c_7316170.elements[5] = r_734694;
+-c_7316170.elements[6] = ((closureN)self_7313244)->elements[5];
++closureN_type c_7314864;
++object e_7314917 [6];
++c_7314864.hdr.mark = gc_color_red;
++ c_7314864.hdr.grayed = 0;
++c_7314864.tag = closureN_tag;
++ c_7314864.fn = (function_type)__lambda_199;
++c_7314864.num_args = 1;
++c_7314864.num_elements = 6;
++c_7314864.elements = (object *)e_7314917;
++c_7314864.elements[0] = ((closureN)self_7311989)->elements[0];
++c_7314864.elements[1] = ((closureN)self_7311989)->elements[1];
++c_7314864.elements[2] = ((closureN)self_7311989)->elements[2];
++c_7314864.elements[3] = ((closureN)self_7311989)->elements[3];
++c_7314864.elements[4] = r_734252;
++c_7314864.elements[5] = ((closureN)self_7311989)->elements[4];
++
++return_closcall2(data, ((closureN)self_7311989)->elements[4], &c_7314864, quote__if);;
++}
++
++static void __lambda_199(void *data, object self_7311990, int argc, object *args) /* object self_7311990, object r_734240 */
++ {
++ object r_734240 = args[0];
++
++closureN_type c_7314867;
++object e_7314916 [7];
++c_7314867.hdr.mark = gc_color_red;
++ c_7314867.hdr.grayed = 0;
++c_7314867.tag = closureN_tag;
++ c_7314867.fn = (function_type)__lambda_200;
++c_7314867.num_args = 1;
++c_7314867.num_elements = 7;
++c_7314867.elements = (object *)e_7314916;
++c_7314867.elements[0] = ((closureN)self_7311990)->elements[0];
++c_7314867.elements[1] = ((closureN)self_7311990)->elements[1];
++c_7314867.elements[2] = ((closureN)self_7311990)->elements[2];
++c_7314867.elements[3] = ((closureN)self_7311990)->elements[3];
++c_7314867.elements[4] = r_734240;
++c_7314867.elements[5] = ((closureN)self_7311990)->elements[4];
++c_7314867.elements[6] = ((closureN)self_7311990)->elements[5];
++
++return_closcall2(data, ((closureN)self_7311990)->elements[5], &c_7314867, quote_tmp);;
++}
++
++static void __lambda_200(void *data, object self_7311991, int argc, object *args) /* object self_7311991, object r_734242 */
++ {
++ object r_734242 = args[0];
++
++closureN_type c_7314870;
++object e_7314915 [7];
++c_7314870.hdr.mark = gc_color_red;
++ c_7314870.hdr.grayed = 0;
++c_7314870.tag = closureN_tag;
++ c_7314870.fn = (function_type)__lambda_201;
++c_7314870.num_args = 1;
++c_7314870.num_elements = 7;
++c_7314870.elements = (object *)e_7314915;
++c_7314870.elements[0] = ((closureN)self_7311991)->elements[0];
++c_7314870.elements[1] = ((closureN)self_7311991)->elements[1];
++c_7314870.elements[2] = ((closureN)self_7311991)->elements[2];
++c_7314870.elements[3] = ((closureN)self_7311991)->elements[3];
++c_7314870.elements[4] = ((closureN)self_7311991)->elements[4];
++c_7314870.elements[5] = r_734242;
++c_7314870.elements[6] = ((closureN)self_7311991)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313244)->elements[6], &c_7316170, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311991)->elements[6], &c_7314870, quote_tmp);;
+ }
+
+-static void __lambda_201(void *data, object self_7313245, int argc, object *args) /* object self_7313245, object r_734696 */
++static void __lambda_201(void *data, object self_7311992, int argc, object *args) /* object self_7311992, object r_734244 */
+ {
+- object r_734696 = args[0];
++ object r_734244 = args[0];
+
+-pair_type local_7316175;
++pair_type local_7314875;
+
+-pair_type local_7316179;
++pair_type local_7314879;
+
+-pair_type local_7316182;
++pair_type local_7314882;
+
+-pair_type local_7316185;
++pair_type local_7314885;
+
+-pair_type local_7316189;
++pair_type local_7314889;
+
+
+
+@@ -36177,4715 +34380,4715 @@ pair_type local_7316189;
+
+
+
+-pair_type local_7316199;
++pair_type local_7314899;
+
+-pair_type local_7316202;
++pair_type local_7314902;
+
+-pair_type local_7316206;
++pair_type local_7314906;
+
+-pair_type local_7316210;
++pair_type local_7314910;
+
+-pair_type local_7316213;
+-return_direct_with_clo1(data, ((closureN)self_7313245)->elements[2], (((closure) ((closureN)self_7313245)->elements[2])->fn), set_pair_as_expr(&local_7316175, ((closureN)self_7313245)->elements[3], set_pair_as_expr(&local_7316179, set_pair_as_expr(&local_7316182, set_pair_as_expr(&local_7316185, ((closureN)self_7313245)->elements[6], set_pair_as_expr(&local_7316189, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313245)->elements[1]))), NULL)), NULL), set_pair_as_expr(&local_7316199, set_pair_as_expr(&local_7316202, ((closureN)self_7313245)->elements[4], set_pair_as_expr(&local_7316206, ((closureN)self_7313245)->elements[5], set_pair_as_expr(&local_7316210, r_734696, set_pair_as_expr(&local_7316213, ((closureN)self_7313245)->elements[0], NULL)))), NULL))));;
++pair_type local_7314913;
++return_direct_with_clo1(data, ((closureN)self_7311992)->elements[2], (((closure) ((closureN)self_7311992)->elements[2])->fn), set_pair_as_expr(&local_7314875, ((closureN)self_7311992)->elements[3], set_pair_as_expr(&local_7314879, set_pair_as_expr(&local_7314882, set_pair_as_expr(&local_7314885, ((closureN)self_7311992)->elements[6], set_pair_as_expr(&local_7314889, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311992)->elements[1]))), NULL)), NULL), set_pair_as_expr(&local_7314899, set_pair_as_expr(&local_7314902, ((closureN)self_7311992)->elements[4], set_pair_as_expr(&local_7314906, ((closureN)self_7311992)->elements[5], set_pair_as_expr(&local_7314910, r_734244, set_pair_as_expr(&local_7314913, ((closureN)self_7311992)->elements[0], NULL)))), NULL))));;
+ }
+
+-static void __lambda_182(void *data, object _, int argc, object *args) /* closure _,object k_734639, object exp_73221_732974, object rename_73222_732975, object compare_73223_732976 */
++static void __lambda_182(void *data, object _, int argc, object *args) /* closure _,object k_734187, object exp_73221_732627, object rename_73222_732628, object compare_73223_732629 */
+ {
+-object k_734639 = args[0]; object exp_73221_732974 = args[1];
++object k_734187 = args[0]; object exp_73221_732627 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:unless");
+
+-closureN_type c_7316062;
+-object e_7316077 [1];
+-c_7316062.hdr.mark = gc_color_red;
+- c_7316062.hdr.grayed = 0;
+-c_7316062.tag = closureN_tag;
+- c_7316062.fn = (function_type)__lambda_183;
+-c_7316062.num_args = 0;
+-c_7316062.num_elements = 1;
+-c_7316062.elements = (object *)e_7316077;
+-c_7316062.elements[0] = exp_73221_732974;
++closureN_type c_7314762;
++object e_7314777 [1];
++c_7314762.hdr.mark = gc_color_red;
++ c_7314762.hdr.grayed = 0;
++c_7314762.tag = closureN_tag;
++ c_7314762.fn = (function_type)__lambda_183;
++c_7314762.num_args = 0;
++c_7314762.num_elements = 1;
++c_7314762.elements = (object *)e_7314777;
++c_7314762.elements[0] = exp_73221_732627;
+
+
+-closureN_type c_7316078;
+-object e_7316130 [2];
+-c_7316078.hdr.mark = gc_color_red;
+- c_7316078.hdr.grayed = 0;
+-c_7316078.tag = closureN_tag;
+- c_7316078.fn = (function_type)__lambda_185;
+-c_7316078.num_args = 1;
+-c_7316078.num_elements = 2;
+-c_7316078.elements = (object *)e_7316130;
+-c_7316078.elements[0] = exp_73221_732974;
+-c_7316078.elements[1] = k_734639;
++closureN_type c_7314778;
++object e_7314830 [2];
++c_7314778.hdr.mark = gc_color_red;
++ c_7314778.hdr.grayed = 0;
++c_7314778.tag = closureN_tag;
++ c_7314778.fn = (function_type)__lambda_185;
++c_7314778.num_args = 1;
++c_7314778.num_elements = 2;
++c_7314778.elements = (object *)e_7314830;
++c_7314778.elements[0] = exp_73221_732627;
++c_7314778.elements[1] = k_734187;
+
+-return_direct_with_clo1(data,(closure)&c_7316062,__lambda_183, &c_7316078);;
++return_direct_with_clo1(data,(closure)&c_7314762,__lambda_183, &c_7314778);;
+ }
+
+-static void __lambda_185(void *data, object self_7313219, int argc, object *args) /* object self_7313219, object r_734640 */
++static void __lambda_185(void *data, object self_7311966, int argc, object *args) /* object self_7311966, object r_734188 */
+ {
+
+
+-closureN_type c_7316080;
+-object e_7316095 [1];
+-c_7316080.hdr.mark = gc_color_red;
+- c_7316080.hdr.grayed = 0;
+-c_7316080.tag = closureN_tag;
+- c_7316080.fn = (function_type)__lambda_186;
+-c_7316080.num_args = 0;
+-c_7316080.num_elements = 1;
+-c_7316080.elements = (object *)e_7316095;
+-c_7316080.elements[0] = ((closureN)self_7313219)->elements[0];
++closureN_type c_7314780;
++object e_7314795 [1];
++c_7314780.hdr.mark = gc_color_red;
++ c_7314780.hdr.grayed = 0;
++c_7314780.tag = closureN_tag;
++ c_7314780.fn = (function_type)__lambda_186;
++c_7314780.num_args = 0;
++c_7314780.num_elements = 1;
++c_7314780.elements = (object *)e_7314795;
++c_7314780.elements[0] = ((closureN)self_7311966)->elements[0];
+
+
+-closureN_type c_7316096;
+-object e_7316129 [2];
+-c_7316096.hdr.mark = gc_color_red;
+- c_7316096.hdr.grayed = 0;
+-c_7316096.tag = closureN_tag;
+- c_7316096.fn = (function_type)__lambda_188;
+-c_7316096.num_args = 1;
+-c_7316096.num_elements = 2;
+-c_7316096.elements = (object *)e_7316129;
+-c_7316096.elements[0] = ((closureN)self_7313219)->elements[0];
+-c_7316096.elements[1] = ((closureN)self_7313219)->elements[1];
++closureN_type c_7314796;
++object e_7314829 [2];
++c_7314796.hdr.mark = gc_color_red;
++ c_7314796.hdr.grayed = 0;
++c_7314796.tag = closureN_tag;
++ c_7314796.fn = (function_type)__lambda_188;
++c_7314796.num_args = 1;
++c_7314796.num_elements = 2;
++c_7314796.elements = (object *)e_7314829;
++c_7314796.elements[0] = ((closureN)self_7311966)->elements[0];
++c_7314796.elements[1] = ((closureN)self_7311966)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7316080,__lambda_186, &c_7316096);;
++return_direct_with_clo1(data,(closure)&c_7314780,__lambda_186, &c_7314796);;
+ }
+
+-static void __lambda_188(void *data, object self_7313220, int argc, object *args) /* object self_7313220, object r_734641 */
++static void __lambda_188(void *data, object self_7311967, int argc, object *args) /* object self_7311967, object r_734189 */
+ {
+
+
+-pair_type local_7316101;
++pair_type local_7314801;
+
+-pair_type local_7316104;
++pair_type local_7314804;
+
+-pair_type local_7316107;
++pair_type local_7314807;
+
+-pair_type local_7316110;
++pair_type local_7314810;
+
+
+
+-pair_type local_7316116;
++pair_type local_7314816;
+
+-pair_type local_7316119;
++pair_type local_7314819;
+
+-pair_type local_7316122;
++pair_type local_7314822;
+
+-pair_type local_7316125;
++pair_type local_7314825;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313220)->elements[1], (((closure) ((closureN)self_7313220)->elements[1])->fn), set_pair_as_expr(&local_7316101, quote__if, set_pair_as_expr(&local_7316104, set_pair_as_expr(&local_7316107, quote_not, set_pair_as_expr(&local_7316110, Cyc_cadr(data, ((closureN)self_7313220)->elements[0]), NULL)), set_pair_as_expr(&local_7316116, set_pair_as_expr(&local_7316119, set_pair_as_expr(&local_7316122, quote_lambda, set_pair_as_expr(&local_7316125, NULL, Cyc_cddr(data, ((closureN)self_7313220)->elements[0]))), NULL), NULL))));;
++return_direct_with_clo1(data, ((closureN)self_7311967)->elements[1], (((closure) ((closureN)self_7311967)->elements[1])->fn), set_pair_as_expr(&local_7314801, quote__if, set_pair_as_expr(&local_7314804, set_pair_as_expr(&local_7314807, quote_not, set_pair_as_expr(&local_7314810, Cyc_cadr(data, ((closureN)self_7311967)->elements[0]), NULL)), set_pair_as_expr(&local_7314816, set_pair_as_expr(&local_7314819, set_pair_as_expr(&local_7314822, quote_lambda, set_pair_as_expr(&local_7314825, NULL, Cyc_cddr(data, ((closureN)self_7311967)->elements[0]))), NULL), NULL))));;
+ }
+
+-static void __lambda_186(void *data, object self_7313221, int argc, object *args) /* object self_7313221, object k_734658 */
++static void __lambda_186(void *data, object self_7311968, int argc, object *args) /* object self_7311968, object k_734206 */
+ {
+- object k_734658 = args[0];
++ object k_734206 = args[0];
+
+-closureN_type c_7316082;
+-object e_7316091 [2];
+-c_7316082.hdr.mark = gc_color_red;
+- c_7316082.hdr.grayed = 0;
+-c_7316082.tag = closureN_tag;
+- c_7316082.fn = (function_type)__lambda_187;
+-c_7316082.num_args = 1;
+-c_7316082.num_elements = 2;
+-c_7316082.elements = (object *)e_7316091;
+-c_7316082.elements[0] = ((closureN)self_7313221)->elements[0];
+-c_7316082.elements[1] = k_734658;
++closureN_type c_7314782;
++object e_7314791 [2];
++c_7314782.hdr.mark = gc_color_red;
++ c_7314782.hdr.grayed = 0;
++c_7314782.tag = closureN_tag;
++ c_7314782.fn = (function_type)__lambda_187;
++c_7314782.num_args = 1;
++c_7314782.num_elements = 2;
++c_7314782.elements = (object *)e_7314791;
++c_7314782.elements[0] = ((closureN)self_7311968)->elements[0];
++c_7314782.elements[1] = k_734206;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7316082,__lambda_187, Cyc_cddr(data, ((closureN)self_7313221)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7314782,__lambda_187, Cyc_cddr(data, ((closureN)self_7311968)->elements[0]));;
+ }
+
+-static void __lambda_187(void *data, object self_7313222, int argc, object *args) /* object self_7313222, object r_734660 */
++static void __lambda_187(void *data, object self_7311969, int argc, object *args) /* object self_7311969, object r_734208 */
+ {
+- object r_734660 = args[0];
++ object r_734208 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734660)) ){
++if( (boolean_f != Cyc_is_null(r_734208)) ){
+
+-make_utf8_string_with_len(c_7316087, "no unless body", 14, 14);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313222)->elements[1], &c_7316087, ((closureN)self_7313222)->elements[0]);
++make_utf8_string_with_len(c_7314787, "no unless body", 14, 14);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311969)->elements[1], &c_7314787, ((closureN)self_7311969)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313222)->elements[1], (((closure) ((closureN)self_7313222)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311969)->elements[1], (((closure) ((closureN)self_7311969)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_183(void *data, object self_7313223, int argc, object *args) /* object self_7313223, object k_734661 */
++static void __lambda_183(void *data, object self_7311970, int argc, object *args) /* object self_7311970, object k_734209 */
+ {
+- object k_734661 = args[0];
++ object k_734209 = args[0];
+
+-closureN_type c_7316064;
+-object e_7316073 [2];
+-c_7316064.hdr.mark = gc_color_red;
+- c_7316064.hdr.grayed = 0;
+-c_7316064.tag = closureN_tag;
+- c_7316064.fn = (function_type)__lambda_184;
+-c_7316064.num_args = 1;
+-c_7316064.num_elements = 2;
+-c_7316064.elements = (object *)e_7316073;
+-c_7316064.elements[0] = ((closureN)self_7313223)->elements[0];
+-c_7316064.elements[1] = k_734661;
++closureN_type c_7314764;
++object e_7314773 [2];
++c_7314764.hdr.mark = gc_color_red;
++ c_7314764.hdr.grayed = 0;
++c_7314764.tag = closureN_tag;
++ c_7314764.fn = (function_type)__lambda_184;
++c_7314764.num_args = 1;
++c_7314764.num_elements = 2;
++c_7314764.elements = (object *)e_7314773;
++c_7314764.elements[0] = ((closureN)self_7311970)->elements[0];
++c_7314764.elements[1] = k_734209;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7316064,__lambda_184, Cyc_cdr(data, ((closureN)self_7313223)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7314764,__lambda_184, Cyc_cdr(data, ((closureN)self_7311970)->elements[0]));;
+ }
+
+-static void __lambda_184(void *data, object self_7313224, int argc, object *args) /* object self_7313224, object r_734663 */
++static void __lambda_184(void *data, object self_7311971, int argc, object *args) /* object self_7311971, object r_734211 */
+ {
+- object r_734663 = args[0];
++ object r_734211 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734663)) ){
++if( (boolean_f != Cyc_is_null(r_734211)) ){
+
+-make_utf8_string_with_len(c_7316069, "empty unless", 12, 12);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313224)->elements[1], &c_7316069, ((closureN)self_7313224)->elements[0]);
++make_utf8_string_with_len(c_7314769, "empty unless", 12, 12);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311971)->elements[1], &c_7314769, ((closureN)self_7311971)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313224)->elements[1], (((closure) ((closureN)self_7313224)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311971)->elements[1], (((closure) ((closureN)self_7311971)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_175(void *data, object _, int argc, object *args) /* closure _,object k_734616, object exp_73215_732971, object rename_73216_732972, object compare_73217_732973 */
++static void __lambda_175(void *data, object _, int argc, object *args) /* closure _,object k_734164, object exp_73215_732624, object rename_73216_732625, object compare_73217_732626 */
+ {
+-object k_734616 = args[0]; object exp_73215_732971 = args[1];
++object k_734164 = args[0]; object exp_73215_732624 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:when");
+
+-closureN_type c_7315997;
+-object e_7316012 [1];
+-c_7315997.hdr.mark = gc_color_red;
+- c_7315997.hdr.grayed = 0;
+-c_7315997.tag = closureN_tag;
+- c_7315997.fn = (function_type)__lambda_176;
+-c_7315997.num_args = 0;
+-c_7315997.num_elements = 1;
+-c_7315997.elements = (object *)e_7316012;
+-c_7315997.elements[0] = exp_73215_732971;
++closureN_type c_7314697;
++object e_7314712 [1];
++c_7314697.hdr.mark = gc_color_red;
++ c_7314697.hdr.grayed = 0;
++c_7314697.tag = closureN_tag;
++ c_7314697.fn = (function_type)__lambda_176;
++c_7314697.num_args = 0;
++c_7314697.num_elements = 1;
++c_7314697.elements = (object *)e_7314712;
++c_7314697.elements[0] = exp_73215_732624;
+
+
+-closureN_type c_7316013;
+-object e_7316059 [2];
+-c_7316013.hdr.mark = gc_color_red;
+- c_7316013.hdr.grayed = 0;
+-c_7316013.tag = closureN_tag;
+- c_7316013.fn = (function_type)__lambda_178;
+-c_7316013.num_args = 1;
+-c_7316013.num_elements = 2;
+-c_7316013.elements = (object *)e_7316059;
+-c_7316013.elements[0] = exp_73215_732971;
+-c_7316013.elements[1] = k_734616;
++closureN_type c_7314713;
++object e_7314759 [2];
++c_7314713.hdr.mark = gc_color_red;
++ c_7314713.hdr.grayed = 0;
++c_7314713.tag = closureN_tag;
++ c_7314713.fn = (function_type)__lambda_178;
++c_7314713.num_args = 1;
++c_7314713.num_elements = 2;
++c_7314713.elements = (object *)e_7314759;
++c_7314713.elements[0] = exp_73215_732624;
++c_7314713.elements[1] = k_734164;
+
+-return_direct_with_clo1(data,(closure)&c_7315997,__lambda_176, &c_7316013);;
++return_direct_with_clo1(data,(closure)&c_7314697,__lambda_176, &c_7314713);;
+ }
+
+-static void __lambda_178(void *data, object self_7313213, int argc, object *args) /* object self_7313213, object r_734617 */
++static void __lambda_178(void *data, object self_7311960, int argc, object *args) /* object self_7311960, object r_734165 */
+ {
+
+
+-closureN_type c_7316015;
+-object e_7316030 [1];
+-c_7316015.hdr.mark = gc_color_red;
+- c_7316015.hdr.grayed = 0;
+-c_7316015.tag = closureN_tag;
+- c_7316015.fn = (function_type)__lambda_179;
+-c_7316015.num_args = 0;
+-c_7316015.num_elements = 1;
+-c_7316015.elements = (object *)e_7316030;
+-c_7316015.elements[0] = ((closureN)self_7313213)->elements[0];
++closureN_type c_7314715;
++object e_7314730 [1];
++c_7314715.hdr.mark = gc_color_red;
++ c_7314715.hdr.grayed = 0;
++c_7314715.tag = closureN_tag;
++ c_7314715.fn = (function_type)__lambda_179;
++c_7314715.num_args = 0;
++c_7314715.num_elements = 1;
++c_7314715.elements = (object *)e_7314730;
++c_7314715.elements[0] = ((closureN)self_7311960)->elements[0];
+
+
+-closureN_type c_7316031;
+-object e_7316058 [2];
+-c_7316031.hdr.mark = gc_color_red;
+- c_7316031.hdr.grayed = 0;
+-c_7316031.tag = closureN_tag;
+- c_7316031.fn = (function_type)__lambda_181;
+-c_7316031.num_args = 1;
+-c_7316031.num_elements = 2;
+-c_7316031.elements = (object *)e_7316058;
+-c_7316031.elements[0] = ((closureN)self_7313213)->elements[0];
+-c_7316031.elements[1] = ((closureN)self_7313213)->elements[1];
++closureN_type c_7314731;
++object e_7314758 [2];
++c_7314731.hdr.mark = gc_color_red;
++ c_7314731.hdr.grayed = 0;
++c_7314731.tag = closureN_tag;
++ c_7314731.fn = (function_type)__lambda_181;
++c_7314731.num_args = 1;
++c_7314731.num_elements = 2;
++c_7314731.elements = (object *)e_7314758;
++c_7314731.elements[0] = ((closureN)self_7311960)->elements[0];
++c_7314731.elements[1] = ((closureN)self_7311960)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7316015,__lambda_179, &c_7316031);;
++return_direct_with_clo1(data,(closure)&c_7314715,__lambda_179, &c_7314731);;
+ }
+
+-static void __lambda_181(void *data, object self_7313214, int argc, object *args) /* object self_7313214, object r_734618 */
++static void __lambda_181(void *data, object self_7311961, int argc, object *args) /* object self_7311961, object r_734166 */
+ {
+
+
+-pair_type local_7316036;
++pair_type local_7314736;
+
+-pair_type local_7316039;
++pair_type local_7314739;
+
+
+
+-pair_type local_7316045;
++pair_type local_7314745;
+
+-pair_type local_7316048;
++pair_type local_7314748;
+
+-pair_type local_7316051;
++pair_type local_7314751;
+
+-pair_type local_7316054;
++pair_type local_7314754;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313214)->elements[1], (((closure) ((closureN)self_7313214)->elements[1])->fn), set_pair_as_expr(&local_7316036, quote__if, set_pair_as_expr(&local_7316039, Cyc_cadr(data, ((closureN)self_7313214)->elements[0]), set_pair_as_expr(&local_7316045, set_pair_as_expr(&local_7316048, set_pair_as_expr(&local_7316051, quote_lambda, set_pair_as_expr(&local_7316054, NULL, Cyc_cddr(data, ((closureN)self_7313214)->elements[0]))), NULL), NULL))));;
++return_direct_with_clo1(data, ((closureN)self_7311961)->elements[1], (((closure) ((closureN)self_7311961)->elements[1])->fn), set_pair_as_expr(&local_7314736, quote__if, set_pair_as_expr(&local_7314739, Cyc_cadr(data, ((closureN)self_7311961)->elements[0]), set_pair_as_expr(&local_7314745, set_pair_as_expr(&local_7314748, set_pair_as_expr(&local_7314751, quote_lambda, set_pair_as_expr(&local_7314754, NULL, Cyc_cddr(data, ((closureN)self_7311961)->elements[0]))), NULL), NULL))));;
+ }
+
+-static void __lambda_179(void *data, object self_7313215, int argc, object *args) /* object self_7313215, object k_734631 */
++static void __lambda_179(void *data, object self_7311962, int argc, object *args) /* object self_7311962, object k_734179 */
+ {
+- object k_734631 = args[0];
++ object k_734179 = args[0];
+
+-closureN_type c_7316017;
+-object e_7316026 [2];
+-c_7316017.hdr.mark = gc_color_red;
+- c_7316017.hdr.grayed = 0;
+-c_7316017.tag = closureN_tag;
+- c_7316017.fn = (function_type)__lambda_180;
+-c_7316017.num_args = 1;
+-c_7316017.num_elements = 2;
+-c_7316017.elements = (object *)e_7316026;
+-c_7316017.elements[0] = ((closureN)self_7313215)->elements[0];
+-c_7316017.elements[1] = k_734631;
++closureN_type c_7314717;
++object e_7314726 [2];
++c_7314717.hdr.mark = gc_color_red;
++ c_7314717.hdr.grayed = 0;
++c_7314717.tag = closureN_tag;
++ c_7314717.fn = (function_type)__lambda_180;
++c_7314717.num_args = 1;
++c_7314717.num_elements = 2;
++c_7314717.elements = (object *)e_7314726;
++c_7314717.elements[0] = ((closureN)self_7311962)->elements[0];
++c_7314717.elements[1] = k_734179;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7316017,__lambda_180, Cyc_cddr(data, ((closureN)self_7313215)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7314717,__lambda_180, Cyc_cddr(data, ((closureN)self_7311962)->elements[0]));;
+ }
+
+-static void __lambda_180(void *data, object self_7313216, int argc, object *args) /* object self_7313216, object r_734633 */
++static void __lambda_180(void *data, object self_7311963, int argc, object *args) /* object self_7311963, object r_734181 */
+ {
+- object r_734633 = args[0];
++ object r_734181 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734633)) ){
++if( (boolean_f != Cyc_is_null(r_734181)) ){
+
+-make_utf8_string_with_len(c_7316022, "no when body", 12, 12);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313216)->elements[1], &c_7316022, ((closureN)self_7313216)->elements[0]);
++make_utf8_string_with_len(c_7314722, "no when body", 12, 12);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311963)->elements[1], &c_7314722, ((closureN)self_7311963)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313216)->elements[1], (((closure) ((closureN)self_7313216)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311963)->elements[1], (((closure) ((closureN)self_7311963)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_176(void *data, object self_7313217, int argc, object *args) /* object self_7313217, object k_734634 */
++static void __lambda_176(void *data, object self_7311964, int argc, object *args) /* object self_7311964, object k_734182 */
+ {
+- object k_734634 = args[0];
++ object k_734182 = args[0];
+
+-closureN_type c_7315999;
+-object e_7316008 [2];
+-c_7315999.hdr.mark = gc_color_red;
+- c_7315999.hdr.grayed = 0;
+-c_7315999.tag = closureN_tag;
+- c_7315999.fn = (function_type)__lambda_177;
+-c_7315999.num_args = 1;
+-c_7315999.num_elements = 2;
+-c_7315999.elements = (object *)e_7316008;
+-c_7315999.elements[0] = ((closureN)self_7313217)->elements[0];
+-c_7315999.elements[1] = k_734634;
++closureN_type c_7314699;
++object e_7314708 [2];
++c_7314699.hdr.mark = gc_color_red;
++ c_7314699.hdr.grayed = 0;
++c_7314699.tag = closureN_tag;
++ c_7314699.fn = (function_type)__lambda_177;
++c_7314699.num_args = 1;
++c_7314699.num_elements = 2;
++c_7314699.elements = (object *)e_7314708;
++c_7314699.elements[0] = ((closureN)self_7311964)->elements[0];
++c_7314699.elements[1] = k_734182;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315999,__lambda_177, Cyc_cdr(data, ((closureN)self_7313217)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7314699,__lambda_177, Cyc_cdr(data, ((closureN)self_7311964)->elements[0]));;
+ }
+
+-static void __lambda_177(void *data, object self_7313218, int argc, object *args) /* object self_7313218, object r_734636 */
++static void __lambda_177(void *data, object self_7311965, int argc, object *args) /* object self_7311965, object r_734184 */
+ {
+- object r_734636 = args[0];
++ object r_734184 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734636)) ){
++if( (boolean_f != Cyc_is_null(r_734184)) ){
+
+-make_utf8_string_with_len(c_7316004, "empty when", 10, 10);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313218)->elements[1], &c_7316004, ((closureN)self_7313218)->elements[0]);
++make_utf8_string_with_len(c_7314704, "empty when", 10, 10);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311965)->elements[1], &c_7314704, ((closureN)self_7311965)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313218)->elements[1], (((closure) ((closureN)self_7313218)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311965)->elements[1], (((closure) ((closureN)self_7311965)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_734505, object expr_73172_732955, object rename_73173_732956, object compare_73174_732957 */
++static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_734053, object expr_73172_732608, object rename_73173_732609, object compare_73174_732610 */
+ {
+-object k_734505 = args[0]; object expr_73172_732955 = args[1]; object rename_73173_732956 = args[2]; object compare_73174_732957 = args[3];
++object k_734053 = args[0]; object expr_73172_732608 = args[1]; object rename_73173_732609 = args[2]; object compare_73174_732610 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:case");
+
+-closureN_type c_7315643;
+-object e_7315994 [4];
+-c_7315643.hdr.mark = gc_color_red;
+- c_7315643.hdr.grayed = 0;
+-c_7315643.tag = closureN_tag;
+- c_7315643.fn = (function_type)__lambda_143;
+-c_7315643.num_args = 3;
+-c_7315643.num_elements = 4;
+-c_7315643.elements = (object *)e_7315994;
+-c_7315643.elements[0] = compare_73174_732957;
+-c_7315643.elements[1] = expr_73172_732955;
+-c_7315643.elements[2] = k_734505;
+-c_7315643.elements[3] = rename_73173_732956;
+-
+-return_direct_with_clo3(data,(closure)&c_7315643,__lambda_143, boolean_f, boolean_f, boolean_f);;
+-}
+-
+-static void __lambda_143(void *data, object self_7313178, int argc, object *args) /* object self_7313178, object agg_91cond_732961, object body_732962, object clause_732963 */
+- {
+- object agg_91cond_732961 = args[0]; object body_732962 = args[1]; object clause_732963 = args[2];
+-
+-closureN_type c_7315645;
+-object e_7315990 [6];
+-c_7315645.hdr.mark = gc_color_red;
+- c_7315645.hdr.grayed = 0;
+-c_7315645.tag = closureN_tag;
+- c_7315645.fn = (function_type)__lambda_1355;
+-c_7315645.num_args = 1;
+-c_7315645.num_elements = 6;
+-c_7315645.elements = (object *)e_7315990;
+-c_7315645.elements[0] = body_732962;
+-c_7315645.elements[1] = clause_732963;
+-c_7315645.elements[2] = ((closureN)self_7313178)->elements[0];
+-c_7315645.elements[3] = ((closureN)self_7313178)->elements[1];
+-c_7315645.elements[4] = ((closureN)self_7313178)->elements[2];
+-c_7315645.elements[5] = ((closureN)self_7313178)->elements[3];
+-
+-
+-pair_type local_7315993;
+-return_direct_with_clo1(data,(closure)&c_7315645,__lambda_1355, set_cell_as_expr(&local_7315993, agg_91cond_732961));;
+-}
+-
+-static void __lambda_1355(void *data, object self_7313179, int argc, object *args) /* object self_7313179, object agg_91cond_732961 */
+- {
+- object agg_91cond_732961 = args[0];
+-
+-closureN_type c_7315647;
+-object e_7315985 [6];
+-c_7315647.hdr.mark = gc_color_red;
+- c_7315647.hdr.grayed = 0;
+-c_7315647.tag = closureN_tag;
+- c_7315647.fn = (function_type)__lambda_1354;
+-c_7315647.num_args = 1;
+-c_7315647.num_elements = 6;
+-c_7315647.elements = (object *)e_7315985;
+-c_7315647.elements[0] = agg_91cond_732961;
+-c_7315647.elements[1] = ((closureN)self_7313179)->elements[1];
+-c_7315647.elements[2] = ((closureN)self_7313179)->elements[2];
+-c_7315647.elements[3] = ((closureN)self_7313179)->elements[3];
+-c_7315647.elements[4] = ((closureN)self_7313179)->elements[4];
+-c_7315647.elements[5] = ((closureN)self_7313179)->elements[5];
+-
+-
+-pair_type local_7315988;
+-return_direct_with_clo1(data,(closure)&c_7315647,__lambda_1354, set_cell_as_expr(&local_7315988, ((closureN)self_7313179)->elements[0]));;
+-}
+-
+-static void __lambda_1354(void *data, object self_7313180, int argc, object *args) /* object self_7313180, object body_732962 */
+- {
+- object body_732962 = args[0];
+-
+-closureN_type c_7315649;
+-object e_7315980 [6];
+-c_7315649.hdr.mark = gc_color_red;
+- c_7315649.hdr.grayed = 0;
+-c_7315649.tag = closureN_tag;
+- c_7315649.fn = (function_type)__lambda_1353;
+-c_7315649.num_args = 1;
+-c_7315649.num_elements = 6;
+-c_7315649.elements = (object *)e_7315980;
+-c_7315649.elements[0] = ((closureN)self_7313180)->elements[0];
+-c_7315649.elements[1] = body_732962;
+-c_7315649.elements[2] = ((closureN)self_7313180)->elements[2];
+-c_7315649.elements[3] = ((closureN)self_7313180)->elements[3];
+-c_7315649.elements[4] = ((closureN)self_7313180)->elements[4];
+-c_7315649.elements[5] = ((closureN)self_7313180)->elements[5];
+-
+-
+-pair_type local_7315983;
+-return_direct_with_clo1(data,(closure)&c_7315649,__lambda_1353, set_cell_as_expr(&local_7315983, ((closureN)self_7313180)->elements[1]));;
+-}
+-
+-static void __lambda_1353(void *data, object self_7313181, int argc, object *args) /* object self_7313181, object clause_732963 */
+- {
+- object clause_732963 = args[0];
+-
+-closureN_type c_7315651;
+-object e_7315937 [7];
+-c_7315651.hdr.mark = gc_color_red;
+- c_7315651.hdr.grayed = 0;
+-c_7315651.tag = closureN_tag;
+- c_7315651.fn = (function_type)__lambda_144;
+-c_7315651.num_args = 1;
+-c_7315651.num_elements = 7;
+-c_7315651.elements = (object *)e_7315937;
+-c_7315651.elements[0] = ((closureN)self_7313181)->elements[0];
+-c_7315651.elements[1] = ((closureN)self_7313181)->elements[1];
+-c_7315651.elements[2] = clause_732963;
+-c_7315651.elements[3] = ((closureN)self_7313181)->elements[2];
+-c_7315651.elements[4] = ((closureN)self_7313181)->elements[3];
+-c_7315651.elements[5] = ((closureN)self_7313181)->elements[4];
+-c_7315651.elements[6] = ((closureN)self_7313181)->elements[5];
+-
+-
+-closureN_type c_7315938;
+-object e_7315979 [2];
+-c_7315938.hdr.mark = gc_color_red;
+- c_7315938.hdr.grayed = 0;
+-c_7315938.tag = closureN_tag;
+- c_7315938.fn = (function_type)__lambda_170;
+-c_7315938.num_args = 1;
+-c_7315938.num_elements = 2;
+-c_7315938.elements = (object *)e_7315979;
+-c_7315938.elements[0] = ((closureN)self_7313181)->elements[2];
+-c_7315938.elements[1] = ((closureN)self_7313181)->elements[5];
+-
+-return_direct_with_clo1(data,(closure)&c_7315651,__lambda_144, &c_7315938);;
+-}
+-
+-static void __lambda_170(void *data, object self_7313182, int argc, object *args) /* object self_7313182, object k_734600, object exprs_73175_732967 */
+- {
+- object k_734600 = args[0]; object exprs_73175_732967 = args[1];
+-
+-if( (boolean_f != Cyc_is_null(exprs_73175_732967)) ){
+- return_closcall2(data, ((closureN)self_7313182)->elements[1], k_734600, quote_tmp);
+-} else {
+-
+-closureN_type c_7315945;
+-object e_7315978 [4];
+-c_7315945.hdr.mark = gc_color_red;
+- c_7315945.hdr.grayed = 0;
+-c_7315945.tag = closureN_tag;
+- c_7315945.fn = (function_type)__lambda_171;
+-c_7315945.num_args = 1;
+-c_7315945.num_elements = 4;
+-c_7315945.elements = (object *)e_7315978;
+-c_7315945.elements[0] = ((closureN)self_7313182)->elements[0];
+-c_7315945.elements[1] = exprs_73175_732967;
+-c_7315945.elements[2] = k_734600;
+-c_7315945.elements[3] = ((closureN)self_7313182)->elements[1];
+-
+-return_closcall2(data, ((closureN)self_7313182)->elements[1], &c_7315945, quote__123_125);}
+-;;
+-}
+-
+-static void __lambda_171(void *data, object self_7313183, int argc, object *args) /* object self_7313183, object r_734611 */
+- {
+- object r_734611 = args[0];
+-
+-closureN_type c_7315948;
+-object e_7315974 [3];
+-c_7315948.hdr.mark = gc_color_red;
+- c_7315948.hdr.grayed = 0;
+-c_7315948.tag = closureN_tag;
+- c_7315948.fn = (function_type)__lambda_172;
+-c_7315948.num_args = 1;
+-c_7315948.num_elements = 3;
+-c_7315948.elements = (object *)e_7315974;
+-c_7315948.elements[0] = ((closureN)self_7313183)->elements[1];
+-c_7315948.elements[1] = ((closureN)self_7313183)->elements[2];
+-c_7315948.elements[2] = ((closureN)self_7313183)->elements[3];
+-
+-
+-
+-return_closcall3(data, ((closureN)self_7313183)->elements[0], &c_7315948, r_734611, Cyc_car(data, ((closureN)self_7313183)->elements[1]));;
+-}
+-
+-static void __lambda_172(void *data, object self_7313184, int argc, object *args) /* object self_7313184, object r_734603 */
+- {
+- object r_734603 = args[0];
+- if( (boolean_f != r_734603) ){
+-
+-closureN_type c_7315951;
+-object e_7315963 [2];
+-c_7315951.hdr.mark = gc_color_red;
+- c_7315951.hdr.grayed = 0;
+-c_7315951.tag = closureN_tag;
+- c_7315951.fn = (function_type)__lambda_173;
+-c_7315951.num_args = 1;
+-c_7315951.num_elements = 2;
+-c_7315951.elements = (object *)e_7315963;
+-c_7315951.elements[0] = ((closureN)self_7313184)->elements[0];
+-c_7315951.elements[1] = ((closureN)self_7313184)->elements[1];
++closureN_type c_7314343;
++object e_7314694 [4];
++c_7314343.hdr.mark = gc_color_red;
++ c_7314343.hdr.grayed = 0;
++c_7314343.tag = closureN_tag;
++ c_7314343.fn = (function_type)__lambda_143;
++c_7314343.num_args = 3;
++c_7314343.num_elements = 4;
++c_7314343.elements = (object *)e_7314694;
++c_7314343.elements[0] = compare_73174_732610;
++c_7314343.elements[1] = expr_73172_732608;
++c_7314343.elements[2] = k_734053;
++c_7314343.elements[3] = rename_73173_732609;
++
++return_direct_with_clo3(data,(closure)&c_7314343,__lambda_143, boolean_f, boolean_f, boolean_f);;
++}
++
++static void __lambda_143(void *data, object self_7311925, int argc, object *args) /* object self_7311925, object agg_91cond_732614, object body_732615, object clause_732616 */
++ {
++ object agg_91cond_732614 = args[0]; object body_732615 = args[1]; object clause_732616 = args[2];
++
++closureN_type c_7314345;
++object e_7314690 [6];
++c_7314345.hdr.mark = gc_color_red;
++ c_7314345.hdr.grayed = 0;
++c_7314345.tag = closureN_tag;
++ c_7314345.fn = (function_type)__lambda_1308;
++c_7314345.num_args = 1;
++c_7314345.num_elements = 6;
++c_7314345.elements = (object *)e_7314690;
++c_7314345.elements[0] = body_732615;
++c_7314345.elements[1] = clause_732616;
++c_7314345.elements[2] = ((closureN)self_7311925)->elements[0];
++c_7314345.elements[3] = ((closureN)self_7311925)->elements[1];
++c_7314345.elements[4] = ((closureN)self_7311925)->elements[2];
++c_7314345.elements[5] = ((closureN)self_7311925)->elements[3];
++
++
++pair_type local_7314693;
++return_direct_with_clo1(data,(closure)&c_7314345,__lambda_1308, set_cell_as_expr(&local_7314693, agg_91cond_732614));;
++}
++
++static void __lambda_1308(void *data, object self_7311926, int argc, object *args) /* object self_7311926, object agg_91cond_732614 */
++ {
++ object agg_91cond_732614 = args[0];
++
++closureN_type c_7314347;
++object e_7314685 [6];
++c_7314347.hdr.mark = gc_color_red;
++ c_7314347.hdr.grayed = 0;
++c_7314347.tag = closureN_tag;
++ c_7314347.fn = (function_type)__lambda_1307;
++c_7314347.num_args = 1;
++c_7314347.num_elements = 6;
++c_7314347.elements = (object *)e_7314685;
++c_7314347.elements[0] = agg_91cond_732614;
++c_7314347.elements[1] = ((closureN)self_7311926)->elements[1];
++c_7314347.elements[2] = ((closureN)self_7311926)->elements[2];
++c_7314347.elements[3] = ((closureN)self_7311926)->elements[3];
++c_7314347.elements[4] = ((closureN)self_7311926)->elements[4];
++c_7314347.elements[5] = ((closureN)self_7311926)->elements[5];
++
++
++pair_type local_7314688;
++return_direct_with_clo1(data,(closure)&c_7314347,__lambda_1307, set_cell_as_expr(&local_7314688, ((closureN)self_7311926)->elements[0]));;
++}
++
++static void __lambda_1307(void *data, object self_7311927, int argc, object *args) /* object self_7311927, object body_732615 */
++ {
++ object body_732615 = args[0];
++
++closureN_type c_7314349;
++object e_7314680 [6];
++c_7314349.hdr.mark = gc_color_red;
++ c_7314349.hdr.grayed = 0;
++c_7314349.tag = closureN_tag;
++ c_7314349.fn = (function_type)__lambda_1306;
++c_7314349.num_args = 1;
++c_7314349.num_elements = 6;
++c_7314349.elements = (object *)e_7314680;
++c_7314349.elements[0] = ((closureN)self_7311927)->elements[0];
++c_7314349.elements[1] = body_732615;
++c_7314349.elements[2] = ((closureN)self_7311927)->elements[2];
++c_7314349.elements[3] = ((closureN)self_7311927)->elements[3];
++c_7314349.elements[4] = ((closureN)self_7311927)->elements[4];
++c_7314349.elements[5] = ((closureN)self_7311927)->elements[5];
++
++
++pair_type local_7314683;
++return_direct_with_clo1(data,(closure)&c_7314349,__lambda_1306, set_cell_as_expr(&local_7314683, ((closureN)self_7311927)->elements[1]));;
++}
++
++static void __lambda_1306(void *data, object self_7311928, int argc, object *args) /* object self_7311928, object clause_732616 */
++ {
++ object clause_732616 = args[0];
++
++closureN_type c_7314351;
++object e_7314637 [7];
++c_7314351.hdr.mark = gc_color_red;
++ c_7314351.hdr.grayed = 0;
++c_7314351.tag = closureN_tag;
++ c_7314351.fn = (function_type)__lambda_144;
++c_7314351.num_args = 1;
++c_7314351.num_elements = 7;
++c_7314351.elements = (object *)e_7314637;
++c_7314351.elements[0] = ((closureN)self_7311928)->elements[0];
++c_7314351.elements[1] = ((closureN)self_7311928)->elements[1];
++c_7314351.elements[2] = clause_732616;
++c_7314351.elements[3] = ((closureN)self_7311928)->elements[2];
++c_7314351.elements[4] = ((closureN)self_7311928)->elements[3];
++c_7314351.elements[5] = ((closureN)self_7311928)->elements[4];
++c_7314351.elements[6] = ((closureN)self_7311928)->elements[5];
++
++
++closureN_type c_7314638;
++object e_7314679 [2];
++c_7314638.hdr.mark = gc_color_red;
++ c_7314638.hdr.grayed = 0;
++c_7314638.tag = closureN_tag;
++ c_7314638.fn = (function_type)__lambda_170;
++c_7314638.num_args = 1;
++c_7314638.num_elements = 2;
++c_7314638.elements = (object *)e_7314679;
++c_7314638.elements[0] = ((closureN)self_7311928)->elements[2];
++c_7314638.elements[1] = ((closureN)self_7311928)->elements[5];
++
++return_direct_with_clo1(data,(closure)&c_7314351,__lambda_144, &c_7314638);;
++}
++
++static void __lambda_170(void *data, object self_7311929, int argc, object *args) /* object self_7311929, object k_734148, object exprs_73175_732620 */
++ {
++ object k_734148 = args[0]; object exprs_73175_732620 = args[1];
++
++if( (boolean_f != Cyc_is_null(exprs_73175_732620)) ){
++ return_closcall2(data, ((closureN)self_7311929)->elements[1], k_734148, quote_tmp);
++} else {
++
++closureN_type c_7314645;
++object e_7314678 [4];
++c_7314645.hdr.mark = gc_color_red;
++ c_7314645.hdr.grayed = 0;
++c_7314645.tag = closureN_tag;
++ c_7314645.fn = (function_type)__lambda_171;
++c_7314645.num_args = 1;
++c_7314645.num_elements = 4;
++c_7314645.elements = (object *)e_7314678;
++c_7314645.elements[0] = ((closureN)self_7311929)->elements[0];
++c_7314645.elements[1] = exprs_73175_732620;
++c_7314645.elements[2] = k_734148;
++c_7314645.elements[3] = ((closureN)self_7311929)->elements[1];
++
++return_closcall2(data, ((closureN)self_7311929)->elements[1], &c_7314645, quote__123_125);}
++;;
++}
++
++static void __lambda_171(void *data, object self_7311930, int argc, object *args) /* object self_7311930, object r_734159 */
++ {
++ object r_734159 = args[0];
++
++closureN_type c_7314648;
++object e_7314674 [3];
++c_7314648.hdr.mark = gc_color_red;
++ c_7314648.hdr.grayed = 0;
++c_7314648.tag = closureN_tag;
++ c_7314648.fn = (function_type)__lambda_172;
++c_7314648.num_args = 1;
++c_7314648.num_elements = 3;
++c_7314648.elements = (object *)e_7314674;
++c_7314648.elements[0] = ((closureN)self_7311930)->elements[1];
++c_7314648.elements[1] = ((closureN)self_7311930)->elements[2];
++c_7314648.elements[2] = ((closureN)self_7311930)->elements[3];
++
++
++
++return_closcall3(data, ((closureN)self_7311930)->elements[0], &c_7314648, r_734159, Cyc_car(data, ((closureN)self_7311930)->elements[1]));;
++}
++
++static void __lambda_172(void *data, object self_7311931, int argc, object *args) /* object self_7311931, object r_734151 */
++ {
++ object r_734151 = args[0];
++ if( (boolean_f != r_734151) ){
++
++closureN_type c_7314651;
++object e_7314663 [2];
++c_7314651.hdr.mark = gc_color_red;
++ c_7314651.hdr.grayed = 0;
++c_7314651.tag = closureN_tag;
++ c_7314651.fn = (function_type)__lambda_173;
++c_7314651.num_args = 1;
++c_7314651.num_elements = 2;
++c_7314651.elements = (object *)e_7314663;
++c_7314651.elements[0] = ((closureN)self_7311931)->elements[0];
++c_7314651.elements[1] = ((closureN)self_7311931)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7313184)->elements[2], &c_7315951, quote_tmp);
++return_closcall2(data, ((closureN)self_7311931)->elements[2], &c_7314651, quote_tmp);
+ } else {
+
+-closureN_type c_7315966;
+-object e_7315973 [2];
+-c_7315966.hdr.mark = gc_color_red;
+- c_7315966.hdr.grayed = 0;
+-c_7315966.tag = closureN_tag;
+- c_7315966.fn = (function_type)__lambda_174;
+-c_7315966.num_args = 1;
+-c_7315966.num_elements = 2;
+-c_7315966.elements = (object *)e_7315973;
+-c_7315966.elements[0] = ((closureN)self_7313184)->elements[0];
+-c_7315966.elements[1] = ((closureN)self_7313184)->elements[1];
++closureN_type c_7314666;
++object e_7314673 [2];
++c_7314666.hdr.mark = gc_color_red;
++ c_7314666.hdr.grayed = 0;
++c_7314666.tag = closureN_tag;
++ c_7314666.fn = (function_type)__lambda_174;
++c_7314666.num_args = 1;
++c_7314666.num_elements = 2;
++c_7314666.elements = (object *)e_7314673;
++c_7314666.elements[0] = ((closureN)self_7311931)->elements[0];
++c_7314666.elements[1] = ((closureN)self_7311931)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7313184)->elements[2], &c_7315966, quote_begin);}
++return_closcall2(data, ((closureN)self_7311931)->elements[2], &c_7314666, quote_begin);}
+ ;;
+ }
+
+-static void __lambda_174(void *data, object self_7313186, int argc, object *args) /* object self_7313186, object r_734609 */
++static void __lambda_174(void *data, object self_7311933, int argc, object *args) /* object self_7311933, object r_734157 */
+ {
+- object r_734609 = args[0];
++ object r_734157 = args[0];
+
+-pair_type local_7315971;
+-return_direct_with_clo1(data, ((closureN)self_7313186)->elements[1], (((closure) ((closureN)self_7313186)->elements[1])->fn), set_pair_as_expr(&local_7315971, r_734609, ((closureN)self_7313186)->elements[0]));;
++pair_type local_7314671;
++return_direct_with_clo1(data, ((closureN)self_7311933)->elements[1], (((closure) ((closureN)self_7311933)->elements[1])->fn), set_pair_as_expr(&local_7314671, r_734157, ((closureN)self_7311933)->elements[0]));;
+ }
+
+-static void __lambda_173(void *data, object self_7313185, int argc, object *args) /* object self_7313185, object r_734606 */
++static void __lambda_173(void *data, object self_7311932, int argc, object *args) /* object self_7311932, object r_734154 */
+ {
+- object r_734606 = args[0];
++ object r_734154 = args[0];
+
+-pair_type local_7315956;
++pair_type local_7314656;
+
+
+
+-pair_type local_7315962;
+-return_direct_with_clo1(data, ((closureN)self_7313185)->elements[1], (((closure) ((closureN)self_7313185)->elements[1])->fn), set_pair_as_expr(&local_7315956, Cyc_cadr(data, ((closureN)self_7313185)->elements[0]), set_pair_as_expr(&local_7315962, r_734606, NULL)));;
++pair_type local_7314662;
++return_direct_with_clo1(data, ((closureN)self_7311932)->elements[1], (((closure) ((closureN)self_7311932)->elements[1])->fn), set_pair_as_expr(&local_7314656, Cyc_cadr(data, ((closureN)self_7311932)->elements[0]), set_pair_as_expr(&local_7314662, r_734154, NULL)));;
+ }
+
+-static void __lambda_144(void *data, object self_7313187, int argc, object *args) /* object self_7313187, object r_734599 */
++static void __lambda_144(void *data, object self_7311934, int argc, object *args) /* object self_7311934, object r_734147 */
+ {
+- object r_734599 = args[0];
++ object r_734147 = args[0];
+
+-closureN_type c_7315653;
+-object e_7315933 [7];
+-c_7315653.hdr.mark = gc_color_red;
+- c_7315653.hdr.grayed = 0;
+-c_7315653.tag = closureN_tag;
+- c_7315653.fn = (function_type)__lambda_145;
+-c_7315653.num_args = 1;
+-c_7315653.num_elements = 7;
+-c_7315653.elements = (object *)e_7315933;
+-c_7315653.elements[0] = ((closureN)self_7313187)->elements[0];
+-c_7315653.elements[1] = ((closureN)self_7313187)->elements[1];
+-c_7315653.elements[2] = ((closureN)self_7313187)->elements[2];
+-c_7315653.elements[3] = ((closureN)self_7313187)->elements[3];
+-c_7315653.elements[4] = ((closureN)self_7313187)->elements[4];
+-c_7315653.elements[5] = ((closureN)self_7313187)->elements[5];
+-c_7315653.elements[6] = ((closureN)self_7313187)->elements[6];
++closureN_type c_7314353;
++object e_7314633 [7];
++c_7314353.hdr.mark = gc_color_red;
++ c_7314353.hdr.grayed = 0;
++c_7314353.tag = closureN_tag;
++ c_7314353.fn = (function_type)__lambda_145;
++c_7314353.num_args = 1;
++c_7314353.num_elements = 7;
++c_7314353.elements = (object *)e_7314633;
++c_7314353.elements[0] = ((closureN)self_7311934)->elements[0];
++c_7314353.elements[1] = ((closureN)self_7311934)->elements[1];
++c_7314353.elements[2] = ((closureN)self_7311934)->elements[2];
++c_7314353.elements[3] = ((closureN)self_7311934)->elements[3];
++c_7314353.elements[4] = ((closureN)self_7311934)->elements[4];
++c_7314353.elements[5] = ((closureN)self_7311934)->elements[5];
++c_7314353.elements[6] = ((closureN)self_7311934)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315653,__lambda_145, Cyc_set_cell(data, ((closureN)self_7313187)->elements[1], r_734599));;
++return_direct_with_clo1(data,(closure)&c_7314353,__lambda_145, Cyc_set_cell(data, ((closureN)self_7311934)->elements[1], r_734147));;
+ }
+
+-static void __lambda_145(void *data, object self_7313188, int argc, object *args) /* object self_7313188, object r_734506 */
++static void __lambda_145(void *data, object self_7311935, int argc, object *args) /* object self_7311935, object r_734054 */
+ {
+
+
+-closureN_type c_7315655;
+-object e_7315876 [7];
+-c_7315655.hdr.mark = gc_color_red;
+- c_7315655.hdr.grayed = 0;
+-c_7315655.tag = closureN_tag;
+- c_7315655.fn = (function_type)__lambda_146;
+-c_7315655.num_args = 1;
+-c_7315655.num_elements = 7;
+-c_7315655.elements = (object *)e_7315876;
+-c_7315655.elements[0] = ((closureN)self_7313188)->elements[0];
+-c_7315655.elements[1] = ((closureN)self_7313188)->elements[1];
+-c_7315655.elements[2] = ((closureN)self_7313188)->elements[2];
+-c_7315655.elements[3] = ((closureN)self_7313188)->elements[3];
+-c_7315655.elements[4] = ((closureN)self_7313188)->elements[4];
+-c_7315655.elements[5] = ((closureN)self_7313188)->elements[5];
+-c_7315655.elements[6] = ((closureN)self_7313188)->elements[6];
++closureN_type c_7314355;
++object e_7314576 [7];
++c_7314355.hdr.mark = gc_color_red;
++ c_7314355.hdr.grayed = 0;
++c_7314355.tag = closureN_tag;
++ c_7314355.fn = (function_type)__lambda_146;
++c_7314355.num_args = 1;
++c_7314355.num_elements = 7;
++c_7314355.elements = (object *)e_7314576;
++c_7314355.elements[0] = ((closureN)self_7311935)->elements[0];
++c_7314355.elements[1] = ((closureN)self_7311935)->elements[1];
++c_7314355.elements[2] = ((closureN)self_7311935)->elements[2];
++c_7314355.elements[3] = ((closureN)self_7311935)->elements[3];
++c_7314355.elements[4] = ((closureN)self_7311935)->elements[4];
++c_7314355.elements[5] = ((closureN)self_7311935)->elements[5];
++c_7314355.elements[6] = ((closureN)self_7311935)->elements[6];
+
+
+-closureN_type c_7315877;
+-object e_7315932 [2];
+-c_7315877.hdr.mark = gc_color_red;
+- c_7315877.hdr.grayed = 0;
+-c_7315877.tag = closureN_tag;
+- c_7315877.fn = (function_type)__lambda_166;
+-c_7315877.num_args = 2;
+-c_7315877.num_elements = 2;
+-c_7315877.elements = (object *)e_7315932;
+-c_7315877.elements[0] = ((closureN)self_7313188)->elements[0];
+-c_7315877.elements[1] = ((closureN)self_7313188)->elements[6];
++closureN_type c_7314577;
++object e_7314632 [2];
++c_7314577.hdr.mark = gc_color_red;
++ c_7314577.hdr.grayed = 0;
++c_7314577.tag = closureN_tag;
++ c_7314577.fn = (function_type)__lambda_166;
++c_7314577.num_args = 2;
++c_7314577.num_elements = 2;
++c_7314577.elements = (object *)e_7314632;
++c_7314577.elements[0] = ((closureN)self_7311935)->elements[0];
++c_7314577.elements[1] = ((closureN)self_7311935)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7315655,__lambda_146, &c_7315877);;
++return_direct_with_clo1(data,(closure)&c_7314355,__lambda_146, &c_7314577);;
+ }
+
+-static void __lambda_166(void *data, object self_7313189, int argc, object *args) /* object self_7313189, object k_734579, object tmp_91sym_73189_732968, object lis_73190_732969 */
++static void __lambda_166(void *data, object self_7311936, int argc, object *args) /* object self_7311936, object k_734127, object tmp_91sym_73189_732621, object lis_73190_732622 */
+ {
+- object k_734579 = args[0]; object tmp_91sym_73189_732968 = args[1]; object lis_73190_732969 = args[2];
++ object k_734127 = args[0]; object tmp_91sym_73189_732621 = args[1]; object lis_73190_732622 = args[2];
+
+-if( (boolean_f != Cyc_is_null(lis_73190_732969)) ){
+- return_direct_with_clo1(data, k_734579, (((closure) k_734579)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(lis_73190_732622)) ){
++ return_direct_with_clo1(data, k_734127, (((closure) k_734127)->fn), boolean_f);
+ } else {
+
+-closureN_type c_7315883;
+-object e_7315931 [4];
+-c_7315883.hdr.mark = gc_color_red;
+- c_7315883.hdr.grayed = 0;
+-c_7315883.tag = closureN_tag;
+- c_7315883.fn = (function_type)__lambda_167;
+-c_7315883.num_args = 1;
+-c_7315883.num_elements = 4;
+-c_7315883.elements = (object *)e_7315931;
+-c_7315883.elements[0] = ((closureN)self_7313189)->elements[0];
+-c_7315883.elements[1] = k_734579;
+-c_7315883.elements[2] = lis_73190_732969;
+-c_7315883.elements[3] = tmp_91sym_73189_732968;
++closureN_type c_7314583;
++object e_7314631 [4];
++c_7314583.hdr.mark = gc_color_red;
++ c_7314583.hdr.grayed = 0;
++c_7314583.tag = closureN_tag;
++ c_7314583.fn = (function_type)__lambda_167;
++c_7314583.num_args = 1;
++c_7314583.num_elements = 4;
++c_7314583.elements = (object *)e_7314631;
++c_7314583.elements[0] = ((closureN)self_7311936)->elements[0];
++c_7314583.elements[1] = k_734127;
++c_7314583.elements[2] = lis_73190_732622;
++c_7314583.elements[3] = tmp_91sym_73189_732621;
+
+-return_closcall2(data, ((closureN)self_7313189)->elements[1], &c_7315883, quote_quote);}
++return_closcall2(data, ((closureN)self_7311936)->elements[1], &c_7314583, quote_quote);}
+ ;;
+ }
+
+-static void __lambda_167(void *data, object self_7313190, int argc, object *args) /* object self_7313190, object r_734594 */
++static void __lambda_167(void *data, object self_7311937, int argc, object *args) /* object self_7311937, object r_734142 */
+ {
+- object r_734594 = args[0];
++ object r_734142 = args[0];
+
+-closureN_type c_7315885;
+-object e_7315914 [4];
+-c_7315885.hdr.mark = gc_color_red;
+- c_7315885.hdr.grayed = 0;
+-c_7315885.tag = closureN_tag;
+- c_7315885.fn = (function_type)__lambda_168;
+-c_7315885.num_args = 1;
+-c_7315885.num_elements = 4;
+-c_7315885.elements = (object *)e_7315914;
+-c_7315885.elements[0] = ((closureN)self_7313190)->elements[0];
+-c_7315885.elements[1] = ((closureN)self_7313190)->elements[1];
+-c_7315885.elements[2] = ((closureN)self_7313190)->elements[2];
+-c_7315885.elements[3] = ((closureN)self_7313190)->elements[3];
++closureN_type c_7314585;
++object e_7314614 [4];
++c_7314585.hdr.mark = gc_color_red;
++ c_7314585.hdr.grayed = 0;
++c_7314585.tag = closureN_tag;
++ c_7314585.fn = (function_type)__lambda_168;
++c_7314585.num_args = 1;
++c_7314585.num_elements = 4;
++c_7314585.elements = (object *)e_7314614;
++c_7314585.elements[0] = ((closureN)self_7311937)->elements[0];
++c_7314585.elements[1] = ((closureN)self_7311937)->elements[1];
++c_7314585.elements[2] = ((closureN)self_7311937)->elements[2];
++c_7314585.elements[3] = ((closureN)self_7311937)->elements[3];
+
+
+-pair_type local_7315917;
++pair_type local_7314617;
+
+-pair_type local_7315921;
++pair_type local_7314621;
+
+-pair_type local_7315924;
++pair_type local_7314624;
+
+-pair_type local_7315927;
++pair_type local_7314627;
+
+
+-return_direct_with_clo1(data,(closure)&c_7315885,__lambda_168, set_pair_as_expr(&local_7315917, ((closureN)self_7313190)->elements[3], set_pair_as_expr(&local_7315921, set_pair_as_expr(&local_7315924, r_734594, set_pair_as_expr(&local_7315927, Cyc_car(data, ((closureN)self_7313190)->elements[2]), NULL)), NULL)));;
++return_direct_with_clo1(data,(closure)&c_7314585,__lambda_168, set_pair_as_expr(&local_7314617, ((closureN)self_7311937)->elements[3], set_pair_as_expr(&local_7314621, set_pair_as_expr(&local_7314624, r_734142, set_pair_as_expr(&local_7314627, Cyc_car(data, ((closureN)self_7311937)->elements[2]), NULL)), NULL)));;
+ }
+
+-static void __lambda_168(void *data, object self_7313191, int argc, object *args) /* object self_7313191, object r_734590 */
++static void __lambda_168(void *data, object self_7311938, int argc, object *args) /* object self_7311938, object r_734138 */
+ {
+- object r_734590 = args[0];
++ object r_734138 = args[0];
+
+
+
+-closureN_type c_7315890;
+-object e_7315909 [2];
+-c_7315890.hdr.mark = gc_color_red;
+- c_7315890.hdr.grayed = 0;
+-c_7315890.tag = closureN_tag;
+- c_7315890.fn = (function_type)__lambda_169;
+-c_7315890.num_args = 1;
+-c_7315890.num_elements = 2;
+-c_7315890.elements = (object *)e_7315909;
+-c_7315890.elements[0] = ((closureN)self_7313191)->elements[1];
+-c_7315890.elements[1] = r_734590;
++closureN_type c_7314590;
++object e_7314609 [2];
++c_7314590.hdr.mark = gc_color_red;
++ c_7314590.hdr.grayed = 0;
++c_7314590.tag = closureN_tag;
++ c_7314590.fn = (function_type)__lambda_169;
++c_7314590.num_args = 1;
++c_7314590.num_elements = 2;
++c_7314590.elements = (object *)e_7314609;
++c_7314590.elements[0] = ((closureN)self_7311938)->elements[1];
++c_7314590.elements[1] = r_734138;
+
+
+
+-return_closcall3(data, car(((closureN)self_7313191)->elements[0]), &c_7315890, ((closureN)self_7313191)->elements[3], Cyc_cdr(data, ((closureN)self_7313191)->elements[2]));;
++return_closcall3(data, car(((closureN)self_7311938)->elements[0]), &c_7314590, ((closureN)self_7311938)->elements[3], Cyc_cdr(data, ((closureN)self_7311938)->elements[2]));;
+ }
+
+-static void __lambda_169(void *data, object self_7313192, int argc, object *args) /* object self_7313192, object r_734586 */
++static void __lambda_169(void *data, object self_7311939, int argc, object *args) /* object self_7311939, object r_734134 */
+ {
+- object r_734586 = args[0];
++ object r_734134 = args[0];
+
+-pair_type local_7315895;
++pair_type local_7314595;
+
+-pair_type local_7315898;
++pair_type local_7314598;
+
+-pair_type local_7315901;
++pair_type local_7314601;
+
+-pair_type local_7315905;
++pair_type local_7314605;
+
+-pair_type local_7315908;
+-return_direct_with_clo1(data, ((closureN)self_7313192)->elements[0], (((closure) ((closureN)self_7313192)->elements[0])->fn), set_pair_as_expr(&local_7315895, quote__if, set_pair_as_expr(&local_7315898, set_pair_as_expr(&local_7315901, quote_eq_127, ((closureN)self_7313192)->elements[1]), set_pair_as_expr(&local_7315905, boolean_t, set_pair_as_expr(&local_7315908, r_734586, NULL)))));;
++pair_type local_7314608;
++return_direct_with_clo1(data, ((closureN)self_7311939)->elements[0], (((closure) ((closureN)self_7311939)->elements[0])->fn), set_pair_as_expr(&local_7314595, quote__if, set_pair_as_expr(&local_7314598, set_pair_as_expr(&local_7314601, quote_eq_127, ((closureN)self_7311939)->elements[1]), set_pair_as_expr(&local_7314605, boolean_t, set_pair_as_expr(&local_7314608, r_734134, NULL)))));;
+ }
+
+-static void __lambda_146(void *data, object self_7313193, int argc, object *args) /* object self_7313193, object r_734578 */
++static void __lambda_146(void *data, object self_7311940, int argc, object *args) /* object self_7311940, object r_734126 */
+ {
+- object r_734578 = args[0];
++ object r_734126 = args[0];
+
+-closureN_type c_7315657;
+-object e_7315872 [7];
+-c_7315657.hdr.mark = gc_color_red;
+- c_7315657.hdr.grayed = 0;
+-c_7315657.tag = closureN_tag;
+- c_7315657.fn = (function_type)__lambda_147;
+-c_7315657.num_args = 1;
+-c_7315657.num_elements = 7;
+-c_7315657.elements = (object *)e_7315872;
+-c_7315657.elements[0] = ((closureN)self_7313193)->elements[0];
+-c_7315657.elements[1] = ((closureN)self_7313193)->elements[1];
+-c_7315657.elements[2] = ((closureN)self_7313193)->elements[2];
+-c_7315657.elements[3] = ((closureN)self_7313193)->elements[3];
+-c_7315657.elements[4] = ((closureN)self_7313193)->elements[4];
+-c_7315657.elements[5] = ((closureN)self_7313193)->elements[5];
+-c_7315657.elements[6] = ((closureN)self_7313193)->elements[6];
++closureN_type c_7314357;
++object e_7314572 [7];
++c_7314357.hdr.mark = gc_color_red;
++ c_7314357.hdr.grayed = 0;
++c_7314357.tag = closureN_tag;
++ c_7314357.fn = (function_type)__lambda_147;
++c_7314357.num_args = 1;
++c_7314357.num_elements = 7;
++c_7314357.elements = (object *)e_7314572;
++c_7314357.elements[0] = ((closureN)self_7311940)->elements[0];
++c_7314357.elements[1] = ((closureN)self_7311940)->elements[1];
++c_7314357.elements[2] = ((closureN)self_7311940)->elements[2];
++c_7314357.elements[3] = ((closureN)self_7311940)->elements[3];
++c_7314357.elements[4] = ((closureN)self_7311940)->elements[4];
++c_7314357.elements[5] = ((closureN)self_7311940)->elements[5];
++c_7314357.elements[6] = ((closureN)self_7311940)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315657,__lambda_147, Cyc_set_cell(data, ((closureN)self_7313193)->elements[0], r_734578));;
++return_direct_with_clo1(data,(closure)&c_7314357,__lambda_147, Cyc_set_cell(data, ((closureN)self_7311940)->elements[0], r_734126));;
+ }
+
+-static void __lambda_147(void *data, object self_7313194, int argc, object *args) /* object self_7313194, object r_734507 */
++static void __lambda_147(void *data, object self_7311941, int argc, object *args) /* object self_7311941, object r_734055 */
+ {
+
+
+-closureN_type c_7315659;
+-object e_7315703 [4];
+-c_7315659.hdr.mark = gc_color_red;
+- c_7315659.hdr.grayed = 0;
+-c_7315659.tag = closureN_tag;
+- c_7315659.fn = (function_type)__lambda_148;
+-c_7315659.num_args = 1;
+-c_7315659.num_elements = 4;
+-c_7315659.elements = (object *)e_7315703;
+-c_7315659.elements[0] = ((closureN)self_7313194)->elements[2];
+-c_7315659.elements[1] = ((closureN)self_7313194)->elements[4];
+-c_7315659.elements[2] = ((closureN)self_7313194)->elements[5];
+-c_7315659.elements[3] = ((closureN)self_7313194)->elements[6];
++closureN_type c_7314359;
++object e_7314403 [4];
++c_7314359.hdr.mark = gc_color_red;
++ c_7314359.hdr.grayed = 0;
++c_7314359.tag = closureN_tag;
++ c_7314359.fn = (function_type)__lambda_148;
++c_7314359.num_args = 1;
++c_7314359.num_elements = 4;
++c_7314359.elements = (object *)e_7314403;
++c_7314359.elements[0] = ((closureN)self_7311941)->elements[2];
++c_7314359.elements[1] = ((closureN)self_7311941)->elements[4];
++c_7314359.elements[2] = ((closureN)self_7311941)->elements[5];
++c_7314359.elements[3] = ((closureN)self_7311941)->elements[6];
+
+
+-closureN_type c_7315704;
+-object e_7315871 [5];
+-c_7315704.hdr.mark = gc_color_red;
+- c_7315704.hdr.grayed = 0;
+-c_7315704.tag = closureN_tag;
+- c_7315704.fn = (function_type)__lambda_152;
+-c_7315704.num_args = 1;
+-c_7315704.num_elements = 5;
+-c_7315704.elements = (object *)e_7315871;
+-c_7315704.elements[0] = ((closureN)self_7313194)->elements[0];
+-c_7315704.elements[1] = ((closureN)self_7313194)->elements[1];
+-c_7315704.elements[2] = ((closureN)self_7313194)->elements[2];
+-c_7315704.elements[3] = ((closureN)self_7313194)->elements[3];
+-c_7315704.elements[4] = ((closureN)self_7313194)->elements[6];
++closureN_type c_7314404;
++object e_7314571 [5];
++c_7314404.hdr.mark = gc_color_red;
++ c_7314404.hdr.grayed = 0;
++c_7314404.tag = closureN_tag;
++ c_7314404.fn = (function_type)__lambda_152;
++c_7314404.num_args = 1;
++c_7314404.num_elements = 5;
++c_7314404.elements = (object *)e_7314571;
++c_7314404.elements[0] = ((closureN)self_7311941)->elements[0];
++c_7314404.elements[1] = ((closureN)self_7311941)->elements[1];
++c_7314404.elements[2] = ((closureN)self_7311941)->elements[2];
++c_7314404.elements[3] = ((closureN)self_7311941)->elements[3];
++c_7314404.elements[4] = ((closureN)self_7311941)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7315659,__lambda_148, &c_7315704);;
++return_direct_with_clo1(data,(closure)&c_7314359,__lambda_148, &c_7314404);;
+ }
+
+-static void __lambda_152(void *data, object self_7313195, int argc, object *args) /* object self_7313195, object k_734524, object ls_73194_732970 */
++static void __lambda_152(void *data, object self_7311942, int argc, object *args) /* object self_7311942, object k_734072, object ls_73194_732623 */
+ {
+- object k_734524 = args[0]; object ls_73194_732970 = args[1];
++ object k_734072 = args[0]; object ls_73194_732623 = args[1];
+
+-if( (boolean_f != Cyc_is_null(ls_73194_732970)) ){
+- return_direct_with_clo1(data, k_734524, (((closure) k_734524)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(ls_73194_732623)) ){
++ return_direct_with_clo1(data, k_734072, (((closure) k_734072)->fn), boolean_f);
+ } else {
+
+-closureN_type c_7315710;
+-object e_7315870 [7];
+-c_7315710.hdr.mark = gc_color_red;
+- c_7315710.hdr.grayed = 0;
+-c_7315710.tag = closureN_tag;
+- c_7315710.fn = (function_type)__lambda_153;
+-c_7315710.num_args = 1;
+-c_7315710.num_elements = 7;
+-c_7315710.elements = (object *)e_7315870;
+-c_7315710.elements[0] = ((closureN)self_7313195)->elements[0];
+-c_7315710.elements[1] = ((closureN)self_7313195)->elements[1];
+-c_7315710.elements[2] = ((closureN)self_7313195)->elements[2];
+-c_7315710.elements[3] = ((closureN)self_7313195)->elements[3];
+-c_7315710.elements[4] = k_734524;
+-c_7315710.elements[5] = ls_73194_732970;
+-c_7315710.elements[6] = ((closureN)self_7313195)->elements[4];
++closureN_type c_7314410;
++object e_7314570 [7];
++c_7314410.hdr.mark = gc_color_red;
++ c_7314410.hdr.grayed = 0;
++c_7314410.tag = closureN_tag;
++ c_7314410.fn = (function_type)__lambda_153;
++c_7314410.num_args = 1;
++c_7314410.num_elements = 7;
++c_7314410.elements = (object *)e_7314570;
++c_7314410.elements[0] = ((closureN)self_7311942)->elements[0];
++c_7314410.elements[1] = ((closureN)self_7311942)->elements[1];
++c_7314410.elements[2] = ((closureN)self_7311942)->elements[2];
++c_7314410.elements[3] = ((closureN)self_7311942)->elements[3];
++c_7314410.elements[4] = k_734072;
++c_7314410.elements[5] = ls_73194_732623;
++c_7314410.elements[6] = ((closureN)self_7311942)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313195)->elements[4], &c_7315710, quote__else);}
++return_closcall2(data, ((closureN)self_7311942)->elements[4], &c_7314410, quote__else);}
+ ;;
+ }
+
+-static void __lambda_153(void *data, object self_7313196, int argc, object *args) /* object self_7313196, object r_734575 */
++static void __lambda_153(void *data, object self_7311943, int argc, object *args) /* object self_7311943, object r_734123 */
+ {
+- object r_734575 = args[0];
++ object r_734123 = args[0];
+
+-closureN_type c_7315713;
+-object e_7315866 [6];
+-c_7315713.hdr.mark = gc_color_red;
+- c_7315713.hdr.grayed = 0;
+-c_7315713.tag = closureN_tag;
+- c_7315713.fn = (function_type)__lambda_154;
+-c_7315713.num_args = 1;
+-c_7315713.num_elements = 6;
+-c_7315713.elements = (object *)e_7315866;
+-c_7315713.elements[0] = ((closureN)self_7313196)->elements[0];
+-c_7315713.elements[1] = ((closureN)self_7313196)->elements[1];
+-c_7315713.elements[2] = ((closureN)self_7313196)->elements[2];
+-c_7315713.elements[3] = ((closureN)self_7313196)->elements[4];
+-c_7315713.elements[4] = ((closureN)self_7313196)->elements[5];
+-c_7315713.elements[5] = ((closureN)self_7313196)->elements[6];
++closureN_type c_7314413;
++object e_7314566 [6];
++c_7314413.hdr.mark = gc_color_red;
++ c_7314413.hdr.grayed = 0;
++c_7314413.tag = closureN_tag;
++ c_7314413.fn = (function_type)__lambda_154;
++c_7314413.num_args = 1;
++c_7314413.num_elements = 6;
++c_7314413.elements = (object *)e_7314566;
++c_7314413.elements[0] = ((closureN)self_7311943)->elements[0];
++c_7314413.elements[1] = ((closureN)self_7311943)->elements[1];
++c_7314413.elements[2] = ((closureN)self_7311943)->elements[2];
++c_7314413.elements[3] = ((closureN)self_7311943)->elements[4];
++c_7314413.elements[4] = ((closureN)self_7311943)->elements[5];
++c_7314413.elements[5] = ((closureN)self_7311943)->elements[6];
+
+
+
+-return_closcall3(data, ((closureN)self_7313196)->elements[3], &c_7315713, r_734575, Cyc_caar(data, ((closureN)self_7313196)->elements[5]));;
++return_closcall3(data, ((closureN)self_7311943)->elements[3], &c_7314413, r_734123, Cyc_caar(data, ((closureN)self_7311943)->elements[5]));;
+ }
+
+-static void __lambda_154(void *data, object self_7313197, int argc, object *args) /* object self_7313197, object r_734526 */
++static void __lambda_154(void *data, object self_7311944, int argc, object *args) /* object self_7311944, object r_734074 */
+ {
+- object r_734526 = args[0];
+- if( (boolean_f != r_734526) ){
++ object r_734074 = args[0];
++ if( (boolean_f != r_734074) ){
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313197)->elements[1]), ((closureN)self_7313197)->elements[3], Cyc_cdar(data, ((closureN)self_7313197)->elements[4]));
++return_closcall2(data, car(((closureN)self_7311944)->elements[1]), ((closureN)self_7311944)->elements[3], Cyc_cdar(data, ((closureN)self_7311944)->elements[4]));
+ } else {
+- object r_734528;
++ object r_734076;
+
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7313197)->elements[4])))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7311944)->elements[4])))) ){
+
+
+
+
+- r_734528 = Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313197)->elements[4]))));
++ r_734076 = Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7311944)->elements[4]))));
+ } else {
+- r_734528 = boolean_f;}
+-;if( (boolean_f != r_734528) ){
++ r_734076 = boolean_f;}
++;if( (boolean_f != r_734076) ){
+
+-closureN_type c_7315743;
+-object e_7315813 [5];
+-c_7315743.hdr.mark = gc_color_red;
+- c_7315743.hdr.grayed = 0;
+-c_7315743.tag = closureN_tag;
+- c_7315743.fn = (function_type)__lambda_155;
+-c_7315743.num_args = 1;
+-c_7315743.num_elements = 5;
+-c_7315743.elements = (object *)e_7315813;
+-c_7315743.elements[0] = ((closureN)self_7313197)->elements[1];
+-c_7315743.elements[1] = ((closureN)self_7313197)->elements[2];
+-c_7315743.elements[2] = ((closureN)self_7313197)->elements[3];
+-c_7315743.elements[3] = ((closureN)self_7313197)->elements[4];
+-c_7315743.elements[4] = ((closureN)self_7313197)->elements[5];
++closureN_type c_7314443;
++object e_7314513 [5];
++c_7314443.hdr.mark = gc_color_red;
++ c_7314443.hdr.grayed = 0;
++c_7314443.tag = closureN_tag;
++ c_7314443.fn = (function_type)__lambda_155;
++c_7314443.num_args = 1;
++c_7314443.num_elements = 5;
++c_7314443.elements = (object *)e_7314513;
++c_7314443.elements[0] = ((closureN)self_7311944)->elements[1];
++c_7314443.elements[1] = ((closureN)self_7311944)->elements[2];
++c_7314443.elements[2] = ((closureN)self_7311944)->elements[3];
++c_7314443.elements[3] = ((closureN)self_7311944)->elements[4];
++c_7314443.elements[4] = ((closureN)self_7311944)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313197)->elements[5], &c_7315743, quote__if);
++return_closcall2(data, ((closureN)self_7311944)->elements[5], &c_7314443, quote__if);
+ } else {
+
+-closureN_type c_7315816;
+-object e_7315865 [6];
+-c_7315816.hdr.mark = gc_color_red;
+- c_7315816.hdr.grayed = 0;
+-c_7315816.tag = closureN_tag;
+- c_7315816.fn = (function_type)__lambda_161;
+-c_7315816.num_args = 1;
+-c_7315816.num_elements = 6;
+-c_7315816.elements = (object *)e_7315865;
+-c_7315816.elements[0] = ((closureN)self_7313197)->elements[0];
+-c_7315816.elements[1] = ((closureN)self_7313197)->elements[1];
+-c_7315816.elements[2] = ((closureN)self_7313197)->elements[2];
+-c_7315816.elements[3] = ((closureN)self_7313197)->elements[3];
+-c_7315816.elements[4] = ((closureN)self_7313197)->elements[4];
+-c_7315816.elements[5] = ((closureN)self_7313197)->elements[5];
++closureN_type c_7314516;
++object e_7314565 [6];
++c_7314516.hdr.mark = gc_color_red;
++ c_7314516.hdr.grayed = 0;
++c_7314516.tag = closureN_tag;
++ c_7314516.fn = (function_type)__lambda_161;
++c_7314516.num_args = 1;
++c_7314516.num_elements = 6;
++c_7314516.elements = (object *)e_7314565;
++c_7314516.elements[0] = ((closureN)self_7311944)->elements[0];
++c_7314516.elements[1] = ((closureN)self_7311944)->elements[1];
++c_7314516.elements[2] = ((closureN)self_7311944)->elements[2];
++c_7314516.elements[3] = ((closureN)self_7311944)->elements[3];
++c_7314516.elements[4] = ((closureN)self_7311944)->elements[4];
++c_7314516.elements[5] = ((closureN)self_7311944)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313197)->elements[5], &c_7315816, quote__if);}
++return_closcall2(data, ((closureN)self_7311944)->elements[5], &c_7314516, quote__if);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_161(void *data, object self_7313204, int argc, object *args) /* object self_7313204, object r_734554 */
++static void __lambda_161(void *data, object self_7311951, int argc, object *args) /* object self_7311951, object r_734102 */
+ {
+- object r_734554 = args[0];
++ object r_734102 = args[0];
+
+-closureN_type c_7315819;
+-object e_7315864 [6];
+-c_7315819.hdr.mark = gc_color_red;
+- c_7315819.hdr.grayed = 0;
+-c_7315819.tag = closureN_tag;
+- c_7315819.fn = (function_type)__lambda_162;
+-c_7315819.num_args = 1;
+-c_7315819.num_elements = 6;
+-c_7315819.elements = (object *)e_7315864;
+-c_7315819.elements[0] = ((closureN)self_7313204)->elements[0];
+-c_7315819.elements[1] = ((closureN)self_7313204)->elements[1];
+-c_7315819.elements[2] = ((closureN)self_7313204)->elements[2];
+-c_7315819.elements[3] = ((closureN)self_7313204)->elements[3];
+-c_7315819.elements[4] = ((closureN)self_7313204)->elements[4];
+-c_7315819.elements[5] = r_734554;
++closureN_type c_7314519;
++object e_7314564 [6];
++c_7314519.hdr.mark = gc_color_red;
++ c_7314519.hdr.grayed = 0;
++c_7314519.tag = closureN_tag;
++ c_7314519.fn = (function_type)__lambda_162;
++c_7314519.num_args = 1;
++c_7314519.num_elements = 6;
++c_7314519.elements = (object *)e_7314564;
++c_7314519.elements[0] = ((closureN)self_7311951)->elements[0];
++c_7314519.elements[1] = ((closureN)self_7311951)->elements[1];
++c_7314519.elements[2] = ((closureN)self_7311951)->elements[2];
++c_7314519.elements[3] = ((closureN)self_7311951)->elements[3];
++c_7314519.elements[4] = ((closureN)self_7311951)->elements[4];
++c_7314519.elements[5] = r_734102;
+
+-return_closcall2(data, ((closureN)self_7313204)->elements[5], &c_7315819, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311951)->elements[5], &c_7314519, quote_tmp);;
+ }
+
+-static void __lambda_162(void *data, object self_7313205, int argc, object *args) /* object self_7313205, object r_734564 */
++static void __lambda_162(void *data, object self_7311952, int argc, object *args) /* object self_7311952, object r_734112 */
+ {
+- object r_734564 = args[0];
++ object r_734112 = args[0];
+
+
+
+-closureN_type c_7315824;
+-object e_7315860 [5];
+-c_7315824.hdr.mark = gc_color_red;
+- c_7315824.hdr.grayed = 0;
+-c_7315824.tag = closureN_tag;
+- c_7315824.fn = (function_type)__lambda_163;
+-c_7315824.num_args = 1;
+-c_7315824.num_elements = 5;
+-c_7315824.elements = (object *)e_7315860;
+-c_7315824.elements[0] = ((closureN)self_7313205)->elements[1];
+-c_7315824.elements[1] = ((closureN)self_7313205)->elements[2];
+-c_7315824.elements[2] = ((closureN)self_7313205)->elements[3];
+-c_7315824.elements[3] = ((closureN)self_7313205)->elements[4];
+-c_7315824.elements[4] = ((closureN)self_7313205)->elements[5];
++closureN_type c_7314524;
++object e_7314560 [5];
++c_7314524.hdr.mark = gc_color_red;
++ c_7314524.hdr.grayed = 0;
++c_7314524.tag = closureN_tag;
++ c_7314524.fn = (function_type)__lambda_163;
++c_7314524.num_args = 1;
++c_7314524.num_elements = 5;
++c_7314524.elements = (object *)e_7314560;
++c_7314524.elements[0] = ((closureN)self_7311952)->elements[1];
++c_7314524.elements[1] = ((closureN)self_7311952)->elements[2];
++c_7314524.elements[2] = ((closureN)self_7311952)->elements[3];
++c_7314524.elements[3] = ((closureN)self_7311952)->elements[4];
++c_7314524.elements[4] = ((closureN)self_7311952)->elements[5];
+
+
+
+-return_closcall3(data, car(((closureN)self_7313205)->elements[0]), &c_7315824, r_734564, Cyc_caar(data, ((closureN)self_7313205)->elements[4]));;
++return_closcall3(data, car(((closureN)self_7311952)->elements[0]), &c_7314524, r_734112, Cyc_caar(data, ((closureN)self_7311952)->elements[4]));;
+ }
+
+-static void __lambda_163(void *data, object self_7313206, int argc, object *args) /* object self_7313206, object r_734556 */
++static void __lambda_163(void *data, object self_7311953, int argc, object *args) /* object self_7311953, object r_734104 */
+ {
+- object r_734556 = args[0];
++ object r_734104 = args[0];
+
+
+
+-closureN_type c_7315829;
+-object e_7315856 [5];
+-c_7315829.hdr.mark = gc_color_red;
+- c_7315829.hdr.grayed = 0;
+-c_7315829.tag = closureN_tag;
+- c_7315829.fn = (function_type)__lambda_164;
+-c_7315829.num_args = 1;
+-c_7315829.num_elements = 5;
+-c_7315829.elements = (object *)e_7315856;
+-c_7315829.elements[0] = ((closureN)self_7313206)->elements[1];
+-c_7315829.elements[1] = ((closureN)self_7313206)->elements[2];
+-c_7315829.elements[2] = ((closureN)self_7313206)->elements[3];
+-c_7315829.elements[3] = ((closureN)self_7313206)->elements[4];
+-c_7315829.elements[4] = r_734556;
++closureN_type c_7314529;
++object e_7314556 [5];
++c_7314529.hdr.mark = gc_color_red;
++ c_7314529.hdr.grayed = 0;
++c_7314529.tag = closureN_tag;
++ c_7314529.fn = (function_type)__lambda_164;
++c_7314529.num_args = 1;
++c_7314529.num_elements = 5;
++c_7314529.elements = (object *)e_7314556;
++c_7314529.elements[0] = ((closureN)self_7311953)->elements[1];
++c_7314529.elements[1] = ((closureN)self_7311953)->elements[2];
++c_7314529.elements[2] = ((closureN)self_7311953)->elements[3];
++c_7314529.elements[3] = ((closureN)self_7311953)->elements[4];
++c_7314529.elements[4] = r_734104;
+
+
+
+-return_closcall2(data, car(((closureN)self_7313206)->elements[0]), &c_7315829, Cyc_cdar(data, ((closureN)self_7313206)->elements[3]));;
++return_closcall2(data, car(((closureN)self_7311953)->elements[0]), &c_7314529, Cyc_cdar(data, ((closureN)self_7311953)->elements[3]));;
+ }
+
+-static void __lambda_164(void *data, object self_7313207, int argc, object *args) /* object self_7313207, object r_734558 */
++static void __lambda_164(void *data, object self_7311954, int argc, object *args) /* object self_7311954, object r_734106 */
+ {
+- object r_734558 = args[0];
++ object r_734106 = args[0];
+
+
+
+-closureN_type c_7315834;
+-object e_7315852 [4];
+-c_7315834.hdr.mark = gc_color_red;
+- c_7315834.hdr.grayed = 0;
+-c_7315834.tag = closureN_tag;
+- c_7315834.fn = (function_type)__lambda_165;
+-c_7315834.num_args = 1;
+-c_7315834.num_elements = 4;
+-c_7315834.elements = (object *)e_7315852;
+-c_7315834.elements[0] = ((closureN)self_7313207)->elements[1];
+-c_7315834.elements[1] = ((closureN)self_7313207)->elements[3];
+-c_7315834.elements[2] = ((closureN)self_7313207)->elements[4];
+-c_7315834.elements[3] = r_734558;
++closureN_type c_7314534;
++object e_7314552 [4];
++c_7314534.hdr.mark = gc_color_red;
++ c_7314534.hdr.grayed = 0;
++c_7314534.tag = closureN_tag;
++ c_7314534.fn = (function_type)__lambda_165;
++c_7314534.num_args = 1;
++c_7314534.num_elements = 4;
++c_7314534.elements = (object *)e_7314552;
++c_7314534.elements[0] = ((closureN)self_7311954)->elements[1];
++c_7314534.elements[1] = ((closureN)self_7311954)->elements[3];
++c_7314534.elements[2] = ((closureN)self_7311954)->elements[4];
++c_7314534.elements[3] = r_734106;
+
+
+
+-return_closcall2(data, car(((closureN)self_7313207)->elements[0]), &c_7315834, Cyc_cdr(data, ((closureN)self_7313207)->elements[2]));;
++return_closcall2(data, car(((closureN)self_7311954)->elements[0]), &c_7314534, Cyc_cdr(data, ((closureN)self_7311954)->elements[2]));;
+ }
+
+-static void __lambda_165(void *data, object self_7313208, int argc, object *args) /* object self_7313208, object r_734560 */
++static void __lambda_165(void *data, object self_7311955, int argc, object *args) /* object self_7311955, object r_734108 */
+ {
+- object r_734560 = args[0];
++ object r_734108 = args[0];
+
+-pair_type local_7315839;
++pair_type local_7314539;
+
+-pair_type local_7315843;
++pair_type local_7314543;
+
+-pair_type local_7315847;
++pair_type local_7314547;
+
+-pair_type local_7315851;
+-return_direct_with_clo1(data, ((closureN)self_7313208)->elements[0], (((closure) ((closureN)self_7313208)->elements[0])->fn), set_pair_as_expr(&local_7315839, ((closureN)self_7313208)->elements[1], set_pair_as_expr(&local_7315843, ((closureN)self_7313208)->elements[2], set_pair_as_expr(&local_7315847, ((closureN)self_7313208)->elements[3], set_pair_as_expr(&local_7315851, r_734560, NULL)))));;
++pair_type local_7314551;
++return_direct_with_clo1(data, ((closureN)self_7311955)->elements[0], (((closure) ((closureN)self_7311955)->elements[0])->fn), set_pair_as_expr(&local_7314539, ((closureN)self_7311955)->elements[1], set_pair_as_expr(&local_7314543, ((closureN)self_7311955)->elements[2], set_pair_as_expr(&local_7314547, ((closureN)self_7311955)->elements[3], set_pair_as_expr(&local_7314551, r_734108, NULL)))));;
+ }
+
+-static void __lambda_155(void *data, object self_7313198, int argc, object *args) /* object self_7313198, object r_734529 */
++static void __lambda_155(void *data, object self_7311945, int argc, object *args) /* object self_7311945, object r_734077 */
+ {
+- object r_734529 = args[0];
++ object r_734077 = args[0];
+
+-closureN_type c_7315746;
+-object e_7315812 [6];
+-c_7315746.hdr.mark = gc_color_red;
+- c_7315746.hdr.grayed = 0;
+-c_7315746.tag = closureN_tag;
+- c_7315746.fn = (function_type)__lambda_156;
+-c_7315746.num_args = 1;
+-c_7315746.num_elements = 6;
+-c_7315746.elements = (object *)e_7315812;
+-c_7315746.elements[0] = ((closureN)self_7313198)->elements[0];
+-c_7315746.elements[1] = ((closureN)self_7313198)->elements[1];
+-c_7315746.elements[2] = ((closureN)self_7313198)->elements[2];
+-c_7315746.elements[3] = ((closureN)self_7313198)->elements[3];
+-c_7315746.elements[4] = r_734529;
+-c_7315746.elements[5] = ((closureN)self_7313198)->elements[4];
++closureN_type c_7314446;
++object e_7314512 [6];
++c_7314446.hdr.mark = gc_color_red;
++ c_7314446.hdr.grayed = 0;
++c_7314446.tag = closureN_tag;
++ c_7314446.fn = (function_type)__lambda_156;
++c_7314446.num_args = 1;
++c_7314446.num_elements = 6;
++c_7314446.elements = (object *)e_7314512;
++c_7314446.elements[0] = ((closureN)self_7311945)->elements[0];
++c_7314446.elements[1] = ((closureN)self_7311945)->elements[1];
++c_7314446.elements[2] = ((closureN)self_7311945)->elements[2];
++c_7314446.elements[3] = ((closureN)self_7311945)->elements[3];
++c_7314446.elements[4] = r_734077;
++c_7314446.elements[5] = ((closureN)self_7311945)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313198)->elements[4], &c_7315746, quote_eqv_127);;
++return_closcall2(data, ((closureN)self_7311945)->elements[4], &c_7314446, quote_eqv_127);;
+ }
+
+-static void __lambda_156(void *data, object self_7313199, int argc, object *args) /* object self_7313199, object r_734539 */
++static void __lambda_156(void *data, object self_7311946, int argc, object *args) /* object self_7311946, object r_734087 */
+ {
+- object r_734539 = args[0];
++ object r_734087 = args[0];
+
+-closureN_type c_7315749;
+-object e_7315811 [7];
+-c_7315749.hdr.mark = gc_color_red;
+- c_7315749.hdr.grayed = 0;
+-c_7315749.tag = closureN_tag;
+- c_7315749.fn = (function_type)__lambda_157;
+-c_7315749.num_args = 1;
+-c_7315749.num_elements = 7;
+-c_7315749.elements = (object *)e_7315811;
+-c_7315749.elements[0] = ((closureN)self_7313199)->elements[0];
+-c_7315749.elements[1] = ((closureN)self_7313199)->elements[1];
+-c_7315749.elements[2] = ((closureN)self_7313199)->elements[2];
+-c_7315749.elements[3] = ((closureN)self_7313199)->elements[3];
+-c_7315749.elements[4] = ((closureN)self_7313199)->elements[4];
+-c_7315749.elements[5] = r_734539;
+-c_7315749.elements[6] = ((closureN)self_7313199)->elements[5];
+-
+-return_closcall2(data, ((closureN)self_7313199)->elements[5], &c_7315749, quote_tmp);;
+-}
+-
+-static void __lambda_157(void *data, object self_7313200, int argc, object *args) /* object self_7313200, object r_734541 */
+- {
+- object r_734541 = args[0];
+-
+-closureN_type c_7315752;
+-object e_7315810 [7];
+-c_7315752.hdr.mark = gc_color_red;
+- c_7315752.hdr.grayed = 0;
+-c_7315752.tag = closureN_tag;
+- c_7315752.fn = (function_type)__lambda_158;
+-c_7315752.num_args = 1;
+-c_7315752.num_elements = 7;
+-c_7315752.elements = (object *)e_7315810;
+-c_7315752.elements[0] = ((closureN)self_7313200)->elements[0];
+-c_7315752.elements[1] = ((closureN)self_7313200)->elements[1];
+-c_7315752.elements[2] = ((closureN)self_7313200)->elements[2];
+-c_7315752.elements[3] = ((closureN)self_7313200)->elements[3];
+-c_7315752.elements[4] = ((closureN)self_7313200)->elements[4];
+-c_7315752.elements[5] = ((closureN)self_7313200)->elements[5];
+-c_7315752.elements[6] = r_734541;
++closureN_type c_7314449;
++object e_7314511 [7];
++c_7314449.hdr.mark = gc_color_red;
++ c_7314449.hdr.grayed = 0;
++c_7314449.tag = closureN_tag;
++ c_7314449.fn = (function_type)__lambda_157;
++c_7314449.num_args = 1;
++c_7314449.num_elements = 7;
++c_7314449.elements = (object *)e_7314511;
++c_7314449.elements[0] = ((closureN)self_7311946)->elements[0];
++c_7314449.elements[1] = ((closureN)self_7311946)->elements[1];
++c_7314449.elements[2] = ((closureN)self_7311946)->elements[2];
++c_7314449.elements[3] = ((closureN)self_7311946)->elements[3];
++c_7314449.elements[4] = ((closureN)self_7311946)->elements[4];
++c_7314449.elements[5] = r_734087;
++c_7314449.elements[6] = ((closureN)self_7311946)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313200)->elements[6], &c_7315752, quote_quote);;
++return_closcall2(data, ((closureN)self_7311946)->elements[5], &c_7314449, quote_tmp);;
+ }
+
+-static void __lambda_158(void *data, object self_7313201, int argc, object *args) /* object self_7313201, object r_734545 */
++static void __lambda_157(void *data, object self_7311947, int argc, object *args) /* object self_7311947, object r_734089 */
+ {
+- object r_734545 = args[0];
++ object r_734089 = args[0];
++
++closureN_type c_7314452;
++object e_7314510 [7];
++c_7314452.hdr.mark = gc_color_red;
++ c_7314452.hdr.grayed = 0;
++c_7314452.tag = closureN_tag;
++ c_7314452.fn = (function_type)__lambda_158;
++c_7314452.num_args = 1;
++c_7314452.num_elements = 7;
++c_7314452.elements = (object *)e_7314510;
++c_7314452.elements[0] = ((closureN)self_7311947)->elements[0];
++c_7314452.elements[1] = ((closureN)self_7311947)->elements[1];
++c_7314452.elements[2] = ((closureN)self_7311947)->elements[2];
++c_7314452.elements[3] = ((closureN)self_7311947)->elements[3];
++c_7314452.elements[4] = ((closureN)self_7311947)->elements[4];
++c_7314452.elements[5] = ((closureN)self_7311947)->elements[5];
++c_7314452.elements[6] = r_734089;
++
++return_closcall2(data, ((closureN)self_7311947)->elements[6], &c_7314452, quote_quote);;
++}
++
++static void __lambda_158(void *data, object self_7311948, int argc, object *args) /* object self_7311948, object r_734093 */
++ {
++ object r_734093 = args[0];
+
+
+
+-closureN_type c_7315757;
+-object e_7315806 [7];
+-c_7315757.hdr.mark = gc_color_red;
+- c_7315757.hdr.grayed = 0;
+-c_7315757.tag = closureN_tag;
+- c_7315757.fn = (function_type)__lambda_159;
+-c_7315757.num_args = 1;
+-c_7315757.num_elements = 7;
+-c_7315757.elements = (object *)e_7315806;
+-c_7315757.elements[0] = ((closureN)self_7313201)->elements[1];
+-c_7315757.elements[1] = ((closureN)self_7313201)->elements[2];
+-c_7315757.elements[2] = ((closureN)self_7313201)->elements[3];
+-c_7315757.elements[3] = ((closureN)self_7313201)->elements[4];
+-c_7315757.elements[4] = ((closureN)self_7313201)->elements[5];
+-c_7315757.elements[5] = ((closureN)self_7313201)->elements[6];
+-c_7315757.elements[6] = r_734545;
++closureN_type c_7314457;
++object e_7314506 [7];
++c_7314457.hdr.mark = gc_color_red;
++ c_7314457.hdr.grayed = 0;
++c_7314457.tag = closureN_tag;
++ c_7314457.fn = (function_type)__lambda_159;
++c_7314457.num_args = 1;
++c_7314457.num_elements = 7;
++c_7314457.elements = (object *)e_7314506;
++c_7314457.elements[0] = ((closureN)self_7311948)->elements[1];
++c_7314457.elements[1] = ((closureN)self_7311948)->elements[2];
++c_7314457.elements[2] = ((closureN)self_7311948)->elements[3];
++c_7314457.elements[3] = ((closureN)self_7311948)->elements[4];
++c_7314457.elements[4] = ((closureN)self_7311948)->elements[5];
++c_7314457.elements[5] = ((closureN)self_7311948)->elements[6];
++c_7314457.elements[6] = r_734093;
+
+
+
+-return_closcall2(data, car(((closureN)self_7313201)->elements[0]), &c_7315757, Cyc_cdar(data, ((closureN)self_7313201)->elements[3]));;
++return_closcall2(data, car(((closureN)self_7311948)->elements[0]), &c_7314457, Cyc_cdar(data, ((closureN)self_7311948)->elements[3]));;
+ }
+
+-static void __lambda_159(void *data, object self_7313202, int argc, object *args) /* object self_7313202, object r_734533 */
++static void __lambda_159(void *data, object self_7311949, int argc, object *args) /* object self_7311949, object r_734081 */
+ {
+- object r_734533 = args[0];
++ object r_734081 = args[0];
+
+
+
+-closureN_type c_7315762;
+-object e_7315802 [7];
+-c_7315762.hdr.mark = gc_color_red;
+- c_7315762.hdr.grayed = 0;
+-c_7315762.tag = closureN_tag;
+- c_7315762.fn = (function_type)__lambda_160;
+-c_7315762.num_args = 1;
+-c_7315762.num_elements = 7;
+-c_7315762.elements = (object *)e_7315802;
+-c_7315762.elements[0] = ((closureN)self_7313202)->elements[1];
+-c_7315762.elements[1] = ((closureN)self_7313202)->elements[2];
+-c_7315762.elements[2] = ((closureN)self_7313202)->elements[3];
+-c_7315762.elements[3] = r_734533;
+-c_7315762.elements[4] = ((closureN)self_7313202)->elements[4];
+-c_7315762.elements[5] = ((closureN)self_7313202)->elements[5];
+-c_7315762.elements[6] = ((closureN)self_7313202)->elements[6];
++closureN_type c_7314462;
++object e_7314502 [7];
++c_7314462.hdr.mark = gc_color_red;
++ c_7314462.hdr.grayed = 0;
++c_7314462.tag = closureN_tag;
++ c_7314462.fn = (function_type)__lambda_160;
++c_7314462.num_args = 1;
++c_7314462.num_elements = 7;
++c_7314462.elements = (object *)e_7314502;
++c_7314462.elements[0] = ((closureN)self_7311949)->elements[1];
++c_7314462.elements[1] = ((closureN)self_7311949)->elements[2];
++c_7314462.elements[2] = ((closureN)self_7311949)->elements[3];
++c_7314462.elements[3] = r_734081;
++c_7314462.elements[4] = ((closureN)self_7311949)->elements[4];
++c_7314462.elements[5] = ((closureN)self_7311949)->elements[5];
++c_7314462.elements[6] = ((closureN)self_7311949)->elements[6];
+
+
+
+-return_closcall2(data, car(((closureN)self_7313202)->elements[0]), &c_7315762, Cyc_cdr(data, ((closureN)self_7313202)->elements[2]));;
++return_closcall2(data, car(((closureN)self_7311949)->elements[0]), &c_7314462, Cyc_cdr(data, ((closureN)self_7311949)->elements[2]));;
+ }
+
+-static void __lambda_160(void *data, object self_7313203, int argc, object *args) /* object self_7313203, object r_734535 */
++static void __lambda_160(void *data, object self_7311950, int argc, object *args) /* object self_7311950, object r_734083 */
+ {
+- object r_734535 = args[0];
++ object r_734083 = args[0];
+
+-pair_type local_7315767;
++pair_type local_7314467;
+
+-pair_type local_7315771;
++pair_type local_7314471;
+
+-pair_type local_7315774;
++pair_type local_7314474;
+
+-pair_type local_7315778;
++pair_type local_7314478;
+
+-pair_type local_7315782;
++pair_type local_7314482;
+
+-pair_type local_7315785;
++pair_type local_7314485;
+
+-pair_type local_7315789;
++pair_type local_7314489;
+
+
+
+
+
+-pair_type local_7315797;
++pair_type local_7314497;
+
+-pair_type local_7315801;
+-return_direct_with_clo1(data, ((closureN)self_7313203)->elements[0], (((closure) ((closureN)self_7313203)->elements[0])->fn), set_pair_as_expr(&local_7315767, ((closureN)self_7313203)->elements[2], set_pair_as_expr(&local_7315771, set_pair_as_expr(&local_7315774, ((closureN)self_7313203)->elements[4], set_pair_as_expr(&local_7315778, ((closureN)self_7313203)->elements[5], set_pair_as_expr(&local_7315782, set_pair_as_expr(&local_7315785, ((closureN)self_7313203)->elements[6], set_pair_as_expr(&local_7315789, Cyc_car(data, Cyc_caar(data, ((closureN)self_7313203)->elements[1])), NULL)), NULL))), set_pair_as_expr(&local_7315797, ((closureN)self_7313203)->elements[3], set_pair_as_expr(&local_7315801, r_734535, NULL)))));;
++pair_type local_7314501;
++return_direct_with_clo1(data, ((closureN)self_7311950)->elements[0], (((closure) ((closureN)self_7311950)->elements[0])->fn), set_pair_as_expr(&local_7314467, ((closureN)self_7311950)->elements[2], set_pair_as_expr(&local_7314471, set_pair_as_expr(&local_7314474, ((closureN)self_7311950)->elements[4], set_pair_as_expr(&local_7314478, ((closureN)self_7311950)->elements[5], set_pair_as_expr(&local_7314482, set_pair_as_expr(&local_7314485, ((closureN)self_7311950)->elements[6], set_pair_as_expr(&local_7314489, Cyc_car(data, Cyc_caar(data, ((closureN)self_7311950)->elements[1])), NULL)), NULL))), set_pair_as_expr(&local_7314497, ((closureN)self_7311950)->elements[3], set_pair_as_expr(&local_7314501, r_734083, NULL)))));;
+ }
+
+-static void __lambda_148(void *data, object self_7313209, int argc, object *args) /* object self_7313209, object r_734523 */
++static void __lambda_148(void *data, object self_7311956, int argc, object *args) /* object self_7311956, object r_734071 */
+ {
+- object r_734523 = args[0];
++ object r_734071 = args[0];
+
+-closureN_type c_7315661;
+-object e_7315699 [4];
+-c_7315661.hdr.mark = gc_color_red;
+- c_7315661.hdr.grayed = 0;
+-c_7315661.tag = closureN_tag;
+- c_7315661.fn = (function_type)__lambda_149;
+-c_7315661.num_args = 1;
+-c_7315661.num_elements = 4;
+-c_7315661.elements = (object *)e_7315699;
+-c_7315661.elements[0] = ((closureN)self_7313209)->elements[0];
+-c_7315661.elements[1] = ((closureN)self_7313209)->elements[1];
+-c_7315661.elements[2] = ((closureN)self_7313209)->elements[2];
+-c_7315661.elements[3] = ((closureN)self_7313209)->elements[3];
++closureN_type c_7314361;
++object e_7314399 [4];
++c_7314361.hdr.mark = gc_color_red;
++ c_7314361.hdr.grayed = 0;
++c_7314361.tag = closureN_tag;
++ c_7314361.fn = (function_type)__lambda_149;
++c_7314361.num_args = 1;
++c_7314361.num_elements = 4;
++c_7314361.elements = (object *)e_7314399;
++c_7314361.elements[0] = ((closureN)self_7311956)->elements[0];
++c_7314361.elements[1] = ((closureN)self_7311956)->elements[1];
++c_7314361.elements[2] = ((closureN)self_7311956)->elements[2];
++c_7314361.elements[3] = ((closureN)self_7311956)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315661,__lambda_149, Cyc_set_cell(data, ((closureN)self_7313209)->elements[0], r_734523));;
++return_direct_with_clo1(data,(closure)&c_7314361,__lambda_149, Cyc_set_cell(data, ((closureN)self_7311956)->elements[0], r_734071));;
+ }
+
+-static void __lambda_149(void *data, object self_7313210, int argc, object *args) /* object self_7313210, object r_734508 */
++static void __lambda_149(void *data, object self_7311957, int argc, object *args) /* object self_7311957, object r_734056 */
+ {
+
+
+-closureN_type c_7315664;
+-object e_7315698 [3];
+-c_7315664.hdr.mark = gc_color_red;
+- c_7315664.hdr.grayed = 0;
+-c_7315664.tag = closureN_tag;
+- c_7315664.fn = (function_type)__lambda_150;
+-c_7315664.num_args = 1;
+-c_7315664.num_elements = 3;
+-c_7315664.elements = (object *)e_7315698;
+-c_7315664.elements[0] = ((closureN)self_7313210)->elements[0];
+-c_7315664.elements[1] = ((closureN)self_7313210)->elements[1];
+-c_7315664.elements[2] = ((closureN)self_7313210)->elements[2];
++closureN_type c_7314364;
++object e_7314398 [3];
++c_7314364.hdr.mark = gc_color_red;
++ c_7314364.hdr.grayed = 0;
++c_7314364.tag = closureN_tag;
++ c_7314364.fn = (function_type)__lambda_150;
++c_7314364.num_args = 1;
++c_7314364.num_elements = 3;
++c_7314364.elements = (object *)e_7314398;
++c_7314364.elements[0] = ((closureN)self_7311957)->elements[0];
++c_7314364.elements[1] = ((closureN)self_7311957)->elements[1];
++c_7314364.elements[2] = ((closureN)self_7311957)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313210)->elements[3], &c_7315664, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311957)->elements[3], &c_7314364, quote_tmp);;
+ }
+
+-static void __lambda_150(void *data, object self_7313211, int argc, object *args) /* object self_7313211, object r_734518 */
++static void __lambda_150(void *data, object self_7311958, int argc, object *args) /* object self_7311958, object r_734066 */
+ {
+- object r_734518 = args[0];
++ object r_734066 = args[0];
+
+
+
+-closureN_type c_7315669;
+-object e_7315694 [3];
+-c_7315669.hdr.mark = gc_color_red;
+- c_7315669.hdr.grayed = 0;
+-c_7315669.tag = closureN_tag;
+- c_7315669.fn = (function_type)__lambda_151;
+-c_7315669.num_args = 1;
+-c_7315669.num_elements = 3;
+-c_7315669.elements = (object *)e_7315694;
+-c_7315669.elements[0] = ((closureN)self_7313211)->elements[1];
+-c_7315669.elements[1] = ((closureN)self_7313211)->elements[2];
+-c_7315669.elements[2] = r_734518;
++closureN_type c_7314369;
++object e_7314394 [3];
++c_7314369.hdr.mark = gc_color_red;
++ c_7314369.hdr.grayed = 0;
++c_7314369.tag = closureN_tag;
++ c_7314369.fn = (function_type)__lambda_151;
++c_7314369.num_args = 1;
++c_7314369.num_elements = 3;
++c_7314369.elements = (object *)e_7314394;
++c_7314369.elements[0] = ((closureN)self_7311958)->elements[1];
++c_7314369.elements[1] = ((closureN)self_7311958)->elements[2];
++c_7314369.elements[2] = r_734066;
+
+
+
+-return_closcall2(data, car(((closureN)self_7313211)->elements[0]), &c_7315669, Cyc_cddr(data, ((closureN)self_7313211)->elements[1]));;
++return_closcall2(data, car(((closureN)self_7311958)->elements[0]), &c_7314369, Cyc_cddr(data, ((closureN)self_7311958)->elements[1]));;
+ }
+
+-static void __lambda_151(void *data, object self_7313212, int argc, object *args) /* object self_7313212, object r_734513 */
++static void __lambda_151(void *data, object self_7311959, int argc, object *args) /* object self_7311959, object r_734061 */
+ {
+- object r_734513 = args[0];
++ object r_734061 = args[0];
+
+-pair_type local_7315674;
++pair_type local_7314374;
+
+-pair_type local_7315677;
++pair_type local_7314377;
+
+-pair_type local_7315680;
++pair_type local_7314380;
+
+-pair_type local_7315683;
++pair_type local_7314383;
+
+-pair_type local_7315687;
++pair_type local_7314387;
+
+
+
+-pair_type local_7315693;
+-return_direct_with_clo1(data, ((closureN)self_7313212)->elements[1], (((closure) ((closureN)self_7313212)->elements[1])->fn), set_pair_as_expr(&local_7315674, quote_let, set_pair_as_expr(&local_7315677, set_pair_as_expr(&local_7315680, set_pair_as_expr(&local_7315683, ((closureN)self_7313212)->elements[2], set_pair_as_expr(&local_7315687, Cyc_cadr(data, ((closureN)self_7313212)->elements[0]), NULL)), NULL), set_pair_as_expr(&local_7315693, r_734513, NULL))));;
++pair_type local_7314393;
++return_direct_with_clo1(data, ((closureN)self_7311959)->elements[1], (((closure) ((closureN)self_7311959)->elements[1])->fn), set_pair_as_expr(&local_7314374, quote_let, set_pair_as_expr(&local_7314377, set_pair_as_expr(&local_7314380, set_pair_as_expr(&local_7314383, ((closureN)self_7311959)->elements[2], set_pair_as_expr(&local_7314387, Cyc_cadr(data, ((closureN)self_7311959)->elements[0]), NULL)), NULL), set_pair_as_expr(&local_7314393, r_734061, NULL))));;
+ }
+
+-static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_734441, object expr_73168_732951, object rename_73169_732952, object compare_73170_732953 */
++static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_733989, object expr_73168_732604, object rename_73169_732605, object compare_73170_732606 */
+ {
+-object k_734441 = args[0]; object expr_73168_732951 = args[1]; object rename_73169_732952 = args[2]; object compare_73170_732953 = args[3];
++object k_733989 = args[0]; object expr_73168_732604 = args[1]; object rename_73169_732605 = args[2]; object compare_73170_732606 = args[3];
+ Cyc_st_add(data, "scheme/base.sld:cond");
+
+-closureN_type c_7315451;
+-object e_7315638 [4];
+-c_7315451.hdr.mark = gc_color_red;
+- c_7315451.hdr.grayed = 0;
+-c_7315451.tag = closureN_tag;
+- c_7315451.fn = (function_type)__lambda_122;
+-c_7315451.num_args = 1;
+-c_7315451.num_elements = 4;
+-c_7315451.elements = (object *)e_7315638;
+-c_7315451.elements[0] = compare_73170_732953;
+-c_7315451.elements[1] = expr_73168_732951;
+-c_7315451.elements[2] = k_734441;
+-c_7315451.elements[3] = rename_73169_732952;
++closureN_type c_7314151;
++object e_7314338 [4];
++c_7314151.hdr.mark = gc_color_red;
++ c_7314151.hdr.grayed = 0;
++c_7314151.tag = closureN_tag;
++ c_7314151.fn = (function_type)__lambda_122;
++c_7314151.num_args = 1;
++c_7314151.num_elements = 4;
++c_7314151.elements = (object *)e_7314338;
++c_7314151.elements[0] = compare_73170_732606;
++c_7314151.elements[1] = expr_73168_732604;
++c_7314151.elements[2] = k_733989;
++c_7314151.elements[3] = rename_73169_732605;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315451,__lambda_122, Cyc_cdr(data, expr_73168_732951));;
++return_direct_with_clo1(data,(closure)&c_7314151,__lambda_122, Cyc_cdr(data, expr_73168_732604));;
+ }
+
+-static void __lambda_122(void *data, object self_7313158, int argc, object *args) /* object self_7313158, object r_734502 */
++static void __lambda_122(void *data, object self_7311905, int argc, object *args) /* object self_7311905, object r_734050 */
+ {
+- object r_734502 = args[0];
++ object r_734050 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734502)) ){
+- return_direct_with_clo1(data, ((closureN)self_7313158)->elements[2], (((closure) ((closureN)self_7313158)->elements[2])->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(r_734050)) ){
++ return_direct_with_clo1(data, ((closureN)self_7311905)->elements[2], (((closure) ((closureN)self_7311905)->elements[2])->fn), boolean_f);
+ } else {
+
+-closureN_type c_7315457;
+-object e_7315634 [4];
+-c_7315457.hdr.mark = gc_color_red;
+- c_7315457.hdr.grayed = 0;
+-c_7315457.tag = closureN_tag;
+- c_7315457.fn = (function_type)__lambda_123;
+-c_7315457.num_args = 1;
+-c_7315457.num_elements = 4;
+-c_7315457.elements = (object *)e_7315634;
+-c_7315457.elements[0] = ((closureN)self_7313158)->elements[0];
+-c_7315457.elements[1] = ((closureN)self_7313158)->elements[1];
+-c_7315457.elements[2] = ((closureN)self_7313158)->elements[2];
+-c_7315457.elements[3] = ((closureN)self_7313158)->elements[3];
++closureN_type c_7314157;
++object e_7314334 [4];
++c_7314157.hdr.mark = gc_color_red;
++ c_7314157.hdr.grayed = 0;
++c_7314157.tag = closureN_tag;
++ c_7314157.fn = (function_type)__lambda_123;
++c_7314157.num_args = 1;
++c_7314157.num_elements = 4;
++c_7314157.elements = (object *)e_7314334;
++c_7314157.elements[0] = ((closureN)self_7311905)->elements[0];
++c_7314157.elements[1] = ((closureN)self_7311905)->elements[1];
++c_7314157.elements[2] = ((closureN)self_7311905)->elements[2];
++c_7314157.elements[3] = ((closureN)self_7311905)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315457,__lambda_123, Cyc_cadr(data, ((closureN)self_7313158)->elements[1]));}
++return_direct_with_clo1(data,(closure)&c_7314157,__lambda_123, Cyc_cadr(data, ((closureN)self_7311905)->elements[1]));}
+ ;;
+ }
+
+-static void __lambda_123(void *data, object self_7313159, int argc, object *args) /* object self_7313159, object cl_73171_732954 */
++static void __lambda_123(void *data, object self_7311906, int argc, object *args) /* object self_7311906, object cl_73171_732607 */
+ {
+- object cl_73171_732954 = args[0];
++ object cl_73171_732607 = args[0];
+
+-closureN_type c_7315460;
+-object e_7315633 [5];
+-c_7315460.hdr.mark = gc_color_red;
+- c_7315460.hdr.grayed = 0;
+-c_7315460.tag = closureN_tag;
+- c_7315460.fn = (function_type)__lambda_124;
+-c_7315460.num_args = 1;
+-c_7315460.num_elements = 5;
+-c_7315460.elements = (object *)e_7315633;
+-c_7315460.elements[0] = cl_73171_732954;
+-c_7315460.elements[1] = ((closureN)self_7313159)->elements[0];
+-c_7315460.elements[2] = ((closureN)self_7313159)->elements[1];
+-c_7315460.elements[3] = ((closureN)self_7313159)->elements[2];
+-c_7315460.elements[4] = ((closureN)self_7313159)->elements[3];
++closureN_type c_7314160;
++object e_7314333 [5];
++c_7314160.hdr.mark = gc_color_red;
++ c_7314160.hdr.grayed = 0;
++c_7314160.tag = closureN_tag;
++ c_7314160.fn = (function_type)__lambda_124;
++c_7314160.num_args = 1;
++c_7314160.num_elements = 5;
++c_7314160.elements = (object *)e_7314333;
++c_7314160.elements[0] = cl_73171_732607;
++c_7314160.elements[1] = ((closureN)self_7311906)->elements[0];
++c_7314160.elements[2] = ((closureN)self_7311906)->elements[1];
++c_7314160.elements[3] = ((closureN)self_7311906)->elements[2];
++c_7314160.elements[4] = ((closureN)self_7311906)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313159)->elements[3], &c_7315460, quote__else);;
++return_closcall2(data, ((closureN)self_7311906)->elements[3], &c_7314160, quote__else);;
+ }
+
+-static void __lambda_124(void *data, object self_7313160, int argc, object *args) /* object self_7313160, object r_734499 */
++static void __lambda_124(void *data, object self_7311907, int argc, object *args) /* object self_7311907, object r_734047 */
+ {
+- object r_734499 = args[0];
++ object r_734047 = args[0];
+
+-closureN_type c_7315463;
+-object e_7315629 [5];
+-c_7315463.hdr.mark = gc_color_red;
+- c_7315463.hdr.grayed = 0;
+-c_7315463.tag = closureN_tag;
+- c_7315463.fn = (function_type)__lambda_125;
+-c_7315463.num_args = 1;
+-c_7315463.num_elements = 5;
+-c_7315463.elements = (object *)e_7315629;
+-c_7315463.elements[0] = ((closureN)self_7313160)->elements[0];
+-c_7315463.elements[1] = ((closureN)self_7313160)->elements[1];
+-c_7315463.elements[2] = ((closureN)self_7313160)->elements[2];
+-c_7315463.elements[3] = ((closureN)self_7313160)->elements[3];
+-c_7315463.elements[4] = ((closureN)self_7313160)->elements[4];
++closureN_type c_7314163;
++object e_7314329 [5];
++c_7314163.hdr.mark = gc_color_red;
++ c_7314163.hdr.grayed = 0;
++c_7314163.tag = closureN_tag;
++ c_7314163.fn = (function_type)__lambda_125;
++c_7314163.num_args = 1;
++c_7314163.num_elements = 5;
++c_7314163.elements = (object *)e_7314329;
++c_7314163.elements[0] = ((closureN)self_7311907)->elements[0];
++c_7314163.elements[1] = ((closureN)self_7311907)->elements[1];
++c_7314163.elements[2] = ((closureN)self_7311907)->elements[2];
++c_7314163.elements[3] = ((closureN)self_7311907)->elements[3];
++c_7314163.elements[4] = ((closureN)self_7311907)->elements[4];
+
+
+
+-return_closcall3(data, ((closureN)self_7313160)->elements[1], &c_7315463, r_734499, Cyc_car(data, ((closureN)self_7313160)->elements[0]));;
++return_closcall3(data, ((closureN)self_7311907)->elements[1], &c_7314163, r_734047, Cyc_car(data, ((closureN)self_7311907)->elements[0]));;
+ }
+
+-static void __lambda_125(void *data, object self_7313161, int argc, object *args) /* object self_7313161, object r_734444 */
++static void __lambda_125(void *data, object self_7311908, int argc, object *args) /* object self_7311908, object r_733992 */
+ {
+- object r_734444 = args[0];
+- if( (boolean_f != r_734444) ){
++ object r_733992 = args[0];
++ if( (boolean_f != r_733992) ){
+
+-closureN_type c_7315465;
+-object e_7315490 [4];
+-c_7315465.hdr.mark = gc_color_red;
+- c_7315465.hdr.grayed = 0;
+-c_7315465.tag = closureN_tag;
+- c_7315465.fn = (function_type)__lambda_126;
+-c_7315465.num_args = 1;
+-c_7315465.num_elements = 4;
+-c_7315465.elements = (object *)e_7315490;
+-c_7315465.elements[0] = ((closureN)self_7313161)->elements[0];
+-c_7315465.elements[1] = ((closureN)self_7313161)->elements[2];
+-c_7315465.elements[2] = ((closureN)self_7313161)->elements[3];
+-c_7315465.elements[3] = ((closureN)self_7313161)->elements[4];
++closureN_type c_7314165;
++object e_7314190 [4];
++c_7314165.hdr.mark = gc_color_red;
++ c_7314165.hdr.grayed = 0;
++c_7314165.tag = closureN_tag;
++ c_7314165.fn = (function_type)__lambda_126;
++c_7314165.num_args = 1;
++c_7314165.num_elements = 4;
++c_7314165.elements = (object *)e_7314190;
++c_7314165.elements[0] = ((closureN)self_7311908)->elements[0];
++c_7314165.elements[1] = ((closureN)self_7311908)->elements[2];
++c_7314165.elements[2] = ((closureN)self_7311908)->elements[3];
++c_7314165.elements[3] = ((closureN)self_7311908)->elements[4];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315465,__lambda_126, Cyc_cddr(data, ((closureN)self_7313161)->elements[2]));
++return_direct_with_clo1(data,(closure)&c_7314165,__lambda_126, Cyc_cddr(data, ((closureN)self_7311908)->elements[2]));
+ } else {
+
+-closureN_type c_7315495;
+-object e_7315512 [3];
+-c_7315495.hdr.mark = gc_color_red;
+- c_7315495.hdr.grayed = 0;
+-c_7315495.tag = closureN_tag;
+- c_7315495.fn = (function_type)__lambda_128;
+-c_7315495.num_args = 0;
+-c_7315495.num_elements = 3;
+-c_7315495.elements = (object *)e_7315512;
+-c_7315495.elements[0] = ((closureN)self_7313161)->elements[0];
+-c_7315495.elements[1] = ((closureN)self_7313161)->elements[1];
+-c_7315495.elements[2] = ((closureN)self_7313161)->elements[4];
++closureN_type c_7314195;
++object e_7314212 [3];
++c_7314195.hdr.mark = gc_color_red;
++ c_7314195.hdr.grayed = 0;
++c_7314195.tag = closureN_tag;
++ c_7314195.fn = (function_type)__lambda_128;
++c_7314195.num_args = 0;
++c_7314195.num_elements = 3;
++c_7314195.elements = (object *)e_7314212;
++c_7314195.elements[0] = ((closureN)self_7311908)->elements[0];
++c_7314195.elements[1] = ((closureN)self_7311908)->elements[1];
++c_7314195.elements[2] = ((closureN)self_7311908)->elements[4];
+
+
+-closureN_type c_7315513;
+-object e_7315628 [4];
+-c_7315513.hdr.mark = gc_color_red;
+- c_7315513.hdr.grayed = 0;
+-c_7315513.tag = closureN_tag;
+- c_7315513.fn = (function_type)__lambda_130;
+-c_7315513.num_args = 1;
+-c_7315513.num_elements = 4;
+-c_7315513.elements = (object *)e_7315628;
+-c_7315513.elements[0] = ((closureN)self_7313161)->elements[0];
+-c_7315513.elements[1] = ((closureN)self_7313161)->elements[2];
+-c_7315513.elements[2] = ((closureN)self_7313161)->elements[3];
+-c_7315513.elements[3] = ((closureN)self_7313161)->elements[4];
++closureN_type c_7314213;
++object e_7314328 [4];
++c_7314213.hdr.mark = gc_color_red;
++ c_7314213.hdr.grayed = 0;
++c_7314213.tag = closureN_tag;
++ c_7314213.fn = (function_type)__lambda_130;
++c_7314213.num_args = 1;
++c_7314213.num_elements = 4;
++c_7314213.elements = (object *)e_7314328;
++c_7314213.elements[0] = ((closureN)self_7311908)->elements[0];
++c_7314213.elements[1] = ((closureN)self_7311908)->elements[2];
++c_7314213.elements[2] = ((closureN)self_7311908)->elements[3];
++c_7314213.elements[3] = ((closureN)self_7311908)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7315495,__lambda_128, &c_7315513);}
++return_direct_with_clo1(data,(closure)&c_7314195,__lambda_128, &c_7314213);}
+ ;;
+ }
+
+-static void __lambda_130(void *data, object self_7313164, int argc, object *args) /* object self_7313164, object r_734453 */
++static void __lambda_130(void *data, object self_7311911, int argc, object *args) /* object self_7311911, object r_734001 */
+ {
+- object r_734453 = args[0];
+- if( (boolean_f != r_734453) ){
++ object r_734001 = args[0];
++ if( (boolean_f != r_734001) ){
+
+-closureN_type c_7315516;
+-object e_7315587 [4];
+-c_7315516.hdr.mark = gc_color_red;
+- c_7315516.hdr.grayed = 0;
+-c_7315516.tag = closureN_tag;
+- c_7315516.fn = (function_type)__lambda_131;
+-c_7315516.num_args = 1;
+-c_7315516.num_elements = 4;
+-c_7315516.elements = (object *)e_7315587;
+-c_7315516.elements[0] = ((closureN)self_7313164)->elements[0];
+-c_7315516.elements[1] = ((closureN)self_7313164)->elements[1];
+-c_7315516.elements[2] = ((closureN)self_7313164)->elements[2];
+-c_7315516.elements[3] = ((closureN)self_7313164)->elements[3];
++closureN_type c_7314216;
++object e_7314287 [4];
++c_7314216.hdr.mark = gc_color_red;
++ c_7314216.hdr.grayed = 0;
++c_7314216.tag = closureN_tag;
++ c_7314216.fn = (function_type)__lambda_131;
++c_7314216.num_args = 1;
++c_7314216.num_elements = 4;
++c_7314216.elements = (object *)e_7314287;
++c_7314216.elements[0] = ((closureN)self_7311911)->elements[0];
++c_7314216.elements[1] = ((closureN)self_7311911)->elements[1];
++c_7314216.elements[2] = ((closureN)self_7311911)->elements[2];
++c_7314216.elements[3] = ((closureN)self_7311911)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313164)->elements[3], &c_7315516, quote_lambda);
++return_closcall2(data, ((closureN)self_7311911)->elements[3], &c_7314216, quote_lambda);
+ } else {
+
+-closureN_type c_7315590;
+-object e_7315627 [4];
+-c_7315590.hdr.mark = gc_color_red;
+- c_7315590.hdr.grayed = 0;
+-c_7315590.tag = closureN_tag;
+- c_7315590.fn = (function_type)__lambda_139;
+-c_7315590.num_args = 1;
+-c_7315590.num_elements = 4;
+-c_7315590.elements = (object *)e_7315627;
+-c_7315590.elements[0] = ((closureN)self_7313164)->elements[0];
+-c_7315590.elements[1] = ((closureN)self_7313164)->elements[1];
+-c_7315590.elements[2] = ((closureN)self_7313164)->elements[2];
+-c_7315590.elements[3] = ((closureN)self_7313164)->elements[3];
++closureN_type c_7314290;
++object e_7314327 [4];
++c_7314290.hdr.mark = gc_color_red;
++ c_7314290.hdr.grayed = 0;
++c_7314290.tag = closureN_tag;
++ c_7314290.fn = (function_type)__lambda_139;
++c_7314290.num_args = 1;
++c_7314290.num_elements = 4;
++c_7314290.elements = (object *)e_7314327;
++c_7314290.elements[0] = ((closureN)self_7311911)->elements[0];
++c_7314290.elements[1] = ((closureN)self_7311911)->elements[1];
++c_7314290.elements[2] = ((closureN)self_7311911)->elements[2];
++c_7314290.elements[3] = ((closureN)self_7311911)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313164)->elements[3], &c_7315590, quote__if);}
++return_closcall2(data, ((closureN)self_7311911)->elements[3], &c_7314290, quote__if);}
+ ;;
+ }
+
+-static void __lambda_139(void *data, object self_7313173, int argc, object *args) /* object self_7313173, object r_734479 */
++static void __lambda_139(void *data, object self_7311920, int argc, object *args) /* object self_7311920, object r_734027 */
+ {
+- object r_734479 = args[0];
++ object r_734027 = args[0];
+
+-closureN_type c_7315593;
+-object e_7315626 [5];
+-c_7315593.hdr.mark = gc_color_red;
+- c_7315593.hdr.grayed = 0;
+-c_7315593.tag = closureN_tag;
+- c_7315593.fn = (function_type)__lambda_140;
+-c_7315593.num_args = 1;
+-c_7315593.num_elements = 5;
+-c_7315593.elements = (object *)e_7315626;
+-c_7315593.elements[0] = ((closureN)self_7313173)->elements[0];
+-c_7315593.elements[1] = ((closureN)self_7313173)->elements[1];
+-c_7315593.elements[2] = ((closureN)self_7313173)->elements[2];
+-c_7315593.elements[3] = r_734479;
+-c_7315593.elements[4] = ((closureN)self_7313173)->elements[3];
++closureN_type c_7314293;
++object e_7314326 [5];
++c_7314293.hdr.mark = gc_color_red;
++ c_7314293.hdr.grayed = 0;
++c_7314293.tag = closureN_tag;
++ c_7314293.fn = (function_type)__lambda_140;
++c_7314293.num_args = 1;
++c_7314293.num_elements = 5;
++c_7314293.elements = (object *)e_7314326;
++c_7314293.elements[0] = ((closureN)self_7311920)->elements[0];
++c_7314293.elements[1] = ((closureN)self_7311920)->elements[1];
++c_7314293.elements[2] = ((closureN)self_7311920)->elements[2];
++c_7314293.elements[3] = r_734027;
++c_7314293.elements[4] = ((closureN)self_7311920)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313173)->elements[3], &c_7315593, quote_lambda);;
++return_closcall2(data, ((closureN)self_7311920)->elements[3], &c_7314293, quote_lambda);;
+ }
+
+-static void __lambda_140(void *data, object self_7313174, int argc, object *args) /* object self_7313174, object r_734487 */
++static void __lambda_140(void *data, object self_7311921, int argc, object *args) /* object self_7311921, object r_734035 */
+ {
+- object r_734487 = args[0];
++ object r_734035 = args[0];
+
+-closureN_type c_7315596;
+-object e_7315625 [5];
+-c_7315596.hdr.mark = gc_color_red;
+- c_7315596.hdr.grayed = 0;
+-c_7315596.tag = closureN_tag;
+- c_7315596.fn = (function_type)__lambda_141;
+-c_7315596.num_args = 1;
+-c_7315596.num_elements = 5;
+-c_7315596.elements = (object *)e_7315625;
+-c_7315596.elements[0] = ((closureN)self_7313174)->elements[0];
+-c_7315596.elements[1] = ((closureN)self_7313174)->elements[1];
+-c_7315596.elements[2] = ((closureN)self_7313174)->elements[2];
+-c_7315596.elements[3] = ((closureN)self_7313174)->elements[3];
+-c_7315596.elements[4] = r_734487;
++closureN_type c_7314296;
++object e_7314325 [5];
++c_7314296.hdr.mark = gc_color_red;
++ c_7314296.hdr.grayed = 0;
++c_7314296.tag = closureN_tag;
++ c_7314296.fn = (function_type)__lambda_141;
++c_7314296.num_args = 1;
++c_7314296.num_elements = 5;
++c_7314296.elements = (object *)e_7314325;
++c_7314296.elements[0] = ((closureN)self_7311921)->elements[0];
++c_7314296.elements[1] = ((closureN)self_7311921)->elements[1];
++c_7314296.elements[2] = ((closureN)self_7311921)->elements[2];
++c_7314296.elements[3] = ((closureN)self_7311921)->elements[3];
++c_7314296.elements[4] = r_734035;
+
+-return_closcall2(data, ((closureN)self_7313174)->elements[4], &c_7315596, quote_cond);;
++return_closcall2(data, ((closureN)self_7311921)->elements[4], &c_7314296, quote_cond);;
+ }
+
+-static void __lambda_141(void *data, object self_7313175, int argc, object *args) /* object self_7313175, object r_734483 */
++static void __lambda_141(void *data, object self_7311922, int argc, object *args) /* object self_7311922, object r_734031 */
+ {
+- object r_734483 = args[0];
++ object r_734031 = args[0];
+
+-list_4_type local_7315601;
++list_4_type local_7314301;
+
+
+
+-pair_type local_7315608;
++pair_type local_7314308;
+
+-pair_type local_7315611;
++pair_type local_7314311;
+
+-pair_type local_7315615;
++pair_type local_7314315;
+
+
+
+-pair_type local_7315621;
++pair_type local_7314321;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313175)->elements[2], (((closure) ((closureN)self_7313175)->elements[2])->fn), Cyc_fast_list_4(&local_7315601, ((closureN)self_7313175)->elements[3], Cyc_car(data, ((closureN)self_7313175)->elements[0]), set_cell_as_expr(&local_7315608, set_pair_as_expr(&local_7315611, ((closureN)self_7313175)->elements[4], set_pair_as_expr(&local_7315615, NULL, Cyc_cdr(data, ((closureN)self_7313175)->elements[0])))), set_pair_as_expr(&local_7315621, r_734483, Cyc_cddr(data, ((closureN)self_7313175)->elements[1]))));;
++return_direct_with_clo1(data, ((closureN)self_7311922)->elements[2], (((closure) ((closureN)self_7311922)->elements[2])->fn), Cyc_fast_list_4(&local_7314301, ((closureN)self_7311922)->elements[3], Cyc_car(data, ((closureN)self_7311922)->elements[0]), set_cell_as_expr(&local_7314308, set_pair_as_expr(&local_7314311, ((closureN)self_7311922)->elements[4], set_pair_as_expr(&local_7314315, NULL, Cyc_cdr(data, ((closureN)self_7311922)->elements[0])))), set_pair_as_expr(&local_7314321, r_734031, Cyc_cddr(data, ((closureN)self_7311922)->elements[1]))));;
+ }
+
+-static void __lambda_131(void *data, object self_7313165, int argc, object *args) /* object self_7313165, object r_734456 */
++static void __lambda_131(void *data, object self_7311912, int argc, object *args) /* object self_7311912, object r_734004 */
+ {
+- object r_734456 = args[0];
++ object r_734004 = args[0];
+
+-closureN_type c_7315519;
+-object e_7315586 [5];
+-c_7315519.hdr.mark = gc_color_red;
+- c_7315519.hdr.grayed = 0;
+-c_7315519.tag = closureN_tag;
+- c_7315519.fn = (function_type)__lambda_132;
+-c_7315519.num_args = 1;
+-c_7315519.num_elements = 5;
+-c_7315519.elements = (object *)e_7315586;
+-c_7315519.elements[0] = ((closureN)self_7313165)->elements[0];
+-c_7315519.elements[1] = ((closureN)self_7313165)->elements[1];
+-c_7315519.elements[2] = ((closureN)self_7313165)->elements[2];
+-c_7315519.elements[3] = r_734456;
+-c_7315519.elements[4] = ((closureN)self_7313165)->elements[3];
++closureN_type c_7314219;
++object e_7314286 [5];
++c_7314219.hdr.mark = gc_color_red;
++ c_7314219.hdr.grayed = 0;
++c_7314219.tag = closureN_tag;
++ c_7314219.fn = (function_type)__lambda_132;
++c_7314219.num_args = 1;
++c_7314219.num_elements = 5;
++c_7314219.elements = (object *)e_7314286;
++c_7314219.elements[0] = ((closureN)self_7311912)->elements[0];
++c_7314219.elements[1] = ((closureN)self_7311912)->elements[1];
++c_7314219.elements[2] = ((closureN)self_7311912)->elements[2];
++c_7314219.elements[3] = r_734004;
++c_7314219.elements[4] = ((closureN)self_7311912)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313165)->elements[3], &c_7315519, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311912)->elements[3], &c_7314219, quote_tmp);;
+ }
+
+-static void __lambda_132(void *data, object self_7313166, int argc, object *args) /* object self_7313166, object r_734476 */
++static void __lambda_132(void *data, object self_7311913, int argc, object *args) /* object self_7311913, object r_734024 */
+ {
+- object r_734476 = args[0];
++ object r_734024 = args[0];
+
+-closureN_type c_7315522;
+-object e_7315585 [6];
+-c_7315522.hdr.mark = gc_color_red;
+- c_7315522.hdr.grayed = 0;
+-c_7315522.tag = closureN_tag;
+- c_7315522.fn = (function_type)__lambda_133;
+-c_7315522.num_args = 1;
+-c_7315522.num_elements = 6;
+-c_7315522.elements = (object *)e_7315585;
+-c_7315522.elements[0] = ((closureN)self_7313166)->elements[0];
+-c_7315522.elements[1] = ((closureN)self_7313166)->elements[1];
+-c_7315522.elements[2] = ((closureN)self_7313166)->elements[2];
+-c_7315522.elements[3] = ((closureN)self_7313166)->elements[3];
+-c_7315522.elements[4] = r_734476;
+-c_7315522.elements[5] = ((closureN)self_7313166)->elements[4];
++closureN_type c_7314222;
++object e_7314285 [6];
++c_7314222.hdr.mark = gc_color_red;
++ c_7314222.hdr.grayed = 0;
++c_7314222.tag = closureN_tag;
++ c_7314222.fn = (function_type)__lambda_133;
++c_7314222.num_args = 1;
++c_7314222.num_elements = 6;
++c_7314222.elements = (object *)e_7314285;
++c_7314222.elements[0] = ((closureN)self_7311913)->elements[0];
++c_7314222.elements[1] = ((closureN)self_7311913)->elements[1];
++c_7314222.elements[2] = ((closureN)self_7311913)->elements[2];
++c_7314222.elements[3] = ((closureN)self_7311913)->elements[3];
++c_7314222.elements[4] = r_734024;
++c_7314222.elements[5] = ((closureN)self_7311913)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313166)->elements[4], &c_7315522, quote__if);;
++return_closcall2(data, ((closureN)self_7311913)->elements[4], &c_7314222, quote__if);;
+ }
+
+-static void __lambda_133(void *data, object self_7313167, int argc, object *args) /* object self_7313167, object r_734459 */
++static void __lambda_133(void *data, object self_7311914, int argc, object *args) /* object self_7311914, object r_734007 */
+ {
+- object r_734459 = args[0];
++ object r_734007 = args[0];
+
+-closureN_type c_7315525;
+-object e_7315584 [7];
+-c_7315525.hdr.mark = gc_color_red;
+- c_7315525.hdr.grayed = 0;
+-c_7315525.tag = closureN_tag;
+- c_7315525.fn = (function_type)__lambda_134;
+-c_7315525.num_args = 1;
+-c_7315525.num_elements = 7;
+-c_7315525.elements = (object *)e_7315584;
+-c_7315525.elements[0] = ((closureN)self_7313167)->elements[0];
+-c_7315525.elements[1] = ((closureN)self_7313167)->elements[1];
+-c_7315525.elements[2] = ((closureN)self_7313167)->elements[2];
+-c_7315525.elements[3] = ((closureN)self_7313167)->elements[3];
+-c_7315525.elements[4] = r_734459;
+-c_7315525.elements[5] = ((closureN)self_7313167)->elements[4];
+-c_7315525.elements[6] = ((closureN)self_7313167)->elements[5];
++closureN_type c_7314225;
++object e_7314284 [7];
++c_7314225.hdr.mark = gc_color_red;
++ c_7314225.hdr.grayed = 0;
++c_7314225.tag = closureN_tag;
++ c_7314225.fn = (function_type)__lambda_134;
++c_7314225.num_args = 1;
++c_7314225.num_elements = 7;
++c_7314225.elements = (object *)e_7314284;
++c_7314225.elements[0] = ((closureN)self_7311914)->elements[0];
++c_7314225.elements[1] = ((closureN)self_7311914)->elements[1];
++c_7314225.elements[2] = ((closureN)self_7311914)->elements[2];
++c_7314225.elements[3] = ((closureN)self_7311914)->elements[3];
++c_7314225.elements[4] = r_734007;
++c_7314225.elements[5] = ((closureN)self_7311914)->elements[4];
++c_7314225.elements[6] = ((closureN)self_7311914)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313167)->elements[5], &c_7315525, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311914)->elements[5], &c_7314225, quote_tmp);;
+ }
+
+-static void __lambda_134(void *data, object self_7313168, int argc, object *args) /* object self_7313168, object r_734460 */
++static void __lambda_134(void *data, object self_7311915, int argc, object *args) /* object self_7311915, object r_734008 */
+ {
+- object r_734460 = args[0];
++ object r_734008 = args[0];
+
+-closureN_type c_7315527;
+-object e_7315549 [2];
+-c_7315527.hdr.mark = gc_color_red;
+- c_7315527.hdr.grayed = 0;
+-c_7315527.tag = closureN_tag;
+- c_7315527.fn = (function_type)__lambda_135;
+-c_7315527.num_args = 0;
+-c_7315527.num_elements = 2;
+-c_7315527.elements = (object *)e_7315549;
+-c_7315527.elements[0] = ((closureN)self_7313168)->elements[0];
+-c_7315527.elements[1] = ((closureN)self_7313168)->elements[6];
++closureN_type c_7314227;
++object e_7314249 [2];
++c_7314227.hdr.mark = gc_color_red;
++ c_7314227.hdr.grayed = 0;
++c_7314227.tag = closureN_tag;
++ c_7314227.fn = (function_type)__lambda_135;
++c_7314227.num_args = 0;
++c_7314227.num_elements = 2;
++c_7314227.elements = (object *)e_7314249;
++c_7314227.elements[0] = ((closureN)self_7311915)->elements[0];
++c_7314227.elements[1] = ((closureN)self_7311915)->elements[6];
+
+
+-closureN_type c_7315550;
+-object e_7315583 [8];
+-c_7315550.hdr.mark = gc_color_red;
+- c_7315550.hdr.grayed = 0;
+-c_7315550.tag = closureN_tag;
+- c_7315550.fn = (function_type)__lambda_137;
+-c_7315550.num_args = 1;
+-c_7315550.num_elements = 8;
+-c_7315550.elements = (object *)e_7315583;
+-c_7315550.elements[0] = ((closureN)self_7313168)->elements[0];
+-c_7315550.elements[1] = ((closureN)self_7313168)->elements[1];
+-c_7315550.elements[2] = ((closureN)self_7313168)->elements[2];
+-c_7315550.elements[3] = ((closureN)self_7313168)->elements[3];
+-c_7315550.elements[4] = ((closureN)self_7313168)->elements[4];
+-c_7315550.elements[5] = r_734460;
+-c_7315550.elements[6] = ((closureN)self_7313168)->elements[5];
+-c_7315550.elements[7] = ((closureN)self_7313168)->elements[6];
++closureN_type c_7314250;
++object e_7314283 [8];
++c_7314250.hdr.mark = gc_color_red;
++ c_7314250.hdr.grayed = 0;
++c_7314250.tag = closureN_tag;
++ c_7314250.fn = (function_type)__lambda_137;
++c_7314250.num_args = 1;
++c_7314250.num_elements = 8;
++c_7314250.elements = (object *)e_7314283;
++c_7314250.elements[0] = ((closureN)self_7311915)->elements[0];
++c_7314250.elements[1] = ((closureN)self_7311915)->elements[1];
++c_7314250.elements[2] = ((closureN)self_7311915)->elements[2];
++c_7314250.elements[3] = ((closureN)self_7311915)->elements[3];
++c_7314250.elements[4] = ((closureN)self_7311915)->elements[4];
++c_7314250.elements[5] = r_734008;
++c_7314250.elements[6] = ((closureN)self_7311915)->elements[5];
++c_7314250.elements[7] = ((closureN)self_7311915)->elements[6];
+
+-return_direct_with_clo1(data,(closure)&c_7315527,__lambda_135, &c_7315550);;
++return_direct_with_clo1(data,(closure)&c_7314227,__lambda_135, &c_7314250);;
+ }
+
+-static void __lambda_137(void *data, object self_7313169, int argc, object *args) /* object self_7313169, object r_734461 */
++static void __lambda_137(void *data, object self_7311916, int argc, object *args) /* object self_7311916, object r_734009 */
+ {
+- object r_734461 = args[0];
++ object r_734009 = args[0];
+
+-closureN_type c_7315553;
+-object e_7315582 [8];
+-c_7315553.hdr.mark = gc_color_red;
+- c_7315553.hdr.grayed = 0;
+-c_7315553.tag = closureN_tag;
+- c_7315553.fn = (function_type)__lambda_138;
+-c_7315553.num_args = 1;
+-c_7315553.num_elements = 8;
+-c_7315553.elements = (object *)e_7315582;
+-c_7315553.elements[0] = ((closureN)self_7313169)->elements[0];
+-c_7315553.elements[1] = ((closureN)self_7313169)->elements[1];
+-c_7315553.elements[2] = ((closureN)self_7313169)->elements[2];
+-c_7315553.elements[3] = ((closureN)self_7313169)->elements[3];
+-c_7315553.elements[4] = ((closureN)self_7313169)->elements[4];
+-c_7315553.elements[5] = ((closureN)self_7313169)->elements[5];
+-c_7315553.elements[6] = r_734461;
+-c_7315553.elements[7] = ((closureN)self_7313169)->elements[6];
++closureN_type c_7314253;
++object e_7314282 [8];
++c_7314253.hdr.mark = gc_color_red;
++ c_7314253.hdr.grayed = 0;
++c_7314253.tag = closureN_tag;
++ c_7314253.fn = (function_type)__lambda_138;
++c_7314253.num_args = 1;
++c_7314253.num_elements = 8;
++c_7314253.elements = (object *)e_7314282;
++c_7314253.elements[0] = ((closureN)self_7311916)->elements[0];
++c_7314253.elements[1] = ((closureN)self_7311916)->elements[1];
++c_7314253.elements[2] = ((closureN)self_7311916)->elements[2];
++c_7314253.elements[3] = ((closureN)self_7311916)->elements[3];
++c_7314253.elements[4] = ((closureN)self_7311916)->elements[4];
++c_7314253.elements[5] = ((closureN)self_7311916)->elements[5];
++c_7314253.elements[6] = r_734009;
++c_7314253.elements[7] = ((closureN)self_7311916)->elements[6];
+
+-return_closcall2(data, ((closureN)self_7313169)->elements[7], &c_7315553, quote_cond);;
++return_closcall2(data, ((closureN)self_7311916)->elements[7], &c_7314253, quote_cond);;
+ }
+
+-static void __lambda_138(void *data, object self_7313170, int argc, object *args) /* object self_7313170, object r_734463 */
++static void __lambda_138(void *data, object self_7311917, int argc, object *args) /* object self_7311917, object r_734011 */
+ {
+- object r_734463 = args[0];
++ object r_734011 = args[0];
+
+-list_2_type local_7315558;
++list_2_type local_7314258;
+
+-list_3_type local_7315561;
++list_3_type local_7314261;
+
+-pair_type local_7315565;
++pair_type local_7314265;
+
+-list_4_type local_7315569;
++list_4_type local_7314269;
+
+-pair_type local_7315575;
++pair_type local_7314275;
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313170)->elements[2], (((closure) ((closureN)self_7313170)->elements[2])->fn), Cyc_fast_list_2(&local_7315558, Cyc_fast_list_3(&local_7315561, ((closureN)self_7313170)->elements[3], set_cell_as_expr(&local_7315565, ((closureN)self_7313170)->elements[7]), Cyc_fast_list_4(&local_7315569, ((closureN)self_7313170)->elements[4], ((closureN)self_7313170)->elements[5], ((closureN)self_7313170)->elements[6], set_pair_as_expr(&local_7315575, r_734463, Cyc_cddr(data, ((closureN)self_7313170)->elements[1])))), Cyc_car(data, ((closureN)self_7313170)->elements[0])));;
++return_direct_with_clo1(data, ((closureN)self_7311917)->elements[2], (((closure) ((closureN)self_7311917)->elements[2])->fn), Cyc_fast_list_2(&local_7314258, Cyc_fast_list_3(&local_7314261, ((closureN)self_7311917)->elements[3], set_cell_as_expr(&local_7314265, ((closureN)self_7311917)->elements[7]), Cyc_fast_list_4(&local_7314269, ((closureN)self_7311917)->elements[4], ((closureN)self_7311917)->elements[5], ((closureN)self_7311917)->elements[6], set_pair_as_expr(&local_7314275, r_734011, Cyc_cddr(data, ((closureN)self_7311917)->elements[1])))), Cyc_car(data, ((closureN)self_7311917)->elements[0])));;
+ }
+
+-static void __lambda_135(void *data, object self_7313171, int argc, object *args) /* object self_7313171, object k_734466 */
++static void __lambda_135(void *data, object self_7311918, int argc, object *args) /* object self_7311918, object k_734014 */
+ {
+- object k_734466 = args[0];
++ object k_734014 = args[0];
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313171)->elements[0]))) ){
+- return_closcall2(data, ((closureN)self_7313171)->elements[1], k_734466, quote_tmp);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311918)->elements[0]))) ){
++ return_closcall2(data, ((closureN)self_7311918)->elements[1], k_734014, quote_tmp);
+ } else {
+
+-closureN_type c_7315537;
+-object e_7315548 [2];
+-c_7315537.hdr.mark = gc_color_red;
+- c_7315537.hdr.grayed = 0;
+-c_7315537.tag = closureN_tag;
+- c_7315537.fn = (function_type)__lambda_136;
+-c_7315537.num_args = 1;
+-c_7315537.num_elements = 2;
+-c_7315537.elements = (object *)e_7315548;
+-c_7315537.elements[0] = ((closureN)self_7313171)->elements[0];
+-c_7315537.elements[1] = k_734466;
++closureN_type c_7314237;
++object e_7314248 [2];
++c_7314237.hdr.mark = gc_color_red;
++ c_7314237.hdr.grayed = 0;
++c_7314237.tag = closureN_tag;
++ c_7314237.fn = (function_type)__lambda_136;
++c_7314237.num_args = 1;
++c_7314237.num_elements = 2;
++c_7314237.elements = (object *)e_7314248;
++c_7314237.elements[0] = ((closureN)self_7311918)->elements[0];
++c_7314237.elements[1] = k_734014;
+
+-return_closcall2(data, ((closureN)self_7313171)->elements[1], &c_7315537, quote_tmp);}
++return_closcall2(data, ((closureN)self_7311918)->elements[1], &c_7314237, quote_tmp);}
+ ;;
+ }
+
+-static void __lambda_136(void *data, object self_7313172, int argc, object *args) /* object self_7313172, object r_734470 */
++static void __lambda_136(void *data, object self_7311919, int argc, object *args) /* object self_7311919, object r_734018 */
+ {
+- object r_734470 = args[0];
++ object r_734018 = args[0];
+
+-list_2_type local_7315542;
++list_2_type local_7314242;
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313172)->elements[1], (((closure) ((closureN)self_7313172)->elements[1])->fn), Cyc_fast_list_2(&local_7315542, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313172)->elements[0])), r_734470));;
++return_direct_with_clo1(data, ((closureN)self_7311919)->elements[1], (((closure) ((closureN)self_7311919)->elements[1])->fn), Cyc_fast_list_2(&local_7314242, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311919)->elements[0])), r_734018));;
+ }
+
+-static void __lambda_128(void *data, object self_7313176, int argc, object *args) /* object self_7313176, object k_734493 */
++static void __lambda_128(void *data, object self_7311923, int argc, object *args) /* object self_7311923, object k_734041 */
+ {
+- object k_734493 = args[0];
++ object k_734041 = args[0];
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313176)->elements[0]))) ){
+- return_direct_with_clo1(data, k_734493, (((closure) k_734493)->fn), boolean_t);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311923)->elements[0]))) ){
++ return_direct_with_clo1(data, k_734041, (((closure) k_734041)->fn), boolean_t);
+ } else {
+
+-closureN_type c_7315504;
+-object e_7315511 [3];
+-c_7315504.hdr.mark = gc_color_red;
+- c_7315504.hdr.grayed = 0;
+-c_7315504.tag = closureN_tag;
+- c_7315504.fn = (function_type)__lambda_129;
+-c_7315504.num_args = 1;
+-c_7315504.num_elements = 3;
+-c_7315504.elements = (object *)e_7315511;
+-c_7315504.elements[0] = ((closureN)self_7313176)->elements[0];
+-c_7315504.elements[1] = ((closureN)self_7313176)->elements[1];
+-c_7315504.elements[2] = k_734493;
++closureN_type c_7314204;
++object e_7314211 [3];
++c_7314204.hdr.mark = gc_color_red;
++ c_7314204.hdr.grayed = 0;
++c_7314204.tag = closureN_tag;
++ c_7314204.fn = (function_type)__lambda_129;
++c_7314204.num_args = 1;
++c_7314204.num_elements = 3;
++c_7314204.elements = (object *)e_7314211;
++c_7314204.elements[0] = ((closureN)self_7311923)->elements[0];
++c_7314204.elements[1] = ((closureN)self_7311923)->elements[1];
++c_7314204.elements[2] = k_734041;
+
+-return_closcall2(data, ((closureN)self_7313176)->elements[2], &c_7315504, quote__123_125);}
++return_closcall2(data, ((closureN)self_7311923)->elements[2], &c_7314204, quote__123_125);}
+ ;;
+ }
+
+-static void __lambda_129(void *data, object self_7313177, int argc, object *args) /* object self_7313177, object r_734495 */
++static void __lambda_129(void *data, object self_7311924, int argc, object *args) /* object self_7311924, object r_734043 */
+ {
+- object r_734495 = args[0];
++ object r_734043 = args[0];
+
+
+-return_closcall3(data, ((closureN)self_7313177)->elements[1], ((closureN)self_7313177)->elements[2], r_734495, Cyc_cadr(data, ((closureN)self_7313177)->elements[0]));;
++return_closcall3(data, ((closureN)self_7311924)->elements[1], ((closureN)self_7311924)->elements[2], r_734043, Cyc_cadr(data, ((closureN)self_7311924)->elements[0]));;
+ }
+
+-static void __lambda_126(void *data, object self_7313162, int argc, object *args) /* object self_7313162, object r_734452 */
++static void __lambda_126(void *data, object self_7311909, int argc, object *args) /* object self_7311909, object r_734000 */
+ {
+- object r_734452 = args[0];
++ object r_734000 = args[0];
+
+-if( (boolean_f != Cyc_is_pair(r_734452)) ){
++if( (boolean_f != Cyc_is_pair(r_734000)) ){
+
+-make_utf8_string_with_len(c_7315470, "non-final else in cond", 22, 22);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313162)->elements[2], &c_7315470, ((closureN)self_7313162)->elements[1]);
++make_utf8_string_with_len(c_7314170, "non-final else in cond", 22, 22);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311909)->elements[2], &c_7314170, ((closureN)self_7311909)->elements[1]);
+ } else {
+
+-closureN_type c_7315474;
+-object e_7315489 [2];
+-c_7315474.hdr.mark = gc_color_red;
+- c_7315474.hdr.grayed = 0;
+-c_7315474.tag = closureN_tag;
+- c_7315474.fn = (function_type)__lambda_127;
+-c_7315474.num_args = 1;
+-c_7315474.num_elements = 2;
+-c_7315474.elements = (object *)e_7315489;
+-c_7315474.elements[0] = ((closureN)self_7313162)->elements[0];
+-c_7315474.elements[1] = ((closureN)self_7313162)->elements[2];
++closureN_type c_7314174;
++object e_7314189 [2];
++c_7314174.hdr.mark = gc_color_red;
++ c_7314174.hdr.grayed = 0;
++c_7314174.tag = closureN_tag;
++ c_7314174.fn = (function_type)__lambda_127;
++c_7314174.num_args = 1;
++c_7314174.num_elements = 2;
++c_7314174.elements = (object *)e_7314189;
++c_7314174.elements[0] = ((closureN)self_7311909)->elements[0];
++c_7314174.elements[1] = ((closureN)self_7311909)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313162)->elements[3], &c_7315474, quote_lambda);}
++return_closcall2(data, ((closureN)self_7311909)->elements[3], &c_7314174, quote_lambda);}
+ ;;
+ }
+
+-static void __lambda_127(void *data, object self_7313163, int argc, object *args) /* object self_7313163, object r_734447 */
++static void __lambda_127(void *data, object self_7311910, int argc, object *args) /* object self_7311910, object r_733995 */
+ {
+- object r_734447 = args[0];
++ object r_733995 = args[0];
+
+-pair_type local_7315479;
++pair_type local_7314179;
+
+-pair_type local_7315482;
++pair_type local_7314182;
+
+-pair_type local_7315485;
++pair_type local_7314185;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313163)->elements[1], (((closure) ((closureN)self_7313163)->elements[1])->fn), set_cell_as_expr(&local_7315479, set_pair_as_expr(&local_7315482, r_734447, set_pair_as_expr(&local_7315485, NULL, Cyc_cdr(data, ((closureN)self_7313163)->elements[0])))));;
++return_direct_with_clo1(data, ((closureN)self_7311910)->elements[1], (((closure) ((closureN)self_7311910)->elements[1])->fn), set_cell_as_expr(&local_7314179, set_pair_as_expr(&local_7314182, r_733995, set_pair_as_expr(&local_7314185, NULL, Cyc_cdr(data, ((closureN)self_7311910)->elements[0])))));;
+ }
+
+-static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_734342, object expr_7388_732916, object rename_7389_732917, object compare_7390_732918 */
++static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_733890, object expr_7388_732569, object rename_7389_732570, object compare_7390_732571 */
+ {
+-object k_734342 = args[0]; object expr_7388_732916 = args[1]; object rename_7389_732917 = args[2];
++object k_733890 = args[0]; object expr_7388_732569 = args[1]; object rename_7389_732570 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:cond-expand");
+
+-closureN_type c_7315035;
+-object e_7315448 [3];
+-c_7315035.hdr.mark = gc_color_red;
+- c_7315035.hdr.grayed = 0;
+-c_7315035.tag = closureN_tag;
+- c_7315035.fn = (function_type)__lambda_85;
+-c_7315035.num_args = 4;
+-c_7315035.num_elements = 3;
+-c_7315035.elements = (object *)e_7315448;
+-c_7315035.elements[0] = expr_7388_732916;
+-c_7315035.elements[1] = k_734342;
+-c_7315035.elements[2] = rename_7389_732917;
++closureN_type c_7313735;
++object e_7314148 [3];
++c_7313735.hdr.mark = gc_color_red;
++ c_7313735.hdr.grayed = 0;
++c_7313735.tag = closureN_tag;
++ c_7313735.fn = (function_type)__lambda_85;
++c_7313735.num_args = 4;
++c_7313735.num_elements = 3;
++c_7313735.elements = (object *)e_7314148;
++c_7313735.elements[0] = expr_7388_732569;
++c_7313735.elements[1] = k_733890;
++c_7313735.elements[2] = rename_7389_732570;
+
+-return_direct_with_clo4(data,(closure)&c_7315035,__lambda_85, boolean_f, boolean_f, boolean_f, boolean_f);;
++return_direct_with_clo4(data,(closure)&c_7313735,__lambda_85, boolean_f, boolean_f, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_85(void *data, object self_7313117, int argc, object *args) /* object self_7313117, object _191lib_117import_91_125filename_732923, object _191lib_117import_91_125library_91name_732924, object _191library_91exists_127_732925, object check_732926 */
++static void __lambda_85(void *data, object self_7311864, int argc, object *args) /* object self_7311864, object _191lib_117import_91_125filename_732576, object _191lib_117import_91_125library_91name_732577, object _191library_91exists_127_732578, object check_732579 */
+ {
+- object _191lib_117import_91_125filename_732923 = args[0]; object _191lib_117import_91_125library_91name_732924 = args[1]; object _191library_91exists_127_732925 = args[2]; object check_732926 = args[3];
++ object _191lib_117import_91_125filename_732576 = args[0]; object _191lib_117import_91_125library_91name_732577 = args[1]; object _191library_91exists_127_732578 = args[2]; object check_732579 = args[3];
+
+-closureN_type c_7315037;
+-object e_7315444 [6];
+-c_7315037.hdr.mark = gc_color_red;
+- c_7315037.hdr.grayed = 0;
+-c_7315037.tag = closureN_tag;
+- c_7315037.fn = (function_type)__lambda_1352;
+-c_7315037.num_args = 1;
+-c_7315037.num_elements = 6;
+-c_7315037.elements = (object *)e_7315444;
+-c_7315037.elements[0] = _191lib_117import_91_125library_91name_732924;
+-c_7315037.elements[1] = _191library_91exists_127_732925;
+-c_7315037.elements[2] = check_732926;
+-c_7315037.elements[3] = ((closureN)self_7313117)->elements[0];
+-c_7315037.elements[4] = ((closureN)self_7313117)->elements[1];
+-c_7315037.elements[5] = ((closureN)self_7313117)->elements[2];
++closureN_type c_7313737;
++object e_7314144 [6];
++c_7313737.hdr.mark = gc_color_red;
++ c_7313737.hdr.grayed = 0;
++c_7313737.tag = closureN_tag;
++ c_7313737.fn = (function_type)__lambda_1305;
++c_7313737.num_args = 1;
++c_7313737.num_elements = 6;
++c_7313737.elements = (object *)e_7314144;
++c_7313737.elements[0] = _191lib_117import_91_125library_91name_732577;
++c_7313737.elements[1] = _191library_91exists_127_732578;
++c_7313737.elements[2] = check_732579;
++c_7313737.elements[3] = ((closureN)self_7311864)->elements[0];
++c_7313737.elements[4] = ((closureN)self_7311864)->elements[1];
++c_7313737.elements[5] = ((closureN)self_7311864)->elements[2];
+
+
+-pair_type local_7315447;
+-return_direct_with_clo1(data,(closure)&c_7315037,__lambda_1352, set_cell_as_expr(&local_7315447, _191lib_117import_91_125filename_732923));;
++pair_type local_7314147;
++return_direct_with_clo1(data,(closure)&c_7313737,__lambda_1305, set_cell_as_expr(&local_7314147, _191lib_117import_91_125filename_732576));;
+ }
+
+-static void __lambda_1352(void *data, object self_7313118, int argc, object *args) /* object self_7313118, object _191lib_117import_91_125filename_732923 */
++static void __lambda_1305(void *data, object self_7311865, int argc, object *args) /* object self_7311865, object _191lib_117import_91_125filename_732576 */
+ {
+- object _191lib_117import_91_125filename_732923 = args[0];
++ object _191lib_117import_91_125filename_732576 = args[0];
+
+-closureN_type c_7315039;
+-object e_7315439 [6];
+-c_7315039.hdr.mark = gc_color_red;
+- c_7315039.hdr.grayed = 0;
+-c_7315039.tag = closureN_tag;
+- c_7315039.fn = (function_type)__lambda_1351;
+-c_7315039.num_args = 1;
+-c_7315039.num_elements = 6;
+-c_7315039.elements = (object *)e_7315439;
+-c_7315039.elements[0] = _191lib_117import_91_125filename_732923;
+-c_7315039.elements[1] = ((closureN)self_7313118)->elements[1];
+-c_7315039.elements[2] = ((closureN)self_7313118)->elements[2];
+-c_7315039.elements[3] = ((closureN)self_7313118)->elements[3];
+-c_7315039.elements[4] = ((closureN)self_7313118)->elements[4];
+-c_7315039.elements[5] = ((closureN)self_7313118)->elements[5];
++closureN_type c_7313739;
++object e_7314139 [6];
++c_7313739.hdr.mark = gc_color_red;
++ c_7313739.hdr.grayed = 0;
++c_7313739.tag = closureN_tag;
++ c_7313739.fn = (function_type)__lambda_1304;
++c_7313739.num_args = 1;
++c_7313739.num_elements = 6;
++c_7313739.elements = (object *)e_7314139;
++c_7313739.elements[0] = _191lib_117import_91_125filename_732576;
++c_7313739.elements[1] = ((closureN)self_7311865)->elements[1];
++c_7313739.elements[2] = ((closureN)self_7311865)->elements[2];
++c_7313739.elements[3] = ((closureN)self_7311865)->elements[3];
++c_7313739.elements[4] = ((closureN)self_7311865)->elements[4];
++c_7313739.elements[5] = ((closureN)self_7311865)->elements[5];
+
+
+-pair_type local_7315442;
+-return_direct_with_clo1(data,(closure)&c_7315039,__lambda_1351, set_cell_as_expr(&local_7315442, ((closureN)self_7313118)->elements[0]));;
++pair_type local_7314142;
++return_direct_with_clo1(data,(closure)&c_7313739,__lambda_1304, set_cell_as_expr(&local_7314142, ((closureN)self_7311865)->elements[0]));;
+ }
+
+-static void __lambda_1351(void *data, object self_7313119, int argc, object *args) /* object self_7313119, object _191lib_117import_91_125library_91name_732924 */
++static void __lambda_1304(void *data, object self_7311866, int argc, object *args) /* object self_7311866, object _191lib_117import_91_125library_91name_732577 */
+ {
+- object _191lib_117import_91_125library_91name_732924 = args[0];
++ object _191lib_117import_91_125library_91name_732577 = args[0];
+
+-closureN_type c_7315041;
+-object e_7315434 [6];
+-c_7315041.hdr.mark = gc_color_red;
+- c_7315041.hdr.grayed = 0;
+-c_7315041.tag = closureN_tag;
+- c_7315041.fn = (function_type)__lambda_1350;
+-c_7315041.num_args = 1;
+-c_7315041.num_elements = 6;
+-c_7315041.elements = (object *)e_7315434;
+-c_7315041.elements[0] = ((closureN)self_7313119)->elements[0];
+-c_7315041.elements[1] = _191lib_117import_91_125library_91name_732924;
+-c_7315041.elements[2] = ((closureN)self_7313119)->elements[2];
+-c_7315041.elements[3] = ((closureN)self_7313119)->elements[3];
+-c_7315041.elements[4] = ((closureN)self_7313119)->elements[4];
+-c_7315041.elements[5] = ((closureN)self_7313119)->elements[5];
++closureN_type c_7313741;
++object e_7314134 [6];
++c_7313741.hdr.mark = gc_color_red;
++ c_7313741.hdr.grayed = 0;
++c_7313741.tag = closureN_tag;
++ c_7313741.fn = (function_type)__lambda_1303;
++c_7313741.num_args = 1;
++c_7313741.num_elements = 6;
++c_7313741.elements = (object *)e_7314134;
++c_7313741.elements[0] = ((closureN)self_7311866)->elements[0];
++c_7313741.elements[1] = _191lib_117import_91_125library_91name_732577;
++c_7313741.elements[2] = ((closureN)self_7311866)->elements[2];
++c_7313741.elements[3] = ((closureN)self_7311866)->elements[3];
++c_7313741.elements[4] = ((closureN)self_7311866)->elements[4];
++c_7313741.elements[5] = ((closureN)self_7311866)->elements[5];
+
+
+-pair_type local_7315437;
+-return_direct_with_clo1(data,(closure)&c_7315041,__lambda_1350, set_cell_as_expr(&local_7315437, ((closureN)self_7313119)->elements[1]));;
++pair_type local_7314137;
++return_direct_with_clo1(data,(closure)&c_7313741,__lambda_1303, set_cell_as_expr(&local_7314137, ((closureN)self_7311866)->elements[1]));;
+ }
+
+-static void __lambda_1350(void *data, object self_7313120, int argc, object *args) /* object self_7313120, object _191library_91exists_127_732925 */
++static void __lambda_1303(void *data, object self_7311867, int argc, object *args) /* object self_7311867, object _191library_91exists_127_732578 */
+ {
+- object _191library_91exists_127_732925 = args[0];
++ object _191library_91exists_127_732578 = args[0];
+
+-closureN_type c_7315043;
+-object e_7315429 [6];
+-c_7315043.hdr.mark = gc_color_red;
+- c_7315043.hdr.grayed = 0;
+-c_7315043.tag = closureN_tag;
+- c_7315043.fn = (function_type)__lambda_1349;
+-c_7315043.num_args = 1;
+-c_7315043.num_elements = 6;
+-c_7315043.elements = (object *)e_7315429;
+-c_7315043.elements[0] = ((closureN)self_7313120)->elements[0];
+-c_7315043.elements[1] = ((closureN)self_7313120)->elements[1];
+-c_7315043.elements[2] = _191library_91exists_127_732925;
+-c_7315043.elements[3] = ((closureN)self_7313120)->elements[3];
+-c_7315043.elements[4] = ((closureN)self_7313120)->elements[4];
+-c_7315043.elements[5] = ((closureN)self_7313120)->elements[5];
++closureN_type c_7313743;
++object e_7314129 [6];
++c_7313743.hdr.mark = gc_color_red;
++ c_7313743.hdr.grayed = 0;
++c_7313743.tag = closureN_tag;
++ c_7313743.fn = (function_type)__lambda_1302;
++c_7313743.num_args = 1;
++c_7313743.num_elements = 6;
++c_7313743.elements = (object *)e_7314129;
++c_7313743.elements[0] = ((closureN)self_7311867)->elements[0];
++c_7313743.elements[1] = ((closureN)self_7311867)->elements[1];
++c_7313743.elements[2] = _191library_91exists_127_732578;
++c_7313743.elements[3] = ((closureN)self_7311867)->elements[3];
++c_7313743.elements[4] = ((closureN)self_7311867)->elements[4];
++c_7313743.elements[5] = ((closureN)self_7311867)->elements[5];
+
+
+-pair_type local_7315432;
+-return_direct_with_clo1(data,(closure)&c_7315043,__lambda_1349, set_cell_as_expr(&local_7315432, ((closureN)self_7313120)->elements[2]));;
++pair_type local_7314132;
++return_direct_with_clo1(data,(closure)&c_7313743,__lambda_1302, set_cell_as_expr(&local_7314132, ((closureN)self_7311867)->elements[2]));;
+ }
+
+-static void __lambda_1349(void *data, object self_7313121, int argc, object *args) /* object self_7313121, object check_732926 */
++static void __lambda_1302(void *data, object self_7311868, int argc, object *args) /* object self_7311868, object check_732579 */
+ {
+- object check_732926 = args[0];
++ object check_732579 = args[0];
+
+-closureN_type c_7315045;
+-object e_7315399 [7];
+-c_7315045.hdr.mark = gc_color_red;
+- c_7315045.hdr.grayed = 0;
+-c_7315045.tag = closureN_tag;
+- c_7315045.fn = (function_type)__lambda_86;
+-c_7315045.num_args = 1;
+-c_7315045.num_elements = 7;
+-c_7315045.elements = (object *)e_7315399;
+-c_7315045.elements[0] = ((closureN)self_7313121)->elements[0];
+-c_7315045.elements[1] = ((closureN)self_7313121)->elements[1];
+-c_7315045.elements[2] = ((closureN)self_7313121)->elements[2];
+-c_7315045.elements[3] = check_732926;
+-c_7315045.elements[4] = ((closureN)self_7313121)->elements[3];
+-c_7315045.elements[5] = ((closureN)self_7313121)->elements[4];
+-c_7315045.elements[6] = ((closureN)self_7313121)->elements[5];
++closureN_type c_7313745;
++object e_7314099 [7];
++c_7313745.hdr.mark = gc_color_red;
++ c_7313745.hdr.grayed = 0;
++c_7313745.tag = closureN_tag;
++ c_7313745.fn = (function_type)__lambda_86;
++c_7313745.num_args = 1;
++c_7313745.num_elements = 7;
++c_7313745.elements = (object *)e_7314099;
++c_7313745.elements[0] = ((closureN)self_7311868)->elements[0];
++c_7313745.elements[1] = ((closureN)self_7311868)->elements[1];
++c_7313745.elements[2] = ((closureN)self_7311868)->elements[2];
++c_7313745.elements[3] = check_732579;
++c_7313745.elements[4] = ((closureN)self_7311868)->elements[3];
++c_7313745.elements[5] = ((closureN)self_7311868)->elements[4];
++c_7313745.elements[6] = ((closureN)self_7311868)->elements[5];
+
+
+-closureN_type c_7315400;
+-object e_7315428 [2];
+-c_7315400.hdr.mark = gc_color_red;
+- c_7315400.hdr.grayed = 0;
+-c_7315400.tag = closureN_tag;
+- c_7315400.fn = (function_type)__lambda_118;
+-c_7315400.num_args = 1;
+-c_7315400.num_elements = 2;
+-c_7315400.elements = (object *)e_7315428;
+-c_7315400.elements[0] = ((closureN)self_7313121)->elements[0];
+-c_7315400.elements[1] = ((closureN)self_7313121)->elements[1];
++closureN_type c_7314100;
++object e_7314128 [2];
++c_7314100.hdr.mark = gc_color_red;
++ c_7314100.hdr.grayed = 0;
++c_7314100.tag = closureN_tag;
++ c_7314100.fn = (function_type)__lambda_118;
++c_7314100.num_args = 1;
++c_7314100.num_elements = 2;
++c_7314100.elements = (object *)e_7314128;
++c_7314100.elements[0] = ((closureN)self_7311868)->elements[0];
++c_7314100.elements[1] = ((closureN)self_7311868)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7315045,__lambda_86, &c_7315400);;
++return_direct_with_clo1(data,(closure)&c_7313745,__lambda_86, &c_7314100);;
+ }
+
+-static void __lambda_118(void *data, object self_7313122, int argc, object *args) /* object self_7313122, object k_734433, object import_7391_732931, object ext_7392_732932_raw, ... */
++static void __lambda_118(void *data, object self_7311869, int argc, object *args) /* object self_7311869, object k_733981, object import_7391_732584, object ext_7392_732585_raw, ... */
+ {
+- object k_734433 = args[0]; object import_7391_732931 = args[1];
+-load_varargs(ext_7392_732932, args, 2, argc - 2);
++ object k_733981 = args[0]; object import_7391_732584 = args[1];
++load_varargs(ext_7392_732585, args, 2, argc - 2);
+
+
+
+-closureN_type c_7315405;
+-object e_7315427 [3];
+-c_7315405.hdr.mark = gc_color_red;
+- c_7315405.hdr.grayed = 0;
+-c_7315405.tag = closureN_tag;
+- c_7315405.fn = (function_type)__lambda_119;
+-c_7315405.num_args = 1;
+-c_7315405.num_elements = 3;
+-c_7315405.elements = (object *)e_7315427;
+-c_7315405.elements[0] = ((closureN)self_7313122)->elements[0];
+-c_7315405.elements[1] = ext_7392_732932;
+-c_7315405.elements[2] = k_734433;
++closureN_type c_7314105;
++object e_7314127 [3];
++c_7314105.hdr.mark = gc_color_red;
++ c_7314105.hdr.grayed = 0;
++c_7314105.tag = closureN_tag;
++ c_7314105.fn = (function_type)__lambda_119;
++c_7314105.num_args = 1;
++c_7314105.num_elements = 3;
++c_7314105.elements = (object *)e_7314127;
++c_7314105.elements[0] = ((closureN)self_7311869)->elements[0];
++c_7314105.elements[1] = ext_7392_732585;
++c_7314105.elements[2] = k_733981;
+
+-return_closcall2(data, car(((closureN)self_7313122)->elements[1]), &c_7315405, import_7391_732931);;
++return_closcall2(data, car(((closureN)self_7311869)->elements[1]), &c_7314105, import_7391_732584);;
+ }
+
+-static void __lambda_119(void *data, object self_7313123, int argc, object *args) /* object self_7313123, object r_734435 */
++static void __lambda_119(void *data, object self_7311870, int argc, object *args) /* object self_7311870, object r_733983 */
+ {
+- object r_734435 = args[0];
+- object r_734436;
++ object r_733983 = args[0];
++ object r_733984;
+
+-if( (boolean_f != Cyc_is_null(((closureN)self_7313123)->elements[1])) ){
+- object c_7315411;
+- alloc_string(data,c_7315411, 4, 4);
+-char tmp_7315412[] = ".sld";
+-memcpy(((string_type *)c_7315411)->str, tmp_7315412,4);
+-((string_type *)c_7315411)->str[4] = '\0';
+- r_734436 = c_7315411;
++if( (boolean_f != Cyc_is_null(((closureN)self_7311870)->elements[1])) ){
++ object c_7314111;
++ alloc_string(data,c_7314111, 4, 4);
++char tmp_7314112[] = ".sld";
++memcpy(((string_type *)c_7314111)->str, tmp_7314112,4);
++((string_type *)c_7314111)->str[4] = '\0';
++ r_733984 = c_7314111;
+ } else {
+
+- r_734436 = Cyc_car(data, ((closureN)self_7313123)->elements[1]);}
++ r_733984 = Cyc_car(data, ((closureN)self_7311870)->elements[1]);}
+ ;
+
+
+-closureN_type c_7315421;
+-object e_7315426 [1];
+-c_7315421.hdr.mark = gc_color_red;
+- c_7315421.hdr.grayed = 0;
+-c_7315421.tag = closureN_tag;
+- c_7315421.fn = (function_type)__lambda_120;
+-c_7315421.num_args = 1;
+-c_7315421.num_elements = 1;
+-c_7315421.elements = (object *)e_7315426;
+-c_7315421.elements[0] = ((closureN)self_7313123)->elements[2];
++closureN_type c_7314121;
++object e_7314126 [1];
++c_7314121.hdr.mark = gc_color_red;
++ c_7314121.hdr.grayed = 0;
++c_7314121.tag = closureN_tag;
++ c_7314121.fn = (function_type)__lambda_120;
++c_7314121.num_args = 1;
++c_7314121.num_elements = 1;
++c_7314121.elements = (object *)e_7314126;
++c_7314121.elements[0] = ((closureN)self_7311870)->elements[2];
+
+-return_closcall3(data, car(((closureN)self_7313123)->elements[0]), &c_7315421, r_734435, r_734436);;
++return_closcall3(data, car(((closureN)self_7311870)->elements[0]), &c_7314121, r_733983, r_733984);;
+ }
+
+-static void __lambda_120(void *data, object self_7313124, int argc, object *args) /* object self_7313124, object r_734434 */
++static void __lambda_120(void *data, object self_7311871, int argc, object *args) /* object self_7311871, object r_733982 */
+ {
+- object r_734434 = args[0];
++ object r_733982 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313124)->elements[0], (((closure) ((closureN)self_7313124)->elements[0])->fn), Cyc_io_file_exists(data, r_734434));;
++return_direct_with_clo1(data, ((closureN)self_7311871)->elements[0], (((closure) ((closureN)self_7311871)->elements[0])->fn), Cyc_io_file_exists(data, r_733982));;
+ }
+
+-static void __lambda_86(void *data, object self_7313125, int argc, object *args) /* object self_7313125, object r_734432 */
++static void __lambda_86(void *data, object self_7311872, int argc, object *args) /* object self_7311872, object r_733980 */
+ {
+- object r_734432 = args[0];
++ object r_733980 = args[0];
+
+-closureN_type c_7315047;
+-object e_7315395 [7];
+-c_7315047.hdr.mark = gc_color_red;
+- c_7315047.hdr.grayed = 0;
+-c_7315047.tag = closureN_tag;
+- c_7315047.fn = (function_type)__lambda_87;
+-c_7315047.num_args = 1;
+-c_7315047.num_elements = 7;
+-c_7315047.elements = (object *)e_7315395;
+-c_7315047.elements[0] = ((closureN)self_7313125)->elements[0];
+-c_7315047.elements[1] = ((closureN)self_7313125)->elements[1];
+-c_7315047.elements[2] = ((closureN)self_7313125)->elements[2];
+-c_7315047.elements[3] = ((closureN)self_7313125)->elements[3];
+-c_7315047.elements[4] = ((closureN)self_7313125)->elements[4];
+-c_7315047.elements[5] = ((closureN)self_7313125)->elements[5];
+-c_7315047.elements[6] = ((closureN)self_7313125)->elements[6];
++closureN_type c_7313747;
++object e_7314095 [7];
++c_7313747.hdr.mark = gc_color_red;
++ c_7313747.hdr.grayed = 0;
++c_7313747.tag = closureN_tag;
++ c_7313747.fn = (function_type)__lambda_87;
++c_7313747.num_args = 1;
++c_7313747.num_elements = 7;
++c_7313747.elements = (object *)e_7314095;
++c_7313747.elements[0] = ((closureN)self_7311872)->elements[0];
++c_7313747.elements[1] = ((closureN)self_7311872)->elements[1];
++c_7313747.elements[2] = ((closureN)self_7311872)->elements[2];
++c_7313747.elements[3] = ((closureN)self_7311872)->elements[3];
++c_7313747.elements[4] = ((closureN)self_7311872)->elements[4];
++c_7313747.elements[5] = ((closureN)self_7311872)->elements[5];
++c_7313747.elements[6] = ((closureN)self_7311872)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315047,__lambda_87, Cyc_set_cell(data, ((closureN)self_7313125)->elements[2], r_734432));;
++return_direct_with_clo1(data,(closure)&c_7313747,__lambda_87, Cyc_set_cell(data, ((closureN)self_7311872)->elements[2], r_733980));;
+ }
+
+-static void __lambda_87(void *data, object self_7313126, int argc, object *args) /* object self_7313126, object r_734343 */
++static void __lambda_87(void *data, object self_7311873, int argc, object *args) /* object self_7311873, object r_733891 */
+ {
+
+
+-closureN_type c_7315049;
+-object e_7315274 [7];
+-c_7315049.hdr.mark = gc_color_red;
+- c_7315049.hdr.grayed = 0;
+-c_7315049.tag = closureN_tag;
+- c_7315049.fn = (function_type)__lambda_88;
+-c_7315049.num_args = 1;
+-c_7315049.num_elements = 7;
+-c_7315049.elements = (object *)e_7315274;
+-c_7315049.elements[0] = ((closureN)self_7313126)->elements[0];
+-c_7315049.elements[1] = ((closureN)self_7313126)->elements[1];
+-c_7315049.elements[2] = ((closureN)self_7313126)->elements[2];
+-c_7315049.elements[3] = ((closureN)self_7313126)->elements[3];
+-c_7315049.elements[4] = ((closureN)self_7313126)->elements[4];
+-c_7315049.elements[5] = ((closureN)self_7313126)->elements[5];
+-c_7315049.elements[6] = ((closureN)self_7313126)->elements[6];
++closureN_type c_7313749;
++object e_7313974 [7];
++c_7313749.hdr.mark = gc_color_red;
++ c_7313749.hdr.grayed = 0;
++c_7313749.tag = closureN_tag;
++ c_7313749.fn = (function_type)__lambda_88;
++c_7313749.num_args = 1;
++c_7313749.num_elements = 7;
++c_7313749.elements = (object *)e_7313974;
++c_7313749.elements[0] = ((closureN)self_7311873)->elements[0];
++c_7313749.elements[1] = ((closureN)self_7311873)->elements[1];
++c_7313749.elements[2] = ((closureN)self_7311873)->elements[2];
++c_7313749.elements[3] = ((closureN)self_7311873)->elements[3];
++c_7313749.elements[4] = ((closureN)self_7311873)->elements[4];
++c_7313749.elements[5] = ((closureN)self_7311873)->elements[5];
++c_7313749.elements[6] = ((closureN)self_7311873)->elements[6];
+
+
+-closureN_type c_7315275;
+-object e_7315394 [1];
+-c_7315275.hdr.mark = gc_color_red;
+- c_7315275.hdr.grayed = 0;
+-c_7315275.tag = closureN_tag;
+- c_7315275.fn = (function_type)__lambda_106;
+-c_7315275.num_args = 1;
+-c_7315275.num_elements = 1;
+-c_7315275.elements = (object *)e_7315394;
+-c_7315275.elements[0] = ((closureN)self_7313126)->elements[4];
++closureN_type c_7313975;
++object e_7314094 [1];
++c_7313975.hdr.mark = gc_color_red;
++ c_7313975.hdr.grayed = 0;
++c_7313975.tag = closureN_tag;
++ c_7313975.fn = (function_type)__lambda_106;
++c_7313975.num_args = 1;
++c_7313975.num_elements = 1;
++c_7313975.elements = (object *)e_7314094;
++c_7313975.elements[0] = ((closureN)self_7311873)->elements[4];
+
+-return_direct_with_clo1(data,(closure)&c_7315049,__lambda_88, &c_7315275);;
++return_direct_with_clo1(data,(closure)&c_7313749,__lambda_88, &c_7313975);;
+ }
+
+-static void __lambda_106(void *data, object self_7313127, int argc, object *args) /* object self_7313127, object k_734405, object import_7393_732933, object ext_7394_732934_raw, ... */
++static void __lambda_106(void *data, object self_7311874, int argc, object *args) /* object self_7311874, object k_733953, object import_7393_732586, object ext_7394_732587_raw, ... */
+ {
+- object k_734405 = args[0]; object import_7393_732933 = args[1];
+-load_varargs(ext_7394_732934, args, 2, argc - 2);
+- object file_91ext_7397_732935;
++ object k_733953 = args[0]; object import_7393_732586 = args[1];
++load_varargs(ext_7394_732587, args, 2, argc - 2);
++ object file_91ext_7397_732588;
+
+-if( (boolean_f != Cyc_is_null(ext_7394_732934)) ){
+- object c_7315280;
+- alloc_string(data,c_7315280, 4, 4);
+-char tmp_7315281[] = ".sld";
+-memcpy(((string_type *)c_7315280)->str, tmp_7315281,4);
+-((string_type *)c_7315280)->str[4] = '\0';
+- file_91ext_7397_732935 = c_7315280;
++if( (boolean_f != Cyc_is_null(ext_7394_732587)) ){
++ object c_7313980;
++ alloc_string(data,c_7313980, 4, 4);
++char tmp_7313981[] = ".sld";
++memcpy(((string_type *)c_7313980)->str, tmp_7313981,4);
++((string_type *)c_7313980)->str[4] = '\0';
++ file_91ext_7397_732588 = c_7313980;
+ } else {
+
+- file_91ext_7397_732935 = Cyc_car(data, ext_7394_732934);}
++ file_91ext_7397_732588 = Cyc_car(data, ext_7394_732587);}
+ ;
+-closureN_type c_7315286;
+-object e_7315361 [3];
+-c_7315286.hdr.mark = gc_color_red;
+- c_7315286.hdr.grayed = 0;
+-c_7315286.tag = closureN_tag;
+- c_7315286.fn = (function_type)__lambda_107;
+-c_7315286.num_args = 1;
+-c_7315286.num_elements = 3;
+-c_7315286.elements = (object *)e_7315361;
+-c_7315286.elements[0] = file_91ext_7397_732935;
+-c_7315286.elements[1] = import_7393_732933;
+-c_7315286.elements[2] = k_734405;
++closureN_type c_7313986;
++object e_7314061 [3];
++c_7313986.hdr.mark = gc_color_red;
++ c_7313986.hdr.grayed = 0;
++c_7313986.tag = closureN_tag;
++ c_7313986.fn = (function_type)__lambda_107;
++c_7313986.num_args = 1;
++c_7313986.num_elements = 3;
++c_7313986.elements = (object *)e_7314061;
++c_7313986.elements[0] = file_91ext_7397_732588;
++c_7313986.elements[1] = import_7393_732586;
++c_7313986.elements[2] = k_733953;
+
+
+-closureN_type c_7315362;
+-object e_7315393 [1];
+-c_7315362.hdr.mark = gc_color_red;
+- c_7315362.hdr.grayed = 0;
+-c_7315362.tag = closureN_tag;
+- c_7315362.fn = (function_type)__lambda_115;
+-c_7315362.num_args = 1;
+-c_7315362.num_elements = 1;
+-c_7315362.elements = (object *)e_7315393;
+-c_7315362.elements[0] = ((closureN)self_7313127)->elements[0];
++closureN_type c_7314062;
++object e_7314093 [1];
++c_7314062.hdr.mark = gc_color_red;
++ c_7314062.hdr.grayed = 0;
++c_7314062.tag = closureN_tag;
++ c_7314062.fn = (function_type)__lambda_115;
++c_7314062.num_args = 1;
++c_7314062.num_elements = 1;
++c_7314062.elements = (object *)e_7314093;
++c_7314062.elements[0] = ((closureN)self_7311874)->elements[0];
+
+-return_direct_with_clo1(data,(closure)&c_7315286,__lambda_107, &c_7315362);;
++return_direct_with_clo1(data,(closure)&c_7313986,__lambda_107, &c_7314062);;
+ }
+
+-static void __lambda_115(void *data, object self_7313128, int argc, object *args) /* object self_7313128, object k_734425, object i_73113_732940 */
++static void __lambda_115(void *data, object self_7311875, int argc, object *args) /* object self_7311875, object k_733973, object i_73113_732593 */
+ {
+- object k_734425 = args[0]; object i_73113_732940 = args[1];
++ object k_733973 = args[0]; object i_73113_732593 = args[1];
+
+-closureN_type c_7315364;
+-object e_7315384 [2];
+-c_7315364.hdr.mark = gc_color_red;
+- c_7315364.hdr.grayed = 0;
+-c_7315364.tag = closureN_tag;
+- c_7315364.fn = (function_type)__lambda_116;
+-c_7315364.num_args = 0;
+-c_7315364.num_elements = 2;
+-c_7315364.elements = (object *)e_7315384;
+-c_7315364.elements[0] = ((closureN)self_7313128)->elements[0];
+-c_7315364.elements[1] = i_73113_732940;
++closureN_type c_7314064;
++object e_7314084 [2];
++c_7314064.hdr.mark = gc_color_red;
++ c_7314064.hdr.grayed = 0;
++c_7314064.tag = closureN_tag;
++ c_7314064.fn = (function_type)__lambda_116;
++c_7314064.num_args = 0;
++c_7314064.num_elements = 2;
++c_7314064.elements = (object *)e_7314084;
++c_7314064.elements[0] = ((closureN)self_7311875)->elements[0];
++c_7314064.elements[1] = i_73113_732593;
+
+
+-closureN_type c_7315385;
+-object e_7315392 [1];
+-c_7315385.hdr.mark = gc_color_red;
+- c_7315385.hdr.grayed = 0;
+-c_7315385.tag = closureN_tag;
+- c_7315385.fn = (function_type)__lambda_117;
+-c_7315385.num_args = 1;
+-c_7315385.num_elements = 1;
+-c_7315385.elements = (object *)e_7315392;
+-c_7315385.elements[0] = k_734425;
++closureN_type c_7314085;
++object e_7314092 [1];
++c_7314085.hdr.mark = gc_color_red;
++ c_7314085.hdr.grayed = 0;
++c_7314085.tag = closureN_tag;
++ c_7314085.fn = (function_type)__lambda_117;
++c_7314085.num_args = 1;
++c_7314085.num_elements = 1;
++c_7314085.elements = (object *)e_7314092;
++c_7314085.elements[0] = k_733973;
+
+-return_direct_with_clo1(data,(closure)&c_7315364,__lambda_116, &c_7315385);;
++return_direct_with_clo1(data,(closure)&c_7314064,__lambda_116, &c_7314085);;
+ }
+
+-static void __lambda_117(void *data, object self_7313129, int argc, object *args) /* object self_7313129, object r_734426 */
++static void __lambda_117(void *data, object self_7311876, int argc, object *args) /* object self_7311876, object r_733974 */
+ {
+- object r_734426 = args[0];
++ object r_733974 = args[0];
+
+-make_utf8_string_with_len(c_7315391, "/", 1, 1);
++make_utf8_string_with_len(c_7314091, "/", 1, 1);
+
+-object c_7315390 = Cyc_string_append(data, ((closureN)self_7313129)->elements[0],2,&c_7315391, r_734426);
+-return_direct_with_clo1(data, ((closureN)self_7313129)->elements[0], (((closure) ((closureN)self_7313129)->elements[0])->fn), c_7315390);;
++object c_7314090 = Cyc_string_append(data, ((closureN)self_7311876)->elements[0],2,&c_7314091, r_733974);
++return_direct_with_clo1(data, ((closureN)self_7311876)->elements[0], (((closure) ((closureN)self_7311876)->elements[0])->fn), c_7314090);;
+ }
+
+-static void __lambda_116(void *data, object self_7313130, int argc, object *args) /* object self_7313130, object k_734427 */
++static void __lambda_116(void *data, object self_7311877, int argc, object *args) /* object self_7311877, object k_733975 */
+ {
+- object k_734427 = args[0];
++ object k_733975 = args[0];
+
+-if( (boolean_f != Cyc_is_symbol(((closureN)self_7313130)->elements[1])) ){
++if( (boolean_f != Cyc_is_symbol(((closureN)self_7311877)->elements[1])) ){
+
+-object c_7315371 = Cyc_symbol2string(data, k_734427,((closureN)self_7313130)->elements[1]);
+-return_direct_with_clo1(data, k_734427, (((closure) k_734427)->fn), c_7315371);
++object c_7314071 = Cyc_symbol2string(data, k_733975,((closureN)self_7311877)->elements[1]);
++return_direct_with_clo1(data, k_733975, (((closure) k_733975)->fn), c_7314071);
+ } else {
+
+-if( (boolean_f != Cyc_is_number(((closureN)self_7313130)->elements[1])) ){
++if( (boolean_f != Cyc_is_number(((closureN)self_7311877)->elements[1])) ){
+
+-object c_7315379 = Cyc_number2string2(data, k_734427,1,((closureN)self_7313130)->elements[1]);
+-return_direct_with_clo1(data, k_734427, (((closure) k_734427)->fn), c_7315379);
++object c_7314079 = Cyc_number2string2(data, k_733975,1,((closureN)self_7311877)->elements[1]);
++return_direct_with_clo1(data, k_733975, (((closure) k_733975)->fn), c_7314079);
+ } else {
+
+-make_utf8_string_with_len(c_7315382, "Unexpected type in import set", 29, 29);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), k_734427, &c_7315382, ((closureN)self_7313130)->elements[0]);}
++make_utf8_string_with_len(c_7314082, "Unexpected type in import set", 29, 29);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), k_733975, &c_7314082, ((closureN)self_7311877)->elements[0]);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_107(void *data, object self_7313131, int argc, object *args) /* object self_7313131, object r_734424 */
++static void __lambda_107(void *data, object self_7311878, int argc, object *args) /* object self_7311878, object r_733972 */
+ {
+- object r_734424 = args[0];
++ object r_733972 = args[0];
+
+-closureN_type c_7315288;
+-object e_7315359 [3];
+-c_7315288.hdr.mark = gc_color_red;
+- c_7315288.hdr.grayed = 0;
+-c_7315288.tag = closureN_tag;
+- c_7315288.fn = (function_type)__lambda_108;
+-c_7315288.num_args = 1;
+-c_7315288.num_elements = 3;
+-c_7315288.elements = (object *)e_7315359;
+-c_7315288.elements[0] = ((closureN)self_7313131)->elements[0];
+-c_7315288.elements[1] = ((closureN)self_7313131)->elements[1];
+-c_7315288.elements[2] = ((closureN)self_7313131)->elements[2];
++closureN_type c_7313988;
++object e_7314059 [3];
++c_7313988.hdr.mark = gc_color_red;
++ c_7313988.hdr.grayed = 0;
++c_7313988.tag = closureN_tag;
++ c_7313988.fn = (function_type)__lambda_108;
++c_7313988.num_args = 1;
++c_7313988.num_elements = 3;
++c_7313988.elements = (object *)e_7314059;
++c_7313988.elements[0] = ((closureN)self_7311878)->elements[0];
++c_7313988.elements[1] = ((closureN)self_7311878)->elements[1];
++c_7313988.elements[2] = ((closureN)self_7311878)->elements[2];
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7315288, r_734424, ((closureN)self_7313131)->elements[1]);;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313988, r_733972, ((closureN)self_7311878)->elements[1]);;
+ }
+
+-static void __lambda_108(void *data, object self_7313132, int argc, object *args) /* object self_7313132, object r_734423 */
++static void __lambda_108(void *data, object self_7311879, int argc, object *args) /* object self_7311879, object r_733971 */
+ {
+- object r_734423 = args[0];
++ object r_733971 = args[0];
+
+-closureN_type c_7315290;
+-object e_7315355 [3];
+-c_7315290.hdr.mark = gc_color_red;
+- c_7315290.hdr.grayed = 0;
+-c_7315290.tag = closureN_tag;
+- c_7315290.fn = (function_type)__lambda_109;
+-c_7315290.num_args = 1;
+-c_7315290.num_elements = 3;
+-c_7315290.elements = (object *)e_7315355;
+-c_7315290.elements[0] = ((closureN)self_7313132)->elements[0];
+-c_7315290.elements[1] = ((closureN)self_7313132)->elements[1];
+-c_7315290.elements[2] = ((closureN)self_7313132)->elements[2];
++closureN_type c_7313990;
++object e_7314055 [3];
++c_7313990.hdr.mark = gc_color_red;
++ c_7313990.hdr.grayed = 0;
++c_7313990.tag = closureN_tag;
++ c_7313990.fn = (function_type)__lambda_109;
++c_7313990.num_args = 1;
++c_7313990.num_elements = 3;
++c_7313990.elements = (object *)e_7314055;
++c_7313990.elements[0] = ((closureN)self_7311879)->elements[0];
++c_7313990.elements[1] = ((closureN)self_7311879)->elements[1];
++c_7313990.elements[2] = ((closureN)self_7311879)->elements[2];
+
+
+-object c_7315358 = apply(data,(closure)&c_7315290,primitive_string_91append, r_734423);
+-return_closcall1(data,(closure)&c_7315290, c_7315358);;
++object c_7314058 = apply(data,(closure)&c_7313990,primitive_string_91append, r_733971);
++return_closcall1(data,(closure)&c_7313990, c_7314058);;
+ }
+
+-static void __lambda_109(void *data, object self_7313133, int argc, object *args) /* object self_7313133, object r_734422 */
++static void __lambda_109(void *data, object self_7311880, int argc, object *args) /* object self_7311880, object r_733970 */
+ {
+- object r_734422 = args[0];
++ object r_733970 = args[0];
+
+-closureN_type c_7315292;
+-object e_7315350 [2];
+-c_7315292.hdr.mark = gc_color_red;
+- c_7315292.hdr.grayed = 0;
+-c_7315292.tag = closureN_tag;
+- c_7315292.fn = (function_type)__lambda_110;
+-c_7315292.num_args = 1;
+-c_7315292.num_elements = 2;
+-c_7315292.elements = (object *)e_7315350;
+-c_7315292.elements[0] = ((closureN)self_7313133)->elements[1];
+-c_7315292.elements[1] = ((closureN)self_7313133)->elements[2];
++closureN_type c_7313992;
++object e_7314050 [2];
++c_7313992.hdr.mark = gc_color_red;
++ c_7313992.hdr.grayed = 0;
++c_7313992.tag = closureN_tag;
++ c_7313992.fn = (function_type)__lambda_110;
++c_7313992.num_args = 1;
++c_7313992.num_elements = 2;
++c_7313992.elements = (object *)e_7314050;
++c_7313992.elements[0] = ((closureN)self_7311880)->elements[1];
++c_7313992.elements[1] = ((closureN)self_7311880)->elements[2];
+
+
+-object c_7315353 = Cyc_string_append(data,(closure)&c_7315292,2,r_734422, ((closureN)self_7313133)->elements[0]);
+-return_closcall1(data,(closure)&c_7315292, c_7315353);;
++object c_7314053 = Cyc_string_append(data,(closure)&c_7313992,2,r_733970, ((closureN)self_7311880)->elements[0]);
++return_closcall1(data,(closure)&c_7313992, c_7314053);;
+ }
+
+-static void __lambda_110(void *data, object self_7313134, int argc, object *args) /* object self_7313134, object filename_85_73100_732936 */
++static void __lambda_110(void *data, object self_7311881, int argc, object *args) /* object self_7311881, object filename_85_73100_732589 */
+ {
+- object filename_85_73100_732936 = args[0];
++ object filename_85_73100_732589 = args[0];
+
+-closureN_type c_7315294;
+-object e_7315344 [2];
+-c_7315294.hdr.mark = gc_color_red;
+- c_7315294.hdr.grayed = 0;
+-c_7315294.tag = closureN_tag;
+- c_7315294.fn = (function_type)__lambda_111;
+-c_7315294.num_args = 1;
+-c_7315294.num_elements = 2;
+-c_7315294.elements = (object *)e_7315344;
+-c_7315294.elements[0] = ((closureN)self_7313134)->elements[0];
+-c_7315294.elements[1] = ((closureN)self_7313134)->elements[1];
++closureN_type c_7313994;
++object e_7314044 [2];
++c_7313994.hdr.mark = gc_color_red;
++ c_7313994.hdr.grayed = 0;
++c_7313994.tag = closureN_tag;
++ c_7313994.fn = (function_type)__lambda_111;
++c_7313994.num_args = 1;
++c_7313994.num_elements = 2;
++c_7313994.elements = (object *)e_7314044;
++c_7313994.elements[0] = ((closureN)self_7311881)->elements[0];
++c_7313994.elements[1] = ((closureN)self_7311881)->elements[1];
+
+
+
+
+-object c_7315347 = Cyc_substring(data,(closure)&c_7315294,filename_85_73100_732936, obj_int2obj(1), Cyc_string_length(data, filename_85_73100_732936));
+-return_closcall1(data,(closure)&c_7315294, c_7315347);;
++object c_7314047 = Cyc_substring(data,(closure)&c_7313994,filename_85_73100_732589, obj_int2obj(1), Cyc_string_length(data, filename_85_73100_732589));
++return_closcall1(data,(closure)&c_7313994, c_7314047);;
+ }
+
+-static void __lambda_111(void *data, object self_7313135, int argc, object *args) /* object self_7313135, object filename_73103_732937 */
++static void __lambda_111(void *data, object self_7311882, int argc, object *args) /* object self_7311882, object filename_73103_732590 */
+ {
+- object filename_73103_732937 = args[0];
++ object filename_73103_732590 = args[0];
+
+-closureN_type c_7315296;
+-object e_7315325 [1];
+-c_7315296.hdr.mark = gc_color_red;
+- c_7315296.hdr.grayed = 0;
+-c_7315296.tag = closureN_tag;
+- c_7315296.fn = (function_type)__lambda_112;
+-c_7315296.num_args = 0;
+-c_7315296.num_elements = 1;
+-c_7315296.elements = (object *)e_7315325;
+-c_7315296.elements[0] = ((closureN)self_7313135)->elements[0];
++closureN_type c_7313996;
++object e_7314025 [1];
++c_7313996.hdr.mark = gc_color_red;
++ c_7313996.hdr.grayed = 0;
++c_7313996.tag = closureN_tag;
++ c_7313996.fn = (function_type)__lambda_112;
++c_7313996.num_args = 0;
++c_7313996.num_elements = 1;
++c_7313996.elements = (object *)e_7314025;
++c_7313996.elements[0] = ((closureN)self_7311882)->elements[0];
+
+
+-closureN_type c_7315326;
+-object e_7315343 [2];
+-c_7315326.hdr.mark = gc_color_red;
+- c_7315326.hdr.grayed = 0;
+-c_7315326.tag = closureN_tag;
+- c_7315326.fn = (function_type)__lambda_113;
+-c_7315326.num_args = 1;
+-c_7315326.num_elements = 2;
+-c_7315326.elements = (object *)e_7315343;
+-c_7315326.elements[0] = filename_73103_732937;
+-c_7315326.elements[1] = ((closureN)self_7313135)->elements[1];
++closureN_type c_7314026;
++object e_7314043 [2];
++c_7314026.hdr.mark = gc_color_red;
++ c_7314026.hdr.grayed = 0;
++c_7314026.tag = closureN_tag;
++ c_7314026.fn = (function_type)__lambda_113;
++c_7314026.num_args = 1;
++c_7314026.num_elements = 2;
++c_7314026.elements = (object *)e_7314043;
++c_7314026.elements[0] = filename_73103_732590;
++c_7314026.elements[1] = ((closureN)self_7311882)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7315296,__lambda_112, &c_7315326);;
++return_direct_with_clo1(data,(closure)&c_7313996,__lambda_112, &c_7314026);;
+ }
+
+-static void __lambda_113(void *data, object self_7313136, int argc, object *args) /* object self_7313136, object r_734409 */
++static void __lambda_113(void *data, object self_7311883, int argc, object *args) /* object self_7311883, object r_733957 */
+ {
+- object r_734409 = args[0];
+- if( (boolean_f != r_734409) ){
++ object r_733957 = args[0];
++ if( (boolean_f != r_733957) ){
+
+-closureN_type c_7315328;
+-object e_7315336 [2];
+-c_7315328.hdr.mark = gc_color_red;
+- c_7315328.hdr.grayed = 0;
+-c_7315328.tag = closureN_tag;
+- c_7315328.fn = (function_type)__lambda_114;
+-c_7315328.num_args = 1;
+-c_7315328.num_elements = 2;
+-c_7315328.elements = (object *)e_7315336;
+-c_7315328.elements[0] = ((closureN)self_7313136)->elements[0];
+-c_7315328.elements[1] = ((closureN)self_7313136)->elements[1];
++closureN_type c_7314028;
++object e_7314036 [2];
++c_7314028.hdr.mark = gc_color_red;
++ c_7314028.hdr.grayed = 0;
++c_7314028.tag = closureN_tag;
++ c_7314028.fn = (function_type)__lambda_114;
++c_7314028.num_args = 1;
++c_7314028.num_elements = 2;
++c_7314028.elements = (object *)e_7314036;
++c_7314028.elements[0] = ((closureN)self_7311883)->elements[0];
++c_7314028.elements[1] = ((closureN)self_7311883)->elements[1];
+
+
+-object c_7315339 = Cyc_installation_dir(data,(closure)&c_7315328,quote_sld);
+-return_closcall1(data,(closure)&c_7315328, c_7315339);
++object c_7314039 = Cyc_installation_dir(data,(closure)&c_7314028,quote_sld);
++return_closcall1(data,(closure)&c_7314028, c_7314039);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313136)->elements[1], (((closure) ((closureN)self_7313136)->elements[1])->fn), ((closureN)self_7313136)->elements[0]);}
++ return_direct_with_clo1(data, ((closureN)self_7311883)->elements[1], (((closure) ((closureN)self_7311883)->elements[1])->fn), ((closureN)self_7311883)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_114(void *data, object self_7313137, int argc, object *args) /* object self_7313137, object r_734410 */
++static void __lambda_114(void *data, object self_7311884, int argc, object *args) /* object self_7311884, object r_733958 */
+ {
+- object r_734410 = args[0];
++ object r_733958 = args[0];
+
+-make_utf8_string_with_len(c_7315334, "/", 1, 1);
++make_utf8_string_with_len(c_7314034, "/", 1, 1);
+
+-object c_7315333 = Cyc_string_append(data, ((closureN)self_7313137)->elements[1],3,r_734410, &c_7315334, ((closureN)self_7313137)->elements[0]);
+-return_direct_with_clo1(data, ((closureN)self_7313137)->elements[1], (((closure) ((closureN)self_7313137)->elements[1])->fn), c_7315333);;
++object c_7314033 = Cyc_string_append(data, ((closureN)self_7311884)->elements[1],3,r_733958, &c_7314034, ((closureN)self_7311884)->elements[0]);
++return_direct_with_clo1(data, ((closureN)self_7311884)->elements[1], (((closure) ((closureN)self_7311884)->elements[1])->fn), c_7314033);;
+ }
+
+-static void __lambda_112(void *data, object self_7313138, int argc, object *args) /* object self_7313138, object k_734413 */
++static void __lambda_112(void *data, object self_7311885, int argc, object *args) /* object self_7311885, object k_733961 */
+ {
+- object k_734413 = args[0];
++ object k_733961 = args[0];
+
+
+-if( (boolean_f != equalp(quote_scheme, Cyc_car(data, ((closureN)self_7313138)->elements[0]))) ){
++if( (boolean_f != equalp(quote_scheme, Cyc_car(data, ((closureN)self_7311885)->elements[0]))) ){
+
+
+
+
+-return_direct_with_clo1(data, k_734413,__lambda_113, equalp(quote_scheme, Cyc_car(data, ((closureN)self_7313138)->elements[0])));
++return_direct_with_clo1(data, k_733961,__lambda_113, equalp(quote_scheme, Cyc_car(data, ((closureN)self_7311885)->elements[0])));
+ } else {
+
+
+-if( (boolean_f != equalp(quote_srfi, Cyc_car(data, ((closureN)self_7313138)->elements[0]))) ){
++if( (boolean_f != equalp(quote_srfi, Cyc_car(data, ((closureN)self_7311885)->elements[0]))) ){
+
+
+
+
+-return_direct_with_clo1(data, k_734413,__lambda_113, equalp(quote_srfi, Cyc_car(data, ((closureN)self_7313138)->elements[0])));
++return_direct_with_clo1(data, k_733961,__lambda_113, equalp(quote_srfi, Cyc_car(data, ((closureN)self_7311885)->elements[0])));
+ } else {
+
+
+
+
+-return_direct_with_clo1(data, k_734413,__lambda_113, equalp(quote_cyclone, Cyc_car(data, ((closureN)self_7313138)->elements[0])));}
++return_direct_with_clo1(data, k_733961,__lambda_113, equalp(quote_cyclone, Cyc_car(data, ((closureN)self_7311885)->elements[0])));}
+ ;}
+ ;;
+ }
+
+-static void __lambda_88(void *data, object self_7313139, int argc, object *args) /* object self_7313139, object r_734404 */
++static void __lambda_88(void *data, object self_7311886, int argc, object *args) /* object self_7311886, object r_733952 */
+ {
+- object r_734404 = args[0];
++ object r_733952 = args[0];
+
+-closureN_type c_7315051;
+-object e_7315270 [6];
+-c_7315051.hdr.mark = gc_color_red;
+- c_7315051.hdr.grayed = 0;
+-c_7315051.tag = closureN_tag;
+- c_7315051.fn = (function_type)__lambda_89;
+-c_7315051.num_args = 1;
+-c_7315051.num_elements = 6;
+-c_7315051.elements = (object *)e_7315270;
+-c_7315051.elements[0] = ((closureN)self_7313139)->elements[1];
+-c_7315051.elements[1] = ((closureN)self_7313139)->elements[2];
+-c_7315051.elements[2] = ((closureN)self_7313139)->elements[3];
+-c_7315051.elements[3] = ((closureN)self_7313139)->elements[4];
+-c_7315051.elements[4] = ((closureN)self_7313139)->elements[5];
+-c_7315051.elements[5] = ((closureN)self_7313139)->elements[6];
++closureN_type c_7313751;
++object e_7313970 [6];
++c_7313751.hdr.mark = gc_color_red;
++ c_7313751.hdr.grayed = 0;
++c_7313751.tag = closureN_tag;
++ c_7313751.fn = (function_type)__lambda_89;
++c_7313751.num_args = 1;
++c_7313751.num_elements = 6;
++c_7313751.elements = (object *)e_7313970;
++c_7313751.elements[0] = ((closureN)self_7311886)->elements[1];
++c_7313751.elements[1] = ((closureN)self_7311886)->elements[2];
++c_7313751.elements[2] = ((closureN)self_7311886)->elements[3];
++c_7313751.elements[3] = ((closureN)self_7311886)->elements[4];
++c_7313751.elements[4] = ((closureN)self_7311886)->elements[5];
++c_7313751.elements[5] = ((closureN)self_7311886)->elements[6];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315051,__lambda_89, Cyc_set_cell(data, ((closureN)self_7313139)->elements[0], r_734404));;
++return_direct_with_clo1(data,(closure)&c_7313751,__lambda_89, Cyc_set_cell(data, ((closureN)self_7311886)->elements[0], r_733952));;
+ }
+
+-static void __lambda_89(void *data, object self_7313140, int argc, object *args) /* object self_7313140, object r_734344 */
++static void __lambda_89(void *data, object self_7311887, int argc, object *args) /* object self_7311887, object r_733892 */
+ {
+
+
+-closureN_type c_7315053;
+-object e_7315224 [6];
+-c_7315053.hdr.mark = gc_color_red;
+- c_7315053.hdr.grayed = 0;
+-c_7315053.tag = closureN_tag;
+- c_7315053.fn = (function_type)__lambda_90;
+-c_7315053.num_args = 1;
+-c_7315053.num_elements = 6;
+-c_7315053.elements = (object *)e_7315224;
+-c_7315053.elements[0] = ((closureN)self_7313140)->elements[0];
+-c_7315053.elements[1] = ((closureN)self_7313140)->elements[1];
+-c_7315053.elements[2] = ((closureN)self_7313140)->elements[2];
+-c_7315053.elements[3] = ((closureN)self_7313140)->elements[3];
+-c_7315053.elements[4] = ((closureN)self_7313140)->elements[4];
+-c_7315053.elements[5] = ((closureN)self_7313140)->elements[5];
++closureN_type c_7313753;
++object e_7313924 [6];
++c_7313753.hdr.mark = gc_color_red;
++ c_7313753.hdr.grayed = 0;
++c_7313753.tag = closureN_tag;
++ c_7313753.fn = (function_type)__lambda_90;
++c_7313753.num_args = 1;
++c_7313753.num_elements = 6;
++c_7313753.elements = (object *)e_7313924;
++c_7313753.elements[0] = ((closureN)self_7311887)->elements[0];
++c_7313753.elements[1] = ((closureN)self_7311887)->elements[1];
++c_7313753.elements[2] = ((closureN)self_7311887)->elements[2];
++c_7313753.elements[3] = ((closureN)self_7311887)->elements[3];
++c_7313753.elements[4] = ((closureN)self_7311887)->elements[4];
++c_7313753.elements[5] = ((closureN)self_7311887)->elements[5];
+
+
+-closureN_type c_7315225;
+-object e_7315269 [1];
+-c_7315225.hdr.mark = gc_color_red;
+- c_7315225.hdr.grayed = 0;
+-c_7315225.tag = closureN_tag;
+- c_7315225.fn = (function_type)__lambda_105;
+-c_7315225.num_args = 1;
+-c_7315225.num_elements = 1;
+-c_7315225.elements = (object *)e_7315269;
+-c_7315225.elements[0] = ((closureN)self_7313140)->elements[0];
++closureN_type c_7313925;
++object e_7313969 [1];
++c_7313925.hdr.mark = gc_color_red;
++ c_7313925.hdr.grayed = 0;
++c_7313925.tag = closureN_tag;
++ c_7313925.fn = (function_type)__lambda_105;
++c_7313925.num_args = 1;
++c_7313925.num_elements = 1;
++c_7313925.elements = (object *)e_7313969;
++c_7313925.elements[0] = ((closureN)self_7311887)->elements[0];
+
+-return_direct_with_clo1(data,(closure)&c_7315053,__lambda_90, &c_7315225);;
++return_direct_with_clo1(data,(closure)&c_7313753,__lambda_90, &c_7313925);;
+ }
+
+-static void __lambda_105(void *data, object self_7313141, int argc, object *args) /* object self_7313141, object k_734388, object import_73121_732941 */
++static void __lambda_105(void *data, object self_7311888, int argc, object *args) /* object self_7311888, object k_733936, object import_73121_732594 */
+ {
+- object k_734388 = args[0]; object import_73121_732941 = args[1];
+- object r_734389;
++ object k_733936 = args[0]; object import_73121_732594 = args[1];
++ object r_733937;
+
+-if( (boolean_f != Cyc_is_pair(import_73121_732941)) ){
++if( (boolean_f != Cyc_is_pair(import_73121_732594)) ){
+
+
+-if( (boolean_f != equalp(quote_only, Cyc_car(data, import_73121_732941))) ){
++if( (boolean_f != equalp(quote_only, Cyc_car(data, import_73121_732594))) ){
+
+
+- r_734389 = equalp(quote_only, Cyc_car(data, import_73121_732941));
++ r_733937 = equalp(quote_only, Cyc_car(data, import_73121_732594));
+ } else {
+
+
+-if( (boolean_f != equalp(quote_except, Cyc_car(data, import_73121_732941))) ){
++if( (boolean_f != equalp(quote_except, Cyc_car(data, import_73121_732594))) ){
+
+
+- r_734389 = equalp(quote_except, Cyc_car(data, import_73121_732941));
++ r_733937 = equalp(quote_except, Cyc_car(data, import_73121_732594));
+ } else {
+
+
+-if( (boolean_f != equalp(quote_prefix, Cyc_car(data, import_73121_732941))) ){
++if( (boolean_f != equalp(quote_prefix, Cyc_car(data, import_73121_732594))) ){
+
+
+- r_734389 = equalp(quote_prefix, Cyc_car(data, import_73121_732941));
++ r_733937 = equalp(quote_prefix, Cyc_car(data, import_73121_732594));
+ } else {
+
+
+- r_734389 = equalp(quote_rename, Cyc_car(data, import_73121_732941));}
++ r_733937 = equalp(quote_rename, Cyc_car(data, import_73121_732594));}
+ ;}
+ ;}
+ ;
+ } else {
+- r_734389 = boolean_f;}
+-;if( (boolean_f != r_734389) ){
++ r_733937 = boolean_f;}
++;if( (boolean_f != r_733937) ){
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313141)->elements[0]), k_734388, Cyc_cadr(data, import_73121_732941));
++return_closcall2(data, car(((closureN)self_7311888)->elements[0]), k_733936, Cyc_cadr(data, import_73121_732594));
+ } else {
+- return_direct_with_clo1(data, k_734388, (((closure) k_734388)->fn), import_73121_732941);}
++ return_direct_with_clo1(data, k_733936, (((closure) k_733936)->fn), import_73121_732594);}
+ ;;
+ }
+
+-static void __lambda_90(void *data, object self_7313142, int argc, object *args) /* object self_7313142, object r_734387 */
++static void __lambda_90(void *data, object self_7311889, int argc, object *args) /* object self_7311889, object r_733935 */
+ {
+- object r_734387 = args[0];
++ object r_733935 = args[0];
+
+-closureN_type c_7315055;
+-object e_7315220 [5];
+-c_7315055.hdr.mark = gc_color_red;
+- c_7315055.hdr.grayed = 0;
+-c_7315055.tag = closureN_tag;
+- c_7315055.fn = (function_type)__lambda_91;
+-c_7315055.num_args = 1;
+-c_7315055.num_elements = 5;
+-c_7315055.elements = (object *)e_7315220;
+-c_7315055.elements[0] = ((closureN)self_7313142)->elements[1];
+-c_7315055.elements[1] = ((closureN)self_7313142)->elements[2];
+-c_7315055.elements[2] = ((closureN)self_7313142)->elements[3];
+-c_7315055.elements[3] = ((closureN)self_7313142)->elements[4];
+-c_7315055.elements[4] = ((closureN)self_7313142)->elements[5];
++closureN_type c_7313755;
++object e_7313920 [5];
++c_7313755.hdr.mark = gc_color_red;
++ c_7313755.hdr.grayed = 0;
++c_7313755.tag = closureN_tag;
++ c_7313755.fn = (function_type)__lambda_91;
++c_7313755.num_args = 1;
++c_7313755.num_elements = 5;
++c_7313755.elements = (object *)e_7313920;
++c_7313755.elements[0] = ((closureN)self_7311889)->elements[1];
++c_7313755.elements[1] = ((closureN)self_7311889)->elements[2];
++c_7313755.elements[2] = ((closureN)self_7311889)->elements[3];
++c_7313755.elements[3] = ((closureN)self_7311889)->elements[4];
++c_7313755.elements[4] = ((closureN)self_7311889)->elements[5];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315055,__lambda_91, Cyc_set_cell(data, ((closureN)self_7313142)->elements[0], r_734387));;
++return_direct_with_clo1(data,(closure)&c_7313755,__lambda_91, Cyc_set_cell(data, ((closureN)self_7311889)->elements[0], r_733935));;
+ }
+
+-static void __lambda_91(void *data, object self_7313143, int argc, object *args) /* object self_7313143, object r_734345 */
++static void __lambda_91(void *data, object self_7311890, int argc, object *args) /* object self_7311890, object r_733893 */
+ {
+
+
+-closureN_type c_7315057;
+-object e_7315159 [4];
+-c_7315057.hdr.mark = gc_color_red;
+- c_7315057.hdr.grayed = 0;
+-c_7315057.tag = closureN_tag;
+- c_7315057.fn = (function_type)__lambda_92;
+-c_7315057.num_args = 1;
+-c_7315057.num_elements = 4;
+-c_7315057.elements = (object *)e_7315159;
+-c_7315057.elements[0] = ((closureN)self_7313143)->elements[1];
+-c_7315057.elements[1] = ((closureN)self_7313143)->elements[2];
+-c_7315057.elements[2] = ((closureN)self_7313143)->elements[3];
+-c_7315057.elements[3] = ((closureN)self_7313143)->elements[4];
++closureN_type c_7313757;
++object e_7313859 [4];
++c_7313757.hdr.mark = gc_color_red;
++ c_7313757.hdr.grayed = 0;
++c_7313757.tag = closureN_tag;
++ c_7313757.fn = (function_type)__lambda_92;
++c_7313757.num_args = 1;
++c_7313757.num_elements = 4;
++c_7313757.elements = (object *)e_7313859;
++c_7313757.elements[0] = ((closureN)self_7311890)->elements[1];
++c_7313757.elements[1] = ((closureN)self_7311890)->elements[2];
++c_7313757.elements[2] = ((closureN)self_7311890)->elements[3];
++c_7313757.elements[3] = ((closureN)self_7311890)->elements[4];
+
+
+-closureN_type c_7315160;
+-object e_7315219 [2];
+-c_7315160.hdr.mark = gc_color_red;
+- c_7315160.hdr.grayed = 0;
+-c_7315160.tag = closureN_tag;
+- c_7315160.fn = (function_type)__lambda_102;
+-c_7315160.num_args = 1;
+-c_7315160.num_elements = 2;
+-c_7315160.elements = (object *)e_7315219;
+-c_7315160.elements[0] = ((closureN)self_7313143)->elements[0];
+-c_7315160.elements[1] = ((closureN)self_7313143)->elements[1];
++closureN_type c_7313860;
++object e_7313919 [2];
++c_7313860.hdr.mark = gc_color_red;
++ c_7313860.hdr.grayed = 0;
++c_7313860.tag = closureN_tag;
++ c_7313860.fn = (function_type)__lambda_102;
++c_7313860.num_args = 1;
++c_7313860.num_elements = 2;
++c_7313860.elements = (object *)e_7313919;
++c_7313860.elements[0] = ((closureN)self_7311890)->elements[0];
++c_7313860.elements[1] = ((closureN)self_7311890)->elements[1];
+
+-return_direct_with_clo1(data,(closure)&c_7315057,__lambda_92, &c_7315160);;
++return_direct_with_clo1(data,(closure)&c_7313757,__lambda_92, &c_7313860);;
+ }
+
+-static void __lambda_102(void *data, object self_7313144, int argc, object *args) /* object self_7313144, object k_734370, object x_73139_732945 */
++static void __lambda_102(void *data, object self_7311891, int argc, object *args) /* object self_7311891, object k_733918, object x_73139_732598 */
+ {
+- object k_734370 = args[0]; object x_73139_732945 = args[1];
++ object k_733918 = args[0]; object x_73139_732598 = args[1];
+
+-if( (boolean_f != Cyc_is_pair(x_73139_732945)) ){
++if( (boolean_f != Cyc_is_pair(x_73139_732598)) ){
+
+
+-if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_and)) ){
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732598), quote_and)) ){
+
+
+
+
+-return_direct_with_clo3(data, __glo_every_scheme_base, (((closure) __glo_every_scheme_base)->fn), k_734370, car(((closureN)self_7313144)->elements[1]), Cyc_cdr(data, x_73139_732945));
++return_direct_with_clo3(data, __glo_every_scheme_base, (((closure) __glo_every_scheme_base)->fn), k_733918, car(((closureN)self_7311891)->elements[1]), Cyc_cdr(data, x_73139_732598));
+ } else {
+
+
+-if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_or)) ){
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732598), quote_or)) ){
+
+
+
+
+-return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), k_734370, car(((closureN)self_7313144)->elements[1]), Cyc_cdr(data, x_73139_732945));
++return_direct_with_clo3(data, __glo_any_scheme_base, (((closure) __glo_any_scheme_base)->fn), k_733918, car(((closureN)self_7311891)->elements[1]), Cyc_cdr(data, x_73139_732598));
+ } else {
+
+
+-if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_not)) ){
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732598), quote_not)) ){
+
+
+
+-closureN_type c_7315191;
+-object e_7315196 [1];
+-c_7315191.hdr.mark = gc_color_red;
+- c_7315191.hdr.grayed = 0;
+-c_7315191.tag = closureN_tag;
+- c_7315191.fn = (function_type)__lambda_103;
+-c_7315191.num_args = 1;
+-c_7315191.num_elements = 1;
+-c_7315191.elements = (object *)e_7315196;
+-c_7315191.elements[0] = k_734370;
++closureN_type c_7313891;
++object e_7313896 [1];
++c_7313891.hdr.mark = gc_color_red;
++ c_7313891.hdr.grayed = 0;
++c_7313891.tag = closureN_tag;
++ c_7313891.fn = (function_type)__lambda_103;
++c_7313891.num_args = 1;
++c_7313891.num_elements = 1;
++c_7313891.elements = (object *)e_7313896;
++c_7313891.elements[0] = k_733918;
+
+
+
+-return_closcall2(data, car(((closureN)self_7313144)->elements[1]), &c_7315191, Cyc_cadr(data, x_73139_732945));
++return_closcall2(data, car(((closureN)self_7311891)->elements[1]), &c_7313891, Cyc_cadr(data, x_73139_732598));
+ } else {
+
+
+-if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_library)) ){
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732598), quote_library)) ){
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313144)->elements[0]), k_734370, Cyc_cadr(data, x_73139_732945));
++return_closcall2(data, car(((closureN)self_7311891)->elements[0]), k_733918, Cyc_cadr(data, x_73139_732598));
+ } else {
+
+-make_utf8_string_with_len(c_7315210, "cond-expand: bad feature", 24, 24);
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_734370, &c_7315210, x_73139_732945);}
++make_utf8_string_with_len(c_7313910, "cond-expand: bad feature", 24, 24);
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_733918, &c_7313910, x_73139_732598);}
+ ;}
+ ;}
+ ;}
+ ;
+ } else {
+
+-closureN_type c_7315212;
+-object e_7315218 [2];
+-c_7315212.hdr.mark = gc_color_red;
+- c_7315212.hdr.grayed = 0;
+-c_7315212.tag = closureN_tag;
+- c_7315212.fn = (function_type)__lambda_104;
+-c_7315212.num_args = 1;
+-c_7315212.num_elements = 2;
+-c_7315212.elements = (object *)e_7315218;
+-c_7315212.elements[0] = k_734370;
+-c_7315212.elements[1] = x_73139_732945;
++closureN_type c_7313912;
++object e_7313918 [2];
++c_7313912.hdr.mark = gc_color_red;
++ c_7313912.hdr.grayed = 0;
++c_7313912.tag = closureN_tag;
++ c_7313912.fn = (function_type)__lambda_104;
++c_7313912.num_args = 1;
++c_7313912.num_elements = 2;
++c_7313912.elements = (object *)e_7313918;
++c_7313912.elements[0] = k_733918;
++c_7313912.elements[1] = x_73139_732598;
+
+-return_direct_with_clo1(data, __glo_features_scheme_base, (((closure) __glo_features_scheme_base)->fn), &c_7315212);}
++return_direct_with_clo1(data, __glo_features_scheme_base, (((closure) __glo_features_scheme_base)->fn), &c_7313912);}
+ ;;
+ }
+
+-static void __lambda_104(void *data, object self_7313146, int argc, object *args) /* object self_7313146, object r_734386 */
++static void __lambda_104(void *data, object self_7311893, int argc, object *args) /* object self_7311893, object r_733934 */
+ {
+- object r_734386 = args[0];
++ object r_733934 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313146)->elements[0], (((closure) ((closureN)self_7313146)->elements[0])->fn), memqp(data, ((closureN)self_7313146)->elements[1], r_734386));;
++return_direct_with_clo1(data, ((closureN)self_7311893)->elements[0], (((closure) ((closureN)self_7311893)->elements[0])->fn), memqp(data, ((closureN)self_7311893)->elements[1], r_733934));;
+ }
+
+-static void __lambda_103(void *data, object self_7313145, int argc, object *args) /* object self_7313145, object r_734378 */
++static void __lambda_103(void *data, object self_7311892, int argc, object *args) /* object self_7311892, object r_733926 */
+ {
+- object r_734378 = args[0];
+- if( (boolean_f != r_734378) ){
+- return_direct_with_clo1(data, ((closureN)self_7313145)->elements[0], (((closure) ((closureN)self_7313145)->elements[0])->fn), boolean_f);
++ object r_733926 = args[0];
++ if( (boolean_f != r_733926) ){
++ return_direct_with_clo1(data, ((closureN)self_7311892)->elements[0], (((closure) ((closureN)self_7311892)->elements[0])->fn), boolean_f);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313145)->elements[0], (((closure) ((closureN)self_7313145)->elements[0])->fn), boolean_t);}
++ return_direct_with_clo1(data, ((closureN)self_7311892)->elements[0], (((closure) ((closureN)self_7311892)->elements[0])->fn), boolean_t);}
+ ;;
+ }
+
+-static void __lambda_92(void *data, object self_7313147, int argc, object *args) /* object self_7313147, object r_734369 */
++static void __lambda_92(void *data, object self_7311894, int argc, object *args) /* object self_7311894, object r_733917 */
+ {
+- object r_734369 = args[0];
++ object r_733917 = args[0];
+
+-closureN_type c_7315059;
+-object e_7315155 [4];
+-c_7315059.hdr.mark = gc_color_red;
+- c_7315059.hdr.grayed = 0;
+-c_7315059.tag = closureN_tag;
+- c_7315059.fn = (function_type)__lambda_93;
+-c_7315059.num_args = 1;
+-c_7315059.num_elements = 4;
+-c_7315059.elements = (object *)e_7315155;
+-c_7315059.elements[0] = ((closureN)self_7313147)->elements[0];
+-c_7315059.elements[1] = ((closureN)self_7313147)->elements[1];
+-c_7315059.elements[2] = ((closureN)self_7313147)->elements[2];
+-c_7315059.elements[3] = ((closureN)self_7313147)->elements[3];
++closureN_type c_7313759;
++object e_7313855 [4];
++c_7313759.hdr.mark = gc_color_red;
++ c_7313759.hdr.grayed = 0;
++c_7313759.tag = closureN_tag;
++ c_7313759.fn = (function_type)__lambda_93;
++c_7313759.num_args = 1;
++c_7313759.num_elements = 4;
++c_7313759.elements = (object *)e_7313855;
++c_7313759.elements[0] = ((closureN)self_7311894)->elements[0];
++c_7313759.elements[1] = ((closureN)self_7311894)->elements[1];
++c_7313759.elements[2] = ((closureN)self_7311894)->elements[2];
++c_7313759.elements[3] = ((closureN)self_7311894)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315059,__lambda_93, Cyc_set_cell(data, ((closureN)self_7313147)->elements[0], r_734369));;
++return_direct_with_clo1(data,(closure)&c_7313759,__lambda_93, Cyc_set_cell(data, ((closureN)self_7311894)->elements[0], r_733917));;
+ }
+
+-static void __lambda_93(void *data, object self_7313148, int argc, object *args) /* object self_7313148, object r_734346 */
++static void __lambda_93(void *data, object self_7311895, int argc, object *args) /* object self_7311895, object r_733894 */
+ {
+
+
+-closureN_type c_7315061;
+-object e_7315151 [3];
+-c_7315061.hdr.mark = gc_color_red;
+- c_7315061.hdr.grayed = 0;
+-c_7315061.tag = closureN_tag;
+- c_7315061.fn = (function_type)__lambda_94;
+-c_7315061.num_args = 1;
+-c_7315061.num_elements = 3;
+-c_7315061.elements = (object *)e_7315151;
+-c_7315061.elements[0] = ((closureN)self_7313148)->elements[0];
+-c_7315061.elements[1] = ((closureN)self_7313148)->elements[2];
+-c_7315061.elements[2] = ((closureN)self_7313148)->elements[3];
++closureN_type c_7313761;
++object e_7313851 [3];
++c_7313761.hdr.mark = gc_color_red;
++ c_7313761.hdr.grayed = 0;
++c_7313761.tag = closureN_tag;
++ c_7313761.fn = (function_type)__lambda_94;
++c_7313761.num_args = 1;
++c_7313761.num_elements = 3;
++c_7313761.elements = (object *)e_7313851;
++c_7313761.elements[0] = ((closureN)self_7311895)->elements[0];
++c_7313761.elements[1] = ((closureN)self_7311895)->elements[2];
++c_7313761.elements[2] = ((closureN)self_7311895)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315061,__lambda_94, Cyc_cdr(data, ((closureN)self_7313148)->elements[1]));;
++return_direct_with_clo1(data,(closure)&c_7313761,__lambda_94, Cyc_cdr(data, ((closureN)self_7311895)->elements[1]));;
+ }
+
+-static void __lambda_94(void *data, object self_7313149, int argc, object *args) /* object self_7313149, object ls_73145_732947 */
++static void __lambda_94(void *data, object self_7311896, int argc, object *args) /* object self_7311896, object ls_73145_732600 */
+ {
+- object ls_73145_732947 = args[0];
++ object ls_73145_732600 = args[0];
+
+-closureN_type c_7315063;
+-object e_7315150 [4];
+-c_7315063.hdr.mark = gc_color_red;
+- c_7315063.hdr.grayed = 0;
+-c_7315063.tag = closureN_tag;
+- c_7315063.fn = (function_type)__lambda_95;
+-c_7315063.num_args = 1;
+-c_7315063.num_elements = 4;
+-c_7315063.elements = (object *)e_7315150;
+-c_7315063.elements[0] = ((closureN)self_7313149)->elements[0];
+-c_7315063.elements[1] = ((closureN)self_7313149)->elements[1];
+-c_7315063.elements[2] = ls_73145_732947;
+-c_7315063.elements[3] = ((closureN)self_7313149)->elements[2];
++closureN_type c_7313763;
++object e_7313850 [4];
++c_7313763.hdr.mark = gc_color_red;
++ c_7313763.hdr.grayed = 0;
++c_7313763.tag = closureN_tag;
++ c_7313763.fn = (function_type)__lambda_95;
++c_7313763.num_args = 1;
++c_7313763.num_elements = 4;
++c_7313763.elements = (object *)e_7313850;
++c_7313763.elements[0] = ((closureN)self_7311896)->elements[0];
++c_7313763.elements[1] = ((closureN)self_7311896)->elements[1];
++c_7313763.elements[2] = ls_73145_732600;
++c_7313763.elements[3] = ((closureN)self_7311896)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7315063,__lambda_95, boolean_f);;
++return_direct_with_clo1(data,(closure)&c_7313763,__lambda_95, boolean_f);;
+ }
+
+-static void __lambda_95(void *data, object self_7313150, int argc, object *args) /* object self_7313150, object expand_73146_732948 */
++static void __lambda_95(void *data, object self_7311897, int argc, object *args) /* object self_7311897, object expand_73146_732601 */
+ {
+- object expand_73146_732948 = args[0];
++ object expand_73146_732601 = args[0];
+
+-closureN_type c_7315065;
+-object e_7315146 [4];
+-c_7315065.hdr.mark = gc_color_red;
+- c_7315065.hdr.grayed = 0;
+-c_7315065.tag = closureN_tag;
+- c_7315065.fn = (function_type)__lambda_1348;
+-c_7315065.num_args = 1;
+-c_7315065.num_elements = 4;
+-c_7315065.elements = (object *)e_7315146;
+-c_7315065.elements[0] = ((closureN)self_7313150)->elements[0];
+-c_7315065.elements[1] = ((closureN)self_7313150)->elements[1];
+-c_7315065.elements[2] = ((closureN)self_7313150)->elements[2];
+-c_7315065.elements[3] = ((closureN)self_7313150)->elements[3];
++closureN_type c_7313765;
++object e_7313846 [4];
++c_7313765.hdr.mark = gc_color_red;
++ c_7313765.hdr.grayed = 0;
++c_7313765.tag = closureN_tag;
++ c_7313765.fn = (function_type)__lambda_1301;
++c_7313765.num_args = 1;
++c_7313765.num_elements = 4;
++c_7313765.elements = (object *)e_7313846;
++c_7313765.elements[0] = ((closureN)self_7311897)->elements[0];
++c_7313765.elements[1] = ((closureN)self_7311897)->elements[1];
++c_7313765.elements[2] = ((closureN)self_7311897)->elements[2];
++c_7313765.elements[3] = ((closureN)self_7311897)->elements[3];
+
+
+-pair_type local_7315149;
+-return_direct_with_clo1(data,(closure)&c_7315065,__lambda_1348, set_cell_as_expr(&local_7315149, expand_73146_732948));;
++pair_type local_7313849;
++return_direct_with_clo1(data,(closure)&c_7313765,__lambda_1301, set_cell_as_expr(&local_7313849, expand_73146_732601));;
+ }
+
+-static void __lambda_1348(void *data, object self_7313151, int argc, object *args) /* object self_7313151, object expand_73146_732948 */
++static void __lambda_1301(void *data, object self_7311898, int argc, object *args) /* object self_7311898, object expand_73146_732601 */
+ {
+- object expand_73146_732948 = args[0];
++ object expand_73146_732601 = args[0];
+
+-closureN_type c_7315067;
+-object e_7315080 [3];
+-c_7315067.hdr.mark = gc_color_red;
+- c_7315067.hdr.grayed = 0;
+-c_7315067.tag = closureN_tag;
+- c_7315067.fn = (function_type)__lambda_96;
+-c_7315067.num_args = 1;
+-c_7315067.num_elements = 3;
+-c_7315067.elements = (object *)e_7315080;
+-c_7315067.elements[0] = expand_73146_732948;
+-c_7315067.elements[1] = ((closureN)self_7313151)->elements[1];
+-c_7315067.elements[2] = ((closureN)self_7313151)->elements[2];
++closureN_type c_7313767;
++object e_7313780 [3];
++c_7313767.hdr.mark = gc_color_red;
++ c_7313767.hdr.grayed = 0;
++c_7313767.tag = closureN_tag;
++ c_7313767.fn = (function_type)__lambda_96;
++c_7313767.num_args = 1;
++c_7313767.num_elements = 3;
++c_7313767.elements = (object *)e_7313780;
++c_7313767.elements[0] = expand_73146_732601;
++c_7313767.elements[1] = ((closureN)self_7311898)->elements[1];
++c_7313767.elements[2] = ((closureN)self_7311898)->elements[2];
+
+
+-closureN_type c_7315081;
+-object e_7315145 [3];
+-c_7315081.hdr.mark = gc_color_red;
+- c_7315081.hdr.grayed = 0;
+-c_7315081.tag = closureN_tag;
+- c_7315081.fn = (function_type)__lambda_98;
+-c_7315081.num_args = 1;
+-c_7315081.num_elements = 3;
+-c_7315081.elements = (object *)e_7315145;
+-c_7315081.elements[0] = ((closureN)self_7313151)->elements[0];
+-c_7315081.elements[1] = expand_73146_732948;
+-c_7315081.elements[2] = ((closureN)self_7313151)->elements[3];
++closureN_type c_7313781;
++object e_7313845 [3];
++c_7313781.hdr.mark = gc_color_red;
++ c_7313781.hdr.grayed = 0;
++c_7313781.tag = closureN_tag;
++ c_7313781.fn = (function_type)__lambda_98;
++c_7313781.num_args = 1;
++c_7313781.num_elements = 3;
++c_7313781.elements = (object *)e_7313845;
++c_7313781.elements[0] = ((closureN)self_7311898)->elements[0];
++c_7313781.elements[1] = expand_73146_732601;
++c_7313781.elements[2] = ((closureN)self_7311898)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7315067,__lambda_96, &c_7315081);;
++return_direct_with_clo1(data,(closure)&c_7313767,__lambda_96, &c_7313781);;
+ }
+
+-static void __lambda_98(void *data, object self_7313152, int argc, object *args) /* object self_7313152, object k_734350, object ls_73147_732949 */
++static void __lambda_98(void *data, object self_7311899, int argc, object *args) /* object self_7311899, object k_733898, object ls_73147_732602 */
+ {
+- object k_734350 = args[0]; object ls_73147_732949 = args[1];
++ object k_733898 = args[0]; object ls_73147_732602 = args[1];
+
+-if( (boolean_f != Cyc_is_null(ls_73147_732949)) ){
++if( (boolean_f != Cyc_is_null(ls_73147_732602)) ){
+
+
+-return_direct_with_clo1(data, k_734350, (((closure) k_734350)->fn), Cyc_is_null(ls_73147_732949));
++return_direct_with_clo1(data, k_733898, (((closure) k_733898)->fn), Cyc_is_null(ls_73147_732602));
+ } else {
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_car(data, ls_73147_732949))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ls_73147_732602))) ){
+
+
+-if( (boolean_f != Cyc_eq(quote__else, Cyc_caar(data, ls_73147_732949))) ){
++if( (boolean_f != Cyc_eq(quote__else, Cyc_caar(data, ls_73147_732602))) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ls_73147_732949))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ls_73147_732602))) ){
+
+-make_utf8_string_with_len(c_7315100, "cond-expand: else in non-final position", 39, 39);
+-return_direct_with_clo2(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_734350, &c_7315100);
++make_utf8_string_with_len(c_7313800, "cond-expand: else in non-final position", 39, 39);
++return_direct_with_clo2(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_733898, &c_7313800);
+ } else {
+
+-closureN_type c_7315103;
+-object e_7315112 [2];
+-c_7315103.hdr.mark = gc_color_red;
+- c_7315103.hdr.grayed = 0;
+-c_7315103.tag = closureN_tag;
+- c_7315103.fn = (function_type)__lambda_99;
+-c_7315103.num_args = 1;
+-c_7315103.num_elements = 2;
+-c_7315103.elements = (object *)e_7315112;
+-c_7315103.elements[0] = k_734350;
+-c_7315103.elements[1] = ls_73147_732949;
++closureN_type c_7313803;
++object e_7313812 [2];
++c_7313803.hdr.mark = gc_color_red;
++ c_7313803.hdr.grayed = 0;
++c_7313803.tag = closureN_tag;
++ c_7313803.fn = (function_type)__lambda_99;
++c_7313803.num_args = 1;
++c_7313803.num_elements = 2;
++c_7313803.elements = (object *)e_7313812;
++c_7313803.elements[0] = k_733898;
++c_7313803.elements[1] = ls_73147_732602;
+
+-return_closcall2(data, ((closureN)self_7313152)->elements[2], &c_7315103, quote_begin);}
++return_closcall2(data, ((closureN)self_7311899)->elements[2], &c_7313803, quote_begin);}
+ ;
+ } else {
+
+
+
+-closureN_type c_7315117;
+-object e_7315138 [4];
+-c_7315117.hdr.mark = gc_color_red;
+- c_7315117.hdr.grayed = 0;
+-c_7315117.tag = closureN_tag;
+- c_7315117.fn = (function_type)__lambda_100;
+-c_7315117.num_args = 1;
+-c_7315117.num_elements = 4;
+-c_7315117.elements = (object *)e_7315138;
+-c_7315117.elements[0] = ((closureN)self_7313152)->elements[1];
+-c_7315117.elements[1] = k_734350;
+-c_7315117.elements[2] = ls_73147_732949;
+-c_7315117.elements[3] = ((closureN)self_7313152)->elements[2];
++closureN_type c_7313817;
++object e_7313838 [4];
++c_7313817.hdr.mark = gc_color_red;
++ c_7313817.hdr.grayed = 0;
++c_7313817.tag = closureN_tag;
++ c_7313817.fn = (function_type)__lambda_100;
++c_7313817.num_args = 1;
++c_7313817.num_elements = 4;
++c_7313817.elements = (object *)e_7313838;
++c_7313817.elements[0] = ((closureN)self_7311899)->elements[1];
++c_7313817.elements[1] = k_733898;
++c_7313817.elements[2] = ls_73147_732602;
++c_7313817.elements[3] = ((closureN)self_7311899)->elements[2];
+
+
+
+-return_closcall2(data, car(((closureN)self_7313152)->elements[0]), &c_7315117, Cyc_caar(data, ls_73147_732949));}
++return_closcall2(data, car(((closureN)self_7311899)->elements[0]), &c_7313817, Cyc_caar(data, ls_73147_732602));}
+ ;
+ } else {
+
+-make_utf8_string_with_len(c_7315142, "cond-expand: bad clause", 23, 23);
++make_utf8_string_with_len(c_7313842, "cond-expand: bad clause", 23, 23);
+
+
+-return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_734350, &c_7315142, Cyc_car(data, ls_73147_732949));}
++return_direct_with_clo3(data, __glo_error_scheme_base, (((closure) __glo_error_scheme_base)->fn), k_733898, &c_7313842, Cyc_car(data, ls_73147_732602));}
+ ;}
+ ;;
+ }
+
+-static void __lambda_100(void *data, object self_7313154, int argc, object *args) /* object self_7313154, object r_734359 */
++static void __lambda_100(void *data, object self_7311901, int argc, object *args) /* object self_7311901, object r_733907 */
+ {
+- object r_734359 = args[0];
+- if( (boolean_f != r_734359) ){
++ object r_733907 = args[0];
++ if( (boolean_f != r_733907) ){
+
+-closureN_type c_7315120;
+-object e_7315129 [2];
+-c_7315120.hdr.mark = gc_color_red;
+- c_7315120.hdr.grayed = 0;
+-c_7315120.tag = closureN_tag;
+- c_7315120.fn = (function_type)__lambda_101;
+-c_7315120.num_args = 1;
+-c_7315120.num_elements = 2;
+-c_7315120.elements = (object *)e_7315129;
+-c_7315120.elements[0] = ((closureN)self_7313154)->elements[1];
+-c_7315120.elements[1] = ((closureN)self_7313154)->elements[2];
++closureN_type c_7313820;
++object e_7313829 [2];
++c_7313820.hdr.mark = gc_color_red;
++ c_7313820.hdr.grayed = 0;
++c_7313820.tag = closureN_tag;
++ c_7313820.fn = (function_type)__lambda_101;
++c_7313820.num_args = 1;
++c_7313820.num_elements = 2;
++c_7313820.elements = (object *)e_7313829;
++c_7313820.elements[0] = ((closureN)self_7311901)->elements[1];
++c_7313820.elements[1] = ((closureN)self_7311901)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313154)->elements[3], &c_7315120, quote_begin);
++return_closcall2(data, ((closureN)self_7311901)->elements[3], &c_7313820, quote_begin);
+ } else {
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313154)->elements[0]), ((closureN)self_7313154)->elements[1], Cyc_cdr(data, ((closureN)self_7313154)->elements[2]));}
++return_closcall2(data, car(((closureN)self_7311901)->elements[0]), ((closureN)self_7311901)->elements[1], Cyc_cdr(data, ((closureN)self_7311901)->elements[2]));}
+ ;;
+ }
+
+-static void __lambda_101(void *data, object self_7313155, int argc, object *args) /* object self_7313155, object r_734360 */
++static void __lambda_101(void *data, object self_7311902, int argc, object *args) /* object self_7311902, object r_733908 */
+ {
+- object r_734360 = args[0];
++ object r_733908 = args[0];
+
+-pair_type local_7315125;
++pair_type local_7313825;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313155)->elements[0], (((closure) ((closureN)self_7313155)->elements[0])->fn), set_pair_as_expr(&local_7315125, r_734360, Cyc_cdar(data, ((closureN)self_7313155)->elements[1])));;
++return_direct_with_clo1(data, ((closureN)self_7311902)->elements[0], (((closure) ((closureN)self_7311902)->elements[0])->fn), set_pair_as_expr(&local_7313825, r_733908, Cyc_cdar(data, ((closureN)self_7311902)->elements[1])));;
+ }
+
+-static void __lambda_99(void *data, object self_7313153, int argc, object *args) /* object self_7313153, object r_734355 */
++static void __lambda_99(void *data, object self_7311900, int argc, object *args) /* object self_7311900, object r_733903 */
+ {
+- object r_734355 = args[0];
++ object r_733903 = args[0];
+
+-pair_type local_7315108;
++pair_type local_7313808;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313153)->elements[0], (((closure) ((closureN)self_7313153)->elements[0])->fn), set_pair_as_expr(&local_7315108, r_734355, Cyc_cdar(data, ((closureN)self_7313153)->elements[1])));;
++return_direct_with_clo1(data, ((closureN)self_7311900)->elements[0], (((closure) ((closureN)self_7311900)->elements[0])->fn), set_pair_as_expr(&local_7313808, r_733903, Cyc_cdar(data, ((closureN)self_7311900)->elements[1])));;
+ }
+
+-static void __lambda_96(void *data, object self_7313156, int argc, object *args) /* object self_7313156, object r_734349 */
++static void __lambda_96(void *data, object self_7311903, int argc, object *args) /* object self_7311903, object r_733897 */
+ {
+- object r_734349 = args[0];
++ object r_733897 = args[0];
+
+-closureN_type c_7315069;
+-object e_7315076 [3];
+-c_7315069.hdr.mark = gc_color_red;
+- c_7315069.hdr.grayed = 0;
+-c_7315069.tag = closureN_tag;
+- c_7315069.fn = (function_type)__lambda_97;
+-c_7315069.num_args = 1;
+-c_7315069.num_elements = 3;
+-c_7315069.elements = (object *)e_7315076;
+-c_7315069.elements[0] = ((closureN)self_7313156)->elements[0];
+-c_7315069.elements[1] = ((closureN)self_7313156)->elements[1];
+-c_7315069.elements[2] = ((closureN)self_7313156)->elements[2];
++closureN_type c_7313769;
++object e_7313776 [3];
++c_7313769.hdr.mark = gc_color_red;
++ c_7313769.hdr.grayed = 0;
++c_7313769.tag = closureN_tag;
++ c_7313769.fn = (function_type)__lambda_97;
++c_7313769.num_args = 1;
++c_7313769.num_elements = 3;
++c_7313769.elements = (object *)e_7313776;
++c_7313769.elements[0] = ((closureN)self_7311903)->elements[0];
++c_7313769.elements[1] = ((closureN)self_7311903)->elements[1];
++c_7313769.elements[2] = ((closureN)self_7311903)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7315069,__lambda_97, Cyc_set_cell(data, ((closureN)self_7313156)->elements[0], r_734349));;
++return_direct_with_clo1(data,(closure)&c_7313769,__lambda_97, Cyc_set_cell(data, ((closureN)self_7311903)->elements[0], r_733897));;
+ }
+
+-static void __lambda_97(void *data, object self_7313157, int argc, object *args) /* object self_7313157, object r_734348 */
++static void __lambda_97(void *data, object self_7311904, int argc, object *args) /* object self_7311904, object r_733896 */
+ {
+
+
+
+-return_closcall2(data, car(((closureN)self_7313157)->elements[0]), ((closureN)self_7313157)->elements[1], ((closureN)self_7313157)->elements[2]);;
++return_closcall2(data, car(((closureN)self_7311904)->elements[0]), ((closureN)self_7311904)->elements[1], ((closureN)self_7311904)->elements[2]);;
+ }
+
+-static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_734323, object exp_7373_732905, object rename_7374_732906, object compare_7375_732907 */
++static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_733871, object exp_7373_732558, object rename_7374_732559, object compare_7375_732560 */
+ {
+-object k_734323 = args[0]; object exp_7373_732905 = args[1];
++object k_733871 = args[0]; object exp_7373_732558 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:begin");
+
+-closureN_type c_7314952;
+-object e_7315032 [2];
+-c_7314952.hdr.mark = gc_color_red;
+- c_7314952.hdr.grayed = 0;
+-c_7314952.tag = closureN_tag;
+- c_7314952.fn = (function_type)__lambda_76;
+-c_7314952.num_args = 2;
+-c_7314952.num_elements = 2;
+-c_7314952.elements = (object *)e_7315032;
+-c_7314952.elements[0] = exp_7373_732905;
+-c_7314952.elements[1] = k_734323;
++closureN_type c_7313652;
++object e_7313732 [2];
++c_7313652.hdr.mark = gc_color_red;
++ c_7313652.hdr.grayed = 0;
++c_7313652.tag = closureN_tag;
++ c_7313652.fn = (function_type)__lambda_76;
++c_7313652.num_args = 2;
++c_7313652.num_elements = 2;
++c_7313652.elements = (object *)e_7313732;
++c_7313652.elements[0] = exp_7373_732558;
++c_7313652.elements[1] = k_733871;
+
+-return_direct_with_clo2(data,(closure)&c_7314952,__lambda_76, boolean_f, boolean_f);;
++return_direct_with_clo2(data,(closure)&c_7313652,__lambda_76, boolean_f, boolean_f);;
+ }
+
+-static void __lambda_76(void *data, object self_7313107, int argc, object *args) /* object self_7313107, object dummy_91bind_732910, object singlet_127_732911 */
++static void __lambda_76(void *data, object self_7311854, int argc, object *args) /* object self_7311854, object dummy_91bind_732563, object singlet_127_732564 */
+ {
+- object dummy_91bind_732910 = args[0]; object singlet_127_732911 = args[1];
++ object dummy_91bind_732563 = args[0]; object singlet_127_732564 = args[1];
+
+-closureN_type c_7314954;
+-object e_7315028 [3];
+-c_7314954.hdr.mark = gc_color_red;
+- c_7314954.hdr.grayed = 0;
+-c_7314954.tag = closureN_tag;
+- c_7314954.fn = (function_type)__lambda_1347;
+-c_7314954.num_args = 1;
+-c_7314954.num_elements = 3;
+-c_7314954.elements = (object *)e_7315028;
+-c_7314954.elements[0] = ((closureN)self_7313107)->elements[0];
+-c_7314954.elements[1] = ((closureN)self_7313107)->elements[1];
+-c_7314954.elements[2] = singlet_127_732911;
++closureN_type c_7313654;
++object e_7313728 [3];
++c_7313654.hdr.mark = gc_color_red;
++ c_7313654.hdr.grayed = 0;
++c_7313654.tag = closureN_tag;
++ c_7313654.fn = (function_type)__lambda_1300;
++c_7313654.num_args = 1;
++c_7313654.num_elements = 3;
++c_7313654.elements = (object *)e_7313728;
++c_7313654.elements[0] = ((closureN)self_7311854)->elements[0];
++c_7313654.elements[1] = ((closureN)self_7311854)->elements[1];
++c_7313654.elements[2] = singlet_127_732564;
+
+
+-pair_type local_7315031;
+-return_direct_with_clo1(data,(closure)&c_7314954,__lambda_1347, set_cell_as_expr(&local_7315031, dummy_91bind_732910));;
++pair_type local_7313731;
++return_direct_with_clo1(data,(closure)&c_7313654,__lambda_1300, set_cell_as_expr(&local_7313731, dummy_91bind_732563));;
+ }
+
+-static void __lambda_1347(void *data, object self_7313108, int argc, object *args) /* object self_7313108, object dummy_91bind_732910 */
++static void __lambda_1300(void *data, object self_7311855, int argc, object *args) /* object self_7311855, object dummy_91bind_732563 */
+ {
+- object dummy_91bind_732910 = args[0];
++ object dummy_91bind_732563 = args[0];
+
+-closureN_type c_7314956;
+-object e_7315023 [3];
+-c_7314956.hdr.mark = gc_color_red;
+- c_7314956.hdr.grayed = 0;
+-c_7314956.tag = closureN_tag;
+- c_7314956.fn = (function_type)__lambda_1346;
+-c_7314956.num_args = 1;
+-c_7314956.num_elements = 3;
+-c_7314956.elements = (object *)e_7315023;
+-c_7314956.elements[0] = dummy_91bind_732910;
+-c_7314956.elements[1] = ((closureN)self_7313108)->elements[0];
+-c_7314956.elements[2] = ((closureN)self_7313108)->elements[1];
++closureN_type c_7313656;
++object e_7313723 [3];
++c_7313656.hdr.mark = gc_color_red;
++ c_7313656.hdr.grayed = 0;
++c_7313656.tag = closureN_tag;
++ c_7313656.fn = (function_type)__lambda_1299;
++c_7313656.num_args = 1;
++c_7313656.num_elements = 3;
++c_7313656.elements = (object *)e_7313723;
++c_7313656.elements[0] = dummy_91bind_732563;
++c_7313656.elements[1] = ((closureN)self_7311855)->elements[0];
++c_7313656.elements[2] = ((closureN)self_7311855)->elements[1];
+
+
+-pair_type local_7315026;
+-return_direct_with_clo1(data,(closure)&c_7314956,__lambda_1346, set_cell_as_expr(&local_7315026, ((closureN)self_7313108)->elements[2]));;
++pair_type local_7313726;
++return_direct_with_clo1(data,(closure)&c_7313656,__lambda_1299, set_cell_as_expr(&local_7313726, ((closureN)self_7311855)->elements[2]));;
+ }
+
+-static void __lambda_1346(void *data, object self_7313109, int argc, object *args) /* object self_7313109, object singlet_127_732911 */
++static void __lambda_1299(void *data, object self_7311856, int argc, object *args) /* object self_7311856, object singlet_127_732564 */
+ {
+- object singlet_127_732911 = args[0];
++ object singlet_127_732564 = args[0];
+
+-closureN_type c_7314958;
+-object e_7315012 [4];
+-c_7314958.hdr.mark = gc_color_red;
+- c_7314958.hdr.grayed = 0;
+-c_7314958.tag = closureN_tag;
+- c_7314958.fn = (function_type)__lambda_77;
+-c_7314958.num_args = 1;
+-c_7314958.num_elements = 4;
+-c_7314958.elements = (object *)e_7315012;
+-c_7314958.elements[0] = ((closureN)self_7313109)->elements[0];
+-c_7314958.elements[1] = ((closureN)self_7313109)->elements[1];
+-c_7314958.elements[2] = ((closureN)self_7313109)->elements[2];
+-c_7314958.elements[3] = singlet_127_732911;
++closureN_type c_7313658;
++object e_7313712 [4];
++c_7313658.hdr.mark = gc_color_red;
++ c_7313658.hdr.grayed = 0;
++c_7313658.tag = closureN_tag;
++ c_7313658.fn = (function_type)__lambda_77;
++c_7313658.num_args = 1;
++c_7313658.num_elements = 4;
++c_7313658.elements = (object *)e_7313712;
++c_7313658.elements[0] = ((closureN)self_7311856)->elements[0];
++c_7313658.elements[1] = ((closureN)self_7311856)->elements[1];
++c_7313658.elements[2] = ((closureN)self_7311856)->elements[2];
++c_7313658.elements[3] = singlet_127_732564;
+
+
+-mmacro(c_7315013, (function_type)__lambda_83);c_7315013.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7314958,__lambda_77, &c_7315013);;
++mmacro(c_7313713, (function_type)__lambda_83);c_7313713.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313658,__lambda_77, &c_7313713);;
+ }
+
+-static void __lambda_83(void *data, object self_7313110, int argc, object *args) /* object self_7313110, object k_734337, object l_7376_732914 */
++static void __lambda_83(void *data, object self_7311857, int argc, object *args) /* object self_7311857, object k_733885, object l_7376_732567 */
+ {
+- object k_734337 = args[0]; object l_7376_732914 = args[1];
+- complex_num_type local_7315016;
++ object k_733885 = args[0]; object l_7376_732567 = args[1];
++ complex_num_type local_7313716;
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7315016, l_7376_732914)) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313716, l_7376_732567)) ){
+
+
+
+
+-return_direct_with_clo1(data, k_734337, (((closure) k_734337)->fn), Cyc_num_fast_eq_op(data, Cyc_length(data, l_7376_732914), obj_int2obj(1)));
++return_direct_with_clo1(data, k_733885, (((closure) k_733885)->fn), Cyc_num_fast_eq_op(data, Cyc_length(data, l_7376_732567), obj_int2obj(1)));
+ } else {
+- return_direct_with_clo1(data, k_734337, (((closure) k_734337)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_733885, (((closure) k_733885)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_77(void *data, object self_7313111, int argc, object *args) /* object self_7313111, object r_734336 */
++static void __lambda_77(void *data, object self_7311858, int argc, object *args) /* object self_7311858, object r_733884 */
+ {
+- object r_734336 = args[0];
++ object r_733884 = args[0];
+
+-closureN_type c_7314960;
+-object e_7315008 [4];
+-c_7314960.hdr.mark = gc_color_red;
+- c_7314960.hdr.grayed = 0;
+-c_7314960.tag = closureN_tag;
+- c_7314960.fn = (function_type)__lambda_78;
+-c_7314960.num_args = 1;
+-c_7314960.num_elements = 4;
+-c_7314960.elements = (object *)e_7315008;
+-c_7314960.elements[0] = ((closureN)self_7313111)->elements[0];
+-c_7314960.elements[1] = ((closureN)self_7313111)->elements[1];
+-c_7314960.elements[2] = ((closureN)self_7313111)->elements[2];
+-c_7314960.elements[3] = ((closureN)self_7313111)->elements[3];
++closureN_type c_7313660;
++object e_7313708 [4];
++c_7313660.hdr.mark = gc_color_red;
++ c_7313660.hdr.grayed = 0;
++c_7313660.tag = closureN_tag;
++ c_7313660.fn = (function_type)__lambda_78;
++c_7313660.num_args = 1;
++c_7313660.num_elements = 4;
++c_7313660.elements = (object *)e_7313708;
++c_7313660.elements[0] = ((closureN)self_7311858)->elements[0];
++c_7313660.elements[1] = ((closureN)self_7311858)->elements[1];
++c_7313660.elements[2] = ((closureN)self_7311858)->elements[2];
++c_7313660.elements[3] = ((closureN)self_7311858)->elements[3];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314960,__lambda_78, Cyc_set_cell(data, ((closureN)self_7313111)->elements[3], r_734336));;
++return_direct_with_clo1(data,(closure)&c_7313660,__lambda_78, Cyc_set_cell(data, ((closureN)self_7311858)->elements[3], r_733884));;
+ }
+
+-static void __lambda_78(void *data, object self_7313112, int argc, object *args) /* object self_7313112, object r_734324 */
++static void __lambda_78(void *data, object self_7311859, int argc, object *args) /* object self_7311859, object r_733872 */
+ {
+
+
+-closureN_type c_7314962;
+-object e_7314977 [3];
+-c_7314962.hdr.mark = gc_color_red;
+- c_7314962.hdr.grayed = 0;
+-c_7314962.tag = closureN_tag;
+- c_7314962.fn = (function_type)__lambda_79;
+-c_7314962.num_args = 1;
+-c_7314962.num_elements = 3;
+-c_7314962.elements = (object *)e_7314977;
+-c_7314962.elements[0] = ((closureN)self_7313112)->elements[0];
+-c_7314962.elements[1] = ((closureN)self_7313112)->elements[1];
+-c_7314962.elements[2] = ((closureN)self_7313112)->elements[2];
++closureN_type c_7313662;
++object e_7313677 [3];
++c_7313662.hdr.mark = gc_color_red;
++ c_7313662.hdr.grayed = 0;
++c_7313662.tag = closureN_tag;
++ c_7313662.fn = (function_type)__lambda_79;
++c_7313662.num_args = 1;
++c_7313662.num_elements = 3;
++c_7313662.elements = (object *)e_7313677;
++c_7313662.elements[0] = ((closureN)self_7311859)->elements[0];
++c_7313662.elements[1] = ((closureN)self_7311859)->elements[1];
++c_7313662.elements[2] = ((closureN)self_7311859)->elements[2];
+
+
+-closureN_type c_7314978;
+-object e_7315007 [1];
+-c_7314978.hdr.mark = gc_color_red;
+- c_7314978.hdr.grayed = 0;
+-c_7314978.tag = closureN_tag;
+- c_7314978.fn = (function_type)__lambda_81;
+-c_7314978.num_args = 1;
+-c_7314978.num_elements = 1;
+-c_7314978.elements = (object *)e_7315007;
+-c_7314978.elements[0] = ((closureN)self_7313112)->elements[3];
++closureN_type c_7313678;
++object e_7313707 [1];
++c_7313678.hdr.mark = gc_color_red;
++ c_7313678.hdr.grayed = 0;
++c_7313678.tag = closureN_tag;
++ c_7313678.fn = (function_type)__lambda_81;
++c_7313678.num_args = 1;
++c_7313678.num_elements = 1;
++c_7313678.elements = (object *)e_7313707;
++c_7313678.elements[0] = ((closureN)self_7311859)->elements[3];
+
+-return_direct_with_clo1(data,(closure)&c_7314962,__lambda_79, &c_7314978);;
++return_direct_with_clo1(data,(closure)&c_7313662,__lambda_79, &c_7313678);;
+ }
+
+-static void __lambda_81(void *data, object self_7313113, int argc, object *args) /* object self_7313113, object k_734328, object exps_7378_732915 */
++static void __lambda_81(void *data, object self_7311860, int argc, object *args) /* object self_7311860, object k_733876, object exps_7378_732568 */
+ {
+- object k_734328 = args[0]; object exps_7378_732915 = args[1];
++ object k_733876 = args[0]; object exps_7378_732568 = args[1];
+
+
+
+-closureN_type c_7314983;
+-object e_7315006 [2];
+-c_7314983.hdr.mark = gc_color_red;
+- c_7314983.hdr.grayed = 0;
+-c_7314983.tag = closureN_tag;
+- c_7314983.fn = (function_type)__lambda_82;
+-c_7314983.num_args = 1;
+-c_7314983.num_elements = 2;
+-c_7314983.elements = (object *)e_7315006;
+-c_7314983.elements[0] = exps_7378_732915;
+-c_7314983.elements[1] = k_734328;
++closureN_type c_7313683;
++object e_7313706 [2];
++c_7313683.hdr.mark = gc_color_red;
++ c_7313683.hdr.grayed = 0;
++c_7313683.tag = closureN_tag;
++ c_7313683.fn = (function_type)__lambda_82;
++c_7313683.num_args = 1;
++c_7313683.num_elements = 2;
++c_7313683.elements = (object *)e_7313706;
++c_7313683.elements[0] = exps_7378_732568;
++c_7313683.elements[1] = k_733876;
+
+-return_closcall2(data, car(((closureN)self_7313113)->elements[0]), &c_7314983, exps_7378_732915);;
++return_closcall2(data, car(((closureN)self_7311860)->elements[0]), &c_7313683, exps_7378_732568);;
+ }
+
+-static void __lambda_82(void *data, object self_7313114, int argc, object *args) /* object self_7313114, object r_734329 */
++static void __lambda_82(void *data, object self_7311861, int argc, object *args) /* object self_7311861, object r_733877 */
+ {
+- object r_734329 = args[0];
+- if( (boolean_f != r_734329) ){
++ object r_733877 = args[0];
++ if( (boolean_f != r_733877) ){
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313114)->elements[1], (((closure) ((closureN)self_7313114)->elements[1])->fn), Cyc_car(data, ((closureN)self_7313114)->elements[0]));
++return_direct_with_clo1(data, ((closureN)self_7311861)->elements[1], (((closure) ((closureN)self_7311861)->elements[1])->fn), Cyc_car(data, ((closureN)self_7311861)->elements[0]));
+ } else {
+
+-if( (boolean_f != Cyc_is_pair(((closureN)self_7313114)->elements[0])) ){
++if( (boolean_f != Cyc_is_pair(((closureN)self_7311861)->elements[0])) ){
+
+-pair_type local_7314996;
++pair_type local_7313696;
+
+-pair_type local_7314999;
++pair_type local_7313699;
+
+-pair_type local_7315002;
+-return_direct_with_clo1(data, ((closureN)self_7313114)->elements[1], (((closure) ((closureN)self_7313114)->elements[1])->fn), set_pair_as_expr(&local_7314996, set_pair_as_expr(&local_7314999, quote_lambda, set_pair_as_expr(&local_7315002, NULL, ((closureN)self_7313114)->elements[0])), NULL));
++pair_type local_7313702;
++return_direct_with_clo1(data, ((closureN)self_7311861)->elements[1], (((closure) ((closureN)self_7311861)->elements[1])->fn), set_pair_as_expr(&local_7313696, set_pair_as_expr(&local_7313699, quote_lambda, set_pair_as_expr(&local_7313702, NULL, ((closureN)self_7311861)->elements[0])), NULL));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313114)->elements[1], (((closure) ((closureN)self_7313114)->elements[1])->fn), boolean_f);}
++ return_direct_with_clo1(data, ((closureN)self_7311861)->elements[1], (((closure) ((closureN)self_7311861)->elements[1])->fn), boolean_f);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_79(void *data, object self_7313115, int argc, object *args) /* object self_7313115, object r_734327 */
++static void __lambda_79(void *data, object self_7311862, int argc, object *args) /* object self_7311862, object r_733875 */
+ {
+- object r_734327 = args[0];
++ object r_733875 = args[0];
+
+-closureN_type c_7314964;
+-object e_7314973 [3];
+-c_7314964.hdr.mark = gc_color_red;
+- c_7314964.hdr.grayed = 0;
+-c_7314964.tag = closureN_tag;
+- c_7314964.fn = (function_type)__lambda_80;
+-c_7314964.num_args = 1;
+-c_7314964.num_elements = 3;
+-c_7314964.elements = (object *)e_7314973;
+-c_7314964.elements[0] = ((closureN)self_7313115)->elements[0];
+-c_7314964.elements[1] = ((closureN)self_7313115)->elements[1];
+-c_7314964.elements[2] = ((closureN)self_7313115)->elements[2];
++closureN_type c_7313664;
++object e_7313673 [3];
++c_7313664.hdr.mark = gc_color_red;
++ c_7313664.hdr.grayed = 0;
++c_7313664.tag = closureN_tag;
++ c_7313664.fn = (function_type)__lambda_80;
++c_7313664.num_args = 1;
++c_7313664.num_elements = 3;
++c_7313664.elements = (object *)e_7313673;
++c_7313664.elements[0] = ((closureN)self_7311862)->elements[0];
++c_7313664.elements[1] = ((closureN)self_7311862)->elements[1];
++c_7313664.elements[2] = ((closureN)self_7311862)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314964,__lambda_80, Cyc_set_cell(data, ((closureN)self_7313115)->elements[0], r_734327));;
++return_direct_with_clo1(data,(closure)&c_7313664,__lambda_80, Cyc_set_cell(data, ((closureN)self_7311862)->elements[0], r_733875));;
+ }
+
+-static void __lambda_80(void *data, object self_7313116, int argc, object *args) /* object self_7313116, object r_734325 */
++static void __lambda_80(void *data, object self_7311863, int argc, object *args) /* object self_7311863, object r_733873 */
+ {
+
+
+
+
+
+-return_closcall2(data, car(((closureN)self_7313116)->elements[0]), ((closureN)self_7313116)->elements[2], Cyc_cdr(data, ((closureN)self_7313116)->elements[1]));;
++return_closcall2(data, car(((closureN)self_7311863)->elements[0]), ((closureN)self_7311863)->elements[2], Cyc_cdr(data, ((closureN)self_7311863)->elements[1]));;
+ }
+
+-static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_734292, object exp_7346_732892, object rename_7347_732893, object compare_7348_732894 */
++static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_733840, object exp_7346_732545, object rename_7347_732546, object compare_7348_732547 */
+ {
+-object k_734292 = args[0]; object exp_7346_732892 = args[1];
++object k_733840 = args[0]; object exp_7346_732545 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:letrec");
+
+-closureN_type c_7314858;
+-object e_7314861 [1];
+-c_7314858.hdr.mark = gc_color_red;
+- c_7314858.hdr.grayed = 0;
+-c_7314858.tag = closureN_tag;
+- c_7314858.fn = (function_type)__lambda_59;
+-c_7314858.num_args = 1;
+-c_7314858.num_elements = 1;
+-c_7314858.elements = (object *)e_7314861;
+-c_7314858.elements[0] = k_734292;
++closureN_type c_7313558;
++object e_7313561 [1];
++c_7313558.hdr.mark = gc_color_red;
++ c_7313558.hdr.grayed = 0;
++c_7313558.tag = closureN_tag;
++ c_7313558.fn = (function_type)__lambda_59;
++c_7313558.num_args = 1;
++c_7313558.num_elements = 1;
++c_7313558.elements = (object *)e_7313561;
++c_7313558.elements[0] = k_733840;
+
+
+-closureN_type c_7314862;
+-object e_7314949 [1];
+-c_7314862.hdr.mark = gc_color_red;
+- c_7314862.hdr.grayed = 0;
+-c_7314862.tag = closureN_tag;
+- c_7314862.fn = (function_type)__lambda_60;
+-c_7314862.num_args = 1;
+-c_7314862.num_elements = 1;
+-c_7314862.elements = (object *)e_7314949;
+-c_7314862.elements[0] = exp_7346_732892;
++closureN_type c_7313562;
++object e_7313649 [1];
++c_7313562.hdr.mark = gc_color_red;
++ c_7313562.hdr.grayed = 0;
++c_7313562.tag = closureN_tag;
++ c_7313562.fn = (function_type)__lambda_60;
++c_7313562.num_args = 1;
++c_7313562.num_elements = 1;
++c_7313562.elements = (object *)e_7313649;
++c_7313562.elements[0] = exp_7346_732545;
+
+-return_direct_with_clo1(data,(closure)&c_7314858,__lambda_59, &c_7314862);;
++return_direct_with_clo1(data,(closure)&c_7313558,__lambda_59, &c_7313562);;
+ }
+
+-static void __lambda_60(void *data, object self_7313091, int argc, object *args) /* object self_7313091, object k_734294, object k_7349_732895 */
++static void __lambda_60(void *data, object self_7311838, int argc, object *args) /* object self_7311838, object k_733842, object k_7349_732548 */
+ {
+- object k_734294 = args[0]; object k_7349_732895 = args[1];
++ object k_733842 = args[0]; object k_7349_732548 = args[1];
+
+-closureN_type c_7314864;
+-object e_7314937 [2];
+-c_7314864.hdr.mark = gc_color_red;
+- c_7314864.hdr.grayed = 0;
+-c_7314864.tag = closureN_tag;
+- c_7314864.fn = (function_type)__lambda_61;
+-c_7314864.num_args = 1;
+-c_7314864.num_elements = 2;
+-c_7314864.elements = (object *)e_7314937;
+-c_7314864.elements[0] = ((closureN)self_7313091)->elements[0];
+-c_7314864.elements[1] = k_734294;
++closureN_type c_7313564;
++object e_7313637 [2];
++c_7313564.hdr.mark = gc_color_red;
++ c_7313564.hdr.grayed = 0;
++c_7313564.tag = closureN_tag;
++ c_7313564.fn = (function_type)__lambda_61;
++c_7313564.num_args = 1;
++c_7313564.num_elements = 2;
++c_7313564.elements = (object *)e_7313637;
++c_7313564.elements[0] = ((closureN)self_7311838)->elements[0];
++c_7313564.elements[1] = k_733842;
+
+
+-closureN_type c_7314938;
+-object e_7314948 [2];
+-c_7314938.hdr.mark = gc_color_red;
+- c_7314938.hdr.grayed = 0;
+-c_7314938.tag = closureN_tag;
+- c_7314938.fn = (function_type)__lambda_73;
+-c_7314938.num_args = 1;
+-c_7314938.num_elements = 2;
+-c_7314938.elements = (object *)e_7314948;
+-c_7314938.elements[0] = ((closureN)self_7313091)->elements[0];
+-c_7314938.elements[1] = k_7349_732895;
++closureN_type c_7313638;
++object e_7313648 [2];
++c_7313638.hdr.mark = gc_color_red;
++ c_7313638.hdr.grayed = 0;
++c_7313638.tag = closureN_tag;
++ c_7313638.fn = (function_type)__lambda_73;
++c_7313638.num_args = 1;
++c_7313638.num_elements = 2;
++c_7313638.elements = (object *)e_7313648;
++c_7313638.elements[0] = ((closureN)self_7311838)->elements[0];
++c_7313638.elements[1] = k_7349_732548;
+
+-return_direct_with_clo1(data,(closure)&c_7314864,__lambda_61, &c_7314938);;
++return_direct_with_clo1(data,(closure)&c_7313564,__lambda_61, &c_7313638);;
+ }
+
+-static void __lambda_73(void *data, object self_7313092, int argc, object *args) /* object self_7313092, object k_734319, object obj_7350_732896 */
++static void __lambda_73(void *data, object self_7311839, int argc, object *args) /* object self_7311839, object k_733867, object obj_7350_732549 */
+ {
+- object k_734319 = args[0];
++ object k_733867 = args[0];
+
+-closureN_type c_7314941;
+-object e_7314945 [2];
+-c_7314941.hdr.mark = gc_color_red;
+- c_7314941.hdr.grayed = 0;
+-c_7314941.tag = closureN_tag;
+- c_7314941.fn = (function_type)__lambda_74;
+-c_7314941.num_args = 1;
+-c_7314941.num_elements = 2;
+-c_7314941.elements = (object *)e_7314945;
+-c_7314941.elements[0] = k_734319;
+-c_7314941.elements[1] = ((closureN)self_7313092)->elements[1];
++closureN_type c_7313641;
++object e_7313645 [2];
++c_7313641.hdr.mark = gc_color_red;
++ c_7313641.hdr.grayed = 0;
++c_7313641.tag = closureN_tag;
++ c_7313641.fn = (function_type)__lambda_74;
++c_7313641.num_args = 1;
++c_7313641.num_elements = 2;
++c_7313641.elements = (object *)e_7313645;
++c_7313641.elements[0] = k_733867;
++c_7313641.elements[1] = ((closureN)self_7311839)->elements[1];
+
+
+-make_utf8_string_with_len(c_7314946, "unable to expand letrec", 23, 23);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7314941, &c_7314946, ((closureN)self_7313092)->elements[0]);;;
++make_utf8_string_with_len(c_7313646, "unable to expand letrec", 23, 23);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), &c_7313641, &c_7313646, ((closureN)self_7311839)->elements[0]);;;
+ }
+
+-static void __lambda_74(void *data, object self_7313093, int argc, object *args) /* object self_7313093, object r_734320 */
++static void __lambda_74(void *data, object self_7311840, int argc, object *args) /* object self_7311840, object r_733868 */
+ {
+- object r_734320 = args[0];
+- return_closcall2(data, ((closureN)self_7313093)->elements[1], ((closureN)self_7313093)->elements[0], r_734320);;
++ object r_733868 = args[0];
++ return_closcall2(data, ((closureN)self_7311840)->elements[1], ((closureN)self_7311840)->elements[0], r_733868);;
+ }
+
+-static void __lambda_61(void *data, object self_7313094, int argc, object *args) /* object self_7313094, object r_734295 */
++static void __lambda_61(void *data, object self_7311841, int argc, object *args) /* object self_7311841, object r_733843 */
+ {
+- object r_734295 = args[0];
++ object r_733843 = args[0];
+
+-closureN_type c_7314866;
+-object e_7314870 [2];
+-c_7314866.hdr.mark = gc_color_red;
+- c_7314866.hdr.grayed = 0;
+-c_7314866.tag = closureN_tag;
+- c_7314866.fn = (function_type)__lambda_62;
+-c_7314866.num_args = 1;
+-c_7314866.num_elements = 2;
+-c_7314866.elements = (object *)e_7314870;
+-c_7314866.elements[0] = ((closureN)self_7313094)->elements[1];
+-c_7314866.elements[1] = r_734295;
++closureN_type c_7313566;
++object e_7313570 [2];
++c_7313566.hdr.mark = gc_color_red;
++ c_7313566.hdr.grayed = 0;
++c_7313566.tag = closureN_tag;
++ c_7313566.fn = (function_type)__lambda_62;
++c_7313566.num_args = 1;
++c_7313566.num_elements = 2;
++c_7313566.elements = (object *)e_7313570;
++c_7313566.elements[0] = ((closureN)self_7311841)->elements[1];
++c_7313566.elements[1] = r_733843;
+
+
+-closureN_type c_7314871;
+-object e_7314936 [1];
+-c_7314871.hdr.mark = gc_color_red;
+- c_7314871.hdr.grayed = 0;
+-c_7314871.tag = closureN_tag;
+- c_7314871.fn = (function_type)__lambda_63;
+-c_7314871.num_args = 0;
+-c_7314871.num_elements = 1;
+-c_7314871.elements = (object *)e_7314936;
+-c_7314871.elements[0] = ((closureN)self_7313094)->elements[0];
++closureN_type c_7313571;
++object e_7313636 [1];
++c_7313571.hdr.mark = gc_color_red;
++ c_7313571.hdr.grayed = 0;
++c_7313571.tag = closureN_tag;
++ c_7313571.fn = (function_type)__lambda_63;
++c_7313571.num_args = 0;
++c_7313571.num_elements = 1;
++c_7313571.elements = (object *)e_7313636;
++c_7313571.elements[0] = ((closureN)self_7311841)->elements[0];
+
+-return_direct_with_clo1(data,(closure)&c_7314866,__lambda_62, &c_7314871);;
++return_direct_with_clo1(data,(closure)&c_7313566,__lambda_62, &c_7313571);;
+ }
+
+-static void __lambda_63(void *data, object self_7313095, int argc, object *args) /* object self_7313095, object k_734297 */
++static void __lambda_63(void *data, object self_7311842, int argc, object *args) /* object self_7311842, object k_733845 */
+ {
+- object k_734297 = args[0];
++ object k_733845 = args[0];
+
+-closureN_type c_7314873;
+-object e_7314928 [2];
+-c_7314873.hdr.mark = gc_color_red;
+- c_7314873.hdr.grayed = 0;
+-c_7314873.tag = closureN_tag;
+- c_7314873.fn = (function_type)__lambda_64;
+-c_7314873.num_args = 1;
+-c_7314873.num_elements = 2;
+-c_7314873.elements = (object *)e_7314928;
+-c_7314873.elements[0] = ((closureN)self_7313095)->elements[0];
+-c_7314873.elements[1] = k_734297;
++closureN_type c_7313573;
++object e_7313628 [2];
++c_7313573.hdr.mark = gc_color_red;
++ c_7313573.hdr.grayed = 0;
++c_7313573.tag = closureN_tag;
++ c_7313573.fn = (function_type)__lambda_64;
++c_7313573.num_args = 1;
++c_7313573.num_elements = 2;
++c_7313573.elements = (object *)e_7313628;
++c_7313573.elements[0] = ((closureN)self_7311842)->elements[0];
++c_7313573.elements[1] = k_733845;
+
+
+-mmacro(c_7314929, (function_type)__lambda_72);c_7314929.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7314873,__lambda_64, &c_7314929);;
++mmacro(c_7313629, (function_type)__lambda_72);c_7313629.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313573,__lambda_64, &c_7313629);;
+ }
+
+-static void __lambda_72(void *data, object self_7313096, int argc, object *args) /* object self_7313096, object k_734317, object b_7372_732904 */
++static void __lambda_72(void *data, object self_7311843, int argc, object *args) /* object self_7311843, object k_733865, object b_7372_732557 */
+ {
+- object k_734317 = args[0]; object b_7372_732904 = args[1];
++ object k_733865 = args[0]; object b_7372_732557 = args[1];
+
+-list_2_type local_7314933;
++list_2_type local_7313633;
+
+
+-return_direct_with_clo1(data, k_734317, (((closure) k_734317)->fn), Cyc_fast_list_2(&local_7314933, Cyc_car(data, b_7372_732904), boolean_f));;
++return_direct_with_clo1(data, k_733865, (((closure) k_733865)->fn), Cyc_fast_list_2(&local_7313633, Cyc_car(data, b_7372_732557), boolean_f));;
+ }
+
+-static void __lambda_64(void *data, object self_7313097, int argc, object *args) /* object self_7313097, object r_734316 */
++static void __lambda_64(void *data, object self_7311844, int argc, object *args) /* object self_7311844, object r_733864 */
+ {
+- object r_734316 = args[0];
++ object r_733864 = args[0];
+
+-closureN_type c_7314875;
+-object e_7314924 [2];
+-c_7314875.hdr.mark = gc_color_red;
+- c_7314875.hdr.grayed = 0;
+-c_7314875.tag = closureN_tag;
+- c_7314875.fn = (function_type)__lambda_65;
+-c_7314875.num_args = 1;
+-c_7314875.num_elements = 2;
+-c_7314875.elements = (object *)e_7314924;
+-c_7314875.elements[0] = ((closureN)self_7313097)->elements[0];
+-c_7314875.elements[1] = ((closureN)self_7313097)->elements[1];
++closureN_type c_7313575;
++object e_7313624 [2];
++c_7313575.hdr.mark = gc_color_red;
++ c_7313575.hdr.grayed = 0;
++c_7313575.tag = closureN_tag;
++ c_7313575.fn = (function_type)__lambda_65;
++c_7313575.num_args = 1;
++c_7313575.num_elements = 2;
++c_7313575.elements = (object *)e_7313624;
++c_7313575.elements[0] = ((closureN)self_7311844)->elements[0];
++c_7313575.elements[1] = ((closureN)self_7311844)->elements[1];
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314875, r_734316, Cyc_cadr(data, ((closureN)self_7313097)->elements[0]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313575, r_733864, Cyc_cadr(data, ((closureN)self_7311844)->elements[0]));;
+ }
+
+-static void __lambda_65(void *data, object self_7313098, int argc, object *args) /* object self_7313098, object namings_7357_732899 */
++static void __lambda_65(void *data, object self_7311845, int argc, object *args) /* object self_7311845, object namings_7357_732552 */
+ {
+- object namings_7357_732899 = args[0];
++ object namings_7357_732552 = args[0];
+
+-closureN_type c_7314877;
+-object e_7314920 [3];
+-c_7314877.hdr.mark = gc_color_red;
+- c_7314877.hdr.grayed = 0;
+-c_7314877.tag = closureN_tag;
+- c_7314877.fn = (function_type)__lambda_66;
+-c_7314877.num_args = 1;
+-c_7314877.num_elements = 3;
+-c_7314877.elements = (object *)e_7314920;
+-c_7314877.elements[0] = ((closureN)self_7313098)->elements[0];
+-c_7314877.elements[1] = ((closureN)self_7313098)->elements[1];
+-c_7314877.elements[2] = namings_7357_732899;
++closureN_type c_7313577;
++object e_7313620 [3];
++c_7313577.hdr.mark = gc_color_red;
++ c_7313577.hdr.grayed = 0;
++c_7313577.tag = closureN_tag;
++ c_7313577.fn = (function_type)__lambda_66;
++c_7313577.num_args = 1;
++c_7313577.num_elements = 3;
++c_7313577.elements = (object *)e_7313620;
++c_7313577.elements[0] = ((closureN)self_7311845)->elements[0];
++c_7313577.elements[1] = ((closureN)self_7311845)->elements[1];
++c_7313577.elements[2] = namings_7357_732552;
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314877, primitive_car, Cyc_cadr(data, ((closureN)self_7313098)->elements[0]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313577, primitive_car, Cyc_cadr(data, ((closureN)self_7311845)->elements[0]));;
+ }
+
+-static void __lambda_66(void *data, object self_7313099, int argc, object *args) /* object self_7313099, object names_7360_732900 */
++static void __lambda_66(void *data, object self_7311846, int argc, object *args) /* object self_7311846, object names_7360_732553 */
+ {
+
+
+-closureN_type c_7314879;
+-object e_7314914 [3];
+-c_7314879.hdr.mark = gc_color_red;
+- c_7314879.hdr.grayed = 0;
+-c_7314879.tag = closureN_tag;
+- c_7314879.fn = (function_type)__lambda_67;
+-c_7314879.num_args = 1;
+-c_7314879.num_elements = 3;
+-c_7314879.elements = (object *)e_7314914;
+-c_7314879.elements[0] = ((closureN)self_7313099)->elements[0];
+-c_7314879.elements[1] = ((closureN)self_7313099)->elements[1];
+-c_7314879.elements[2] = ((closureN)self_7313099)->elements[2];
++closureN_type c_7313579;
++object e_7313614 [3];
++c_7313579.hdr.mark = gc_color_red;
++ c_7313579.hdr.grayed = 0;
++c_7313579.tag = closureN_tag;
++ c_7313579.fn = (function_type)__lambda_67;
++c_7313579.num_args = 1;
++c_7313579.num_elements = 3;
++c_7313579.elements = (object *)e_7313614;
++c_7313579.elements[0] = ((closureN)self_7311846)->elements[0];
++c_7313579.elements[1] = ((closureN)self_7311846)->elements[1];
++c_7313579.elements[2] = ((closureN)self_7311846)->elements[2];
+
+
+-mmacro(c_7314915, (function_type)__lambda_71);c_7314915.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7314879,__lambda_67, &c_7314915);;
++mmacro(c_7313615, (function_type)__lambda_71);c_7313615.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313579,__lambda_67, &c_7313615);;
+ }
+
+-static void __lambda_71(void *data, object self_7313100, int argc, object *args) /* object self_7313100, object k_734313, object binding_7371_732903 */
++static void __lambda_71(void *data, object self_7311847, int argc, object *args) /* object self_7311847, object k_733861, object binding_7371_732556 */
+ {
+- object k_734313 = args[0]; object binding_7371_732903 = args[1];
++ object k_733861 = args[0]; object binding_7371_732556 = args[1];
+
+-pair_type local_7314919;
+-return_direct_with_clo1(data, k_734313, (((closure) k_734313)->fn), set_pair_as_expr(&local_7314919, quote_set_67, binding_7371_732903));;
++pair_type local_7313619;
++return_direct_with_clo1(data, k_733861, (((closure) k_733861)->fn), set_pair_as_expr(&local_7313619, quote_set_67, binding_7371_732556));;
+ }
+
+-static void __lambda_67(void *data, object self_7313101, int argc, object *args) /* object self_7313101, object r_734312 */
++static void __lambda_67(void *data, object self_7311848, int argc, object *args) /* object self_7311848, object r_733860 */
+ {
+- object r_734312 = args[0];
++ object r_733860 = args[0];
+
+-closureN_type c_7314881;
+-object e_7314910 [3];
+-c_7314881.hdr.mark = gc_color_red;
+- c_7314881.hdr.grayed = 0;
+-c_7314881.tag = closureN_tag;
+- c_7314881.fn = (function_type)__lambda_68;
+-c_7314881.num_args = 1;
+-c_7314881.num_elements = 3;
+-c_7314881.elements = (object *)e_7314910;
+-c_7314881.elements[0] = ((closureN)self_7313101)->elements[0];
+-c_7314881.elements[1] = ((closureN)self_7313101)->elements[1];
+-c_7314881.elements[2] = ((closureN)self_7313101)->elements[2];
++closureN_type c_7313581;
++object e_7313610 [3];
++c_7313581.hdr.mark = gc_color_red;
++ c_7313581.hdr.grayed = 0;
++c_7313581.tag = closureN_tag;
++ c_7313581.fn = (function_type)__lambda_68;
++c_7313581.num_args = 1;
++c_7313581.num_elements = 3;
++c_7313581.elements = (object *)e_7313610;
++c_7313581.elements[0] = ((closureN)self_7311848)->elements[0];
++c_7313581.elements[1] = ((closureN)self_7311848)->elements[1];
++c_7313581.elements[2] = ((closureN)self_7311848)->elements[2];
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314881, r_734312, Cyc_cadr(data, ((closureN)self_7313101)->elements[0]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313581, r_733860, Cyc_cadr(data, ((closureN)self_7311848)->elements[0]));;
+ }
+
+-static void __lambda_68(void *data, object self_7313102, int argc, object *args) /* object self_7313102, object sets_7363_732901 */
++static void __lambda_68(void *data, object self_7311849, int argc, object *args) /* object self_7311849, object sets_7363_732554 */
+ {
+- object sets_7363_732901 = args[0];
++ object sets_7363_732554 = args[0];
+
+-closureN_type c_7314883;
+-object e_7314906 [4];
+-c_7314883.hdr.mark = gc_color_red;
+- c_7314883.hdr.grayed = 0;
+-c_7314883.tag = closureN_tag;
+- c_7314883.fn = (function_type)__lambda_69;
+-c_7314883.num_args = 1;
+-c_7314883.num_elements = 4;
+-c_7314883.elements = (object *)e_7314906;
+-c_7314883.elements[0] = ((closureN)self_7313102)->elements[0];
+-c_7314883.elements[1] = ((closureN)self_7313102)->elements[1];
+-c_7314883.elements[2] = ((closureN)self_7313102)->elements[2];
+-c_7314883.elements[3] = sets_7363_732901;
++closureN_type c_7313583;
++object e_7313606 [4];
++c_7313583.hdr.mark = gc_color_red;
++ c_7313583.hdr.grayed = 0;
++c_7313583.tag = closureN_tag;
++ c_7313583.fn = (function_type)__lambda_69;
++c_7313583.num_args = 1;
++c_7313583.num_elements = 4;
++c_7313583.elements = (object *)e_7313606;
++c_7313583.elements[0] = ((closureN)self_7311849)->elements[0];
++c_7313583.elements[1] = ((closureN)self_7311849)->elements[1];
++c_7313583.elements[2] = ((closureN)self_7311849)->elements[2];
++c_7313583.elements[3] = sets_7363_732554;
+
+
+
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314883, primitive_cadr, Cyc_cadr(data, ((closureN)self_7313102)->elements[0]));;
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313583, primitive_cadr, Cyc_cadr(data, ((closureN)self_7311849)->elements[0]));;
+ }
+
+-static void __lambda_69(void *data, object self_7313103, int argc, object *args) /* object self_7313103, object args_7366_732902 */
++static void __lambda_69(void *data, object self_7311850, int argc, object *args) /* object self_7311850, object args_7366_732555 */
+ {
+
+
+-closureN_type c_7314885;
+-object e_7314901 [2];
+-c_7314885.hdr.mark = gc_color_red;
+- c_7314885.hdr.grayed = 0;
+-c_7314885.tag = closureN_tag;
+- c_7314885.fn = (function_type)__lambda_70;
+-c_7314885.num_args = 1;
+-c_7314885.num_elements = 2;
+-c_7314885.elements = (object *)e_7314901;
+-c_7314885.elements[0] = ((closureN)self_7313103)->elements[1];
+-c_7314885.elements[1] = ((closureN)self_7313103)->elements[2];
++closureN_type c_7313585;
++object e_7313601 [2];
++c_7313585.hdr.mark = gc_color_red;
++ c_7313585.hdr.grayed = 0;
++c_7313585.tag = closureN_tag;
++ c_7313585.fn = (function_type)__lambda_70;
++c_7313585.num_args = 1;
++c_7313585.num_elements = 2;
++c_7313585.elements = (object *)e_7313601;
++c_7313585.elements[0] = ((closureN)self_7311850)->elements[1];
++c_7313585.elements[1] = ((closureN)self_7311850)->elements[2];
+
+
+
+-return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7314885, ((closureN)self_7313103)->elements[3], Cyc_cddr(data, ((closureN)self_7313103)->elements[0]));;
++return_direct_with_clo3(data, __glo_append_scheme_base, (((closure) __glo_append_scheme_base)->fn), &c_7313585, ((closureN)self_7311850)->elements[3], Cyc_cddr(data, ((closureN)self_7311850)->elements[0]));;
+ }
+
+-static void __lambda_70(void *data, object self_7313104, int argc, object *args) /* object self_7313104, object r_734309 */
++static void __lambda_70(void *data, object self_7311851, int argc, object *args) /* object self_7311851, object r_733857 */
+ {
+- object r_734309 = args[0];
++ object r_733857 = args[0];
+
+-pair_type local_7314890;
++pair_type local_7313590;
+
+-pair_type local_7314893;
++pair_type local_7313593;
+
+-pair_type local_7314897;
++pair_type local_7313597;
+
+-pair_type local_7314900;
+-return_direct_with_clo1(data, ((closureN)self_7313104)->elements[0], (((closure) ((closureN)self_7313104)->elements[0])->fn), set_pair_as_expr(&local_7314890, quote_let, set_pair_as_expr(&local_7314893, ((closureN)self_7313104)->elements[1], set_pair_as_expr(&local_7314897, set_pair_as_expr(&local_7314900, quote_begin, r_734309), NULL))));;
++pair_type local_7313600;
++return_direct_with_clo1(data, ((closureN)self_7311851)->elements[0], (((closure) ((closureN)self_7311851)->elements[0])->fn), set_pair_as_expr(&local_7313590, quote_let, set_pair_as_expr(&local_7313593, ((closureN)self_7311851)->elements[1], set_pair_as_expr(&local_7313597, set_pair_as_expr(&local_7313600, quote_begin, r_733857), NULL))));;
+ }
+
+-static void __lambda_62(void *data, object self_7313105, int argc, object *args) /* object self_7313105, object r_734296 */
++static void __lambda_62(void *data, object self_7311852, int argc, object *args) /* object self_7311852, object r_733844 */
+ {
+- object r_734296 = args[0];
+- return_direct_with_clo3(data, __glo_with_91exception_91handler_scheme_base, (((closure) __glo_with_91exception_91handler_scheme_base)->fn), ((closureN)self_7313105)->elements[0], ((closureN)self_7313105)->elements[1], r_734296);;
++ object r_733844 = args[0];
++ return_direct_with_clo3(data, __glo_with_91exception_91handler_scheme_base, (((closure) __glo_with_91exception_91handler_scheme_base)->fn), ((closureN)self_7311852)->elements[0], ((closureN)self_7311852)->elements[1], r_733844);;
+ }
+
+-static void __lambda_59(void *data, object self_7313106, int argc, object *args) /* object self_7313106, object r_734293 */
++static void __lambda_59(void *data, object self_7311853, int argc, object *args) /* object self_7311853, object r_733841 */
+ {
+- object r_734293 = args[0];
+- return_direct_with_clo2(data, __glo_call_95cc_scheme_base, (((closure) __glo_call_95cc_scheme_base)->fn), ((closureN)self_7313106)->elements[0], r_734293);;
++ object r_733841 = args[0];
++ return_direct_with_clo2(data, __glo_call_95cc_scheme_base, (((closure) __glo_call_95cc_scheme_base)->fn), ((closureN)self_7311853)->elements[0], r_733841);;
+ }
+
+-static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_734247, object expr_7336_732888, object rename_7337_732889, object compare_7338_732890 */
++static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_733795, object expr_7336_732541, object rename_7337_732542, object compare_7338_732543 */
+ {
+-object k_734247 = args[0]; object expr_7336_732888 = args[1]; object rename_7337_732889 = args[2];
++object k_733795 = args[0]; object expr_7336_732541 = args[1]; object rename_7337_732542 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:let*");
+
+-closureN_type c_7314716;
+-object e_7314731 [1];
+-c_7314716.hdr.mark = gc_color_red;
+- c_7314716.hdr.grayed = 0;
+-c_7314716.tag = closureN_tag;
+- c_7314716.fn = (function_type)__lambda_44;
+-c_7314716.num_args = 0;
+-c_7314716.num_elements = 1;
+-c_7314716.elements = (object *)e_7314731;
+-c_7314716.elements[0] = expr_7336_732888;
++closureN_type c_7313416;
++object e_7313431 [1];
++c_7313416.hdr.mark = gc_color_red;
++ c_7313416.hdr.grayed = 0;
++c_7313416.tag = closureN_tag;
++ c_7313416.fn = (function_type)__lambda_44;
++c_7313416.num_args = 0;
++c_7313416.num_elements = 1;
++c_7313416.elements = (object *)e_7313431;
++c_7313416.elements[0] = expr_7336_732541;
+
+
+-closureN_type c_7314732;
+-object e_7314855 [3];
+-c_7314732.hdr.mark = gc_color_red;
+- c_7314732.hdr.grayed = 0;
+-c_7314732.tag = closureN_tag;
+- c_7314732.fn = (function_type)__lambda_46;
+-c_7314732.num_args = 1;
+-c_7314732.num_elements = 3;
+-c_7314732.elements = (object *)e_7314855;
+-c_7314732.elements[0] = expr_7336_732888;
+-c_7314732.elements[1] = k_734247;
+-c_7314732.elements[2] = rename_7337_732889;
++closureN_type c_7313432;
++object e_7313555 [3];
++c_7313432.hdr.mark = gc_color_red;
++ c_7313432.hdr.grayed = 0;
++c_7313432.tag = closureN_tag;
++ c_7313432.fn = (function_type)__lambda_46;
++c_7313432.num_args = 1;
++c_7313432.num_elements = 3;
++c_7313432.elements = (object *)e_7313555;
++c_7313432.elements[0] = expr_7336_732541;
++c_7313432.elements[1] = k_733795;
++c_7313432.elements[2] = rename_7337_732542;
+
+-return_direct_with_clo1(data,(closure)&c_7314716,__lambda_44, &c_7314732);;
++return_direct_with_clo1(data,(closure)&c_7313416,__lambda_44, &c_7313432);;
+ }
+
+-static void __lambda_46(void *data, object self_7313077, int argc, object *args) /* object self_7313077, object r_734248 */
++static void __lambda_46(void *data, object self_7311824, int argc, object *args) /* object self_7311824, object r_733796 */
+ {
+
+
+-closureN_type c_7314734;
+-object e_7314749 [1];
+-c_7314734.hdr.mark = gc_color_red;
+- c_7314734.hdr.grayed = 0;
+-c_7314734.tag = closureN_tag;
+- c_7314734.fn = (function_type)__lambda_47;
+-c_7314734.num_args = 0;
+-c_7314734.num_elements = 1;
+-c_7314734.elements = (object *)e_7314749;
+-c_7314734.elements[0] = ((closureN)self_7313077)->elements[0];
++closureN_type c_7313434;
++object e_7313449 [1];
++c_7313434.hdr.mark = gc_color_red;
++ c_7313434.hdr.grayed = 0;
++c_7313434.tag = closureN_tag;
++ c_7313434.fn = (function_type)__lambda_47;
++c_7313434.num_args = 0;
++c_7313434.num_elements = 1;
++c_7313434.elements = (object *)e_7313449;
++c_7313434.elements[0] = ((closureN)self_7311824)->elements[0];
+
+
+-closureN_type c_7314750;
+-object e_7314854 [3];
+-c_7314750.hdr.mark = gc_color_red;
+- c_7314750.hdr.grayed = 0;
+-c_7314750.tag = closureN_tag;
+- c_7314750.fn = (function_type)__lambda_49;
+-c_7314750.num_args = 1;
+-c_7314750.num_elements = 3;
+-c_7314750.elements = (object *)e_7314854;
+-c_7314750.elements[0] = ((closureN)self_7313077)->elements[0];
+-c_7314750.elements[1] = ((closureN)self_7313077)->elements[1];
+-c_7314750.elements[2] = ((closureN)self_7313077)->elements[2];
++closureN_type c_7313450;
++object e_7313554 [3];
++c_7313450.hdr.mark = gc_color_red;
++ c_7313450.hdr.grayed = 0;
++c_7313450.tag = closureN_tag;
++ c_7313450.fn = (function_type)__lambda_49;
++c_7313450.num_args = 1;
++c_7313450.num_elements = 3;
++c_7313450.elements = (object *)e_7313554;
++c_7313450.elements[0] = ((closureN)self_7311824)->elements[0];
++c_7313450.elements[1] = ((closureN)self_7311824)->elements[1];
++c_7313450.elements[2] = ((closureN)self_7311824)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7314734,__lambda_47, &c_7314750);;
++return_direct_with_clo1(data,(closure)&c_7313434,__lambda_47, &c_7313450);;
+ }
+
+-static void __lambda_49(void *data, object self_7313078, int argc, object *args) /* object self_7313078, object r_734249 */
++static void __lambda_49(void *data, object self_7311825, int argc, object *args) /* object self_7311825, object r_733797 */
+ {
+
+
+-closureN_type c_7314752;
+-object e_7314850 [3];
+-c_7314752.hdr.mark = gc_color_red;
+- c_7314752.hdr.grayed = 0;
+-c_7314752.tag = closureN_tag;
+- c_7314752.fn = (function_type)__lambda_50;
+-c_7314752.num_args = 1;
+-c_7314752.num_elements = 3;
+-c_7314752.elements = (object *)e_7314850;
+-c_7314752.elements[0] = ((closureN)self_7313078)->elements[0];
+-c_7314752.elements[1] = ((closureN)self_7313078)->elements[1];
+-c_7314752.elements[2] = ((closureN)self_7313078)->elements[2];
++closureN_type c_7313452;
++object e_7313550 [3];
++c_7313452.hdr.mark = gc_color_red;
++ c_7313452.hdr.grayed = 0;
++c_7313452.tag = closureN_tag;
++ c_7313452.fn = (function_type)__lambda_50;
++c_7313452.num_args = 1;
++c_7313452.num_elements = 3;
++c_7313452.elements = (object *)e_7313550;
++c_7313452.elements[0] = ((closureN)self_7311825)->elements[0];
++c_7313452.elements[1] = ((closureN)self_7311825)->elements[1];
++c_7313452.elements[2] = ((closureN)self_7311825)->elements[2];
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314752,__lambda_50, Cyc_cadr(data, ((closureN)self_7313078)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7313452,__lambda_50, Cyc_cadr(data, ((closureN)self_7311825)->elements[0]));;
+ }
+
+-static void __lambda_50(void *data, object self_7313079, int argc, object *args) /* object self_7313079, object r_734283 */
++static void __lambda_50(void *data, object self_7311826, int argc, object *args) /* object self_7311826, object r_733831 */
+ {
+- object r_734283 = args[0];
++ object r_733831 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734283)) ){
++if( (boolean_f != Cyc_is_null(r_733831)) ){
+
+-closureN_type c_7314757;
+-object e_7314769 [2];
+-c_7314757.hdr.mark = gc_color_red;
+- c_7314757.hdr.grayed = 0;
+-c_7314757.tag = closureN_tag;
+- c_7314757.fn = (function_type)__lambda_51;
+-c_7314757.num_args = 1;
+-c_7314757.num_elements = 2;
+-c_7314757.elements = (object *)e_7314769;
+-c_7314757.elements[0] = ((closureN)self_7313079)->elements[0];
+-c_7314757.elements[1] = ((closureN)self_7313079)->elements[1];
++closureN_type c_7313457;
++object e_7313469 [2];
++c_7313457.hdr.mark = gc_color_red;
++ c_7313457.hdr.grayed = 0;
++c_7313457.tag = closureN_tag;
++ c_7313457.fn = (function_type)__lambda_51;
++c_7313457.num_args = 1;
++c_7313457.num_elements = 2;
++c_7313457.elements = (object *)e_7313469;
++c_7313457.elements[0] = ((closureN)self_7311826)->elements[0];
++c_7313457.elements[1] = ((closureN)self_7311826)->elements[1];
+
+-return_closcall2(data, ((closureN)self_7313079)->elements[2], &c_7314757, quote_let);
++return_closcall2(data, ((closureN)self_7311826)->elements[2], &c_7313457, quote_let);
+ } else {
+
+-closureN_type c_7314771;
+-object e_7314801 [1];
+-c_7314771.hdr.mark = gc_color_red;
+- c_7314771.hdr.grayed = 0;
+-c_7314771.tag = closureN_tag;
+- c_7314771.fn = (function_type)__lambda_52;
+-c_7314771.num_args = 0;
+-c_7314771.num_elements = 1;
+-c_7314771.elements = (object *)e_7314801;
+-c_7314771.elements[0] = ((closureN)self_7313079)->elements[0];
++closureN_type c_7313471;
++object e_7313501 [1];
++c_7313471.hdr.mark = gc_color_red;
++ c_7313471.hdr.grayed = 0;
++c_7313471.tag = closureN_tag;
++ c_7313471.fn = (function_type)__lambda_52;
++c_7313471.num_args = 0;
++c_7313471.num_elements = 1;
++c_7313471.elements = (object *)e_7313501;
++c_7313471.elements[0] = ((closureN)self_7311826)->elements[0];
+
+
+-closureN_type c_7314802;
+-object e_7314849 [3];
+-c_7314802.hdr.mark = gc_color_red;
+- c_7314802.hdr.grayed = 0;
+-c_7314802.tag = closureN_tag;
+- c_7314802.fn = (function_type)__lambda_55;
+-c_7314802.num_args = 1;
+-c_7314802.num_elements = 3;
+-c_7314802.elements = (object *)e_7314849;
+-c_7314802.elements[0] = ((closureN)self_7313079)->elements[0];
+-c_7314802.elements[1] = ((closureN)self_7313079)->elements[1];
+-c_7314802.elements[2] = ((closureN)self_7313079)->elements[2];
++closureN_type c_7313502;
++object e_7313549 [3];
++c_7313502.hdr.mark = gc_color_red;
++ c_7313502.hdr.grayed = 0;
++c_7313502.tag = closureN_tag;
++ c_7313502.fn = (function_type)__lambda_55;
++c_7313502.num_args = 1;
++c_7313502.num_elements = 3;
++c_7313502.elements = (object *)e_7313549;
++c_7313502.elements[0] = ((closureN)self_7311826)->elements[0];
++c_7313502.elements[1] = ((closureN)self_7311826)->elements[1];
++c_7313502.elements[2] = ((closureN)self_7311826)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7314771,__lambda_52, &c_7314802);}
++return_direct_with_clo1(data,(closure)&c_7313471,__lambda_52, &c_7313502);}
+ ;;
+ }
+
+-static void __lambda_55(void *data, object self_7313081, int argc, object *args) /* object self_7313081, object r_734256 */
++static void __lambda_55(void *data, object self_7311828, int argc, object *args) /* object self_7311828, object r_733804 */
+ {
+- object r_734256 = args[0];
+- if( (boolean_f != r_734256) ){
++ object r_733804 = args[0];
++ if( (boolean_f != r_733804) ){
+
+-closureN_type c_7314805;
+-object e_7314844 [3];
+-c_7314805.hdr.mark = gc_color_red;
+- c_7314805.hdr.grayed = 0;
+-c_7314805.tag = closureN_tag;
+- c_7314805.fn = (function_type)__lambda_56;
+-c_7314805.num_args = 1;
+-c_7314805.num_elements = 3;
+-c_7314805.elements = (object *)e_7314844;
+-c_7314805.elements[0] = ((closureN)self_7313081)->elements[0];
+-c_7314805.elements[1] = ((closureN)self_7313081)->elements[1];
+-c_7314805.elements[2] = ((closureN)self_7313081)->elements[2];
++closureN_type c_7313505;
++object e_7313544 [3];
++c_7313505.hdr.mark = gc_color_red;
++ c_7313505.hdr.grayed = 0;
++c_7313505.tag = closureN_tag;
++ c_7313505.fn = (function_type)__lambda_56;
++c_7313505.num_args = 1;
++c_7313505.num_elements = 3;
++c_7313505.elements = (object *)e_7313544;
++c_7313505.elements[0] = ((closureN)self_7311828)->elements[0];
++c_7313505.elements[1] = ((closureN)self_7311828)->elements[1];
++c_7313505.elements[2] = ((closureN)self_7311828)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313081)->elements[2], &c_7314805, quote_let);
++return_closcall2(data, ((closureN)self_7311828)->elements[2], &c_7313505, quote_let);
+ } else {
+
+-make_utf8_string_with_len(c_7314847, "bad let* syntax", 15, 15);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313081)->elements[1], &c_7314847, ((closureN)self_7313081)->elements[0]);}
++make_utf8_string_with_len(c_7313547, "bad let* syntax", 15, 15);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311828)->elements[1], &c_7313547, ((closureN)self_7311828)->elements[0]);}
+ ;;
+ }
+
+-static void __lambda_56(void *data, object self_7313082, int argc, object *args) /* object self_7313082, object r_734257 */
++static void __lambda_56(void *data, object self_7311829, int argc, object *args) /* object self_7311829, object r_733805 */
+ {
+- object r_734257 = args[0];
++ object r_733805 = args[0];
+
+-closureN_type c_7314808;
+-object e_7314843 [3];
+-c_7314808.hdr.mark = gc_color_red;
+- c_7314808.hdr.grayed = 0;
+-c_7314808.tag = closureN_tag;
+- c_7314808.fn = (function_type)__lambda_57;
+-c_7314808.num_args = 1;
+-c_7314808.num_elements = 3;
+-c_7314808.elements = (object *)e_7314843;
+-c_7314808.elements[0] = ((closureN)self_7313082)->elements[0];
+-c_7314808.elements[1] = ((closureN)self_7313082)->elements[1];
+-c_7314808.elements[2] = r_734257;
++closureN_type c_7313508;
++object e_7313543 [3];
++c_7313508.hdr.mark = gc_color_red;
++ c_7313508.hdr.grayed = 0;
++c_7313508.tag = closureN_tag;
++ c_7313508.fn = (function_type)__lambda_57;
++c_7313508.num_args = 1;
++c_7313508.num_elements = 3;
++c_7313508.elements = (object *)e_7313543;
++c_7313508.elements[0] = ((closureN)self_7311829)->elements[0];
++c_7313508.elements[1] = ((closureN)self_7311829)->elements[1];
++c_7313508.elements[2] = r_733805;
+
+-return_closcall2(data, ((closureN)self_7313082)->elements[2], &c_7314808, quote_let_85);;
++return_closcall2(data, ((closureN)self_7311829)->elements[2], &c_7313508, quote_let_85);;
+ }
+
+-static void __lambda_57(void *data, object self_7313083, int argc, object *args) /* object self_7313083, object r_734263 */
++static void __lambda_57(void *data, object self_7311830, int argc, object *args) /* object self_7311830, object r_733811 */
+ {
+- object r_734263 = args[0];
++ object r_733811 = args[0];
+
+-pair_type local_7314813;
++pair_type local_7313513;
+
+-pair_type local_7314817;
++pair_type local_7313517;
+
+-pair_type local_7314820;
++pair_type local_7313520;
+
+
+
+
+
+-pair_type local_7314828;
++pair_type local_7313528;
+
+-pair_type local_7314831;
++pair_type local_7313531;
+
+-pair_type local_7314834;
++pair_type local_7313534;
+
+
+
+
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313083)->elements[1], (((closure) ((closureN)self_7313083)->elements[1])->fn), set_pair_as_expr(&local_7314813, ((closureN)self_7313083)->elements[2], set_pair_as_expr(&local_7314817, set_pair_as_expr(&local_7314820, Cyc_caar(data, Cyc_cdr(data, ((closureN)self_7313083)->elements[0])), NULL), set_pair_as_expr(&local_7314828, set_pair_as_expr(&local_7314831, r_734263, set_pair_as_expr(&local_7314834, Cyc_cdar(data, Cyc_cdr(data, ((closureN)self_7313083)->elements[0])), Cyc_cddr(data, ((closureN)self_7313083)->elements[0]))), NULL))));;
++return_direct_with_clo1(data, ((closureN)self_7311830)->elements[1], (((closure) ((closureN)self_7311830)->elements[1])->fn), set_pair_as_expr(&local_7313513, ((closureN)self_7311830)->elements[2], set_pair_as_expr(&local_7313517, set_pair_as_expr(&local_7313520, Cyc_caar(data, Cyc_cdr(data, ((closureN)self_7311830)->elements[0])), NULL), set_pair_as_expr(&local_7313528, set_pair_as_expr(&local_7313531, r_733811, set_pair_as_expr(&local_7313534, Cyc_cdar(data, Cyc_cdr(data, ((closureN)self_7311830)->elements[0])), Cyc_cddr(data, ((closureN)self_7311830)->elements[0]))), NULL))));;
+ }
+
+-static void __lambda_52(void *data, object self_7313084, int argc, object *args) /* object self_7313084, object k_734273 */
++static void __lambda_52(void *data, object self_7311831, int argc, object *args) /* object self_7311831, object k_733821 */
+ {
+- object k_734273 = args[0];
+- complex_num_type local_7314774;
++ object k_733821 = args[0];
++ complex_num_type local_7313474;
+
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314774, Cyc_cadr(data, ((closureN)self_7313084)->elements[0]))) ){
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313474, Cyc_cadr(data, ((closureN)self_7311831)->elements[0]))) ){
+
+-closureN_type c_7314779;
+-object e_7314785 [2];
+-c_7314779.hdr.mark = gc_color_red;
+- c_7314779.hdr.grayed = 0;
+-c_7314779.tag = closureN_tag;
+- c_7314779.fn = (function_type)__lambda_53;
+-c_7314779.num_args = 1;
+-c_7314779.num_elements = 2;
+-c_7314779.elements = (object *)e_7314785;
+-c_7314779.elements[0] = ((closureN)self_7313084)->elements[0];
+-c_7314779.elements[1] = k_734273;
++closureN_type c_7313479;
++object e_7313485 [2];
++c_7313479.hdr.mark = gc_color_red;
++ c_7313479.hdr.grayed = 0;
++c_7313479.tag = closureN_tag;
++ c_7313479.fn = (function_type)__lambda_53;
++c_7313479.num_args = 1;
++c_7313479.num_elements = 2;
++c_7313479.elements = (object *)e_7313485;
++c_7313479.elements[0] = ((closureN)self_7311831)->elements[0];
++c_7313479.elements[1] = k_733821;
+
+
+-mmacro(c_7314786, (function_type)__lambda_54);c_7314786.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7314779,__lambda_53, &c_7314786);
++mmacro(c_7313486, (function_type)__lambda_54);c_7313486.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313479,__lambda_53, &c_7313486);
+ } else {
+- return_direct_with_clo1(data, k_734273, (((closure) k_734273)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_733821, (((closure) k_733821)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_54(void *data, object self_7313085, int argc, object *args) /* object self_7313085, object k_734277, object x_7342_732891 */
++static void __lambda_54(void *data, object self_7311832, int argc, object *args) /* object self_7311832, object k_733825, object x_7342_732544 */
+ {
+- object k_734277 = args[0]; object x_7342_732891 = args[1];
++ object k_733825 = args[0]; object x_7342_732544 = args[1];
+
+-if( (boolean_f != Cyc_is_pair(x_7342_732891)) ){
++if( (boolean_f != Cyc_is_pair(x_7342_732544)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7342_732891))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7342_732544))) ){
+
+
+
+
+-return_direct_with_clo1(data, k_734277, (((closure) k_734277)->fn), Cyc_is_null(Cyc_cddr(data, x_7342_732891)));
++return_direct_with_clo1(data, k_733825, (((closure) k_733825)->fn), Cyc_is_null(Cyc_cddr(data, x_7342_732544)));
+ } else {
+- return_direct_with_clo1(data, k_734277, (((closure) k_734277)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_733825, (((closure) k_733825)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_734277, (((closure) k_734277)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_733825, (((closure) k_733825)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_53(void *data, object self_7313086, int argc, object *args) /* object self_7313086, object r_734275 */
++static void __lambda_53(void *data, object self_7311833, int argc, object *args) /* object self_7311833, object r_733823 */
+ {
+- object r_734275 = args[0];
++ object r_733823 = args[0];
+
+
+-return_direct_with_clo3(data, __glo_every_scheme_base, (((closure) __glo_every_scheme_base)->fn), ((closureN)self_7313086)->elements[1], r_734275, Cyc_cadr(data, ((closureN)self_7313086)->elements[0]));;
++return_direct_with_clo3(data, __glo_every_scheme_base, (((closure) __glo_every_scheme_base)->fn), ((closureN)self_7311833)->elements[1], r_733823, Cyc_cadr(data, ((closureN)self_7311833)->elements[0]));;
+ }
+
+-static void __lambda_51(void *data, object self_7313080, int argc, object *args) /* object self_7313080, object r_734251 */
++static void __lambda_51(void *data, object self_7311827, int argc, object *args) /* object self_7311827, object r_733799 */
+ {
+- object r_734251 = args[0];
++ object r_733799 = args[0];
+
+-pair_type local_7314762;
++pair_type local_7313462;
+
+-pair_type local_7314765;
++pair_type local_7313465;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313080)->elements[1], (((closure) ((closureN)self_7313080)->elements[1])->fn), set_pair_as_expr(&local_7314762, r_734251, set_pair_as_expr(&local_7314765, NULL, Cyc_cddr(data, ((closureN)self_7313080)->elements[0]))));;
++return_direct_with_clo1(data, ((closureN)self_7311827)->elements[1], (((closure) ((closureN)self_7311827)->elements[1])->fn), set_pair_as_expr(&local_7313462, r_733799, set_pair_as_expr(&local_7313465, NULL, Cyc_cddr(data, ((closureN)self_7311827)->elements[0]))));;
+ }
+
+-static void __lambda_47(void *data, object self_7313087, int argc, object *args) /* object self_7313087, object k_734284 */
++static void __lambda_47(void *data, object self_7311834, int argc, object *args) /* object self_7311834, object k_733832 */
+ {
+- object k_734284 = args[0];
++ object k_733832 = args[0];
+
+-closureN_type c_7314736;
+-object e_7314745 [2];
+-c_7314736.hdr.mark = gc_color_red;
+- c_7314736.hdr.grayed = 0;
+-c_7314736.tag = closureN_tag;
+- c_7314736.fn = (function_type)__lambda_48;
+-c_7314736.num_args = 1;
+-c_7314736.num_elements = 2;
+-c_7314736.elements = (object *)e_7314745;
+-c_7314736.elements[0] = ((closureN)self_7313087)->elements[0];
+-c_7314736.elements[1] = k_734284;
++closureN_type c_7313436;
++object e_7313445 [2];
++c_7313436.hdr.mark = gc_color_red;
++ c_7313436.hdr.grayed = 0;
++c_7313436.tag = closureN_tag;
++ c_7313436.fn = (function_type)__lambda_48;
++c_7313436.num_args = 1;
++c_7313436.num_elements = 2;
++c_7313436.elements = (object *)e_7313445;
++c_7313436.elements[0] = ((closureN)self_7311834)->elements[0];
++c_7313436.elements[1] = k_733832;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314736,__lambda_48, Cyc_cddr(data, ((closureN)self_7313087)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7313436,__lambda_48, Cyc_cddr(data, ((closureN)self_7311834)->elements[0]));;
+ }
+
+-static void __lambda_48(void *data, object self_7313088, int argc, object *args) /* object self_7313088, object r_734286 */
++static void __lambda_48(void *data, object self_7311835, int argc, object *args) /* object self_7311835, object r_733834 */
+ {
+- object r_734286 = args[0];
++ object r_733834 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734286)) ){
++if( (boolean_f != Cyc_is_null(r_733834)) ){
+
+-make_utf8_string_with_len(c_7314741, "no let* body", 12, 12);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313088)->elements[1], &c_7314741, ((closureN)self_7313088)->elements[0]);
++make_utf8_string_with_len(c_7313441, "no let* body", 12, 12);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311835)->elements[1], &c_7313441, ((closureN)self_7311835)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313088)->elements[1], (((closure) ((closureN)self_7313088)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311835)->elements[1], (((closure) ((closureN)self_7311835)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_44(void *data, object self_7313089, int argc, object *args) /* object self_7313089, object k_734287 */
++static void __lambda_44(void *data, object self_7311836, int argc, object *args) /* object self_7311836, object k_733835 */
+ {
+- object k_734287 = args[0];
++ object k_733835 = args[0];
+
+-closureN_type c_7314718;
+-object e_7314727 [2];
+-c_7314718.hdr.mark = gc_color_red;
+- c_7314718.hdr.grayed = 0;
+-c_7314718.tag = closureN_tag;
+- c_7314718.fn = (function_type)__lambda_45;
+-c_7314718.num_args = 1;
+-c_7314718.num_elements = 2;
+-c_7314718.elements = (object *)e_7314727;
+-c_7314718.elements[0] = ((closureN)self_7313089)->elements[0];
+-c_7314718.elements[1] = k_734287;
++closureN_type c_7313418;
++object e_7313427 [2];
++c_7313418.hdr.mark = gc_color_red;
++ c_7313418.hdr.grayed = 0;
++c_7313418.tag = closureN_tag;
++ c_7313418.fn = (function_type)__lambda_45;
++c_7313418.num_args = 1;
++c_7313418.num_elements = 2;
++c_7313418.elements = (object *)e_7313427;
++c_7313418.elements[0] = ((closureN)self_7311836)->elements[0];
++c_7313418.elements[1] = k_733835;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314718,__lambda_45, Cyc_cdr(data, ((closureN)self_7313089)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7313418,__lambda_45, Cyc_cdr(data, ((closureN)self_7311836)->elements[0]));;
+ }
+
+-static void __lambda_45(void *data, object self_7313090, int argc, object *args) /* object self_7313090, object r_734289 */
++static void __lambda_45(void *data, object self_7311837, int argc, object *args) /* object self_7311837, object r_733837 */
+ {
+- object r_734289 = args[0];
++ object r_733837 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734289)) ){
++if( (boolean_f != Cyc_is_null(r_733837)) ){
+
+-make_utf8_string_with_len(c_7314723, "empty let*", 10, 10);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313090)->elements[1], &c_7314723, ((closureN)self_7313090)->elements[0]);
++make_utf8_string_with_len(c_7313423, "empty let*", 10, 10);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311837)->elements[1], &c_7313423, ((closureN)self_7311837)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313090)->elements[1], (((closure) ((closureN)self_7313090)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311837)->elements[1], (((closure) ((closureN)self_7311837)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_734186, object expr_7323_732881, object rename_7324_732882, object compare_7325_732883 */
++static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_733734, object expr_7323_732534, object rename_7324_732535, object compare_7325_732536 */
+ {
+-object k_734186 = args[0]; object expr_7323_732881 = args[1]; object rename_7324_732882 = args[2];
++object k_733734 = args[0]; object expr_7323_732534 = args[1]; object rename_7324_732535 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:let");
+
+-closureN_type c_7314516;
+-object e_7314531 [1];
+-c_7314516.hdr.mark = gc_color_red;
+- c_7314516.hdr.grayed = 0;
+-c_7314516.tag = closureN_tag;
+- c_7314516.fn = (function_type)__lambda_25;
+-c_7314516.num_args = 0;
+-c_7314516.num_elements = 1;
+-c_7314516.elements = (object *)e_7314531;
+-c_7314516.elements[0] = expr_7323_732881;
+-
+-
+-closureN_type c_7314532;
+-object e_7314713 [3];
+-c_7314532.hdr.mark = gc_color_red;
+- c_7314532.hdr.grayed = 0;
+-c_7314532.tag = closureN_tag;
+- c_7314532.fn = (function_type)__lambda_27;
+-c_7314532.num_args = 1;
+-c_7314532.num_elements = 3;
+-c_7314532.elements = (object *)e_7314713;
+-c_7314532.elements[0] = expr_7323_732881;
+-c_7314532.elements[1] = k_734186;
+-c_7314532.elements[2] = rename_7324_732882;
++closureN_type c_7313216;
++object e_7313231 [1];
++c_7313216.hdr.mark = gc_color_red;
++ c_7313216.hdr.grayed = 0;
++c_7313216.tag = closureN_tag;
++ c_7313216.fn = (function_type)__lambda_25;
++c_7313216.num_args = 0;
++c_7313216.num_elements = 1;
++c_7313216.elements = (object *)e_7313231;
++c_7313216.elements[0] = expr_7323_732534;
++
+
+-return_direct_with_clo1(data,(closure)&c_7314516,__lambda_25, &c_7314532);;
++closureN_type c_7313232;
++object e_7313413 [3];
++c_7313232.hdr.mark = gc_color_red;
++ c_7313232.hdr.grayed = 0;
++c_7313232.tag = closureN_tag;
++ c_7313232.fn = (function_type)__lambda_27;
++c_7313232.num_args = 1;
++c_7313232.num_elements = 3;
++c_7313232.elements = (object *)e_7313413;
++c_7313232.elements[0] = expr_7323_732534;
++c_7313232.elements[1] = k_733734;
++c_7313232.elements[2] = rename_7324_732535;
++
++return_direct_with_clo1(data,(closure)&c_7313216,__lambda_25, &c_7313232);;
+ }
+
+-static void __lambda_27(void *data, object self_7313059, int argc, object *args) /* object self_7313059, object r_734187 */
++static void __lambda_27(void *data, object self_7311806, int argc, object *args) /* object self_7311806, object r_733735 */
+ {
+
+
+-closureN_type c_7314534;
+-object e_7314549 [1];
+-c_7314534.hdr.mark = gc_color_red;
+- c_7314534.hdr.grayed = 0;
+-c_7314534.tag = closureN_tag;
+- c_7314534.fn = (function_type)__lambda_28;
+-c_7314534.num_args = 0;
+-c_7314534.num_elements = 1;
+-c_7314534.elements = (object *)e_7314549;
+-c_7314534.elements[0] = ((closureN)self_7313059)->elements[0];
++closureN_type c_7313234;
++object e_7313249 [1];
++c_7313234.hdr.mark = gc_color_red;
++ c_7313234.hdr.grayed = 0;
++c_7313234.tag = closureN_tag;
++ c_7313234.fn = (function_type)__lambda_28;
++c_7313234.num_args = 0;
++c_7313234.num_elements = 1;
++c_7313234.elements = (object *)e_7313249;
++c_7313234.elements[0] = ((closureN)self_7311806)->elements[0];
+
+
+-closureN_type c_7314550;
+-object e_7314712 [3];
+-c_7314550.hdr.mark = gc_color_red;
+- c_7314550.hdr.grayed = 0;
+-c_7314550.tag = closureN_tag;
+- c_7314550.fn = (function_type)__lambda_30;
+-c_7314550.num_args = 1;
+-c_7314550.num_elements = 3;
+-c_7314550.elements = (object *)e_7314712;
+-c_7314550.elements[0] = ((closureN)self_7313059)->elements[0];
+-c_7314550.elements[1] = ((closureN)self_7313059)->elements[1];
+-c_7314550.elements[2] = ((closureN)self_7313059)->elements[2];
++closureN_type c_7313250;
++object e_7313412 [3];
++c_7313250.hdr.mark = gc_color_red;
++ c_7313250.hdr.grayed = 0;
++c_7313250.tag = closureN_tag;
++ c_7313250.fn = (function_type)__lambda_30;
++c_7313250.num_args = 1;
++c_7313250.num_elements = 3;
++c_7313250.elements = (object *)e_7313412;
++c_7313250.elements[0] = ((closureN)self_7311806)->elements[0];
++c_7313250.elements[1] = ((closureN)self_7311806)->elements[1];
++c_7313250.elements[2] = ((closureN)self_7311806)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7314534,__lambda_28, &c_7314550);;
++return_direct_with_clo1(data,(closure)&c_7313234,__lambda_28, &c_7313250);;
+ }
+
+-static void __lambda_30(void *data, object self_7313060, int argc, object *args) /* object self_7313060, object r_734188 */
++static void __lambda_30(void *data, object self_7311807, int argc, object *args) /* object self_7311807, object r_733736 */
+ {
+
+- object bindings_7326_732884;
++ object bindings_7326_732537;
+
+
+-if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7313060)->elements[0]))) ){
++if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7311807)->elements[0]))) ){
+
+
+- bindings_7326_732884 = Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313060)->elements[0]));
++ bindings_7326_732537 = Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311807)->elements[0]));
+ } else {
+
+- bindings_7326_732884 = Cyc_cadr(data, ((closureN)self_7313060)->elements[0]);}
++ bindings_7326_732537 = Cyc_cadr(data, ((closureN)self_7311807)->elements[0]);}
+ ;
+-closureN_type c_7314568;
+-object e_7314577 [2];
+-c_7314568.hdr.mark = gc_color_red;
+- c_7314568.hdr.grayed = 0;
+-c_7314568.tag = closureN_tag;
+- c_7314568.fn = (function_type)__lambda_31;
+-c_7314568.num_args = 0;
+-c_7314568.num_elements = 2;
+-c_7314568.elements = (object *)e_7314577;
+-c_7314568.elements[0] = bindings_7326_732884;
+-c_7314568.elements[1] = ((closureN)self_7313060)->elements[0];
++closureN_type c_7313268;
++object e_7313277 [2];
++c_7313268.hdr.mark = gc_color_red;
++ c_7313268.hdr.grayed = 0;
++c_7313268.tag = closureN_tag;
++ c_7313268.fn = (function_type)__lambda_31;
++c_7313268.num_args = 0;
++c_7313268.num_elements = 2;
++c_7313268.elements = (object *)e_7313277;
++c_7313268.elements[0] = bindings_7326_732537;
++c_7313268.elements[1] = ((closureN)self_7311807)->elements[0];
+
+
+-closureN_type c_7314578;
+-object e_7314711 [4];
+-c_7314578.hdr.mark = gc_color_red;
+- c_7314578.hdr.grayed = 0;
+-c_7314578.tag = closureN_tag;
+- c_7314578.fn = (function_type)__lambda_32;
+-c_7314578.num_args = 1;
+-c_7314578.num_elements = 4;
+-c_7314578.elements = (object *)e_7314711;
+-c_7314578.elements[0] = bindings_7326_732884;
+-c_7314578.elements[1] = ((closureN)self_7313060)->elements[0];
+-c_7314578.elements[2] = ((closureN)self_7313060)->elements[1];
+-c_7314578.elements[3] = ((closureN)self_7313060)->elements[2];
++closureN_type c_7313278;
++object e_7313411 [4];
++c_7313278.hdr.mark = gc_color_red;
++ c_7313278.hdr.grayed = 0;
++c_7313278.tag = closureN_tag;
++ c_7313278.fn = (function_type)__lambda_32;
++c_7313278.num_args = 1;
++c_7313278.num_elements = 4;
++c_7313278.elements = (object *)e_7313411;
++c_7313278.elements[0] = bindings_7326_732537;
++c_7313278.elements[1] = ((closureN)self_7311807)->elements[0];
++c_7313278.elements[2] = ((closureN)self_7311807)->elements[1];
++c_7313278.elements[3] = ((closureN)self_7311807)->elements[2];
+
+-return_direct_with_clo1(data,(closure)&c_7314568,__lambda_31, &c_7314578);;
++return_direct_with_clo1(data,(closure)&c_7313268,__lambda_31, &c_7313278);;
+ }
+
+-static void __lambda_32(void *data, object self_7313061, int argc, object *args) /* object self_7313061, object r_734190 */
++static void __lambda_32(void *data, object self_7311808, int argc, object *args) /* object self_7311808, object r_733738 */
+ {
+
+
+-closureN_type c_7314580;
+-object e_7314696 [4];
+-c_7314580.hdr.mark = gc_color_red;
+- c_7314580.hdr.grayed = 0;
+-c_7314580.tag = closureN_tag;
+- c_7314580.fn = (function_type)__lambda_33;
+-c_7314580.num_args = 1;
+-c_7314580.num_elements = 4;
+-c_7314580.elements = (object *)e_7314696;
+-c_7314580.elements[0] = ((closureN)self_7313061)->elements[0];
+-c_7314580.elements[1] = ((closureN)self_7313061)->elements[1];
+-c_7314580.elements[2] = ((closureN)self_7313061)->elements[2];
+-c_7314580.elements[3] = ((closureN)self_7313061)->elements[3];
++closureN_type c_7313280;
++object e_7313396 [4];
++c_7313280.hdr.mark = gc_color_red;
++ c_7313280.hdr.grayed = 0;
++c_7313280.tag = closureN_tag;
++ c_7313280.fn = (function_type)__lambda_33;
++c_7313280.num_args = 1;
++c_7313280.num_elements = 4;
++c_7313280.elements = (object *)e_7313396;
++c_7313280.elements[0] = ((closureN)self_7311808)->elements[0];
++c_7313280.elements[1] = ((closureN)self_7311808)->elements[1];
++c_7313280.elements[2] = ((closureN)self_7311808)->elements[2];
++c_7313280.elements[3] = ((closureN)self_7311808)->elements[3];
+
+
+-mmacro(c_7314697, (function_type)__lambda_42);c_7314697.num_args = 1;
+-return_direct_with_clo1(data,(closure)&c_7314580,__lambda_33, &c_7314697);;
++mmacro(c_7313397, (function_type)__lambda_42);c_7313397.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313280,__lambda_33, &c_7313397);;
+ }
+
+-static void __lambda_42(void *data, object self_7313062, int argc, object *args) /* object self_7313062, object k_734228, object x_7327_732885 */
++static void __lambda_42(void *data, object self_7311809, int argc, object *args) /* object self_7311809, object k_733776, object x_7327_732538 */
+ {
+- object k_734228 = args[0]; object x_7327_732885 = args[1];
++ object k_733776 = args[0]; object x_7327_732538 = args[1];
+
+-if( (boolean_f != Cyc_is_pair(x_7327_732885)) ){
++if( (boolean_f != Cyc_is_pair(x_7327_732538)) ){
+
+
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7327_732885))) ){
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7327_732538))) ){
+
+
+
+
+-return_direct_with_clo1(data, k_734228, (((closure) k_734228)->fn), Cyc_is_null(Cyc_cddr(data, x_7327_732885)));
++return_direct_with_clo1(data, k_733776, (((closure) k_733776)->fn), Cyc_is_null(Cyc_cddr(data, x_7327_732538)));
+ } else {
+- return_direct_with_clo1(data, k_734228, (((closure) k_734228)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_733776, (((closure) k_733776)->fn), boolean_f);}
+ ;
+ } else {
+- return_direct_with_clo1(data, k_734228, (((closure) k_734228)->fn), boolean_f);}
++ return_direct_with_clo1(data, k_733776, (((closure) k_733776)->fn), boolean_f);}
+ ;;
+ }
+
+-static void __lambda_33(void *data, object self_7313063, int argc, object *args) /* object self_7313063, object r_734227 */
++static void __lambda_33(void *data, object self_7311810, int argc, object *args) /* object self_7311810, object r_733775 */
+ {
+- object r_734227 = args[0];
++ object r_733775 = args[0];
+
+-closureN_type c_7314582;
+-object e_7314694 [4];
+-c_7314582.hdr.mark = gc_color_red;
+- c_7314582.hdr.grayed = 0;
+-c_7314582.tag = closureN_tag;
+- c_7314582.fn = (function_type)__lambda_34;
+-c_7314582.num_args = 1;
+-c_7314582.num_elements = 4;
+-c_7314582.elements = (object *)e_7314694;
+-c_7314582.elements[0] = ((closureN)self_7313063)->elements[0];
+-c_7314582.elements[1] = ((closureN)self_7313063)->elements[1];
+-c_7314582.elements[2] = ((closureN)self_7313063)->elements[2];
+-c_7314582.elements[3] = ((closureN)self_7313063)->elements[3];
+-
+-return_direct_with_clo3(data, __glo_every_scheme_base, (((closure) __glo_every_scheme_base)->fn), &c_7314582, r_734227, ((closureN)self_7313063)->elements[0]);;
+-}
+-
+-static void __lambda_34(void *data, object self_7313064, int argc, object *args) /* object self_7313064, object r_734191 */
+- {
+- object r_734191 = args[0];
+- if( (boolean_f != r_734191) ){
+-
+-closureN_type c_7314584;
+-object e_7314688 [4];
+-c_7314584.hdr.mark = gc_color_red;
+- c_7314584.hdr.grayed = 0;
+-c_7314584.tag = closureN_tag;
+- c_7314584.fn = (function_type)__lambda_35;
+-c_7314584.num_args = 1;
+-c_7314584.num_elements = 4;
+-c_7314584.elements = (object *)e_7314688;
+-c_7314584.elements[0] = ((closureN)self_7313064)->elements[0];
+-c_7314584.elements[1] = ((closureN)self_7313064)->elements[1];
+-c_7314584.elements[2] = ((closureN)self_7313064)->elements[2];
+-c_7314584.elements[3] = ((closureN)self_7313064)->elements[3];
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314584, primitive_car, ((closureN)self_7313064)->elements[0]);
+-} else {
+-
+-make_utf8_string_with_len(c_7314692, "bad let syntax", 14, 14);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313064)->elements[2], &c_7314692, ((closureN)self_7313064)->elements[1]);}
+-;;
+-}
+-
+-static void __lambda_35(void *data, object self_7313065, int argc, object *args) /* object self_7313065, object r_734192 */
+- {
+- object r_734192 = args[0];
+-
+-closureN_type c_7314586;
+-object e_7314686 [4];
+-c_7314586.hdr.mark = gc_color_red;
+- c_7314586.hdr.grayed = 0;
+-c_7314586.tag = closureN_tag;
+- c_7314586.fn = (function_type)__lambda_36;
+-c_7314586.num_args = 1;
+-c_7314586.num_elements = 4;
+-c_7314586.elements = (object *)e_7314686;
+-c_7314586.elements[0] = ((closureN)self_7313065)->elements[1];
+-c_7314586.elements[1] = ((closureN)self_7313065)->elements[2];
+-c_7314586.elements[2] = r_734192;
+-c_7314586.elements[3] = ((closureN)self_7313065)->elements[3];
+-
+-return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7314586, primitive_cadr, ((closureN)self_7313065)->elements[0]);;
+-}
+-
+-static void __lambda_36(void *data, object self_7313066, int argc, object *args) /* object self_7313066, object r_734193 */
+- {
+- object r_734193 = args[0];
+-
+-closureN_type c_7314588;
+-object e_7314684 [3];
+-c_7314588.hdr.mark = gc_color_red;
+- c_7314588.hdr.grayed = 0;
+-c_7314588.tag = closureN_tag;
+- c_7314588.fn = (function_type)__lambda_37;
+-c_7314588.num_args = 2;
+-c_7314588.num_elements = 3;
+-c_7314588.elements = (object *)e_7314684;
+-c_7314588.elements[0] = ((closureN)self_7313066)->elements[0];
+-c_7314588.elements[1] = ((closureN)self_7313066)->elements[1];
+-c_7314588.elements[2] = ((closureN)self_7313066)->elements[3];
+-
+-return_direct_with_clo2(data,(closure)&c_7314588,__lambda_37, ((closureN)self_7313066)->elements[2], r_734193);;
+-}
+-
+-static void __lambda_37(void *data, object self_7313067, int argc, object *args) /* object self_7313067, object vars_7328_732886, object vals_7329_732887 */
+- {
+- object vars_7328_732886 = args[0]; object vals_7329_732887 = args[1];
+-
+-
+-if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7313067)->elements[0]))) ){
+-
+-closureN_type c_7314596;
+-object e_7314663 [5];
+-c_7314596.hdr.mark = gc_color_red;
+- c_7314596.hdr.grayed = 0;
+-c_7314596.tag = closureN_tag;
+- c_7314596.fn = (function_type)__lambda_38;
+-c_7314596.num_args = 1;
+-c_7314596.num_elements = 5;
+-c_7314596.elements = (object *)e_7314663;
+-c_7314596.elements[0] = ((closureN)self_7313067)->elements[0];
+-c_7314596.elements[1] = ((closureN)self_7313067)->elements[1];
+-c_7314596.elements[2] = ((closureN)self_7313067)->elements[2];
+-c_7314596.elements[3] = vals_7329_732887;
+-c_7314596.elements[4] = vars_7328_732886;
++closureN_type c_7313282;
++object e_7313394 [4];
++c_7313282.hdr.mark = gc_color_red;
++ c_7313282.hdr.grayed = 0;
++c_7313282.tag = closureN_tag;
++ c_7313282.fn = (function_type)__lambda_34;
++c_7313282.num_args = 1;
++c_7313282.num_elements = 4;
++c_7313282.elements = (object *)e_7313394;
++c_7313282.elements[0] = ((closureN)self_7311810)->elements[0];
++c_7313282.elements[1] = ((closureN)self_7311810)->elements[1];
++c_7313282.elements[2] = ((closureN)self_7311810)->elements[2];
++c_7313282.elements[3] = ((closureN)self_7311810)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313067)->elements[2], &c_7314596, quote_lambda);
++return_direct_with_clo3(data, __glo_every_scheme_base, (((closure) __glo_every_scheme_base)->fn), &c_7313282, r_733775, ((closureN)self_7311810)->elements[0]);;
++}
++
++static void __lambda_34(void *data, object self_7311811, int argc, object *args) /* object self_7311811, object r_733739 */
++ {
++ object r_733739 = args[0];
++ if( (boolean_f != r_733739) ){
++
++closureN_type c_7313284;
++object e_7313388 [4];
++c_7313284.hdr.mark = gc_color_red;
++ c_7313284.hdr.grayed = 0;
++c_7313284.tag = closureN_tag;
++ c_7313284.fn = (function_type)__lambda_35;
++c_7313284.num_args = 1;
++c_7313284.num_elements = 4;
++c_7313284.elements = (object *)e_7313388;
++c_7313284.elements[0] = ((closureN)self_7311811)->elements[0];
++c_7313284.elements[1] = ((closureN)self_7311811)->elements[1];
++c_7313284.elements[2] = ((closureN)self_7311811)->elements[2];
++c_7313284.elements[3] = ((closureN)self_7311811)->elements[3];
++
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313284, primitive_car, ((closureN)self_7311811)->elements[0]);
+ } else {
+
+-closureN_type c_7314666;
+-object e_7314683 [4];
+-c_7314666.hdr.mark = gc_color_red;
+- c_7314666.hdr.grayed = 0;
+-c_7314666.tag = closureN_tag;
+- c_7314666.fn = (function_type)__lambda_41;
+-c_7314666.num_args = 1;
+-c_7314666.num_elements = 4;
+-c_7314666.elements = (object *)e_7314683;
+-c_7314666.elements[0] = ((closureN)self_7313067)->elements[0];
+-c_7314666.elements[1] = ((closureN)self_7313067)->elements[1];
+-c_7314666.elements[2] = vals_7329_732887;
+-c_7314666.elements[3] = vars_7328_732886;
++make_utf8_string_with_len(c_7313392, "bad let syntax", 14, 14);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311811)->elements[2], &c_7313392, ((closureN)self_7311811)->elements[1]);}
++;;
++}
++
++static void __lambda_35(void *data, object self_7311812, int argc, object *args) /* object self_7311812, object r_733740 */
++ {
++ object r_733740 = args[0];
++
++closureN_type c_7313286;
++object e_7313386 [4];
++c_7313286.hdr.mark = gc_color_red;
++ c_7313286.hdr.grayed = 0;
++c_7313286.tag = closureN_tag;
++ c_7313286.fn = (function_type)__lambda_36;
++c_7313286.num_args = 1;
++c_7313286.num_elements = 4;
++c_7313286.elements = (object *)e_7313386;
++c_7313286.elements[0] = ((closureN)self_7311812)->elements[1];
++c_7313286.elements[1] = ((closureN)self_7311812)->elements[2];
++c_7313286.elements[2] = r_733740;
++c_7313286.elements[3] = ((closureN)self_7311812)->elements[3];
++
++return_direct_with_clo3(data, __glo_Cyc_91map_91loop_911_scheme_base, (((closure) __glo_Cyc_91map_91loop_911_scheme_base)->fn), &c_7313286, primitive_cadr, ((closureN)self_7311812)->elements[0]);;
++}
++
++static void __lambda_36(void *data, object self_7311813, int argc, object *args) /* object self_7311813, object r_733741 */
++ {
++ object r_733741 = args[0];
++
++closureN_type c_7313288;
++object e_7313384 [3];
++c_7313288.hdr.mark = gc_color_red;
++ c_7313288.hdr.grayed = 0;
++c_7313288.tag = closureN_tag;
++ c_7313288.fn = (function_type)__lambda_37;
++c_7313288.num_args = 2;
++c_7313288.num_elements = 3;
++c_7313288.elements = (object *)e_7313384;
++c_7313288.elements[0] = ((closureN)self_7311813)->elements[0];
++c_7313288.elements[1] = ((closureN)self_7311813)->elements[1];
++c_7313288.elements[2] = ((closureN)self_7311813)->elements[3];
++
++return_direct_with_clo2(data,(closure)&c_7313288,__lambda_37, ((closureN)self_7311813)->elements[2], r_733741);;
++}
++
++static void __lambda_37(void *data, object self_7311814, int argc, object *args) /* object self_7311814, object vars_7328_732539, object vals_7329_732540 */
++ {
++ object vars_7328_732539 = args[0]; object vals_7329_732540 = args[1];
++
++
++if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7311814)->elements[0]))) ){
++
++closureN_type c_7313296;
++object e_7313363 [5];
++c_7313296.hdr.mark = gc_color_red;
++ c_7313296.hdr.grayed = 0;
++c_7313296.tag = closureN_tag;
++ c_7313296.fn = (function_type)__lambda_38;
++c_7313296.num_args = 1;
++c_7313296.num_elements = 5;
++c_7313296.elements = (object *)e_7313363;
++c_7313296.elements[0] = ((closureN)self_7311814)->elements[0];
++c_7313296.elements[1] = ((closureN)self_7311814)->elements[1];
++c_7313296.elements[2] = ((closureN)self_7311814)->elements[2];
++c_7313296.elements[3] = vals_7329_732540;
++c_7313296.elements[4] = vars_7328_732539;
++
++return_closcall2(data, ((closureN)self_7311814)->elements[2], &c_7313296, quote_lambda);
++} else {
++
++closureN_type c_7313366;
++object e_7313383 [4];
++c_7313366.hdr.mark = gc_color_red;
++ c_7313366.hdr.grayed = 0;
++c_7313366.tag = closureN_tag;
++ c_7313366.fn = (function_type)__lambda_41;
++c_7313366.num_args = 1;
++c_7313366.num_elements = 4;
++c_7313366.elements = (object *)e_7313383;
++c_7313366.elements[0] = ((closureN)self_7311814)->elements[0];
++c_7313366.elements[1] = ((closureN)self_7311814)->elements[1];
++c_7313366.elements[2] = vals_7329_732540;
++c_7313366.elements[3] = vars_7328_732539;
+
+-return_closcall2(data, ((closureN)self_7313067)->elements[2], &c_7314666, quote_lambda);}
++return_closcall2(data, ((closureN)self_7311814)->elements[2], &c_7313366, quote_lambda);}
+ ;;
+ }
+
+-static void __lambda_41(void *data, object self_7313071, int argc, object *args) /* object self_7313071, object r_734222 */
++static void __lambda_41(void *data, object self_7311818, int argc, object *args) /* object self_7311818, object r_733770 */
+ {
+- object r_734222 = args[0];
++ object r_733770 = args[0];
+
+-pair_type local_7314671;
++pair_type local_7313371;
+
+-pair_type local_7314674;
++pair_type local_7313374;
+
+-pair_type local_7314677;
++pair_type local_7313377;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313071)->elements[1], (((closure) ((closureN)self_7313071)->elements[1])->fn), set_pair_as_expr(&local_7314671, set_pair_as_expr(&local_7314674, r_734222, set_pair_as_expr(&local_7314677, ((closureN)self_7313071)->elements[3], Cyc_cddr(data, ((closureN)self_7313071)->elements[0]))), ((closureN)self_7313071)->elements[2]));;
++return_direct_with_clo1(data, ((closureN)self_7311818)->elements[1], (((closure) ((closureN)self_7311818)->elements[1])->fn), set_pair_as_expr(&local_7313371, set_pair_as_expr(&local_7313374, r_733770, set_pair_as_expr(&local_7313377, ((closureN)self_7311818)->elements[3], Cyc_cddr(data, ((closureN)self_7311818)->elements[0]))), ((closureN)self_7311818)->elements[2]));;
+ }
+
+-static void __lambda_38(void *data, object self_7313068, int argc, object *args) /* object self_7313068, object r_734196 */
++static void __lambda_38(void *data, object self_7311815, int argc, object *args) /* object self_7311815, object r_733744 */
+ {
+- object r_734196 = args[0];
++ object r_733744 = args[0];
+
+-closureN_type c_7314599;
+-object e_7314662 [6];
+-c_7314599.hdr.mark = gc_color_red;
+- c_7314599.hdr.grayed = 0;
+-c_7314599.tag = closureN_tag;
+- c_7314599.fn = (function_type)__lambda_39;
+-c_7314599.num_args = 1;
+-c_7314599.num_elements = 6;
+-c_7314599.elements = (object *)e_7314662;
+-c_7314599.elements[0] = ((closureN)self_7313068)->elements[0];
+-c_7314599.elements[1] = ((closureN)self_7313068)->elements[1];
+-c_7314599.elements[2] = r_734196;
+-c_7314599.elements[3] = ((closureN)self_7313068)->elements[2];
+-c_7314599.elements[4] = ((closureN)self_7313068)->elements[3];
+-c_7314599.elements[5] = ((closureN)self_7313068)->elements[4];
++closureN_type c_7313299;
++object e_7313362 [6];
++c_7313299.hdr.mark = gc_color_red;
++ c_7313299.hdr.grayed = 0;
++c_7313299.tag = closureN_tag;
++ c_7313299.fn = (function_type)__lambda_39;
++c_7313299.num_args = 1;
++c_7313299.num_elements = 6;
++c_7313299.elements = (object *)e_7313362;
++c_7313299.elements[0] = ((closureN)self_7311815)->elements[0];
++c_7313299.elements[1] = ((closureN)self_7311815)->elements[1];
++c_7313299.elements[2] = r_733744;
++c_7313299.elements[3] = ((closureN)self_7311815)->elements[2];
++c_7313299.elements[4] = ((closureN)self_7311815)->elements[3];
++c_7313299.elements[5] = ((closureN)self_7311815)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313068)->elements[2], &c_7314599, quote_letrec);;
++return_closcall2(data, ((closureN)self_7311815)->elements[2], &c_7313299, quote_letrec);;
+ }
+
+-static void __lambda_39(void *data, object self_7313069, int argc, object *args) /* object self_7313069, object r_734201 */
++static void __lambda_39(void *data, object self_7311816, int argc, object *args) /* object self_7311816, object r_733749 */
+ {
+- object r_734201 = args[0];
++ object r_733749 = args[0];
+
+-closureN_type c_7314602;
+-object e_7314661 [6];
+-c_7314602.hdr.mark = gc_color_red;
+- c_7314602.hdr.grayed = 0;
+-c_7314602.tag = closureN_tag;
+- c_7314602.fn = (function_type)__lambda_40;
+-c_7314602.num_args = 1;
+-c_7314602.num_elements = 6;
+-c_7314602.elements = (object *)e_7314661;
+-c_7314602.elements[0] = ((closureN)self_7313069)->elements[0];
+-c_7314602.elements[1] = ((closureN)self_7313069)->elements[1];
+-c_7314602.elements[2] = ((closureN)self_7313069)->elements[2];
+-c_7314602.elements[3] = r_734201;
+-c_7314602.elements[4] = ((closureN)self_7313069)->elements[4];
+-c_7314602.elements[5] = ((closureN)self_7313069)->elements[5];
++closureN_type c_7313302;
++object e_7313361 [6];
++c_7313302.hdr.mark = gc_color_red;
++ c_7313302.hdr.grayed = 0;
++c_7313302.tag = closureN_tag;
++ c_7313302.fn = (function_type)__lambda_40;
++c_7313302.num_args = 1;
++c_7313302.num_elements = 6;
++c_7313302.elements = (object *)e_7313361;
++c_7313302.elements[0] = ((closureN)self_7311816)->elements[0];
++c_7313302.elements[1] = ((closureN)self_7311816)->elements[1];
++c_7313302.elements[2] = ((closureN)self_7311816)->elements[2];
++c_7313302.elements[3] = r_733749;
++c_7313302.elements[4] = ((closureN)self_7311816)->elements[4];
++c_7313302.elements[5] = ((closureN)self_7311816)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313069)->elements[3], &c_7314602, quote_lambda);;
++return_closcall2(data, ((closureN)self_7311816)->elements[3], &c_7313302, quote_lambda);;
+ }
+
+-static void __lambda_40(void *data, object self_7313070, int argc, object *args) /* object self_7313070, object r_734214 */
++static void __lambda_40(void *data, object self_7311817, int argc, object *args) /* object self_7311817, object r_733762 */
+ {
+- object r_734214 = args[0];
++ object r_733762 = args[0];
+
+-pair_type local_7314607;
++pair_type local_7313307;
+
+-pair_type local_7314610;
++pair_type local_7313310;
+
+-pair_type local_7314614;
++pair_type local_7313314;
+
+-pair_type local_7314618;
++pair_type local_7313318;
+
+-pair_type local_7314621;
++pair_type local_7313321;
+
+-pair_type local_7314625;
++pair_type local_7313325;
+
+-pair_type local_7314628;
++pair_type local_7313328;
+
+-pair_type local_7314631;
++pair_type local_7313331;
+
+
+
+-pair_type local_7314637;
++pair_type local_7313337;
+
+-pair_type local_7314640;
++pair_type local_7313340;
+
+-pair_type local_7314643;
++pair_type local_7313343;
+
+
+
+
+
+-pair_type local_7314652;
++pair_type local_7313352;
+
+-pair_type local_7314655;
++pair_type local_7313355;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313070)->elements[1], (((closure) ((closureN)self_7313070)->elements[1])->fn), set_pair_as_expr(&local_7314607, set_pair_as_expr(&local_7314610, ((closureN)self_7313070)->elements[2], set_pair_as_expr(&local_7314614, ((closureN)self_7313070)->elements[5], set_pair_as_expr(&local_7314618, set_pair_as_expr(&local_7314621, ((closureN)self_7313070)->elements[3], set_pair_as_expr(&local_7314625, set_pair_as_expr(&local_7314628, set_pair_as_expr(&local_7314631, Cyc_cadr(data, ((closureN)self_7313070)->elements[0]), set_pair_as_expr(&local_7314637, set_pair_as_expr(&local_7314640, r_734214, set_pair_as_expr(&local_7314643, ((closureN)self_7313070)->elements[5], Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7313070)->elements[0])))), NULL)), NULL), set_pair_as_expr(&local_7314652, set_pair_as_expr(&local_7314655, Cyc_cadr(data, ((closureN)self_7313070)->elements[0]), ((closureN)self_7313070)->elements[5]), NULL))), NULL))), ((closure
N)self_7313070)->elements[4]));;
++return_direct_with_clo1(data, ((closureN)self_7311817)->elements[1], (((closure) ((closureN)self_7311817)->elements[1])->fn), set_pair_as_expr(&local_7313307, set_pair_as_expr(&local_7313310, ((closureN)self_7311817)->elements[2], set_pair_as_expr(&local_7313314, ((closureN)self_7311817)->elements[5], set_pair_as_expr(&local_7313318, set_pair_as_expr(&local_7313321, ((closureN)self_7311817)->elements[3], set_pair_as_expr(&local_7313325, set_pair_as_expr(&local_7313328, set_pair_as_expr(&local_7313331, Cyc_cadr(data, ((closureN)self_7311817)->elements[0]), set_pair_as_expr(&local_7313337, set_pair_as_expr(&local_7313340, r_733762, set_pair_as_expr(&local_7313343, ((closureN)self_7311817)->elements[5], Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7311817)->elements[0])))), NULL)), NULL), set_pair_as_expr(&local_7313352, set_pair_as_expr(&local_7313355, Cyc_cadr(data, ((closureN)self_7311817)->elements[0]), ((closureN)self_7311817)->elements[5]), NULL))), NULL))), ((closure
N)self_7311817)->elements[4]));;
+ }
+
+-static void __lambda_31(void *data, object self_7313072, int argc, object *args) /* object self_7313072, object k_734233 */
++static void __lambda_31(void *data, object self_7311819, int argc, object *args) /* object self_7311819, object k_733781 */
+ {
+- object k_734233 = args[0];
+- complex_num_type local_7314571;
++ object k_733781 = args[0];
++ complex_num_type local_7313271;
+ if( (boolean_f != ((inline_function_type)
+- ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314571, ((closureN)self_7313072)->elements[0])) ){
+- return_direct_with_clo1(data, k_734233, (((closure) k_734233)->fn), boolean_f);
++ ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313271, ((closureN)self_7311819)->elements[0])) ){
++ return_direct_with_clo1(data, k_733781, (((closure) k_733781)->fn), boolean_f);
+ } else {
+
+-make_utf8_string_with_len(c_7314575, "bad let bindings", 16, 16);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), k_734233, &c_7314575, ((closureN)self_7313072)->elements[1]);}
++make_utf8_string_with_len(c_7313275, "bad let bindings", 16, 16);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), k_733781, &c_7313275, ((closureN)self_7311819)->elements[1]);}
+ ;;
+ }
+
+-static void __lambda_28(void *data, object self_7313073, int argc, object *args) /* object self_7313073, object k_734239 */
++static void __lambda_28(void *data, object self_7311820, int argc, object *args) /* object self_7311820, object k_733787 */
+ {
+- object k_734239 = args[0];
++ object k_733787 = args[0];
+
+-closureN_type c_7314536;
+-object e_7314545 [2];
+-c_7314536.hdr.mark = gc_color_red;
+- c_7314536.hdr.grayed = 0;
+-c_7314536.tag = closureN_tag;
+- c_7314536.fn = (function_type)__lambda_29;
+-c_7314536.num_args = 1;
+-c_7314536.num_elements = 2;
+-c_7314536.elements = (object *)e_7314545;
+-c_7314536.elements[0] = ((closureN)self_7313073)->elements[0];
+-c_7314536.elements[1] = k_734239;
++closureN_type c_7313236;
++object e_7313245 [2];
++c_7313236.hdr.mark = gc_color_red;
++ c_7313236.hdr.grayed = 0;
++c_7313236.tag = closureN_tag;
++ c_7313236.fn = (function_type)__lambda_29;
++c_7313236.num_args = 1;
++c_7313236.num_elements = 2;
++c_7313236.elements = (object *)e_7313245;
++c_7313236.elements[0] = ((closureN)self_7311820)->elements[0];
++c_7313236.elements[1] = k_733787;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314536,__lambda_29, Cyc_cddr(data, ((closureN)self_7313073)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7313236,__lambda_29, Cyc_cddr(data, ((closureN)self_7311820)->elements[0]));;
+ }
+
+-static void __lambda_29(void *data, object self_7313074, int argc, object *args) /* object self_7313074, object r_734241 */
++static void __lambda_29(void *data, object self_7311821, int argc, object *args) /* object self_7311821, object r_733789 */
+ {
+- object r_734241 = args[0];
++ object r_733789 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734241)) ){
++if( (boolean_f != Cyc_is_null(r_733789)) ){
+
+-make_utf8_string_with_len(c_7314541, "no let body", 11, 11);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313074)->elements[1], &c_7314541, ((closureN)self_7313074)->elements[0]);
++make_utf8_string_with_len(c_7313241, "no let body", 11, 11);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311821)->elements[1], &c_7313241, ((closureN)self_7311821)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313074)->elements[1], (((closure) ((closureN)self_7313074)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311821)->elements[1], (((closure) ((closureN)self_7311821)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_25(void *data, object self_7313075, int argc, object *args) /* object self_7313075, object k_734242 */
++static void __lambda_25(void *data, object self_7311822, int argc, object *args) /* object self_7311822, object k_733790 */
+ {
+- object k_734242 = args[0];
++ object k_733790 = args[0];
+
+-closureN_type c_7314518;
+-object e_7314527 [2];
+-c_7314518.hdr.mark = gc_color_red;
+- c_7314518.hdr.grayed = 0;
+-c_7314518.tag = closureN_tag;
+- c_7314518.fn = (function_type)__lambda_26;
+-c_7314518.num_args = 1;
+-c_7314518.num_elements = 2;
+-c_7314518.elements = (object *)e_7314527;
+-c_7314518.elements[0] = ((closureN)self_7313075)->elements[0];
+-c_7314518.elements[1] = k_734242;
++closureN_type c_7313218;
++object e_7313227 [2];
++c_7313218.hdr.mark = gc_color_red;
++ c_7313218.hdr.grayed = 0;
++c_7313218.tag = closureN_tag;
++ c_7313218.fn = (function_type)__lambda_26;
++c_7313218.num_args = 1;
++c_7313218.num_elements = 2;
++c_7313218.elements = (object *)e_7313227;
++c_7313218.elements[0] = ((closureN)self_7311822)->elements[0];
++c_7313218.elements[1] = k_733790;
+
+
+
+-return_direct_with_clo1(data,(closure)&c_7314518,__lambda_26, Cyc_cdr(data, ((closureN)self_7313075)->elements[0]));;
++return_direct_with_clo1(data,(closure)&c_7313218,__lambda_26, Cyc_cdr(data, ((closureN)self_7311822)->elements[0]));;
+ }
+
+-static void __lambda_26(void *data, object self_7313076, int argc, object *args) /* object self_7313076, object r_734244 */
++static void __lambda_26(void *data, object self_7311823, int argc, object *args) /* object self_7311823, object r_733792 */
+ {
+- object r_734244 = args[0];
++ object r_733792 = args[0];
+
+-if( (boolean_f != Cyc_is_null(r_734244)) ){
++if( (boolean_f != Cyc_is_null(r_733792)) ){
+
+-make_utf8_string_with_len(c_7314523, "empty let", 9, 9);
+-return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7313076)->elements[1], &c_7314523, ((closureN)self_7313076)->elements[0]);
++make_utf8_string_with_len(c_7313223, "empty let", 9, 9);
++return_direct_with_clo3(data, __glo_error_95loc_scheme_base, (((closure) __glo_error_95loc_scheme_base)->fn), ((closureN)self_7311823)->elements[1], &c_7313223, ((closureN)self_7311823)->elements[0]);
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313076)->elements[1], (((closure) ((closureN)self_7313076)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311823)->elements[1], (((closure) ((closureN)self_7311823)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_734161, object expr_7313_732878, object rename_7314_732879, object compare_7315_732880 */
++static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_733709, object expr_7313_732531, object rename_7314_732532, object compare_7315_732533 */
+ {
+-object k_734161 = args[0]; object expr_7313_732878 = args[1]; object rename_7314_732879 = args[2];
++object k_733709 = args[0]; object expr_7313_732531 = args[1]; object rename_7314_732532 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:or");
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_7313_732878))) ){
+- return_direct_with_clo1(data, k_734161, (((closure) k_734161)->fn), boolean_f);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_7313_732531))) ){
++ return_direct_with_clo1(data, k_733709, (((closure) k_733709)->fn), boolean_f);
+ } else {
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_7313_732878))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_7313_732531))) ){
+
+
+-return_direct_with_clo1(data, k_734161, (((closure) k_734161)->fn), Cyc_cadr(data, expr_7313_732878));
++return_direct_with_clo1(data, k_733709, (((closure) k_733709)->fn), Cyc_cadr(data, expr_7313_732531));
+ } else {
+
+-closureN_type c_7314464;
+-object e_7314513 [3];
+-c_7314464.hdr.mark = gc_color_red;
+- c_7314464.hdr.grayed = 0;
+-c_7314464.tag = closureN_tag;
+- c_7314464.fn = (function_type)__lambda_18;
+-c_7314464.num_args = 1;
+-c_7314464.num_elements = 3;
+-c_7314464.elements = (object *)e_7314513;
+-c_7314464.elements[0] = expr_7313_732878;
+-c_7314464.elements[1] = k_734161;
+-c_7314464.elements[2] = rename_7314_732879;
++closureN_type c_7313164;
++object e_7313213 [3];
++c_7313164.hdr.mark = gc_color_red;
++ c_7313164.hdr.grayed = 0;
++c_7313164.tag = closureN_tag;
++ c_7313164.fn = (function_type)__lambda_18;
++c_7313164.num_args = 1;
++c_7313164.num_elements = 3;
++c_7313164.elements = (object *)e_7313213;
++c_7313164.elements[0] = expr_7313_732531;
++c_7313164.elements[1] = k_733709;
++c_7313164.elements[2] = rename_7314_732532;
+
+-return_closcall2(data, rename_7314_732879, &c_7314464, quote_let);}
++return_closcall2(data, rename_7314_732532, &c_7313164, quote_let);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_18(void *data, object self_7313053, int argc, object *args) /* object self_7313053, object r_734164 */
++static void __lambda_18(void *data, object self_7311800, int argc, object *args) /* object self_7311800, object r_733712 */
+ {
+- object r_734164 = args[0];
++ object r_733712 = args[0];
+
+-closureN_type c_7314467;
+-object e_7314512 [4];
+-c_7314467.hdr.mark = gc_color_red;
+- c_7314467.hdr.grayed = 0;
+-c_7314467.tag = closureN_tag;
+- c_7314467.fn = (function_type)__lambda_19;
+-c_7314467.num_args = 1;
+-c_7314467.num_elements = 4;
+-c_7314467.elements = (object *)e_7314512;
+-c_7314467.elements[0] = ((closureN)self_7313053)->elements[0];
+-c_7314467.elements[1] = ((closureN)self_7313053)->elements[1];
+-c_7314467.elements[2] = r_734164;
+-c_7314467.elements[3] = ((closureN)self_7313053)->elements[2];
++closureN_type c_7313167;
++object e_7313212 [4];
++c_7313167.hdr.mark = gc_color_red;
++ c_7313167.hdr.grayed = 0;
++c_7313167.tag = closureN_tag;
++ c_7313167.fn = (function_type)__lambda_19;
++c_7313167.num_args = 1;
++c_7313167.num_elements = 4;
++c_7313167.elements = (object *)e_7313212;
++c_7313167.elements[0] = ((closureN)self_7311800)->elements[0];
++c_7313167.elements[1] = ((closureN)self_7311800)->elements[1];
++c_7313167.elements[2] = r_733712;
++c_7313167.elements[3] = ((closureN)self_7311800)->elements[2];
+
+-return_closcall2(data, ((closureN)self_7313053)->elements[2], &c_7314467, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311800)->elements[2], &c_7313167, quote_tmp);;
+ }
+
+-static void __lambda_19(void *data, object self_7313054, int argc, object *args) /* object self_7313054, object r_734178 */
++static void __lambda_19(void *data, object self_7311801, int argc, object *args) /* object self_7311801, object r_733726 */
+ {
+- object r_734178 = args[0];
++ object r_733726 = args[0];
+
+-closureN_type c_7314470;
+-object e_7314511 [5];
+-c_7314470.hdr.mark = gc_color_red;
+- c_7314470.hdr.grayed = 0;
+-c_7314470.tag = closureN_tag;
+- c_7314470.fn = (function_type)__lambda_20;
+-c_7314470.num_args = 1;
+-c_7314470.num_elements = 5;
+-c_7314470.elements = (object *)e_7314511;
+-c_7314470.elements[0] = ((closureN)self_7313054)->elements[0];
+-c_7314470.elements[1] = ((closureN)self_7313054)->elements[1];
+-c_7314470.elements[2] = ((closureN)self_7313054)->elements[2];
+-c_7314470.elements[3] = r_734178;
+-c_7314470.elements[4] = ((closureN)self_7313054)->elements[3];
++closureN_type c_7313170;
++object e_7313211 [5];
++c_7313170.hdr.mark = gc_color_red;
++ c_7313170.hdr.grayed = 0;
++c_7313170.tag = closureN_tag;
++ c_7313170.fn = (function_type)__lambda_20;
++c_7313170.num_args = 1;
++c_7313170.num_elements = 5;
++c_7313170.elements = (object *)e_7313211;
++c_7313170.elements[0] = ((closureN)self_7311801)->elements[0];
++c_7313170.elements[1] = ((closureN)self_7311801)->elements[1];
++c_7313170.elements[2] = ((closureN)self_7311801)->elements[2];
++c_7313170.elements[3] = r_733726;
++c_7313170.elements[4] = ((closureN)self_7311801)->elements[3];
+
+-return_closcall2(data, ((closureN)self_7313054)->elements[3], &c_7314470, quote__if);;
++return_closcall2(data, ((closureN)self_7311801)->elements[3], &c_7313170, quote__if);;
+ }
+
+-static void __lambda_20(void *data, object self_7313055, int argc, object *args) /* object self_7313055, object r_734167 */
++static void __lambda_20(void *data, object self_7311802, int argc, object *args) /* object self_7311802, object r_733715 */
+ {
+- object r_734167 = args[0];
++ object r_733715 = args[0];
+
+-closureN_type c_7314473;
+-object e_7314510 [6];
+-c_7314473.hdr.mark = gc_color_red;
+- c_7314473.hdr.grayed = 0;
+-c_7314473.tag = closureN_tag;
+- c_7314473.fn = (function_type)__lambda_21;
+-c_7314473.num_args = 1;
+-c_7314473.num_elements = 6;
+-c_7314473.elements = (object *)e_7314510;
+-c_7314473.elements[0] = ((closureN)self_7313055)->elements[0];
+-c_7314473.elements[1] = ((closureN)self_7313055)->elements[1];
+-c_7314473.elements[2] = ((closureN)self_7313055)->elements[2];
+-c_7314473.elements[3] = r_734167;
+-c_7314473.elements[4] = ((closureN)self_7313055)->elements[3];
+-c_7314473.elements[5] = ((closureN)self_7313055)->elements[4];
++closureN_type c_7313173;
++object e_7313210 [6];
++c_7313173.hdr.mark = gc_color_red;
++ c_7313173.hdr.grayed = 0;
++c_7313173.tag = closureN_tag;
++ c_7313173.fn = (function_type)__lambda_21;
++c_7313173.num_args = 1;
++c_7313173.num_elements = 6;
++c_7313173.elements = (object *)e_7313210;
++c_7313173.elements[0] = ((closureN)self_7311802)->elements[0];
++c_7313173.elements[1] = ((closureN)self_7311802)->elements[1];
++c_7313173.elements[2] = ((closureN)self_7311802)->elements[2];
++c_7313173.elements[3] = r_733715;
++c_7313173.elements[4] = ((closureN)self_7311802)->elements[3];
++c_7313173.elements[5] = ((closureN)self_7311802)->elements[4];
+
+-return_closcall2(data, ((closureN)self_7313055)->elements[4], &c_7314473, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311802)->elements[4], &c_7313173, quote_tmp);;
+ }
+
+-static void __lambda_21(void *data, object self_7313056, int argc, object *args) /* object self_7313056, object r_734168 */
++static void __lambda_21(void *data, object self_7311803, int argc, object *args) /* object self_7311803, object r_733716 */
+ {
+- object r_734168 = args[0];
++ object r_733716 = args[0];
+
+-closureN_type c_7314476;
+-object e_7314509 [7];
+-c_7314476.hdr.mark = gc_color_red;
+- c_7314476.hdr.grayed = 0;
+-c_7314476.tag = closureN_tag;
+- c_7314476.fn = (function_type)__lambda_22;
+-c_7314476.num_args = 1;
+-c_7314476.num_elements = 7;
+-c_7314476.elements = (object *)e_7314509;
+-c_7314476.elements[0] = ((closureN)self_7313056)->elements[0];
+-c_7314476.elements[1] = ((closureN)self_7313056)->elements[1];
+-c_7314476.elements[2] = ((closureN)self_7313056)->elements[2];
+-c_7314476.elements[3] = ((closureN)self_7313056)->elements[3];
+-c_7314476.elements[4] = r_734168;
+-c_7314476.elements[5] = ((closureN)self_7313056)->elements[4];
+-c_7314476.elements[6] = ((closureN)self_7313056)->elements[5];
++closureN_type c_7313176;
++object e_7313209 [7];
++c_7313176.hdr.mark = gc_color_red;
++ c_7313176.hdr.grayed = 0;
++c_7313176.tag = closureN_tag;
++ c_7313176.fn = (function_type)__lambda_22;
++c_7313176.num_args = 1;
++c_7313176.num_elements = 7;
++c_7313176.elements = (object *)e_7313209;
++c_7313176.elements[0] = ((closureN)self_7311803)->elements[0];
++c_7313176.elements[1] = ((closureN)self_7311803)->elements[1];
++c_7313176.elements[2] = ((closureN)self_7311803)->elements[2];
++c_7313176.elements[3] = ((closureN)self_7311803)->elements[3];
++c_7313176.elements[4] = r_733716;
++c_7313176.elements[5] = ((closureN)self_7311803)->elements[4];
++c_7313176.elements[6] = ((closureN)self_7311803)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313056)->elements[5], &c_7314476, quote_tmp);;
++return_closcall2(data, ((closureN)self_7311803)->elements[5], &c_7313176, quote_tmp);;
+ }
+
+-static void __lambda_22(void *data, object self_7313057, int argc, object *args) /* object self_7313057, object r_734169 */
++static void __lambda_22(void *data, object self_7311804, int argc, object *args) /* object self_7311804, object r_733717 */
+ {
+- object r_734169 = args[0];
++ object r_733717 = args[0];
+
+-closureN_type c_7314479;
+-object e_7314508 [7];
+-c_7314479.hdr.mark = gc_color_red;
+- c_7314479.hdr.grayed = 0;
+-c_7314479.tag = closureN_tag;
+- c_7314479.fn = (function_type)__lambda_23;
+-c_7314479.num_args = 1;
+-c_7314479.num_elements = 7;
+-c_7314479.elements = (object *)e_7314508;
+-c_7314479.elements[0] = ((closureN)self_7313057)->elements[0];
+-c_7314479.elements[1] = ((closureN)self_7313057)->elements[1];
+-c_7314479.elements[2] = ((closureN)self_7313057)->elements[2];
+-c_7314479.elements[3] = ((closureN)self_7313057)->elements[3];
+-c_7314479.elements[4] = ((closureN)self_7313057)->elements[4];
+-c_7314479.elements[5] = r_734169;
+-c_7314479.elements[6] = ((closureN)self_7313057)->elements[5];
++closureN_type c_7313179;
++object e_7313208 [7];
++c_7313179.hdr.mark = gc_color_red;
++ c_7313179.hdr.grayed = 0;
++c_7313179.tag = closureN_tag;
++ c_7313179.fn = (function_type)__lambda_23;
++c_7313179.num_args = 1;
++c_7313179.num_elements = 7;
++c_7313179.elements = (object *)e_7313208;
++c_7313179.elements[0] = ((closureN)self_7311804)->elements[0];
++c_7313179.elements[1] = ((closureN)self_7311804)->elements[1];
++c_7313179.elements[2] = ((closureN)self_7311804)->elements[2];
++c_7313179.elements[3] = ((closureN)self_7311804)->elements[3];
++c_7313179.elements[4] = ((closureN)self_7311804)->elements[4];
++c_7313179.elements[5] = r_733717;
++c_7313179.elements[6] = ((closureN)self_7311804)->elements[5];
+
+-return_closcall2(data, ((closureN)self_7313057)->elements[6], &c_7314479, quote_or);;
++return_closcall2(data, ((closureN)self_7311804)->elements[6], &c_7313179, quote_or);;
+ }
+
+-static void __lambda_23(void *data, object self_7313058, int argc, object *args) /* object self_7313058, object r_734171 */
++static void __lambda_23(void *data, object self_7311805, int argc, object *args) /* object self_7311805, object r_733719 */
+ {
+- object r_734171 = args[0];
++ object r_733719 = args[0];
+
+-list_3_type local_7314484;
++list_3_type local_7313184;
+
+-pair_type local_7314488;
++pair_type local_7313188;
+
+-list_2_type local_7314491;
++list_2_type local_7313191;
+
+
+
+-list_4_type local_7314498;
++list_4_type local_7313198;
+
+-pair_type local_7314504;
++pair_type local_7313204;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313058)->elements[1], (((closure) ((closureN)self_7313058)->elements[1])->fn), Cyc_fast_list_3(&local_7314484, ((closureN)self_7313058)->elements[2], set_cell_as_expr(&local_7314488, Cyc_fast_list_2(&local_7314491, ((closureN)self_7313058)->elements[6], Cyc_cadr(data, ((closureN)self_7313058)->elements[0]))), Cyc_fast_list_4(&local_7314498, ((closureN)self_7313058)->elements[3], ((closureN)self_7313058)->elements[4], ((closureN)self_7313058)->elements[5], set_pair_as_expr(&local_7314504, r_734171, Cyc_cddr(data, ((closureN)self_7313058)->elements[0])))));;
++return_direct_with_clo1(data, ((closureN)self_7311805)->elements[1], (((closure) ((closureN)self_7311805)->elements[1])->fn), Cyc_fast_list_3(&local_7313184, ((closureN)self_7311805)->elements[2], set_cell_as_expr(&local_7313188, Cyc_fast_list_2(&local_7313191, ((closureN)self_7311805)->elements[6], Cyc_cadr(data, ((closureN)self_7311805)->elements[0]))), Cyc_fast_list_4(&local_7313198, ((closureN)self_7311805)->elements[3], ((closureN)self_7311805)->elements[4], ((closureN)self_7311805)->elements[5], set_pair_as_expr(&local_7313204, r_733719, Cyc_cddr(data, ((closureN)self_7311805)->elements[0])))));;
+ }
+
+-static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_734147, object expr_733_732875, object rename_734_732876, object compare_735_732877 */
++static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_733695, object expr_733_732528, object rename_734_732529, object compare_735_732530 */
+ {
+-object k_734147 = args[0]; object expr_733_732875 = args[1]; object rename_734_732876 = args[2];
++object k_733695 = args[0]; object expr_733_732528 = args[1]; object rename_734_732529 = args[2];
+ Cyc_st_add(data, "scheme/base.sld:and");
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_733_732875))) ){
+- return_direct_with_clo1(data, k_734147, (((closure) k_734147)->fn), boolean_t);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_733_732528))) ){
++ return_direct_with_clo1(data, k_733695, (((closure) k_733695)->fn), boolean_t);
+ } else {
+
+
+-if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_733_732875))) ){
++if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_733_732528))) ){
+
+
+-return_direct_with_clo1(data, k_734147, (((closure) k_734147)->fn), Cyc_cadr(data, expr_733_732875));
++return_direct_with_clo1(data, k_733695, (((closure) k_733695)->fn), Cyc_cadr(data, expr_733_732528));
+ } else {
+
+-closureN_type c_7314429;
+-object e_7314449 [3];
+-c_7314429.hdr.mark = gc_color_red;
+- c_7314429.hdr.grayed = 0;
+-c_7314429.tag = closureN_tag;
+- c_7314429.fn = (function_type)__lambda_15;
+-c_7314429.num_args = 1;
+-c_7314429.num_elements = 3;
+-c_7314429.elements = (object *)e_7314449;
+-c_7314429.elements[0] = expr_733_732875;
+-c_7314429.elements[1] = k_734147;
+-c_7314429.elements[2] = rename_734_732876;
++closureN_type c_7313129;
++object e_7313149 [3];
++c_7313129.hdr.mark = gc_color_red;
++ c_7313129.hdr.grayed = 0;
++c_7313129.tag = closureN_tag;
++ c_7313129.fn = (function_type)__lambda_15;
++c_7313129.num_args = 1;
++c_7313129.num_elements = 3;
++c_7313129.elements = (object *)e_7313149;
++c_7313129.elements[0] = expr_733_732528;
++c_7313129.elements[1] = k_733695;
++c_7313129.elements[2] = rename_734_732529;
+
+-return_closcall2(data, rename_734_732876, &c_7314429, quote__if);}
++return_closcall2(data, rename_734_732529, &c_7313129, quote__if);}
+ ;}
+ ;;
+ }
+
+-static void __lambda_15(void *data, object self_7313051, int argc, object *args) /* object self_7313051, object r_734150 */
++static void __lambda_15(void *data, object self_7311798, int argc, object *args) /* object self_7311798, object r_733698 */
+ {
+- object r_734150 = args[0];
++ object r_733698 = args[0];
+
+-closureN_type c_7314432;
+-object e_7314448 [3];
+-c_7314432.hdr.mark = gc_color_red;
+- c_7314432.hdr.grayed = 0;
+-c_7314432.tag = closureN_tag;
+- c_7314432.fn = (function_type)__lambda_16;
+-c_7314432.num_args = 1;
+-c_7314432.num_elements = 3;
+-c_7314432.elements = (object *)e_7314448;
+-c_7314432.elements[0] = ((closureN)self_7313051)->elements[0];
+-c_7314432.elements[1] = ((closureN)self_7313051)->elements[1];
+-c_7314432.elements[2] = r_734150;
++closureN_type c_7313132;
++object e_7313148 [3];
++c_7313132.hdr.mark = gc_color_red;
++ c_7313132.hdr.grayed = 0;
++c_7313132.tag = closureN_tag;
++ c_7313132.fn = (function_type)__lambda_16;
++c_7313132.num_args = 1;
++c_7313132.num_elements = 3;
++c_7313132.elements = (object *)e_7313148;
++c_7313132.elements[0] = ((closureN)self_7311798)->elements[0];
++c_7313132.elements[1] = ((closureN)self_7311798)->elements[1];
++c_7313132.elements[2] = r_733698;
+
+-return_closcall2(data, ((closureN)self_7313051)->elements[2], &c_7314432, quote_and);;
++return_closcall2(data, ((closureN)self_7311798)->elements[2], &c_7313132, quote_and);;
+ }
+
+-static void __lambda_16(void *data, object self_7313052, int argc, object *args) /* object self_7313052, object r_734153 */
++static void __lambda_16(void *data, object self_7311799, int argc, object *args) /* object self_7311799, object r_733701 */
+ {
+- object r_734153 = args[0];
++ object r_733701 = args[0];
+
+-list_4_type local_7314437;
++list_4_type local_7313137;
+
+
+
+-pair_type local_7314444;
++pair_type local_7313144;
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313052)->elements[1], (((closure) ((closureN)self_7313052)->elements[1])->fn), Cyc_fast_list_4(&local_7314437, ((closureN)self_7313052)->elements[2], Cyc_cadr(data, ((closureN)self_7313052)->elements[0]), set_pair_as_expr(&local_7314444, r_734153, Cyc_cddr(data, ((closureN)self_7313052)->elements[0])), boolean_f));;
++return_direct_with_clo1(data, ((closureN)self_7311799)->elements[1], (((closure) ((closureN)self_7311799)->elements[1])->fn), Cyc_fast_list_4(&local_7313137, ((closureN)self_7311799)->elements[2], Cyc_cadr(data, ((closureN)self_7311799)->elements[0]), set_pair_as_expr(&local_7313144, r_733701, Cyc_cddr(data, ((closureN)self_7311799)->elements[0])), boolean_f));;
+ }
+
+-static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_734144 */
++static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_733692 */
+ {
+-object k_734144 = args[0];
++object k_733692 = args[0];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-version");
+-return_direct_with_clo1(data, k_734144, (((closure) k_734144)->fn), __glo__85version_91number_85_scheme_cyclone_common);;
++return_direct_with_clo1(data, k_733692, (((closure) k_733692)->fn), __glo__85version_91number_85_scheme_cyclone_common);;
+ }
+
+-static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_734140, object sym_732_732874 */
++static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_733688, object sym_732_732527 */
+ {
+-object k_734140 = args[0]; object sym_732_732874 = args[1];
++object k_733688 = args[0]; object sym_732_732527 = args[1];
+ Cyc_st_add(data, "scheme/base.sld:Cyc-add-feature!");
+
+-closureN_type c_7314403;
+-object e_7314409 [1];
+-c_7314403.hdr.mark = gc_color_red;
+- c_7314403.hdr.grayed = 0;
+-c_7314403.tag = closureN_tag;
+- c_7314403.fn = (function_type)__lambda_12;
+-c_7314403.num_args = 1;
+-c_7314403.num_elements = 1;
+-c_7314403.elements = (object *)e_7314409;
+-c_7314403.elements[0] = k_734140;
++closureN_type c_7313103;
++object e_7313109 [1];
++c_7313103.hdr.mark = gc_color_red;
++ c_7313103.hdr.grayed = 0;
++c_7313103.tag = closureN_tag;
++ c_7313103.fn = (function_type)__lambda_12;
++c_7313103.num_args = 1;
++c_7313103.num_elements = 1;
++c_7313103.elements = (object *)e_7313109;
++c_7313103.elements[0] = k_733688;
+
+
+-pair_type local_7314412;
+-return_direct_with_clo1(data,(closure)&c_7314403,__lambda_12, set_pair_as_expr(&local_7314412, sym_732_732874, __glo__85other_91features_85_scheme_base));;
++pair_type local_7313112;
++return_direct_with_clo1(data,(closure)&c_7313103,__lambda_12, set_pair_as_expr(&local_7313112, sym_732_732527, __glo__85other_91features_85_scheme_base));;
+ }
+
+-static void __lambda_12(void *data, object self_7313050, int argc, object *args) /* object self_7313050, object r_734141 */
++static void __lambda_12(void *data, object self_7311797, int argc, object *args) /* object self_7311797, object r_733689 */
+ {
+- object r_734141 = args[0];
++ object r_733689 = args[0];
+
+-object c_7314408 = global_set_cps_id(data, ((closureN)self_7313050)->elements[0],"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, r_734141);
+-return_direct_with_clo1(data, ((closureN)self_7313050)->elements[0], (((closure) ((closureN)self_7313050)->elements[0])->fn), c_7314408);;
++object c_7313108 = global_set_cps_id(data, ((closureN)self_7311797)->elements[0],"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, r_733689);
++return_direct_with_clo1(data, ((closureN)self_7311797)->elements[0], (((closure) ((closureN)self_7311797)->elements[0])->fn), c_7313108);;
+ }
+
+-static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_734119 */
++static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_733667 */
+ {
+-object k_734119 = args[0];
++object k_733667 = args[0];
+ Cyc_st_add(data, "scheme/base.sld:features");
+
+-closureN_type c_7314330;
+-object e_7314400 [1];
+-c_7314330.hdr.mark = gc_color_red;
+- c_7314330.hdr.grayed = 0;
+-c_7314330.tag = closureN_tag;
+- c_7314330.fn = (function_type)__lambda_4;
+-c_7314330.num_args = 1;
+-c_7314330.num_elements = 1;
+-c_7314330.elements = (object *)e_7314400;
+-c_7314330.elements[0] = k_734119;
+-
+-return_direct_with_clo1(data,(closure)&c_7314330,__lambda_4, __glo__85other_91features_85_scheme_base);;
+-}
+-
+-static void __lambda_4(void *data, object self_7313042, int argc, object *args) /* object self_7313042, object feats_731_732873 */
+- {
+- object feats_731_732873 = args[0];
+-
+-closureN_type c_7314332;
+-object e_7314396 [1];
+-c_7314332.hdr.mark = gc_color_red;
+- c_7314332.hdr.grayed = 0;
+-c_7314332.tag = closureN_tag;
+- c_7314332.fn = (function_type)__lambda_1345;
+-c_7314332.num_args = 1;
+-c_7314332.num_elements = 1;
+-c_7314332.elements = (object *)e_7314396;
+-c_7314332.elements[0] = ((closureN)self_7313042)->elements[0];
+-
+-
+-pair_type local_7314399;
+-return_direct_with_clo1(data,(closure)&c_7314332,__lambda_1345, set_cell_as_expr(&local_7314399, feats_731_732873));;
+-}
+-
+-static void __lambda_1345(void *data, object self_7313043, int argc, object *args) /* object self_7313043, object feats_731_732873 */
+- {
+- object feats_731_732873 = args[0];
+-
+-closureN_type c_7314334;
+-object e_7314361 [1];
+-c_7314334.hdr.mark = gc_color_red;
+- c_7314334.hdr.grayed = 0;
+-c_7314334.tag = closureN_tag;
+- c_7314334.fn = (function_type)__lambda_5;
+-c_7314334.num_args = 0;
+-c_7314334.num_elements = 1;
+-c_7314334.elements = (object *)e_7314361;
+-c_7314334.elements[0] = feats_731_732873;
+-
+-
+-closureN_type c_7314362;
+-object e_7314395 [2];
+-c_7314362.hdr.mark = gc_color_red;
+- c_7314362.hdr.grayed = 0;
+-c_7314362.tag = closureN_tag;
+- c_7314362.fn = (function_type)__lambda_8;
+-c_7314362.num_args = 1;
+-c_7314362.num_elements = 2;
+-c_7314362.elements = (object *)e_7314395;
+-c_7314362.elements[0] = feats_731_732873;
+-c_7314362.elements[1] = ((closureN)self_7313043)->elements[0];
++closureN_type c_7313030;
++object e_7313100 [1];
++c_7313030.hdr.mark = gc_color_red;
++ c_7313030.hdr.grayed = 0;
++c_7313030.tag = closureN_tag;
++ c_7313030.fn = (function_type)__lambda_4;
++c_7313030.num_args = 1;
++c_7313030.num_elements = 1;
++c_7313030.elements = (object *)e_7313100;
++c_7313030.elements[0] = k_733667;
+
+-return_direct_with_clo1(data,(closure)&c_7314334,__lambda_5, &c_7314362);;
++return_direct_with_clo1(data,(closure)&c_7313030,__lambda_4, __glo__85other_91features_85_scheme_base);;
+ }
+
+-static void __lambda_8(void *data, object self_7313044, int argc, object *args) /* object self_7313044, object r_734120 */
++static void __lambda_4(void *data, object self_7311789, int argc, object *args) /* object self_7311789, object feats_731_732526 */
+ {
++ object feats_731_732526 = args[0];
++
++closureN_type c_7313032;
++object e_7313096 [1];
++c_7313032.hdr.mark = gc_color_red;
++ c_7313032.hdr.grayed = 0;
++c_7313032.tag = closureN_tag;
++ c_7313032.fn = (function_type)__lambda_1298;
++c_7313032.num_args = 1;
++c_7313032.num_elements = 1;
++c_7313032.elements = (object *)e_7313096;
++c_7313032.elements[0] = ((closureN)self_7311789)->elements[0];
++
+
++pair_type local_7313099;
++return_direct_with_clo1(data,(closure)&c_7313032,__lambda_1298, set_cell_as_expr(&local_7313099, feats_731_732526));;
++}
++
++static void __lambda_1298(void *data, object self_7311790, int argc, object *args) /* object self_7311790, object feats_731_732526 */
++ {
++ object feats_731_732526 = args[0];
+
+-closureN_type c_7314364;
+-object e_7314390 [2];
+-c_7314364.hdr.mark = gc_color_red;
+- c_7314364.hdr.grayed = 0;
+-c_7314364.tag = closureN_tag;
+- c_7314364.fn = (function_type)__lambda_9;
+-c_7314364.num_args = 1;
+-c_7314364.num_elements = 2;
+-c_7314364.elements = (object *)e_7314390;
+-c_7314364.elements[0] = ((closureN)self_7313044)->elements[0];
+-c_7314364.elements[1] = ((closureN)self_7313044)->elements[1];
++closureN_type c_7313034;
++object e_7313061 [1];
++c_7313034.hdr.mark = gc_color_red;
++ c_7313034.hdr.grayed = 0;
++c_7313034.tag = closureN_tag;
++ c_7313034.fn = (function_type)__lambda_5;
++c_7313034.num_args = 0;
++c_7313034.num_elements = 1;
++c_7313034.elements = (object *)e_7313061;
++c_7313034.elements[0] = feats_731_732526;
+
+
+-make_utf8_string_with_len(c_7314394, "version-", 8, 8);
++closureN_type c_7313062;
++object e_7313095 [2];
++c_7313062.hdr.mark = gc_color_red;
++ c_7313062.hdr.grayed = 0;
++c_7313062.tag = closureN_tag;
++ c_7313062.fn = (function_type)__lambda_8;
++c_7313062.num_args = 1;
++c_7313062.num_elements = 2;
++c_7313062.elements = (object *)e_7313095;
++c_7313062.elements[0] = feats_731_732526;
++c_7313062.elements[1] = ((closureN)self_7311790)->elements[0];
+
+-object c_7314393 = Cyc_string_append(data,(closure)&c_7314364,2,&c_7314394, __glo__85version_91number_85_scheme_cyclone_common);
+-return_closcall1(data,(closure)&c_7314364, c_7314393);;
++return_direct_with_clo1(data,(closure)&c_7313034,__lambda_5, &c_7313062);;
+ }
+
+-static void __lambda_9(void *data, object self_7313045, int argc, object *args) /* object self_7313045, object r_734128 */
++static void __lambda_8(void *data, object self_7311791, int argc, object *args) /* object self_7311791, object r_733668 */
+ {
+- object r_734128 = args[0];
++
+
+-closureN_type c_7314366;
+-object e_7314386 [3];
+-c_7314366.hdr.mark = gc_color_red;
+- c_7314366.hdr.grayed = 0;
+-c_7314366.tag = closureN_tag;
+- c_7314366.fn = (function_type)__lambda_10;
+-c_7314366.num_args = 1;
+-c_7314366.num_elements = 3;
+-c_7314366.elements = (object *)e_7314386;
+-c_7314366.elements[0] = ((closureN)self_7313045)->elements[0];
+-c_7314366.elements[1] = ((closureN)self_7313045)->elements[1];
+-c_7314366.elements[2] = r_734128;
++closureN_type c_7313064;
++object e_7313090 [2];
++c_7313064.hdr.mark = gc_color_red;
++ c_7313064.hdr.grayed = 0;
++c_7313064.tag = closureN_tag;
++ c_7313064.fn = (function_type)__lambda_9;
++c_7313064.num_args = 1;
++c_7313064.num_elements = 2;
++c_7313064.elements = (object *)e_7313090;
++c_7313064.elements[0] = ((closureN)self_7311791)->elements[0];
++c_7313064.elements[1] = ((closureN)self_7311791)->elements[1];
++
+
++make_utf8_string_with_len(c_7313094, "version-", 8, 8);
+
+-object c_7314389 = Cyc_compilation_environment(data,(closure)&c_7314366,quote_platform);
+-return_closcall1(data,(closure)&c_7314366, c_7314389);;
++object c_7313093 = Cyc_string_append(data,(closure)&c_7313064,2,&c_7313094, __glo__85version_91number_85_scheme_cyclone_common);
++return_closcall1(data,(closure)&c_7313064, c_7313093);;
+ }
+
+-static void __lambda_10(void *data, object self_7313046, int argc, object *args) /* object self_7313046, object r_734126 */
++static void __lambda_9(void *data, object self_7311792, int argc, object *args) /* object self_7311792, object r_733676 */
+ {
+- object r_734126 = args[0];
++ object r_733676 = args[0];
+
+-pair_type local_7314371;
++closureN_type c_7313066;
++object e_7313086 [3];
++c_7313066.hdr.mark = gc_color_red;
++ c_7313066.hdr.grayed = 0;
++c_7313066.tag = closureN_tag;
++ c_7313066.fn = (function_type)__lambda_10;
++c_7313066.num_args = 1;
++c_7313066.num_elements = 3;
++c_7313066.elements = (object *)e_7313086;
++c_7313066.elements[0] = ((closureN)self_7311792)->elements[0];
++c_7313066.elements[1] = ((closureN)self_7311792)->elements[1];
++c_7313066.elements[2] = r_733676;
+
+-pair_type local_7314374;
+
++object c_7313089 = Cyc_compilation_environment(data,(closure)&c_7313066,quote_platform);
++return_closcall1(data,(closure)&c_7313066, c_7313089);;
++}
+
++static void __lambda_10(void *data, object self_7311793, int argc, object *args) /* object self_7311793, object r_733674 */
++ {
++ object r_733674 = args[0];
++
++pair_type local_7313071;
+
+-pair_type local_7314380;
++pair_type local_7313074;
+
+
+
++pair_type local_7313080;
+
+-return_direct_with_clo1(data, ((closureN)self_7313046)->elements[1], (((closure) ((closureN)self_7313046)->elements[1])->fn), set_pair_as_expr(&local_7314371, quote_cyclone, set_pair_as_expr(&local_7314374, Cyc_string2symbol(data, ((closureN)self_7313046)->elements[2]), set_pair_as_expr(&local_7314380, Cyc_string2symbol(data, r_734126), car(((closureN)self_7313046)->elements[0])))));;
++
++
++
++return_direct_with_clo1(data, ((closureN)self_7311793)->elements[1], (((closure) ((closureN)self_7311793)->elements[1])->fn), set_pair_as_expr(&local_7313071, quote_cyclone, set_pair_as_expr(&local_7313074, Cyc_string2symbol(data, ((closureN)self_7311793)->elements[2]), set_pair_as_expr(&local_7313080, Cyc_string2symbol(data, r_733674), car(((closureN)self_7311793)->elements[0])))));;
+ }
+
+-static void __lambda_5(void *data, object self_7313047, int argc, object *args) /* object self_7313047, object k_734129 */
++static void __lambda_5(void *data, object self_7311794, int argc, object *args) /* object self_7311794, object k_733677 */
+ {
+- object k_734129 = args[0];
++ object k_733677 = args[0];
+
+-closureN_type c_7314336;
+-object e_7314357 [2];
+-c_7314336.hdr.mark = gc_color_red;
+- c_7314336.hdr.grayed = 0;
+-c_7314336.tag = closureN_tag;
+- c_7314336.fn = (function_type)__lambda_6;
+-c_7314336.num_args = 1;
+-c_7314336.num_elements = 2;
+-c_7314336.elements = (object *)e_7314357;
+-c_7314336.elements[0] = ((closureN)self_7313047)->elements[0];
+-c_7314336.elements[1] = k_734129;
++closureN_type c_7313036;
++object e_7313057 [2];
++c_7313036.hdr.mark = gc_color_red;
++ c_7313036.hdr.grayed = 0;
++c_7313036.tag = closureN_tag;
++ c_7313036.fn = (function_type)__lambda_6;
++c_7313036.num_args = 1;
++c_7313036.num_elements = 2;
++c_7313036.elements = (object *)e_7313057;
++c_7313036.elements[0] = ((closureN)self_7311794)->elements[0];
++c_7313036.elements[1] = k_733677;
+
+
+-object c_7314360 = Cyc_compilation_environment(data,(closure)&c_7314336,quote_memory_91streams);
+-return_closcall1(data,(closure)&c_7314336, c_7314360);;
++object c_7313060 = Cyc_compilation_environment(data,(closure)&c_7313036,quote_memory_91streams);
++return_closcall1(data,(closure)&c_7313036, c_7313060);;
+ }
+
+-static void __lambda_6(void *data, object self_7313048, int argc, object *args) /* object self_7313048, object r_734134 */
++static void __lambda_6(void *data, object self_7311795, int argc, object *args) /* object self_7311795, object r_733682 */
+ {
+- object r_734134 = args[0];
++ object r_733682 = args[0];
+
+
+-if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, r_734134), obj_int2obj(0))) ){
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, r_733682), obj_int2obj(0))) ){
+
+-closureN_type c_7314342;
+-object e_7314348 [2];
+-c_7314342.hdr.mark = gc_color_red;
+- c_7314342.hdr.grayed = 0;
+-c_7314342.tag = closureN_tag;
+- c_7314342.fn = (function_type)__lambda_7;
+-c_7314342.num_args = 1;
+-c_7314342.num_elements = 2;
+-c_7314342.elements = (object *)e_7314348;
+-c_7314342.elements[0] = ((closureN)self_7313048)->elements[0];
+-c_7314342.elements[1] = ((closureN)self_7313048)->elements[1];
++closureN_type c_7313042;
++object e_7313048 [2];
++c_7313042.hdr.mark = gc_color_red;
++ c_7313042.hdr.grayed = 0;
++c_7313042.tag = closureN_tag;
++ c_7313042.fn = (function_type)__lambda_7;
++c_7313042.num_args = 1;
++c_7313042.num_elements = 2;
++c_7313042.elements = (object *)e_7313048;
++c_7313042.elements[0] = ((closureN)self_7311795)->elements[0];
++c_7313042.elements[1] = ((closureN)self_7311795)->elements[1];
+
+
+-pair_type local_7314351;
++pair_type local_7313051;
+
+
+-return_direct_with_clo1(data,(closure)&c_7314342,__lambda_7, set_pair_as_expr(&local_7314351, quote_memory_91streams, car(((closureN)self_7313048)->elements[0])));
++return_direct_with_clo1(data,(closure)&c_7313042,__lambda_7, set_pair_as_expr(&local_7313051, quote_memory_91streams, car(((closureN)self_7311795)->elements[0])));
+ } else {
+- return_direct_with_clo1(data, ((closureN)self_7313048)->elements[1], (((closure) ((closureN)self_7313048)->elements[1])->fn), Cyc_VOID);}
++ return_direct_with_clo1(data, ((closureN)self_7311795)->elements[1], (((closure) ((closureN)self_7311795)->elements[1])->fn), Cyc_VOID);}
+ ;;
+ }
+
+-static void __lambda_7(void *data, object self_7313049, int argc, object *args) /* object self_7313049, object r_734131 */
++static void __lambda_7(void *data, object self_7311796, int argc, object *args) /* object self_7311796, object r_733679 */
+ {
+- object r_734131 = args[0];
++ object r_733679 = args[0];
+
+
+-return_direct_with_clo1(data, ((closureN)self_7313049)->elements[1], (((closure) ((closureN)self_7313049)->elements[1])->fn), Cyc_set_cell(data, ((closureN)self_7313049)->elements[0], r_734131));;
++return_direct_with_clo1(data, ((closureN)self_7311796)->elements[1], (((closure) ((closureN)self_7311796)->elements[1])->fn), Cyc_set_cell(data, ((closureN)self_7311796)->elements[0], r_733679));;
+ }
+
+ static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k, object f */
+@@ -40893,84 +39096,84 @@ static void __lambda_1(void *data, objec
+ object k = args[0]; object f = args[1];
+ Cyc_st_add(data, "scheme/base.sld:call/cc");
+
+-closureN_type c_7314324;
+-object e_7314327 [1];
++closureN_type c_7313024;
++object e_7313027 [1];
+ Cyc_check_proc(data, f);
+-c_7314324.hdr.mark = gc_color_red;
+- c_7314324.hdr.grayed = 0;
+-c_7314324.tag = closureN_tag;
+- c_7314324.fn = (function_type)__lambda_2;
+-c_7314324.num_args = 1;
+-c_7314324.num_elements = 1;
+-c_7314324.elements = (object *)e_7314327;
+-c_7314324.elements[0] = k;
++c_7313024.hdr.mark = gc_color_red;
++ c_7313024.hdr.grayed = 0;
++c_7313024.tag = closureN_tag;
++ c_7313024.fn = (function_type)__lambda_2;
++c_7313024.num_args = 1;
++c_7313024.num_elements = 1;
++c_7313024.elements = (object *)e_7313027;
++c_7313024.elements[0] = k;
+
+-return_closcall2(data, f, k, &c_7314324);;
++return_closcall2(data, f, k, &c_7313024);;
+ }
+
+-static void __lambda_2(void *data, object self_7313041, int argc, object *args) /* object self_7313041, object _191, object result */
++static void __lambda_2(void *data, object self_7311788, int argc, object *args) /* object self_7311788, object _191, object result */
+ {
+ object result = args[1];
+- return_closcall1(data, ((closureN)self_7313041)->elements[0], result);;
++ return_closcall1(data, ((closureN)self_7311788)->elements[0], result);;
+ }
+
+ void c_schemebase_inlinable_lambdas(void *data, object clo, int argc, object *args){
+-make_pair(pair_7328868, find_or_add_symbol("make-record-marker"), find_or_add_symbol("make-record-marker__inline__"));
+-make_pair(pair_7328869, find_or_add_symbol("void"), find_or_add_symbol("void__inline__"));
+-make_pair(pair_7328870, find_or_add_symbol("eof-object"), find_or_add_symbol("eof-object__inline__"));
+-make_pair(pair_7328871, find_or_add_symbol("square"), find_or_add_symbol("square__inline__"));
+-make_pair(pair_7328872, find_or_add_symbol("quotient"), find_or_add_symbol("quotient__inline__"));
+-make_pair(pair_7328873, find_or_add_symbol("fixnum?"), find_or_add_symbol("fixnum?__inline__"));
+-make_pair(pair_7328874, find_or_add_symbol("complex?"), find_or_add_symbol("complex?__inline__"));
+-make_pair(pair_7328875, find_or_add_symbol("exact?"), find_or_add_symbol("exact?__inline__"));
+-make_pair(pair_7328876, find_or_add_symbol("exact-integer?"), find_or_add_symbol("exact-integer?__inline__"));
+-make_pair(pair_7328877, find_or_add_symbol("sqrt"), find_or_add_symbol("sqrt__inline__"));
+-make_pair(pair_7328878, find_or_add_symbol("inexact"), find_or_add_symbol("inexact__inline__"));
+-make_pair(pair_7328879, find_or_add_symbol("exact"), find_or_add_symbol("exact__inline__"));
+-make_pair(pair_7328880, find_or_add_symbol("round"), find_or_add_symbol("round__inline__"));
+-make_pair(pair_7328881, find_or_add_symbol("truncate"), find_or_add_symbol("truncate__inline__"));
+-make_pair(pair_7328882, find_or_add_symbol("ceiling"), find_or_add_symbol("ceiling__inline__"));
+-make_pair(pair_7328883, find_or_add_symbol("floor"), find_or_add_symbol("floor__inline__"));
+-make_pair(pair_7328884, find_or_add_symbol("negative?"), find_or_add_symbol("negative?__inline__"));
+-make_pair(pair_7328885, find_or_add_symbol("positive?"), find_or_add_symbol("positive?__inline__"));
+-make_pair(pair_7328886, find_or_add_symbol("zero?"), find_or_add_symbol("zero?__inline__"));
+-make_pair(pair_7328887, find_or_add_symbol("list?"), find_or_add_symbol("list?__inline__"));
+-make_pair(pair_7328888, find_or_add_symbol("not"), find_or_add_symbol("not__inline__"));
+-make_pair(pair_7328889, find_or_add_symbol("%write-bytevector"), find_or_add_symbol("%write-bytevector__inline__"));
+-make_pair(pair_7328890, find_or_add_symbol("fast-string>=?"), find_or_add_symbol("fast-string>=?__inline__"));
+-make_pair(pair_7328891, find_or_add_symbol("fast-string>?"), find_or_add_symbol("fast-string>?__inline__"));
+-make_pair(pair_7328892, find_or_add_symbol("fast-string<=?"), find_or_add_symbol("fast-string<=?__inline__"));
+-make_pair(pair_7328893, find_or_add_symbol("fast-string<?"), find_or_add_symbol("fast-string<?__inline__"));
+-make_pair(pair_7328894, find_or_add_symbol("fast-string=?"), find_or_add_symbol("fast-string=?__inline__"));
+-make_pair(c_7328921, &pair_7328868, NULL);
+-make_pair(c_7328920, &pair_7328869, &c_7328921);
+-make_pair(c_7328919, &pair_7328870, &c_7328920);
+-make_pair(c_7328918, &pair_7328871, &c_7328919);
+-make_pair(c_7328917, &pair_7328872, &c_7328918);
+-make_pair(c_7328916, &pair_7328873, &c_7328917);
+-make_pair(c_7328915, &pair_7328874, &c_7328916);
+-make_pair(c_7328914, &pair_7328875, &c_7328915);
+-make_pair(c_7328913, &pair_7328876, &c_7328914);
+-make_pair(c_7328912, &pair_7328877, &c_7328913);
+-make_pair(c_7328911, &pair_7328878, &c_7328912);
+-make_pair(c_7328910, &pair_7328879, &c_7328911);
+-make_pair(c_7328909, &pair_7328880, &c_7328910);
+-make_pair(c_7328908, &pair_7328881, &c_7328909);
+-make_pair(c_7328907, &pair_7328882, &c_7328908);
+-make_pair(c_7328906, &pair_7328883, &c_7328907);
+-make_pair(c_7328905, &pair_7328884, &c_7328906);
+-make_pair(c_7328904, &pair_7328885, &c_7328905);
+-make_pair(c_7328903, &pair_7328886, &c_7328904);
+-make_pair(c_7328902, &pair_7328887, &c_7328903);
+-make_pair(c_7328901, &pair_7328888, &c_7328902);
+-make_pair(c_7328900, &pair_7328889, &c_7328901);
+-make_pair(c_7328899, &pair_7328890, &c_7328900);
+-make_pair(c_7328898, &pair_7328891, &c_7328899);
+-make_pair(c_7328897, &pair_7328892, &c_7328898);
+-make_pair(c_7328896, &pair_7328893, &c_7328897);
+-make_pair(c_7328895, &pair_7328894, &c_7328896);
++make_pair(pair_7326409, find_or_add_symbol("make-record-marker"), find_or_add_symbol("make-record-marker__inline__"));
++make_pair(pair_7326410, find_or_add_symbol("void"), find_or_add_symbol("void__inline__"));
++make_pair(pair_7326411, find_or_add_symbol("eof-object"), find_or_add_symbol("eof-object__inline__"));
++make_pair(pair_7326412, find_or_add_symbol("square"), find_or_add_symbol("square__inline__"));
++make_pair(pair_7326413, find_or_add_symbol("quotient"), find_or_add_symbol("quotient__inline__"));
++make_pair(pair_7326414, find_or_add_symbol("fixnum?"), find_or_add_symbol("fixnum?__inline__"));
++make_pair(pair_7326415, find_or_add_symbol("complex?"), find_or_add_symbol("complex?__inline__"));
++make_pair(pair_7326416, find_or_add_symbol("exact?"), find_or_add_symbol("exact?__inline__"));
++make_pair(pair_7326417, find_or_add_symbol("exact-integer?"), find_or_add_symbol("exact-integer?__inline__"));
++make_pair(pair_7326418, find_or_add_symbol("sqrt"), find_or_add_symbol("sqrt__inline__"));
++make_pair(pair_7326419, find_or_add_symbol("inexact"), find_or_add_symbol("inexact__inline__"));
++make_pair(pair_7326420, find_or_add_symbol("exact"), find_or_add_symbol("exact__inline__"));
++make_pair(pair_7326421, find_or_add_symbol("round"), find_or_add_symbol("round__inline__"));
++make_pair(pair_7326422, find_or_add_symbol("truncate"), find_or_add_symbol("truncate__inline__"));
++make_pair(pair_7326423, find_or_add_symbol("ceiling"), find_or_add_symbol("ceiling__inline__"));
++make_pair(pair_7326424, find_or_add_symbol("floor"), find_or_add_symbol("floor__inline__"));
++make_pair(pair_7326425, find_or_add_symbol("negative?"), find_or_add_symbol("negative?__inline__"));
++make_pair(pair_7326426, find_or_add_symbol("positive?"), find_or_add_symbol("positive?__inline__"));
++make_pair(pair_7326427, find_or_add_symbol("zero?"), find_or_add_symbol("zero?__inline__"));
++make_pair(pair_7326428, find_or_add_symbol("list?"), find_or_add_symbol("list?__inline__"));
++make_pair(pair_7326429, find_or_add_symbol("not"), find_or_add_symbol("not__inline__"));
++make_pair(pair_7326430, find_or_add_symbol("%write-bytevector"), find_or_add_symbol("%write-bytevector__inline__"));
++make_pair(pair_7326431, find_or_add_symbol("fast-string>=?"), find_or_add_symbol("fast-string>=?__inline__"));
++make_pair(pair_7326432, find_or_add_symbol("fast-string>?"), find_or_add_symbol("fast-string>?__inline__"));
++make_pair(pair_7326433, find_or_add_symbol("fast-string<=?"), find_or_add_symbol("fast-string<=?__inline__"));
++make_pair(pair_7326434, find_or_add_symbol("fast-string<?"), find_or_add_symbol("fast-string<?__inline__"));
++make_pair(pair_7326435, find_or_add_symbol("fast-string=?"), find_or_add_symbol("fast-string=?__inline__"));
++make_pair(c_7326462, &pair_7326409, NULL);
++make_pair(c_7326461, &pair_7326410, &c_7326462);
++make_pair(c_7326460, &pair_7326411, &c_7326461);
++make_pair(c_7326459, &pair_7326412, &c_7326460);
++make_pair(c_7326458, &pair_7326413, &c_7326459);
++make_pair(c_7326457, &pair_7326414, &c_7326458);
++make_pair(c_7326456, &pair_7326415, &c_7326457);
++make_pair(c_7326455, &pair_7326416, &c_7326456);
++make_pair(c_7326454, &pair_7326417, &c_7326455);
++make_pair(c_7326453, &pair_7326418, &c_7326454);
++make_pair(c_7326452, &pair_7326419, &c_7326453);
++make_pair(c_7326451, &pair_7326420, &c_7326452);
++make_pair(c_7326450, &pair_7326421, &c_7326451);
++make_pair(c_7326449, &pair_7326422, &c_7326450);
++make_pair(c_7326448, &pair_7326423, &c_7326449);
++make_pair(c_7326447, &pair_7326424, &c_7326448);
++make_pair(c_7326446, &pair_7326425, &c_7326447);
++make_pair(c_7326445, &pair_7326426, &c_7326446);
++make_pair(c_7326444, &pair_7326427, &c_7326445);
++make_pair(c_7326443, &pair_7326428, &c_7326444);
++make_pair(c_7326442, &pair_7326429, &c_7326443);
++make_pair(c_7326441, &pair_7326430, &c_7326442);
++make_pair(c_7326440, &pair_7326431, &c_7326441);
++make_pair(c_7326439, &pair_7326432, &c_7326440);
++make_pair(c_7326438, &pair_7326433, &c_7326439);
++make_pair(c_7326437, &pair_7326434, &c_7326438);
++make_pair(c_7326436, &pair_7326435, &c_7326437);
+ object buf[1]; object cont = args[0];
+-buf[0] = &c_7328895; (((closure)cont)->fn)(data, cont, 1, buf);
++buf[0] = &c_7326436; (((closure)cont)->fn)(data, cont, 1, buf);
+ }
+ void c_schemebase_entry_pt_first_lambda(void *data, object clo, int argc, object *args){
+ Cyc_set_globals_changed((gc_thread_data *)data);
+@@ -41013,8 +39216,6 @@ Cyc_set_globals_changed((gc_thread_data
+ quote_raise_91continuable = find_or_add_symbol("raise-continuable");
+ quote_condition = find_or_add_symbol("condition");
+ quote_guard_91k = find_or_add_symbol("guard-k");
+- quote_x = find_or_add_symbol("x");
+- quote_let_91values = find_or_add_symbol("let-values");
+ quote_let_85_91values = find_or_add_symbol("let*-values");
+ quote_define = find_or_add_symbol("define");
+ quote_er_91macro_91transformer = find_or_add_symbol("er-macro-transformer");
+@@ -41345,472 +39546,472 @@ Cyc_set_globals_changed((gc_thread_data
+ add_global("__glo__85other_91features_85_scheme_base", (object *) &__glo__85other_91features_85_scheme_base);
+ add_global("__glo_features_scheme_base", (object *) &__glo_features_scheme_base);
+ add_global("__glo_call_95cc_scheme_base", (object *) &__glo_call_95cc_scheme_base);
+- mclosure0(c_7328753, (function_type)__lambda_1327);c_7328753.num_args = 0;
+- __glo_lib_91init_117schemebase_scheme_base = &c_7328753;
+- mmacro(c_7328011, (function_type)__lambda_1269);c_7328011.num_args = 3;
+- __glo_define_91values_scheme_base = &c_7328011;
+- mmacro(c_7327548, (function_type)__lambda_1238);c_7327548.num_args = 3;
+- __glo_define_91record_91type_scheme_base = &c_7327548;
+- mclosure0(c_7327526, (function_type)__lambda_1235);c_7327526.num_args = 2;
+- __glo_is_91a_127_scheme_base = &c_7327526;
+- mclosure0(c_7327525, (function_type)__lambda_1514);c_7327525.num_args = 1;
+- __glo_record_127_scheme_base = &c_7327525;
+- mclosure0(c_7327477, (function_type)__lambda_1229);c_7327477.num_args = 2;
+- __glo__191list_91index_scheme_base = &c_7327477;
+- mclosure0(c_7327447, (function_type)__lambda_1225);c_7327447.num_args = 3;
+- __glo_make_91setter_scheme_base = &c_7327447;
+- mclosure0(c_7327429, (function_type)__lambda_1223);c_7327429.num_args = 3;
+- __glo_make_91getter_scheme_base = &c_7327429;
+- mclosure0(c_7327406, (function_type)__lambda_1220);c_7327406.num_args = 3;
+- __glo_slot_91ref_scheme_base = &c_7327406;
+- mclosure0(c_7327390, (function_type)__lambda_1217);c_7327390.num_args = 4;
+- __glo_slot_91set_67_scheme_base = &c_7327390;
+- mclosure0(c_7327386, (function_type)__lambda_1216);c_7327386.num_args = 2;
+- __glo_type_91slot_91offset_scheme_base = &c_7327386;
+- mclosure0(c_7327350, (function_type)__lambda_1211);c_7327350.num_args = 2;
+- __glo_make_91constructor_95args_scheme_base = &c_7327350;
+- mclosure0(c_7327329, (function_type)__lambda_1208);c_7327329.num_args = 2;
+- __glo_make_91constructor_scheme_base = &c_7327329;
+- mclosure0(c_7327312, (function_type)__lambda_1205);c_7327312.num_args = 2;
+- __glo_make_91type_91predicate_scheme_base = &c_7327312;
+- mclosure0(c_7327307, (function_type)__lambda_1204);c_7327307.num_args = 3;
+- __glo_register_91simple_91type_scheme_base = &c_7327307;
+- mmacro(c_7326286, (function_type)__lambda_1153);c_7326286.num_args = 3;
+- __glo_guard_91aux_scheme_base = &c_7326286;
+- mmacro(c_7325899, (function_type)__lambda_1121);c_7325899.num_args = 3;
+- __glo_guard_scheme_base = &c_7325899;
+- mmacro(c_7324650, (function_type)__lambda_1066);c_7324650.num_args = 3;
+- __glo_let_91values_scheme_base = &c_7324650;
+- mmacro(c_7324319, (function_type)__lambda_1046);c_7324319.num_args = 3;
+- __glo_let_85_91values_scheme_base = &c_7324319;
+- mmacro(c_7324140, (function_type)__lambda_1025);c_7324140.num_args = 3;
+- __glo_letrec_85_scheme_base = &c_7324140;
+- mmacro(c_7322038, (function_type)__lambda_810);c_7322038.num_args = 3;
+- __glo_syntax_91rules_scheme_base = &c_7322038;
+- mclosure0(c_7322033, (function_type)__lambda_809);c_7322033.num_args = 3;
+- __glo_cons_91source_scheme_base = &c_7322033;
+- mclosure0(c_7322023, (function_type)__lambda_807);c_7322023.num_args = 2;
+- __glo_find_scheme_base = &c_7322023;
+- mclosure0(c_7322005, (function_type)__lambda_805);c_7322005.num_args = 2;
+- __glo_find_91tail_scheme_base = &c_7322005;
+- mclosure0(c_7322004, (function_type)__lambda_1513);c_7322004.num_args = 1;
+- __glo_open_91input_91bytevector_scheme_base = &c_7322004;
+- mclosure0(c_7322003, (function_type)__lambda_1512);c_7322003.num_args = 1;
+- __glo_get_91output_91bytevector_scheme_base = &c_7322003;
+- mclosure0(c_7322002, (function_type)__lambda_1511);c_7322002.num_args = 1;
+- __glo_get_91output_91string_scheme_base = &c_7322002;
+- mclosure0(c_7322001, (function_type)__lambda_1510);c_7322001.num_args = 0;
+- __glo_open_91output_91string_scheme_base = &c_7322001;
+- mclosure0(c_7322000, (function_type)__lambda_1509);c_7322000.num_args = 1;
+- __glo_open_91input_91string_scheme_base = &c_7322000;
+- mclosure0(c_7321999, (function_type)__lambda_1508);c_7321999.num_args = 1;
+- __glo_output_91port_91open_127_scheme_base = &c_7321999;
+- mclosure0(c_7321998, (function_type)__lambda_1507);c_7321998.num_args = 1;
+- __glo_input_91port_91open_127_scheme_base = &c_7321998;
+- mclosure0(c_7321997, (function_type)__lambda_1506);c_7321997.num_args = 1;
+- __glo_output_91port_127_scheme_base = &c_7321997;
+- mclosure0(c_7321996, (function_type)__lambda_1505);c_7321996.num_args = 1;
+- __glo_input_91port_127_scheme_base = &c_7321996;
+- mclosure0(c_7321995, (function_type)__lambda_1503);c_7321995.num_args = 0;
+- __glo_make_91record_91marker_scheme_base = &c_7321995;
+- mclosure0(c_7321994, (function_type)__lambda_1504);c_7321994.num_args = -2;
+- __glo_make_91record_91marker_191_191inline_191_191_scheme_base = &c_7321994;
+- mclosure0(c_7321993, (function_type)__lambda_1501);c_7321993.num_args = 0;
+- __glo__void_scheme_base = &c_7321993;
+- mclosure0(c_7321992, (function_type)__lambda_1502);c_7321992.num_args = -2;
+- __glo_void_191_191inline_191_191_scheme_base = &c_7321992;
+- mclosure0(c_7321991, (function_type)__lambda_1499);c_7321991.num_args = 0;
+- __glo_eof_91object_scheme_base = &c_7321991;
+- mclosure0(c_7321990, (function_type)__lambda_1500);c_7321990.num_args = -2;
+- __glo_eof_91object_191_191inline_191_191_scheme_base = &c_7321990;
+- mclosure0(c_7321989, (function_type)__lambda_1498);c_7321989.num_args = 2;
+- __glo_expt_scheme_base = &c_7321989;
+- mclosure0(c_7321984, (function_type)__lambda_1497);c_7321984.num_args = 1;
+- __glo_square_191_191inline_191_191_scheme_base = &c_7321984;
+- mclosure0(c_7321979, (function_type)__lambda_804);c_7321979.num_args = 1;
+- __glo_square_scheme_base = &c_7321979;
+- mclosure0(c_7321967, (function_type)__lambda_801);c_7321967.num_args = 2;
+- __glo_floor_95_scheme_base = &c_7321967;
+- mclosure0(c_7321953, (function_type)__lambda_799);c_7321953.num_args = 2;
+- __glo_floor_91remainder_scheme_base = &c_7321953;
+- mclosure0(c_7321926, (function_type)__lambda_798);c_7321926.num_args = 2;
+- __glo_floor_91quotient_scheme_base = &c_7321926;
+- mclosure0(c_7321914, (function_type)__lambda_795);c_7321914.num_args = 2;
+- __glo_truncate_95_scheme_base = &c_7321914;
+- mclosure0(c_7321887, (function_type)__lambda_1496);c_7321887.num_args = 2;
+- __glo_quotient_191_191inline_191_191_scheme_base = &c_7321887;
+- mclosure0(c_7321860, (function_type)__lambda_794);c_7321860.num_args = 2;
+- __glo_quotient_scheme_base = &c_7321860;
+- mclosure0(c_7321859, (function_type)__lambda_1494);c_7321859.num_args = 1;
+- __glo_fixnum_127_scheme_base = &c_7321859;
+- mclosure0(c_7321858, (function_type)__lambda_1495);c_7321858.num_args = -1;
+- __glo_fixnum_127_191_191inline_191_191_scheme_base = &c_7321858;
+- mclosure0(c_7321857, (function_type)__lambda_1493);c_7321857.num_args = 1;
+- __glo_denominator_scheme_base = &c_7321857;
+- mclosure0(c_7321856, (function_type)__lambda_1492);c_7321856.num_args = 1;
+- __glo_numerator_scheme_base = &c_7321856;
+- mclosure0(c_7321847, (function_type)__lambda_793);c_7321847.num_args = 0;
+- __glo_lcm_95entry_scheme_base = &c_7321847;
+- mclosure0(c_7321833, (function_type)__lambda_791);c_7321833.num_args = 2;
+- __glo_lcm_95main_scheme_base = &c_7321833;
+- mclosure0(c_7321824, (function_type)__lambda_790);c_7321824.num_args = 0;
+- __glo_gcd_95entry_scheme_base = &c_7321824;
+- mclosure0(c_7321814, (function_type)__lambda_788);c_7321814.num_args = 2;
+- __glo_gcd_95main_scheme_base = &c_7321814;
+- mclosure0(c_7321801, (function_type)__lambda_785);c_7321801.num_args = 1;
+- __glo_min_scheme_base = &c_7321801;
+- mclosure0(c_7321788, (function_type)__lambda_782);c_7321788.num_args = 1;
+- __glo_max_scheme_base = &c_7321788;
+- mclosure0(c_7321783, (function_type)__lambda_781);c_7321783.num_args = 2;
+- __glo_rationalize_scheme_base = &c_7321783;
+- mclosure0(c_7321782, (function_type)__lambda_1490);c_7321782.num_args = 1;
+- __glo_complex_127_scheme_base = &c_7321782;
+- mclosure0(c_7321781, (function_type)__lambda_1491);c_7321781.num_args = -1;
+- __glo_complex_127_191_191inline_191_191_scheme_base = &c_7321781;
+- mclosure0(c_7321775, (function_type)__lambda_780);c_7321775.num_args = 1;
+- __glo_inexact_127_scheme_base = &c_7321775;
+- mclosure0(c_7321774, (function_type)__lambda_1488);c_7321774.num_args = 1;
+- __glo_exact_127_scheme_base = &c_7321774;
+- mclosure0(c_7321773, (function_type)__lambda_1489);c_7321773.num_args = -1;
+- __glo_exact_127_191_191inline_191_191_scheme_base = &c_7321773;
+- mclosure0(c_7321772, (function_type)__lambda_1486);c_7321772.num_args = 1;
+- __glo_exact_91integer_127_scheme_base = &c_7321772;
+- mclosure0(c_7321771, (function_type)__lambda_1487);c_7321771.num_args = -1;
+- __glo_exact_91integer_127_191_191inline_191_191_scheme_base = &c_7321771;
+- mclosure0(c_7321770, (function_type)__lambda_1484);c_7321770.num_args = 1;
+- __glo_sqrt_scheme_base = &c_7321770;
+- mclosure0(c_7321769, (function_type)__lambda_1485);c_7321769.num_args = -1;
+- __glo_sqrt_191_191inline_191_191_scheme_base = &c_7321769;
+- mclosure0(c_7321711, (function_type)__lambda_774);c_7321711.num_args = 1;
+- __glo_exact_91integer_91sqrt_scheme_base = &c_7321711;
+- mclosure0(c_7321710, (function_type)__lambda_1483);c_7321710.num_args = 1;
+- __glo_bignum_91sqrt_scheme_base = &c_7321710;
+- mclosure0(c_7321709, (function_type)__lambda_1482);c_7321709.num_args = 1;
+- __glo_bignum_127_scheme_base = &c_7321709;
+- mclosure0(c_7321697, (function_type)__lambda_772);c_7321697.num_args = 1;
+- __glo_even_127_scheme_base = &c_7321697;
+- mclosure0(c_7321685, (function_type)__lambda_770);c_7321685.num_args = 1;
+- __glo_odd_127_scheme_base = &c_7321685;
+- mclosure0(c_7321658, (function_type)__lambda_768);c_7321658.num_args = 2;
+- __glo_modulo_scheme_base = &c_7321658;
+- mclosure0(c_7321657, (function_type)__lambda_1481);c_7321657.num_args = 2;
+- __glo_remainder_scheme_base = &c_7321657;
+- mclosure0(c_7321656, (function_type)__lambda_1480);c_7321656.num_args = 1;
+- __glo_abs_scheme_base = &c_7321656;
+- mclosure0(c_7321655, (function_type)__lambda_1478);c_7321655.num_args = 1;
+- __glo_inexact_scheme_base = &c_7321655;
+- mclosure0(c_7321654, (function_type)__lambda_1479);c_7321654.num_args = -1;
+- __glo_inexact_191_191inline_191_191_scheme_base = &c_7321654;
+- mclosure0(c_7321653, (function_type)__lambda_1476);c_7321653.num_args = 1;
+- __glo_exact_scheme_base = &c_7321653;
+- mclosure0(c_7321652, (function_type)__lambda_1477);c_7321652.num_args = -1;
+- __glo_exact_191_191inline_191_191_scheme_base = &c_7321652;
+- mclosure0(c_7321651, (function_type)__lambda_1474);c_7321651.num_args = 1;
+- __glo_round_scheme_base = &c_7321651;
+- mclosure0(c_7321650, (function_type)__lambda_1475);c_7321650.num_args = -1;
+- __glo_round_191_191inline_191_191_scheme_base = &c_7321650;
+- mclosure0(c_7321649, (function_type)__lambda_1472);c_7321649.num_args = 1;
+- __glo_truncate_scheme_base = &c_7321649;
+- mclosure0(c_7321648, (function_type)__lambda_1473);c_7321648.num_args = -1;
+- __glo_truncate_191_191inline_191_191_scheme_base = &c_7321648;
+- mclosure0(c_7321647, (function_type)__lambda_1470);c_7321647.num_args = 1;
+- __glo_ceiling_scheme_base = &c_7321647;
+- mclosure0(c_7321646, (function_type)__lambda_1471);c_7321646.num_args = -1;
+- __glo_ceiling_191_191inline_191_191_scheme_base = &c_7321646;
+- mclosure0(c_7321645, (function_type)__lambda_1468);c_7321645.num_args = 1;
+- __glo_floor_scheme_base = &c_7321645;
+- mclosure0(c_7321644, (function_type)__lambda_1469);c_7321644.num_args = -1;
+- __glo_floor_191_191inline_191_191_scheme_base = &c_7321644;
+- mclosure0(c_7321602, (function_type)__lambda_762);c_7321602.num_args = 2;
+- __glo_every_scheme_base = &c_7321602;
+- mclosure0(c_7321560, (function_type)__lambda_756);c_7321560.num_args = 2;
+- __glo_any_scheme_base = &c_7321560;
+- mclosure0(c_7321442, (function_type)__lambda_742);c_7321442.num_args = 2;
+- __glo_error_95loc_scheme_base = &c_7321442;
+- mclosure0(c_7321441, (function_type)__lambda_1467);c_7321441.num_args = 0;
+- __glo_Cyc_91remove_91exception_91handler_scheme_base = &c_7321441;
+- mclosure0(c_7321440, (function_type)__lambda_1466);c_7321440.num_args = 1;
+- __glo_Cyc_91add_91exception_91handler_scheme_base = &c_7321440;
+- mclosure0(c_7321360, (function_type)__lambda_730);c_7321360.num_args = 2;
+- __glo_with_91exception_91handler_scheme_base = &c_7321360;
+- mmacro(c_7321297, (function_type)__lambda_729);c_7321297.num_args = 3;
+- __glo_with_91handler_scheme_base = &c_7321297;
+- mclosure0(c_7321282, (function_type)__lambda_728);c_7321282.num_args = 1;
+- __glo_raise_91continuable_scheme_base = &c_7321282;
+- mclosure0(c_7321267, (function_type)__lambda_727);c_7321267.num_args = 1;
+- __glo_raise_scheme_base = &c_7321267;
+- mclosure0(c_7321262, (function_type)__lambda_726);c_7321262.num_args = 1;
+- __glo_error_scheme_base = &c_7321262;
+- mclosure0(c_7321253, (function_type)__lambda_725);c_7321253.num_args = 1;
+- __glo_error_91object_127_scheme_base = &c_7321253;
+- mclosure0(c_7321123, (function_type)__lambda_707);c_7321123.num_args = 1;
+- __glo_make_91parameter_scheme_base = &c_7321123;
+- mclosure0(c_7321122, (function_type)__lambda_1465);c_7321122.num_args = 1;
+- __glo_set_91param_91obj_67_scheme_base = &c_7321122;
+- mclosure0(c_7321121, (function_type)__lambda_1464);c_7321121.num_args = 0;
+- __glo_get_91param_91objs_scheme_base = &c_7321121;
+- mmacro(c_7320170, (function_type)__lambda_636);c_7320170.num_args = 3;
+- __glo_parameterize_scheme_base = &c_7320170;
+- mclosure0(c_7320169, (function_type)__lambda_1463);c_7320169.num_args = 2;
+- __glo_Cyc_91make_91string_scheme_base = &c_7320169;
+- mclosure0(c_7320160, (function_type)__lambda_635);c_7320160.num_args = 1;
+- __glo_make_91string_scheme_base = &c_7320160;
+- mclosure0(c_7320155, (function_type)__lambda_634);c_7320155.num_args = 0;
+- __glo_string_scheme_base = &c_7320155;
+- mclosure0(c_7320125, (function_type)__lambda_627);c_7320125.num_args = 3;
+- __glo_Cyc_91obj_123_127_scheme_base = &c_7320125;
+- mclosure0(c_7320120, (function_type)__lambda_626);c_7320120.num_args = 2;
+- __glo_symbol_123_127_scheme_base = &c_7320120;
+- mclosure0(c_7320115, (function_type)__lambda_625);c_7320115.num_args = 2;
+- __glo_boolean_123_127_scheme_base = &c_7320115;
+- mclosure0(c_7319983, (function_type)__lambda_612);c_7319983.num_args = 2;
+- __glo_vector_91fill_67_scheme_base = &c_7319983;
+- mclosure0(c_7319852, (function_type)__lambda_601);c_7319852.num_args = 3;
+- __glo_vector_91copy_67_scheme_base = &c_7319852;
+- mclosure0(c_7319703, (function_type)__lambda_588);c_7319703.num_args = 1;
+- __glo_vector_91copy_scheme_base = &c_7319703;
+- mclosure0(c_7319688, (function_type)__lambda_585);c_7319688.num_args = 0;
+- __glo_vector_91append_scheme_base = &c_7319688;
+- mclosure0(c_7319667, (function_type)__lambda_582);c_7319667.num_args = 2;
+- __glo_vector_91for_91each_scheme_base = &c_7319667;
+- mclosure0(c_7319640, (function_type)__lambda_578);c_7319640.num_args = 2;
+- __glo_vector_91map_scheme_base = &c_7319640;
+- mclosure0(c_7319619, (function_type)__lambda_575);c_7319619.num_args = 2;
+- __glo_string_91for_91each_scheme_base = &c_7319619;
+- mclosure0(c_7319592, (function_type)__lambda_571);c_7319592.num_args = 2;
+- __glo_string_91map_scheme_base = &c_7319592;
+- mclosure0(c_7319463, (function_type)__lambda_559);c_7319463.num_args = 2;
+- __glo_string_91fill_67_scheme_base = &c_7319463;
+- mclosure0(c_7319338, (function_type)__lambda_549);c_7319338.num_args = 3;
+- __glo_string_91copy_67_scheme_base = &c_7319338;
+- mclosure0(c_7319252, (function_type)__lambda_542);c_7319252.num_args = 1;
+- __glo_string_91copy_scheme_base = &c_7319252;
+- mclosure0(c_7319237, (function_type)__lambda_540);c_7319237.num_args = 1;
+- __glo_string_91_125vector_scheme_base = &c_7319237;
+- mclosure0(c_7319118, (function_type)__lambda_530);c_7319118.num_args = 1;
+- __glo_string_91_125list_scheme_base = &c_7319118;
+- mclosure0(c_7319103, (function_type)__lambda_528);c_7319103.num_args = 1;
+- __glo_vector_91_125string_scheme_base = &c_7319103;
+- mclosure0(c_7319017, (function_type)__lambda_521);c_7319017.num_args = 1;
+- __glo_string_91_125utf8_scheme_base = &c_7319017;
+- mclosure0(c_7318931, (function_type)__lambda_514);c_7318931.num_args = 1;
+- __glo_utf8_91_125string_scheme_base = &c_7318931;
+- mclosure0(c_7318728, (function_type)__lambda_493);c_7318728.num_args = 3;
+- __glo_bytevector_91copy_67_scheme_base = &c_7318728;
+- mclosure0(c_7318642, (function_type)__lambda_486);c_7318642.num_args = 1;
+- __glo_bytevector_91copy_scheme_base = &c_7318642;
+- mclosure0(c_7318523, (function_type)__lambda_476);c_7318523.num_args = 1;
+- __glo_vector_91_125list_scheme_base = &c_7318523;
+- mclosure0(c_7318518, (function_type)__lambda_475);c_7318518.num_args = 0;
+- __glo_vector_scheme_base = &c_7318518;
+- mclosure0(c_7318516, (function_type)__lambda_474);c_7318516.num_args = 1;
+- __glo_reverse_scheme_base = &c_7318516;
+- mclosure0(c_7318506, (function_type)__lambda_472);c_7318506.num_args = 3;
+- __glo_list_91set_67_scheme_base = &c_7318506;
+- mclosure0(c_7318498, (function_type)__lambda_470);c_7318498.num_args = 2;
+- __glo_list_91ref_scheme_base = &c_7318498;
+- mclosure0(c_7318488, (function_type)__lambda_469);c_7318488.num_args = 2;
+- __glo_list_91tail_scheme_base = &c_7318488;
+- mclosure0(c_7318401, (function_type)__lambda_457);c_7318401.num_args = 2;
+- __glo_for_91each_scheme_base = &c_7318401;
+- mclosure0(c_7318371, (function_type)__lambda_455);c_7318371.num_args = 3;
+- __glo_Cyc_91for_91each_91loop_912_scheme_base = &c_7318371;
+- mclosure0(c_7318353, (function_type)__lambda_453);c_7318353.num_args = 2;
+- __glo_Cyc_91for_91each_91loop_911_scheme_base = &c_7318353;
+- mclosure0(c_7318319, (function_type)__lambda_450);c_7318319.num_args = 3;
+- __glo_Cyc_91map_91loop_912_scheme_base = &c_7318319;
+- mclosure0(c_7318297, (function_type)__lambda_447);c_7318297.num_args = 2;
+- __glo_Cyc_91map_91loop_911_scheme_base = &c_7318297;
+- mclosure0(c_7318206, (function_type)__lambda_432);c_7318206.num_args = 2;
+- __glo_map_scheme_base = &c_7318206;
+- mclosure0(c_7318094, (function_type)__lambda_412);c_7318094.num_args = 1;
+- __glo__75cars_87cdrs_scheme_base = &c_7318094;
+- mclosure0(c_7318088, (function_type)__lambda_411);c_7318088.num_args = 1;
+- __glo_car_87cdr_scheme_base = &c_7318088;
+- mmacro(c_7318056, (function_type)__lambda_410);c_7318056.num_args = 3;
+- __glo_receive_scheme_base = &c_7318056;
+- mclosure0(c_7318006, (function_type)__lambda_403);c_7318006.num_args = 1;
+- __glo_list_91copy_scheme_base = &c_7318006;
+- mclosure0(c_7317936, (function_type)__lambda_396);c_7317936.num_args = 1;
+- __glo_make_91list_scheme_base = &c_7317936;
+- mclosure0(c_7317934, (function_type)__lambda_395);c_7317934.num_args = 0;
+- __glo__list_scheme_base = &c_7317934;
+- mclosure0(c_7317869, (function_type)__lambda_386);c_7317869.num_args = 0;
+- __glo_append_scheme_base = &c_7317869;
+- mclosure0(c_7317865, (function_type)__lambda_1462);c_7317865.num_args = 1;
+- __glo_negative_127_191_191inline_191_191_scheme_base = &c_7317865;
+- mclosure0(c_7317861, (function_type)__lambda_385);c_7317861.num_args = 1;
+- __glo_negative_127_scheme_base = &c_7317861;
+- mclosure0(c_7317857, (function_type)__lambda_1461);c_7317857.num_args = 1;
+- __glo_positive_127_191_191inline_191_191_scheme_base = &c_7317857;
+- mclosure0(c_7317853, (function_type)__lambda_384);c_7317853.num_args = 1;
+- __glo_positive_127_scheme_base = &c_7317853;
+- mclosure0(c_7317849, (function_type)__lambda_1460);c_7317849.num_args = 1;
+- __glo_zero_127_191_191inline_191_191_scheme_base = &c_7317849;
+- mclosure0(c_7317845, (function_type)__lambda_383);c_7317845.num_args = 1;
+- __glo_zero_127_scheme_base = &c_7317845;
+- mclosure0(c_7317844, (function_type)__lambda_1458);c_7317844.num_args = 1;
+- __glo_list_127_scheme_base = &c_7317844;
+- mclosure0(c_7317843, (function_type)__lambda_1459);c_7317843.num_args = -1;
+- __glo_list_127_191_191inline_191_191_scheme_base = &c_7317843;
+- mclosure0(c_7317840, (function_type)__lambda_1457);c_7317840.num_args = 1;
+- __glo_not_191_191inline_191_191_scheme_base = &c_7317840;
+- mclosure0(c_7317837, (function_type)__lambda_382);c_7317837.num_args = 1;
+- __glo_not_scheme_base = &c_7317837;
+- mclosure0(c_7317829, (function_type)__lambda_381);c_7317829.num_args = 0;
+- __glo_newline_scheme_base = &c_7317829;
+- mclosure0(c_7317813, (function_type)__lambda_379);c_7317813.num_args = 1;
+- __glo_write_91char_scheme_base = &c_7317813;
+- mclosure0(c_7317812, (function_type)__lambda_1455);c_7317812.num_args = 4;
+- __glo__75write_91bytevector_scheme_base = &c_7317812;
+- mclosure0(c_7317811, (function_type)__lambda_1456);c_7317811.num_args = 2;
+- __glo__75write_91bytevector_191_191inline_191_191_scheme_base = &c_7317811;
+- mclosure0(c_7317694, (function_type)__lambda_369);c_7317694.num_args = 1;
+- __glo_write_91bytevector_scheme_base = &c_7317694;
+- mclosure0(c_7317549, (function_type)__lambda_352);c_7317549.num_args = 1;
+- __glo_read_91bytevector_67_scheme_base = &c_7317549;
+- mclosure0(c_7317431, (function_type)__lambda_340);c_7317431.num_args = 1;
+- __glo_read_91bytevector_scheme_base = &c_7317431;
+- mclosure0(c_7317381, (function_type)__lambda_336);c_7317381.num_args = 1;
+- __glo_write_91string_scheme_base = &c_7317381;
+- mclosure0(c_7317377, (function_type)__lambda_335);c_7317377.num_args = 2;
+- __glo_write_91string_912_scheme_base = &c_7317377;
+- mclosure0(c_7317368, (function_type)__lambda_333);c_7317368.num_args = 1;
+- __glo_write_91string_911_scheme_base = &c_7317368;
+- mclosure0(c_7317353, (function_type)__lambda_331);c_7317353.num_args = 0;
+- __glo_flush_91output_91port_scheme_base = &c_7317353;
+- mclosure0(c_7317339, (function_type)__lambda_329);c_7317339.num_args = 1;
+- __glo_textual_91port_127_scheme_base = &c_7317339;
+- mclosure0(c_7317334, (function_type)__lambda_328);c_7317334.num_args = 1;
+- __glo_binary_91port_127_scheme_base = &c_7317334;
+- mclosure0(c_7317333, (function_type)__lambda_1454);c_7317333.num_args = 1;
+- __glo__191binary_91port_127_scheme_base = &c_7317333;
+- mclosure0(c_7317226, (function_type)__lambda_316);c_7317226.num_args = 1;
+- __glo_read_91string_scheme_base = &c_7317226;
+- mclosure0(c_7317143, (function_type)__lambda_306);c_7317143.num_args = 2;
+- __glo__191read_91line_scheme_base = &c_7317143;
+- mclosure0(c_7317105, (function_type)__lambda_301);c_7317105.num_args = 0;
+- __glo_read_91line_scheme_base = &c_7317105;
+- mclosure0(c_7317088, (function_type)__lambda_299);c_7317088.num_args = 0;
+- __glo_read_91char_scheme_base = &c_7317088;
+- mclosure0(c_7317071, (function_type)__lambda_297);c_7317071.num_args = 0;
+- __glo_peek_91char_scheme_base = &c_7317071;
+- mclosure0(c_7317060, (function_type)__lambda_295);c_7317060.num_args = 0;
+- __glo_char_91ready_127_scheme_base = &c_7317060;
+- mclosure0(c_7317059, (function_type)__lambda_1453);c_7317059.num_args = 1;
+- __glo_Cyc_91char_91ready_127_scheme_base = &c_7317059;
+- mclosure0(c_7317047, (function_type)__lambda_293);c_7317047.num_args = 1;
+- __glo_write_91u8_scheme_base = &c_7317047;
+- mclosure0(c_7317036, (function_type)__lambda_291);c_7317036.num_args = 0;
+- __glo_peek_91u8_scheme_base = &c_7317036;
+- mclosure0(c_7317025, (function_type)__lambda_289);c_7317025.num_args = 0;
+- __glo_read_91u8_scheme_base = &c_7317025;
+- mclosure0(c_7317024, (function_type)__lambda_1452);c_7317024.num_args = 2;
+- __glo__191write_91u8_scheme_base = &c_7317024;
+- mclosure0(c_7317023, (function_type)__lambda_1451);c_7317023.num_args = 1;
+- __glo__191peek_91u8_scheme_base = &c_7317023;
+- mclosure0(c_7317022, (function_type)__lambda_1450);c_7317022.num_args = 1;
+- __glo__191read_91u8_scheme_base = &c_7317022;
+- mclosure0(c_7317007, (function_type)__lambda_287);c_7317007.num_args = 3;
+- __glo_foldr_scheme_base = &c_7317007;
+- mclosure0(c_7316992, (function_type)__lambda_285);c_7316992.num_args = 3;
+- __glo_foldl_scheme_base = &c_7316992;
+- mclosure0(c_7316985, (function_type)__lambda_284);c_7316985.num_args = 2;
+- __glo_assoc_scheme_base = &c_7316985;
+- mclosure0(c_7316950, (function_type)__lambda_281);c_7316950.num_args = 3;
+- __glo_assoc_91helper_scheme_base = &c_7316950;
+- mclosure0(c_7316943, (function_type)__lambda_280);c_7316943.num_args = 2;
+- __glo_member_scheme_base = &c_7316943;
+- mclosure0(c_7316924, (function_type)__lambda_278);c_7316924.num_args = 3;
+- __glo_member_91helper_scheme_base = &c_7316924;
+- mclosure0(c_7316918, (function_type)__lambda_1449);c_7316918.num_args = 2;
+- __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base = &c_7316918;
+- mclosure0(c_7316912, (function_type)__lambda_277);c_7316912.num_args = 2;
+- __glo_fast_91string_125_123_127_scheme_base = &c_7316912;
+- mclosure0(c_7316906, (function_type)__lambda_1448);c_7316906.num_args = 2;
+- __glo_fast_91string_125_127_191_191inline_191_191_scheme_base = &c_7316906;
+- mclosure0(c_7316900, (function_type)__lambda_276);c_7316900.num_args = 2;
+- __glo_fast_91string_125_127_scheme_base = &c_7316900;
+- mclosure0(c_7316894, (function_type)__lambda_1447);c_7316894.num_args = 2;
+- __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base = &c_7316894;
+- mclosure0(c_7316888, (function_type)__lambda_275);c_7316888.num_args = 2;
+- __glo_fast_91string_121_123_127_scheme_base = &c_7316888;
+- mclosure0(c_7316882, (function_type)__lambda_1446);c_7316882.num_args = 2;
+- __glo_fast_91string_121_127_191_191inline_191_191_scheme_base = &c_7316882;
+- mclosure0(c_7316876, (function_type)__lambda_274);c_7316876.num_args = 2;
+- __glo_fast_91string_121_127_scheme_base = &c_7316876;
+- mclosure0(c_7316870, (function_type)__lambda_1445);c_7316870.num_args = 2;
+- __glo_fast_91string_123_127_191_191inline_191_191_scheme_base = &c_7316870;
+- mclosure0(c_7316864, (function_type)__lambda_273);c_7316864.num_args = 2;
+- __glo_fast_91string_123_127_scheme_base = &c_7316864;
+- mclosure0(c_7316859, (function_type)__lambda_272);c_7316859.num_args = 2;
+- __glo_string_125_123_127_scheme_base = &c_7316859;
+- mclosure0(c_7316854, (function_type)__lambda_271);c_7316854.num_args = 2;
+- __glo_string_125_127_scheme_base = &c_7316854;
+- mclosure0(c_7316849, (function_type)__lambda_270);c_7316849.num_args = 2;
+- __glo_string_121_123_127_scheme_base = &c_7316849;
+- mclosure0(c_7316844, (function_type)__lambda_269);c_7316844.num_args = 2;
+- __glo_string_121_127_scheme_base = &c_7316844;
+- mclosure0(c_7316839, (function_type)__lambda_268);c_7316839.num_args = 2;
+- __glo_string_123_127_scheme_base = &c_7316839;
+- mclosure0(c_7316834, (function_type)__lambda_267);c_7316834.num_args = 2;
+- __glo_char_125_123_127_scheme_base = &c_7316834;
+- mclosure0(c_7316829, (function_type)__lambda_266);c_7316829.num_args = 2;
+- __glo_char_121_123_127_scheme_base = &c_7316829;
+- mclosure0(c_7316824, (function_type)__lambda_265);c_7316824.num_args = 2;
+- __glo_char_125_127_scheme_base = &c_7316824;
+- mclosure0(c_7316819, (function_type)__lambda_264);c_7316819.num_args = 2;
+- __glo_char_121_127_scheme_base = &c_7316819;
+- mclosure0(c_7316814, (function_type)__lambda_263);c_7316814.num_args = 2;
+- __glo_char_123_127_scheme_base = &c_7316814;
+- mclosure0(c_7316798, (function_type)__lambda_260);c_7316798.num_args = 3;
+- __glo_Cyc_91bin_91op_91char_scheme_base = &c_7316798;
+- mclosure0(c_7316778, (function_type)__lambda_258);c_7316778.num_args = 3;
+- __glo_Cyc_91bin_91op_scheme_base = &c_7316778;
+- mclosure0(c_7316768, (function_type)__lambda_256);c_7316768.num_args = 2;
+- __glo_call_91with_91port_scheme_base = &c_7316768;
+- mclosure0(c_7316753, (function_type)__lambda_252);c_7316753.num_args = 3;
+- __glo_dynamic_91wind_scheme_base = &c_7316753;
+- mclosure0(c_7316726, (function_type)__lambda_250);c_7316726.num_args = 2;
+- __glo_call_91with_91values_scheme_base = &c_7316726;
+- mclosure0(c_7316706, (function_type)__lambda_249);c_7316706.num_args = 0;
+- __glo_values_scheme_base = &c_7316706;
+- mmacro(c_7316699, (function_type)__lambda_248);c_7316699.num_args = 3;
+- __glo_syntax_91error_scheme_base = &c_7316699;
+- mmacro(c_7316366, (function_type)__lambda_213);c_7316366.num_args = 3;
+- __glo_quasiquote_scheme_base = &c_7316366;
+- mmacro(c_7316131, (function_type)__lambda_189);c_7316131.num_args = 3;
+- __glo__do_scheme_base = &c_7316131;
+- mmacro(c_7316060, (function_type)__lambda_182);c_7316060.num_args = 3;
+- __glo_unless_scheme_base = &c_7316060;
+- mmacro(c_7315995, (function_type)__lambda_175);c_7315995.num_args = 3;
+- __glo_when_scheme_base = &c_7315995;
+- mmacro(c_7315641, (function_type)__lambda_142);c_7315641.num_args = 3;
+- __glo__case_scheme_base = &c_7315641;
+- mmacro(c_7315449, (function_type)__lambda_121);c_7315449.num_args = 3;
+- __glo_cond_scheme_base = &c_7315449;
+- mmacro(c_7315033, (function_type)__lambda_84);c_7315033.num_args = 3;
+- __glo_cond_91expand_scheme_base = &c_7315033;
+- mmacro(c_7314950, (function_type)__lambda_75);c_7314950.num_args = 3;
+- __glo_begin_scheme_base = &c_7314950;
+- mmacro(c_7314856, (function_type)__lambda_58);c_7314856.num_args = 3;
+- __glo_letrec_scheme_base = &c_7314856;
+- mmacro(c_7314714, (function_type)__lambda_43);c_7314714.num_args = 3;
+- __glo_let_85_scheme_base = &c_7314714;
+- mmacro(c_7314514, (function_type)__lambda_24);c_7314514.num_args = 3;
+- __glo_let_scheme_base = &c_7314514;
+- mmacro(c_7314450, (function_type)__lambda_17);c_7314450.num_args = 3;
+- __glo_or_scheme_base = &c_7314450;
+- mmacro(c_7314415, (function_type)__lambda_14);c_7314415.num_args = 3;
+- __glo_and_scheme_base = &c_7314415;
+- mclosure0(c_7314413, (function_type)__lambda_13);c_7314413.num_args = 0;
+- __glo_Cyc_91version_scheme_base = &c_7314413;
+- mclosure0(c_7314401, (function_type)__lambda_11);c_7314401.num_args = 1;
+- __glo_Cyc_91add_91feature_67_scheme_base = &c_7314401;
+- mclosure0(c_7314328, (function_type)__lambda_3);c_7314328.num_args = 0;
+- __glo_features_scheme_base = &c_7314328;
+- mclosure0(c_7314322, (function_type)__lambda_1);c_7314322.num_args = 2;
+- __glo_call_95cc_scheme_base = &c_7314322;
++ mclosure0(c_7326294, (function_type)__lambda_1280);c_7326294.num_args = 0;
++ __glo_lib_91init_117schemebase_scheme_base = &c_7326294;
++ mmacro(c_7325552, (function_type)__lambda_1222);c_7325552.num_args = 3;
++ __glo_define_91values_scheme_base = &c_7325552;
++ mmacro(c_7325089, (function_type)__lambda_1191);c_7325089.num_args = 3;
++ __glo_define_91record_91type_scheme_base = &c_7325089;
++ mclosure0(c_7325067, (function_type)__lambda_1188);c_7325067.num_args = 2;
++ __glo_is_91a_127_scheme_base = &c_7325067;
++ mclosure0(c_7325066, (function_type)__lambda_1467);c_7325066.num_args = 1;
++ __glo_record_127_scheme_base = &c_7325066;
++ mclosure0(c_7325018, (function_type)__lambda_1182);c_7325018.num_args = 2;
++ __glo__191list_91index_scheme_base = &c_7325018;
++ mclosure0(c_7324988, (function_type)__lambda_1178);c_7324988.num_args = 3;
++ __glo_make_91setter_scheme_base = &c_7324988;
++ mclosure0(c_7324970, (function_type)__lambda_1176);c_7324970.num_args = 3;
++ __glo_make_91getter_scheme_base = &c_7324970;
++ mclosure0(c_7324947, (function_type)__lambda_1173);c_7324947.num_args = 3;
++ __glo_slot_91ref_scheme_base = &c_7324947;
++ mclosure0(c_7324931, (function_type)__lambda_1170);c_7324931.num_args = 4;
++ __glo_slot_91set_67_scheme_base = &c_7324931;
++ mclosure0(c_7324927, (function_type)__lambda_1169);c_7324927.num_args = 2;
++ __glo_type_91slot_91offset_scheme_base = &c_7324927;
++ mclosure0(c_7324891, (function_type)__lambda_1164);c_7324891.num_args = 2;
++ __glo_make_91constructor_95args_scheme_base = &c_7324891;
++ mclosure0(c_7324870, (function_type)__lambda_1161);c_7324870.num_args = 2;
++ __glo_make_91constructor_scheme_base = &c_7324870;
++ mclosure0(c_7324853, (function_type)__lambda_1158);c_7324853.num_args = 2;
++ __glo_make_91type_91predicate_scheme_base = &c_7324853;
++ mclosure0(c_7324848, (function_type)__lambda_1157);c_7324848.num_args = 3;
++ __glo_register_91simple_91type_scheme_base = &c_7324848;
++ mmacro(c_7323827, (function_type)__lambda_1106);c_7323827.num_args = 3;
++ __glo_guard_91aux_scheme_base = &c_7323827;
++ mmacro(c_7323440, (function_type)__lambda_1074);c_7323440.num_args = 3;
++ __glo_guard_scheme_base = &c_7323440;
++ mmacro(c_7323350, (function_type)__lambda_1066);c_7323350.num_args = 3;
++ __glo_let_91values_scheme_base = &c_7323350;
++ mmacro(c_7323019, (function_type)__lambda_1046);c_7323019.num_args = 3;
++ __glo_let_85_91values_scheme_base = &c_7323019;
++ mmacro(c_7322840, (function_type)__lambda_1025);c_7322840.num_args = 3;
++ __glo_letrec_85_scheme_base = &c_7322840;
++ mmacro(c_7320738, (function_type)__lambda_810);c_7320738.num_args = 3;
++ __glo_syntax_91rules_scheme_base = &c_7320738;
++ mclosure0(c_7320733, (function_type)__lambda_809);c_7320733.num_args = 3;
++ __glo_cons_91source_scheme_base = &c_7320733;
++ mclosure0(c_7320723, (function_type)__lambda_807);c_7320723.num_args = 2;
++ __glo_find_scheme_base = &c_7320723;
++ mclosure0(c_7320705, (function_type)__lambda_805);c_7320705.num_args = 2;
++ __glo_find_91tail_scheme_base = &c_7320705;
++ mclosure0(c_7320704, (function_type)__lambda_1466);c_7320704.num_args = 1;
++ __glo_open_91input_91bytevector_scheme_base = &c_7320704;
++ mclosure0(c_7320703, (function_type)__lambda_1465);c_7320703.num_args = 1;
++ __glo_get_91output_91bytevector_scheme_base = &c_7320703;
++ mclosure0(c_7320702, (function_type)__lambda_1464);c_7320702.num_args = 1;
++ __glo_get_91output_91string_scheme_base = &c_7320702;
++ mclosure0(c_7320701, (function_type)__lambda_1463);c_7320701.num_args = 0;
++ __glo_open_91output_91string_scheme_base = &c_7320701;
++ mclosure0(c_7320700, (function_type)__lambda_1462);c_7320700.num_args = 1;
++ __glo_open_91input_91string_scheme_base = &c_7320700;
++ mclosure0(c_7320699, (function_type)__lambda_1461);c_7320699.num_args = 1;
++ __glo_output_91port_91open_127_scheme_base = &c_7320699;
++ mclosure0(c_7320698, (function_type)__lambda_1460);c_7320698.num_args = 1;
++ __glo_input_91port_91open_127_scheme_base = &c_7320698;
++ mclosure0(c_7320697, (function_type)__lambda_1459);c_7320697.num_args = 1;
++ __glo_output_91port_127_scheme_base = &c_7320697;
++ mclosure0(c_7320696, (function_type)__lambda_1458);c_7320696.num_args = 1;
++ __glo_input_91port_127_scheme_base = &c_7320696;
++ mclosure0(c_7320695, (function_type)__lambda_1456);c_7320695.num_args = 0;
++ __glo_make_91record_91marker_scheme_base = &c_7320695;
++ mclosure0(c_7320694, (function_type)__lambda_1457);c_7320694.num_args = -2;
++ __glo_make_91record_91marker_191_191inline_191_191_scheme_base = &c_7320694;
++ mclosure0(c_7320693, (function_type)__lambda_1454);c_7320693.num_args = 0;
++ __glo__void_scheme_base = &c_7320693;
++ mclosure0(c_7320692, (function_type)__lambda_1455);c_7320692.num_args = -2;
++ __glo_void_191_191inline_191_191_scheme_base = &c_7320692;
++ mclosure0(c_7320691, (function_type)__lambda_1452);c_7320691.num_args = 0;
++ __glo_eof_91object_scheme_base = &c_7320691;
++ mclosure0(c_7320690, (function_type)__lambda_1453);c_7320690.num_args = -2;
++ __glo_eof_91object_191_191inline_191_191_scheme_base = &c_7320690;
++ mclosure0(c_7320689, (function_type)__lambda_1451);c_7320689.num_args = 2;
++ __glo_expt_scheme_base = &c_7320689;
++ mclosure0(c_7320684, (function_type)__lambda_1450);c_7320684.num_args = 1;
++ __glo_square_191_191inline_191_191_scheme_base = &c_7320684;
++ mclosure0(c_7320679, (function_type)__lambda_804);c_7320679.num_args = 1;
++ __glo_square_scheme_base = &c_7320679;
++ mclosure0(c_7320667, (function_type)__lambda_801);c_7320667.num_args = 2;
++ __glo_floor_95_scheme_base = &c_7320667;
++ mclosure0(c_7320653, (function_type)__lambda_799);c_7320653.num_args = 2;
++ __glo_floor_91remainder_scheme_base = &c_7320653;
++ mclosure0(c_7320626, (function_type)__lambda_798);c_7320626.num_args = 2;
++ __glo_floor_91quotient_scheme_base = &c_7320626;
++ mclosure0(c_7320614, (function_type)__lambda_795);c_7320614.num_args = 2;
++ __glo_truncate_95_scheme_base = &c_7320614;
++ mclosure0(c_7320587, (function_type)__lambda_1449);c_7320587.num_args = 2;
++ __glo_quotient_191_191inline_191_191_scheme_base = &c_7320587;
++ mclosure0(c_7320560, (function_type)__lambda_794);c_7320560.num_args = 2;
++ __glo_quotient_scheme_base = &c_7320560;
++ mclosure0(c_7320559, (function_type)__lambda_1447);c_7320559.num_args = 1;
++ __glo_fixnum_127_scheme_base = &c_7320559;
++ mclosure0(c_7320558, (function_type)__lambda_1448);c_7320558.num_args = -1;
++ __glo_fixnum_127_191_191inline_191_191_scheme_base = &c_7320558;
++ mclosure0(c_7320557, (function_type)__lambda_1446);c_7320557.num_args = 1;
++ __glo_denominator_scheme_base = &c_7320557;
++ mclosure0(c_7320556, (function_type)__lambda_1445);c_7320556.num_args = 1;
++ __glo_numerator_scheme_base = &c_7320556;
++ mclosure0(c_7320547, (function_type)__lambda_793);c_7320547.num_args = 0;
++ __glo_lcm_95entry_scheme_base = &c_7320547;
++ mclosure0(c_7320533, (function_type)__lambda_791);c_7320533.num_args = 2;
++ __glo_lcm_95main_scheme_base = &c_7320533;
++ mclosure0(c_7320524, (function_type)__lambda_790);c_7320524.num_args = 0;
++ __glo_gcd_95entry_scheme_base = &c_7320524;
++ mclosure0(c_7320514, (function_type)__lambda_788);c_7320514.num_args = 2;
++ __glo_gcd_95main_scheme_base = &c_7320514;
++ mclosure0(c_7320501, (function_type)__lambda_785);c_7320501.num_args = 1;
++ __glo_min_scheme_base = &c_7320501;
++ mclosure0(c_7320488, (function_type)__lambda_782);c_7320488.num_args = 1;
++ __glo_max_scheme_base = &c_7320488;
++ mclosure0(c_7320483, (function_type)__lambda_781);c_7320483.num_args = 2;
++ __glo_rationalize_scheme_base = &c_7320483;
++ mclosure0(c_7320482, (function_type)__lambda_1443);c_7320482.num_args = 1;
++ __glo_complex_127_scheme_base = &c_7320482;
++ mclosure0(c_7320481, (function_type)__lambda_1444);c_7320481.num_args = -1;
++ __glo_complex_127_191_191inline_191_191_scheme_base = &c_7320481;
++ mclosure0(c_7320475, (function_type)__lambda_780);c_7320475.num_args = 1;
++ __glo_inexact_127_scheme_base = &c_7320475;
++ mclosure0(c_7320474, (function_type)__lambda_1441);c_7320474.num_args = 1;
++ __glo_exact_127_scheme_base = &c_7320474;
++ mclosure0(c_7320473, (function_type)__lambda_1442);c_7320473.num_args = -1;
++ __glo_exact_127_191_191inline_191_191_scheme_base = &c_7320473;
++ mclosure0(c_7320472, (function_type)__lambda_1439);c_7320472.num_args = 1;
++ __glo_exact_91integer_127_scheme_base = &c_7320472;
++ mclosure0(c_7320471, (function_type)__lambda_1440);c_7320471.num_args = -1;
++ __glo_exact_91integer_127_191_191inline_191_191_scheme_base = &c_7320471;
++ mclosure0(c_7320470, (function_type)__lambda_1437);c_7320470.num_args = 1;
++ __glo_sqrt_scheme_base = &c_7320470;
++ mclosure0(c_7320469, (function_type)__lambda_1438);c_7320469.num_args = -1;
++ __glo_sqrt_191_191inline_191_191_scheme_base = &c_7320469;
++ mclosure0(c_7320411, (function_type)__lambda_774);c_7320411.num_args = 1;
++ __glo_exact_91integer_91sqrt_scheme_base = &c_7320411;
++ mclosure0(c_7320410, (function_type)__lambda_1436);c_7320410.num_args = 1;
++ __glo_bignum_91sqrt_scheme_base = &c_7320410;
++ mclosure0(c_7320409, (function_type)__lambda_1435);c_7320409.num_args = 1;
++ __glo_bignum_127_scheme_base = &c_7320409;
++ mclosure0(c_7320397, (function_type)__lambda_772);c_7320397.num_args = 1;
++ __glo_even_127_scheme_base = &c_7320397;
++ mclosure0(c_7320385, (function_type)__lambda_770);c_7320385.num_args = 1;
++ __glo_odd_127_scheme_base = &c_7320385;
++ mclosure0(c_7320358, (function_type)__lambda_768);c_7320358.num_args = 2;
++ __glo_modulo_scheme_base = &c_7320358;
++ mclosure0(c_7320357, (function_type)__lambda_1434);c_7320357.num_args = 2;
++ __glo_remainder_scheme_base = &c_7320357;
++ mclosure0(c_7320356, (function_type)__lambda_1433);c_7320356.num_args = 1;
++ __glo_abs_scheme_base = &c_7320356;
++ mclosure0(c_7320355, (function_type)__lambda_1431);c_7320355.num_args = 1;
++ __glo_inexact_scheme_base = &c_7320355;
++ mclosure0(c_7320354, (function_type)__lambda_1432);c_7320354.num_args = -1;
++ __glo_inexact_191_191inline_191_191_scheme_base = &c_7320354;
++ mclosure0(c_7320353, (function_type)__lambda_1429);c_7320353.num_args = 1;
++ __glo_exact_scheme_base = &c_7320353;
++ mclosure0(c_7320352, (function_type)__lambda_1430);c_7320352.num_args = -1;
++ __glo_exact_191_191inline_191_191_scheme_base = &c_7320352;
++ mclosure0(c_7320351, (function_type)__lambda_1427);c_7320351.num_args = 1;
++ __glo_round_scheme_base = &c_7320351;
++ mclosure0(c_7320350, (function_type)__lambda_1428);c_7320350.num_args = -1;
++ __glo_round_191_191inline_191_191_scheme_base = &c_7320350;
++ mclosure0(c_7320349, (function_type)__lambda_1425);c_7320349.num_args = 1;
++ __glo_truncate_scheme_base = &c_7320349;
++ mclosure0(c_7320348, (function_type)__lambda_1426);c_7320348.num_args = -1;
++ __glo_truncate_191_191inline_191_191_scheme_base = &c_7320348;
++ mclosure0(c_7320347, (function_type)__lambda_1423);c_7320347.num_args = 1;
++ __glo_ceiling_scheme_base = &c_7320347;
++ mclosure0(c_7320346, (function_type)__lambda_1424);c_7320346.num_args = -1;
++ __glo_ceiling_191_191inline_191_191_scheme_base = &c_7320346;
++ mclosure0(c_7320345, (function_type)__lambda_1421);c_7320345.num_args = 1;
++ __glo_floor_scheme_base = &c_7320345;
++ mclosure0(c_7320344, (function_type)__lambda_1422);c_7320344.num_args = -1;
++ __glo_floor_191_191inline_191_191_scheme_base = &c_7320344;
++ mclosure0(c_7320302, (function_type)__lambda_762);c_7320302.num_args = 2;
++ __glo_every_scheme_base = &c_7320302;
++ mclosure0(c_7320260, (function_type)__lambda_756);c_7320260.num_args = 2;
++ __glo_any_scheme_base = &c_7320260;
++ mclosure0(c_7320142, (function_type)__lambda_742);c_7320142.num_args = 2;
++ __glo_error_95loc_scheme_base = &c_7320142;
++ mclosure0(c_7320141, (function_type)__lambda_1420);c_7320141.num_args = 0;
++ __glo_Cyc_91remove_91exception_91handler_scheme_base = &c_7320141;
++ mclosure0(c_7320140, (function_type)__lambda_1419);c_7320140.num_args = 1;
++ __glo_Cyc_91add_91exception_91handler_scheme_base = &c_7320140;
++ mclosure0(c_7320060, (function_type)__lambda_730);c_7320060.num_args = 2;
++ __glo_with_91exception_91handler_scheme_base = &c_7320060;
++ mmacro(c_7319997, (function_type)__lambda_729);c_7319997.num_args = 3;
++ __glo_with_91handler_scheme_base = &c_7319997;
++ mclosure0(c_7319982, (function_type)__lambda_728);c_7319982.num_args = 1;
++ __glo_raise_91continuable_scheme_base = &c_7319982;
++ mclosure0(c_7319967, (function_type)__lambda_727);c_7319967.num_args = 1;
++ __glo_raise_scheme_base = &c_7319967;
++ mclosure0(c_7319962, (function_type)__lambda_726);c_7319962.num_args = 1;
++ __glo_error_scheme_base = &c_7319962;
++ mclosure0(c_7319953, (function_type)__lambda_725);c_7319953.num_args = 1;
++ __glo_error_91object_127_scheme_base = &c_7319953;
++ mclosure0(c_7319823, (function_type)__lambda_707);c_7319823.num_args = 1;
++ __glo_make_91parameter_scheme_base = &c_7319823;
++ mclosure0(c_7319822, (function_type)__lambda_1418);c_7319822.num_args = 1;
++ __glo_set_91param_91obj_67_scheme_base = &c_7319822;
++ mclosure0(c_7319821, (function_type)__lambda_1417);c_7319821.num_args = 0;
++ __glo_get_91param_91objs_scheme_base = &c_7319821;
++ mmacro(c_7318870, (function_type)__lambda_636);c_7318870.num_args = 3;
++ __glo_parameterize_scheme_base = &c_7318870;
++ mclosure0(c_7318869, (function_type)__lambda_1416);c_7318869.num_args = 2;
++ __glo_Cyc_91make_91string_scheme_base = &c_7318869;
++ mclosure0(c_7318860, (function_type)__lambda_635);c_7318860.num_args = 1;
++ __glo_make_91string_scheme_base = &c_7318860;
++ mclosure0(c_7318855, (function_type)__lambda_634);c_7318855.num_args = 0;
++ __glo_string_scheme_base = &c_7318855;
++ mclosure0(c_7318825, (function_type)__lambda_627);c_7318825.num_args = 3;
++ __glo_Cyc_91obj_123_127_scheme_base = &c_7318825;
++ mclosure0(c_7318820, (function_type)__lambda_626);c_7318820.num_args = 2;
++ __glo_symbol_123_127_scheme_base = &c_7318820;
++ mclosure0(c_7318815, (function_type)__lambda_625);c_7318815.num_args = 2;
++ __glo_boolean_123_127_scheme_base = &c_7318815;
++ mclosure0(c_7318683, (function_type)__lambda_612);c_7318683.num_args = 2;
++ __glo_vector_91fill_67_scheme_base = &c_7318683;
++ mclosure0(c_7318552, (function_type)__lambda_601);c_7318552.num_args = 3;
++ __glo_vector_91copy_67_scheme_base = &c_7318552;
++ mclosure0(c_7318403, (function_type)__lambda_588);c_7318403.num_args = 1;
++ __glo_vector_91copy_scheme_base = &c_7318403;
++ mclosure0(c_7318388, (function_type)__lambda_585);c_7318388.num_args = 0;
++ __glo_vector_91append_scheme_base = &c_7318388;
++ mclosure0(c_7318367, (function_type)__lambda_582);c_7318367.num_args = 2;
++ __glo_vector_91for_91each_scheme_base = &c_7318367;
++ mclosure0(c_7318340, (function_type)__lambda_578);c_7318340.num_args = 2;
++ __glo_vector_91map_scheme_base = &c_7318340;
++ mclosure0(c_7318319, (function_type)__lambda_575);c_7318319.num_args = 2;
++ __glo_string_91for_91each_scheme_base = &c_7318319;
++ mclosure0(c_7318292, (function_type)__lambda_571);c_7318292.num_args = 2;
++ __glo_string_91map_scheme_base = &c_7318292;
++ mclosure0(c_7318163, (function_type)__lambda_559);c_7318163.num_args = 2;
++ __glo_string_91fill_67_scheme_base = &c_7318163;
++ mclosure0(c_7318038, (function_type)__lambda_549);c_7318038.num_args = 3;
++ __glo_string_91copy_67_scheme_base = &c_7318038;
++ mclosure0(c_7317952, (function_type)__lambda_542);c_7317952.num_args = 1;
++ __glo_string_91copy_scheme_base = &c_7317952;
++ mclosure0(c_7317937, (function_type)__lambda_540);c_7317937.num_args = 1;
++ __glo_string_91_125vector_scheme_base = &c_7317937;
++ mclosure0(c_7317818, (function_type)__lambda_530);c_7317818.num_args = 1;
++ __glo_string_91_125list_scheme_base = &c_7317818;
++ mclosure0(c_7317803, (function_type)__lambda_528);c_7317803.num_args = 1;
++ __glo_vector_91_125string_scheme_base = &c_7317803;
++ mclosure0(c_7317717, (function_type)__lambda_521);c_7317717.num_args = 1;
++ __glo_string_91_125utf8_scheme_base = &c_7317717;
++ mclosure0(c_7317631, (function_type)__lambda_514);c_7317631.num_args = 1;
++ __glo_utf8_91_125string_scheme_base = &c_7317631;
++ mclosure0(c_7317428, (function_type)__lambda_493);c_7317428.num_args = 3;
++ __glo_bytevector_91copy_67_scheme_base = &c_7317428;
++ mclosure0(c_7317342, (function_type)__lambda_486);c_7317342.num_args = 1;
++ __glo_bytevector_91copy_scheme_base = &c_7317342;
++ mclosure0(c_7317223, (function_type)__lambda_476);c_7317223.num_args = 1;
++ __glo_vector_91_125list_scheme_base = &c_7317223;
++ mclosure0(c_7317218, (function_type)__lambda_475);c_7317218.num_args = 0;
++ __glo_vector_scheme_base = &c_7317218;
++ mclosure0(c_7317216, (function_type)__lambda_474);c_7317216.num_args = 1;
++ __glo_reverse_scheme_base = &c_7317216;
++ mclosure0(c_7317206, (function_type)__lambda_472);c_7317206.num_args = 3;
++ __glo_list_91set_67_scheme_base = &c_7317206;
++ mclosure0(c_7317198, (function_type)__lambda_470);c_7317198.num_args = 2;
++ __glo_list_91ref_scheme_base = &c_7317198;
++ mclosure0(c_7317188, (function_type)__lambda_469);c_7317188.num_args = 2;
++ __glo_list_91tail_scheme_base = &c_7317188;
++ mclosure0(c_7317101, (function_type)__lambda_457);c_7317101.num_args = 2;
++ __glo_for_91each_scheme_base = &c_7317101;
++ mclosure0(c_7317071, (function_type)__lambda_455);c_7317071.num_args = 3;
++ __glo_Cyc_91for_91each_91loop_912_scheme_base = &c_7317071;
++ mclosure0(c_7317053, (function_type)__lambda_453);c_7317053.num_args = 2;
++ __glo_Cyc_91for_91each_91loop_911_scheme_base = &c_7317053;
++ mclosure0(c_7317019, (function_type)__lambda_450);c_7317019.num_args = 3;
++ __glo_Cyc_91map_91loop_912_scheme_base = &c_7317019;
++ mclosure0(c_7316997, (function_type)__lambda_447);c_7316997.num_args = 2;
++ __glo_Cyc_91map_91loop_911_scheme_base = &c_7316997;
++ mclosure0(c_7316906, (function_type)__lambda_432);c_7316906.num_args = 2;
++ __glo_map_scheme_base = &c_7316906;
++ mclosure0(c_7316794, (function_type)__lambda_412);c_7316794.num_args = 1;
++ __glo__75cars_87cdrs_scheme_base = &c_7316794;
++ mclosure0(c_7316788, (function_type)__lambda_411);c_7316788.num_args = 1;
++ __glo_car_87cdr_scheme_base = &c_7316788;
++ mmacro(c_7316756, (function_type)__lambda_410);c_7316756.num_args = 3;
++ __glo_receive_scheme_base = &c_7316756;
++ mclosure0(c_7316706, (function_type)__lambda_403);c_7316706.num_args = 1;
++ __glo_list_91copy_scheme_base = &c_7316706;
++ mclosure0(c_7316636, (function_type)__lambda_396);c_7316636.num_args = 1;
++ __glo_make_91list_scheme_base = &c_7316636;
++ mclosure0(c_7316634, (function_type)__lambda_395);c_7316634.num_args = 0;
++ __glo__list_scheme_base = &c_7316634;
++ mclosure0(c_7316569, (function_type)__lambda_386);c_7316569.num_args = 0;
++ __glo_append_scheme_base = &c_7316569;
++ mclosure0(c_7316565, (function_type)__lambda_1415);c_7316565.num_args = 1;
++ __glo_negative_127_191_191inline_191_191_scheme_base = &c_7316565;
++ mclosure0(c_7316561, (function_type)__lambda_385);c_7316561.num_args = 1;
++ __glo_negative_127_scheme_base = &c_7316561;
++ mclosure0(c_7316557, (function_type)__lambda_1414);c_7316557.num_args = 1;
++ __glo_positive_127_191_191inline_191_191_scheme_base = &c_7316557;
++ mclosure0(c_7316553, (function_type)__lambda_384);c_7316553.num_args = 1;
++ __glo_positive_127_scheme_base = &c_7316553;
++ mclosure0(c_7316549, (function_type)__lambda_1413);c_7316549.num_args = 1;
++ __glo_zero_127_191_191inline_191_191_scheme_base = &c_7316549;
++ mclosure0(c_7316545, (function_type)__lambda_383);c_7316545.num_args = 1;
++ __glo_zero_127_scheme_base = &c_7316545;
++ mclosure0(c_7316544, (function_type)__lambda_1411);c_7316544.num_args = 1;
++ __glo_list_127_scheme_base = &c_7316544;
++ mclosure0(c_7316543, (function_type)__lambda_1412);c_7316543.num_args = -1;
++ __glo_list_127_191_191inline_191_191_scheme_base = &c_7316543;
++ mclosure0(c_7316540, (function_type)__lambda_1410);c_7316540.num_args = 1;
++ __glo_not_191_191inline_191_191_scheme_base = &c_7316540;
++ mclosure0(c_7316537, (function_type)__lambda_382);c_7316537.num_args = 1;
++ __glo_not_scheme_base = &c_7316537;
++ mclosure0(c_7316529, (function_type)__lambda_381);c_7316529.num_args = 0;
++ __glo_newline_scheme_base = &c_7316529;
++ mclosure0(c_7316513, (function_type)__lambda_379);c_7316513.num_args = 1;
++ __glo_write_91char_scheme_base = &c_7316513;
++ mclosure0(c_7316512, (function_type)__lambda_1408);c_7316512.num_args = 4;
++ __glo__75write_91bytevector_scheme_base = &c_7316512;
++ mclosure0(c_7316511, (function_type)__lambda_1409);c_7316511.num_args = 2;
++ __glo__75write_91bytevector_191_191inline_191_191_scheme_base = &c_7316511;
++ mclosure0(c_7316394, (function_type)__lambda_369);c_7316394.num_args = 1;
++ __glo_write_91bytevector_scheme_base = &c_7316394;
++ mclosure0(c_7316249, (function_type)__lambda_352);c_7316249.num_args = 1;
++ __glo_read_91bytevector_67_scheme_base = &c_7316249;
++ mclosure0(c_7316131, (function_type)__lambda_340);c_7316131.num_args = 1;
++ __glo_read_91bytevector_scheme_base = &c_7316131;
++ mclosure0(c_7316081, (function_type)__lambda_336);c_7316081.num_args = 1;
++ __glo_write_91string_scheme_base = &c_7316081;
++ mclosure0(c_7316077, (function_type)__lambda_335);c_7316077.num_args = 2;
++ __glo_write_91string_912_scheme_base = &c_7316077;
++ mclosure0(c_7316068, (function_type)__lambda_333);c_7316068.num_args = 1;
++ __glo_write_91string_911_scheme_base = &c_7316068;
++ mclosure0(c_7316053, (function_type)__lambda_331);c_7316053.num_args = 0;
++ __glo_flush_91output_91port_scheme_base = &c_7316053;
++ mclosure0(c_7316039, (function_type)__lambda_329);c_7316039.num_args = 1;
++ __glo_textual_91port_127_scheme_base = &c_7316039;
++ mclosure0(c_7316034, (function_type)__lambda_328);c_7316034.num_args = 1;
++ __glo_binary_91port_127_scheme_base = &c_7316034;
++ mclosure0(c_7316033, (function_type)__lambda_1407);c_7316033.num_args = 1;
++ __glo__191binary_91port_127_scheme_base = &c_7316033;
++ mclosure0(c_7315926, (function_type)__lambda_316);c_7315926.num_args = 1;
++ __glo_read_91string_scheme_base = &c_7315926;
++ mclosure0(c_7315843, (function_type)__lambda_306);c_7315843.num_args = 2;
++ __glo__191read_91line_scheme_base = &c_7315843;
++ mclosure0(c_7315805, (function_type)__lambda_301);c_7315805.num_args = 0;
++ __glo_read_91line_scheme_base = &c_7315805;
++ mclosure0(c_7315788, (function_type)__lambda_299);c_7315788.num_args = 0;
++ __glo_read_91char_scheme_base = &c_7315788;
++ mclosure0(c_7315771, (function_type)__lambda_297);c_7315771.num_args = 0;
++ __glo_peek_91char_scheme_base = &c_7315771;
++ mclosure0(c_7315760, (function_type)__lambda_295);c_7315760.num_args = 0;
++ __glo_char_91ready_127_scheme_base = &c_7315760;
++ mclosure0(c_7315759, (function_type)__lambda_1406);c_7315759.num_args = 1;
++ __glo_Cyc_91char_91ready_127_scheme_base = &c_7315759;
++ mclosure0(c_7315747, (function_type)__lambda_293);c_7315747.num_args = 1;
++ __glo_write_91u8_scheme_base = &c_7315747;
++ mclosure0(c_7315736, (function_type)__lambda_291);c_7315736.num_args = 0;
++ __glo_peek_91u8_scheme_base = &c_7315736;
++ mclosure0(c_7315725, (function_type)__lambda_289);c_7315725.num_args = 0;
++ __glo_read_91u8_scheme_base = &c_7315725;
++ mclosure0(c_7315724, (function_type)__lambda_1405);c_7315724.num_args = 2;
++ __glo__191write_91u8_scheme_base = &c_7315724;
++ mclosure0(c_7315723, (function_type)__lambda_1404);c_7315723.num_args = 1;
++ __glo__191peek_91u8_scheme_base = &c_7315723;
++ mclosure0(c_7315722, (function_type)__lambda_1403);c_7315722.num_args = 1;
++ __glo__191read_91u8_scheme_base = &c_7315722;
++ mclosure0(c_7315707, (function_type)__lambda_287);c_7315707.num_args = 3;
++ __glo_foldr_scheme_base = &c_7315707;
++ mclosure0(c_7315692, (function_type)__lambda_285);c_7315692.num_args = 3;
++ __glo_foldl_scheme_base = &c_7315692;
++ mclosure0(c_7315685, (function_type)__lambda_284);c_7315685.num_args = 2;
++ __glo_assoc_scheme_base = &c_7315685;
++ mclosure0(c_7315650, (function_type)__lambda_281);c_7315650.num_args = 3;
++ __glo_assoc_91helper_scheme_base = &c_7315650;
++ mclosure0(c_7315643, (function_type)__lambda_280);c_7315643.num_args = 2;
++ __glo_member_scheme_base = &c_7315643;
++ mclosure0(c_7315624, (function_type)__lambda_278);c_7315624.num_args = 3;
++ __glo_member_91helper_scheme_base = &c_7315624;
++ mclosure0(c_7315618, (function_type)__lambda_1402);c_7315618.num_args = 2;
++ __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base = &c_7315618;
++ mclosure0(c_7315612, (function_type)__lambda_277);c_7315612.num_args = 2;
++ __glo_fast_91string_125_123_127_scheme_base = &c_7315612;
++ mclosure0(c_7315606, (function_type)__lambda_1401);c_7315606.num_args = 2;
++ __glo_fast_91string_125_127_191_191inline_191_191_scheme_base = &c_7315606;
++ mclosure0(c_7315600, (function_type)__lambda_276);c_7315600.num_args = 2;
++ __glo_fast_91string_125_127_scheme_base = &c_7315600;
++ mclosure0(c_7315594, (function_type)__lambda_1400);c_7315594.num_args = 2;
++ __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base = &c_7315594;
++ mclosure0(c_7315588, (function_type)__lambda_275);c_7315588.num_args = 2;
++ __glo_fast_91string_121_123_127_scheme_base = &c_7315588;
++ mclosure0(c_7315582, (function_type)__lambda_1399);c_7315582.num_args = 2;
++ __glo_fast_91string_121_127_191_191inline_191_191_scheme_base = &c_7315582;
++ mclosure0(c_7315576, (function_type)__lambda_274);c_7315576.num_args = 2;
++ __glo_fast_91string_121_127_scheme_base = &c_7315576;
++ mclosure0(c_7315570, (function_type)__lambda_1398);c_7315570.num_args = 2;
++ __glo_fast_91string_123_127_191_191inline_191_191_scheme_base = &c_7315570;
++ mclosure0(c_7315564, (function_type)__lambda_273);c_7315564.num_args = 2;
++ __glo_fast_91string_123_127_scheme_base = &c_7315564;
++ mclosure0(c_7315559, (function_type)__lambda_272);c_7315559.num_args = 2;
++ __glo_string_125_123_127_scheme_base = &c_7315559;
++ mclosure0(c_7315554, (function_type)__lambda_271);c_7315554.num_args = 2;
++ __glo_string_125_127_scheme_base = &c_7315554;
++ mclosure0(c_7315549, (function_type)__lambda_270);c_7315549.num_args = 2;
++ __glo_string_121_123_127_scheme_base = &c_7315549;
++ mclosure0(c_7315544, (function_type)__lambda_269);c_7315544.num_args = 2;
++ __glo_string_121_127_scheme_base = &c_7315544;
++ mclosure0(c_7315539, (function_type)__lambda_268);c_7315539.num_args = 2;
++ __glo_string_123_127_scheme_base = &c_7315539;
++ mclosure0(c_7315534, (function_type)__lambda_267);c_7315534.num_args = 2;
++ __glo_char_125_123_127_scheme_base = &c_7315534;
++ mclosure0(c_7315529, (function_type)__lambda_266);c_7315529.num_args = 2;
++ __glo_char_121_123_127_scheme_base = &c_7315529;
++ mclosure0(c_7315524, (function_type)__lambda_265);c_7315524.num_args = 2;
++ __glo_char_125_127_scheme_base = &c_7315524;
++ mclosure0(c_7315519, (function_type)__lambda_264);c_7315519.num_args = 2;
++ __glo_char_121_127_scheme_base = &c_7315519;
++ mclosure0(c_7315514, (function_type)__lambda_263);c_7315514.num_args = 2;
++ __glo_char_123_127_scheme_base = &c_7315514;
++ mclosure0(c_7315498, (function_type)__lambda_260);c_7315498.num_args = 3;
++ __glo_Cyc_91bin_91op_91char_scheme_base = &c_7315498;
++ mclosure0(c_7315478, (function_type)__lambda_258);c_7315478.num_args = 3;
++ __glo_Cyc_91bin_91op_scheme_base = &c_7315478;
++ mclosure0(c_7315468, (function_type)__lambda_256);c_7315468.num_args = 2;
++ __glo_call_91with_91port_scheme_base = &c_7315468;
++ mclosure0(c_7315453, (function_type)__lambda_252);c_7315453.num_args = 3;
++ __glo_dynamic_91wind_scheme_base = &c_7315453;
++ mclosure0(c_7315426, (function_type)__lambda_250);c_7315426.num_args = 2;
++ __glo_call_91with_91values_scheme_base = &c_7315426;
++ mclosure0(c_7315406, (function_type)__lambda_249);c_7315406.num_args = 0;
++ __glo_values_scheme_base = &c_7315406;
++ mmacro(c_7315399, (function_type)__lambda_248);c_7315399.num_args = 3;
++ __glo_syntax_91error_scheme_base = &c_7315399;
++ mmacro(c_7315066, (function_type)__lambda_213);c_7315066.num_args = 3;
++ __glo_quasiquote_scheme_base = &c_7315066;
++ mmacro(c_7314831, (function_type)__lambda_189);c_7314831.num_args = 3;
++ __glo__do_scheme_base = &c_7314831;
++ mmacro(c_7314760, (function_type)__lambda_182);c_7314760.num_args = 3;
++ __glo_unless_scheme_base = &c_7314760;
++ mmacro(c_7314695, (function_type)__lambda_175);c_7314695.num_args = 3;
++ __glo_when_scheme_base = &c_7314695;
++ mmacro(c_7314341, (function_type)__lambda_142);c_7314341.num_args = 3;
++ __glo__case_scheme_base = &c_7314341;
++ mmacro(c_7314149, (function_type)__lambda_121);c_7314149.num_args = 3;
++ __glo_cond_scheme_base = &c_7314149;
++ mmacro(c_7313733, (function_type)__lambda_84);c_7313733.num_args = 3;
++ __glo_cond_91expand_scheme_base = &c_7313733;
++ mmacro(c_7313650, (function_type)__lambda_75);c_7313650.num_args = 3;
++ __glo_begin_scheme_base = &c_7313650;
++ mmacro(c_7313556, (function_type)__lambda_58);c_7313556.num_args = 3;
++ __glo_letrec_scheme_base = &c_7313556;
++ mmacro(c_7313414, (function_type)__lambda_43);c_7313414.num_args = 3;
++ __glo_let_85_scheme_base = &c_7313414;
++ mmacro(c_7313214, (function_type)__lambda_24);c_7313214.num_args = 3;
++ __glo_let_scheme_base = &c_7313214;
++ mmacro(c_7313150, (function_type)__lambda_17);c_7313150.num_args = 3;
++ __glo_or_scheme_base = &c_7313150;
++ mmacro(c_7313115, (function_type)__lambda_14);c_7313115.num_args = 3;
++ __glo_and_scheme_base = &c_7313115;
++ mclosure0(c_7313113, (function_type)__lambda_13);c_7313113.num_args = 0;
++ __glo_Cyc_91version_scheme_base = &c_7313113;
++ mclosure0(c_7313101, (function_type)__lambda_11);c_7313101.num_args = 1;
++ __glo_Cyc_91add_91feature_67_scheme_base = &c_7313101;
++ mclosure0(c_7313028, (function_type)__lambda_3);c_7313028.num_args = 0;
++ __glo_features_scheme_base = &c_7313028;
++ mclosure0(c_7313022, (function_type)__lambda_1);c_7313022.num_args = 2;
++ __glo_call_95cc_scheme_base = &c_7313022;
+ __glo_record_91marker_scheme_base = boolean_f;
+ __glo_identifier_127_scheme_base = boolean_f;
+ __glo_open_91output_91bytevector_scheme_base = boolean_f;
+@@ -41828,507 +40029,507 @@ Cyc_set_globals_changed((gc_thread_data
+ __glo_call_91with_91current_91continuation_scheme_base = boolean_f;
+ __glo__85other_91features_85_scheme_base = boolean_f;
+
+- mclosure0(clo_7328923, c_schemebase_inlinable_lambdas); make_pair(pair_7328922, find_or_add_symbol("c_schemebase_inlinable_lambdas"), &clo_7328923);
+- make_cvar(cvar_7328924, (object *)&__glo_lib_91init_117schemebase_scheme_base);make_pair(pair_7328925, find_or_add_symbol("lib-init:schemebase"), &cvar_7328924);
+- make_cvar(cvar_7328926, (object *)&__glo_define_91values_scheme_base);make_pair(pair_7328927, find_or_add_symbol("define-values"), &cvar_7328926);
+- make_cvar(cvar_7328928, (object *)&__glo_define_91record_91type_scheme_base);make_pair(pair_7328929, find_or_add_symbol("define-record-type"), &cvar_7328928);
+- make_cvar(cvar_7328930, (object *)&__glo_is_91a_127_scheme_base);make_pair(pair_7328931, find_or_add_symbol("is-a?"), &cvar_7328930);
+- make_cvar(cvar_7328932, (object *)&__glo_record_127_scheme_base);make_pair(pair_7328933, find_or_add_symbol("record?"), &cvar_7328932);
+- make_cvar(cvar_7328934, (object *)&__glo__191list_91index_scheme_base);make_pair(pair_7328935, find_or_add_symbol("_list-index"), &cvar_7328934);
+- make_cvar(cvar_7328936, (object *)&__glo_make_91setter_scheme_base);make_pair(pair_7328937, find_or_add_symbol("make-setter"), &cvar_7328936);
+- make_cvar(cvar_7328938, (object *)&__glo_make_91getter_scheme_base);make_pair(pair_7328939, find_or_add_symbol("make-getter"), &cvar_7328938);
+- make_cvar(cvar_7328940, (object *)&__glo_slot_91ref_scheme_base);make_pair(pair_7328941, find_or_add_symbol("slot-ref"), &cvar_7328940);
+- make_cvar(cvar_7328942, (object *)&__glo_slot_91set_67_scheme_base);make_pair(pair_7328943, find_or_add_symbol("slot-set!"), &cvar_7328942);
+- make_cvar(cvar_7328944, (object *)&__glo_type_91slot_91offset_scheme_base);make_pair(pair_7328945, find_or_add_symbol("type-slot-offset"), &cvar_7328944);
+- make_cvar(cvar_7328946, (object *)&__glo_make_91constructor_95args_scheme_base);make_pair(pair_7328947, find_or_add_symbol("make-constructor/args"), &cvar_7328946);
+- make_cvar(cvar_7328948, (object *)&__glo_make_91constructor_scheme_base);make_pair(pair_7328949, find_or_add_symbol("make-constructor"), &cvar_7328948);
+- make_cvar(cvar_7328950, (object *)&__glo_make_91type_91predicate_scheme_base);make_pair(pair_7328951, find_or_add_symbol("make-type-predicate"), &cvar_7328950);
+- make_cvar(cvar_7328952, (object *)&__glo_register_91simple_91type_scheme_base);make_pair(pair_7328953, find_or_add_symbol("register-simple-type"), &cvar_7328952);
+- make_cvar(cvar_7328954, (object *)&__glo_record_91marker_scheme_base);make_pair(pair_7328955, find_or_add_symbol("record-marker"), &cvar_7328954);
+- make_cvar(cvar_7328956, (object *)&__glo_guard_91aux_scheme_base);make_pair(pair_7328957, find_or_add_symbol("guard-aux"), &cvar_7328956);
+- make_cvar(cvar_7328958, (object *)&__glo_guard_scheme_base);make_pair(pair_7328959, find_or_add_symbol("guard"), &cvar_7328958);
+- make_cvar(cvar_7328960, (object *)&__glo_let_91values_scheme_base);make_pair(pair_7328961, find_or_add_symbol("let-values"), &cvar_7328960);
+- make_cvar(cvar_7328962, (object *)&__glo_let_85_91values_scheme_base);make_pair(pair_7328963, find_or_add_symbol("let*-values"), &cvar_7328962);
+- make_cvar(cvar_7328964, (object *)&__glo_letrec_85_scheme_base);make_pair(pair_7328965, find_or_add_symbol("letrec*"), &cvar_7328964);
+- make_cvar(cvar_7328966, (object *)&__glo_syntax_91rules_scheme_base);make_pair(pair_7328967, find_or_add_symbol("syntax-rules"), &cvar_7328966);
+- make_cvar(cvar_7328968, (object *)&__glo_cons_91source_scheme_base);make_pair(pair_7328969, find_or_add_symbol("cons-source"), &cvar_7328968);
+- make_cvar(cvar_7328970, (object *)&__glo_find_scheme_base);make_pair(pair_7328971, find_or_add_symbol("find"), &cvar_7328970);
+- make_cvar(cvar_7328972, (object *)&__glo_find_91tail_scheme_base);make_pair(pair_7328973, find_or_add_symbol("find-tail"), &cvar_7328972);
+- make_cvar(cvar_7328974, (object *)&__glo_identifier_127_scheme_base);make_pair(pair_7328975, find_or_add_symbol("identifier?"), &cvar_7328974);
+- make_cvar(cvar_7328976, (object *)&__glo_open_91output_91bytevector_scheme_base);make_pair(pair_7328977, find_or_add_symbol("open-output-bytevector"), &cvar_7328976);
+- make_cvar(cvar_7328978, (object *)&__glo_open_91input_91bytevector_scheme_base);make_pair(pair_7328979, find_or_add_symbol("open-input-bytevector"), &cvar_7328978);
+- make_cvar(cvar_7328980, (object *)&__glo_get_91output_91bytevector_scheme_base);make_pair(pair_7328981, find_or_add_symbol("get-output-bytevector"), &cvar_7328980);
+- make_cvar(cvar_7328982, (object *)&__glo_get_91output_91string_scheme_base);make_pair(pair_7328983, find_or_add_symbol("get-output-string"), &cvar_7328982);
+- make_cvar(cvar_7328984, (object *)&__glo_open_91output_91string_scheme_base);make_pair(pair_7328985, find_or_add_symbol("open-output-string"), &cvar_7328984);
+- make_cvar(cvar_7328986, (object *)&__glo_open_91input_91string_scheme_base);make_pair(pair_7328987, find_or_add_symbol("open-input-string"), &cvar_7328986);
+- make_cvar(cvar_7328988, (object *)&__glo_output_91port_91open_127_scheme_base);make_pair(pair_7328989, find_or_add_symbol("output-port-open?"), &cvar_7328988);
+- make_cvar(cvar_7328990, (object *)&__glo_input_91port_91open_127_scheme_base);make_pair(pair_7328991, find_or_add_symbol("input-port-open?"), &cvar_7328990);
+- make_cvar(cvar_7328992, (object *)&__glo_output_91port_127_scheme_base);make_pair(pair_7328993, find_or_add_symbol("output-port?"), &cvar_7328992);
+- make_cvar(cvar_7328994, (object *)&__glo_input_91port_127_scheme_base);make_pair(pair_7328995, find_or_add_symbol("input-port?"), &cvar_7328994);
+- make_cvar(cvar_7328996, (object *)&__glo_make_91record_91marker_scheme_base);make_pair(pair_7328997, find_or_add_symbol("make-record-marker"), &cvar_7328996);
+- make_cvar(cvar_7328998, (object *)&__glo_make_91record_91marker_191_191inline_191_191_scheme_base);make_pair(pair_7328999, find_or_add_symbol("make-record-marker__inline__"), &cvar_7328998);
+- make_cvar(cvar_7329000, (object *)&__glo__void_scheme_base);make_pair(pair_7329001, find_or_add_symbol("void"), &cvar_7329000);
+- make_cvar(cvar_7329002, (object *)&__glo_void_191_191inline_191_191_scheme_base);make_pair(pair_7329003, find_or_add_symbol("void__inline__"), &cvar_7329002);
+- make_cvar(cvar_7329004, (object *)&__glo_eof_91object_scheme_base);make_pair(pair_7329005, find_or_add_symbol("eof-object"), &cvar_7329004);
+- make_cvar(cvar_7329006, (object *)&__glo_eof_91object_191_191inline_191_191_scheme_base);make_pair(pair_7329007, find_or_add_symbol("eof-object__inline__"), &cvar_7329006);
+- make_cvar(cvar_7329008, (object *)&__glo_expt_scheme_base);make_pair(pair_7329009, find_or_add_symbol("expt"), &cvar_7329008);
+- make_cvar(cvar_7329010, (object *)&__glo_square_191_191inline_191_191_scheme_base);make_pair(pair_7329011, find_or_add_symbol("square__inline__"), &cvar_7329010);
+- make_cvar(cvar_7329012, (object *)&__glo_square_scheme_base);make_pair(pair_7329013, find_or_add_symbol("square"), &cvar_7329012);
+- make_cvar(cvar_7329014, (object *)&__glo_floor_95_scheme_base);make_pair(pair_7329015, find_or_add_symbol("floor/"), &cvar_7329014);
+- make_cvar(cvar_7329016, (object *)&__glo_floor_91remainder_scheme_base);make_pair(pair_7329017, find_or_add_symbol("floor-remainder"), &cvar_7329016);
+- make_cvar(cvar_7329018, (object *)&__glo_floor_91quotient_scheme_base);make_pair(pair_7329019, find_or_add_symbol("floor-quotient"), &cvar_7329018);
+- make_cvar(cvar_7329020, (object *)&__glo_truncate_95_scheme_base);make_pair(pair_7329021, find_or_add_symbol("truncate/"), &cvar_7329020);
+- make_cvar(cvar_7329022, (object *)&__glo_truncate_91remainder_scheme_base);make_pair(pair_7329023, find_or_add_symbol("truncate-remainder"), &cvar_7329022);
+- make_cvar(cvar_7329024, (object *)&__glo_truncate_91quotient_scheme_base);make_pair(pair_7329025, find_or_add_symbol("truncate-quotient"), &cvar_7329024);
+- make_cvar(cvar_7329026, (object *)&__glo_quotient_191_191inline_191_191_scheme_base);make_pair(pair_7329027, find_or_add_symbol("quotient__inline__"), &cvar_7329026);
+- make_cvar(cvar_7329028, (object *)&__glo_quotient_scheme_base);make_pair(pair_7329029, find_or_add_symbol("quotient"), &cvar_7329028);
+- make_cvar(cvar_7329030, (object *)&__glo_fixnum_127_scheme_base);make_pair(pair_7329031, find_or_add_symbol("fixnum?"), &cvar_7329030);
+- make_cvar(cvar_7329032, (object *)&__glo_fixnum_127_191_191inline_191_191_scheme_base);make_pair(pair_7329033, find_or_add_symbol("fixnum?__inline__"), &cvar_7329032);
+- make_cvar(cvar_7329034, (object *)&__glo_denominator_scheme_base);make_pair(pair_7329035, find_or_add_symbol("denominator"), &cvar_7329034);
+- make_cvar(cvar_7329036, (object *)&__glo_numerator_scheme_base);make_pair(pair_7329037, find_or_add_symbol("numerator"), &cvar_7329036);
+- make_cvar(cvar_7329038, (object *)&__glo_lcm_95entry_scheme_base);make_pair(pair_7329039, find_or_add_symbol("lcm/entry"), &cvar_7329038);
+- make_cvar(cvar_7329040, (object *)&__glo_lcm_95main_scheme_base);make_pair(pair_7329041, find_or_add_symbol("lcm/main"), &cvar_7329040);
+- make_cvar(cvar_7329042, (object *)&__glo_gcd_95entry_scheme_base);make_pair(pair_7329043, find_or_add_symbol("gcd/entry"), &cvar_7329042);
+- make_cvar(cvar_7329044, (object *)&__glo_gcd_95main_scheme_base);make_pair(pair_7329045, find_or_add_symbol("gcd/main"), &cvar_7329044);
+- make_cvar(cvar_7329046, (object *)&__glo_lcm_scheme_base);make_pair(pair_7329047, find_or_add_symbol("lcm"), &cvar_7329046);
+- make_cvar(cvar_7329048, (object *)&__glo_gcd_scheme_base);make_pair(pair_7329049, find_or_add_symbol("gcd"), &cvar_7329048);
+- make_cvar(cvar_7329050, (object *)&__glo_min_scheme_base);make_pair(pair_7329051, find_or_add_symbol("min"), &cvar_7329050);
+- make_cvar(cvar_7329052, (object *)&__glo_max_scheme_base);make_pair(pair_7329053, find_or_add_symbol("max"), &cvar_7329052);
+- make_cvar(cvar_7329054, (object *)&__glo_rationalize_scheme_base);make_pair(pair_7329055, find_or_add_symbol("rationalize"), &cvar_7329054);
+- make_cvar(cvar_7329056, (object *)&__glo_rational_127_scheme_base);make_pair(pair_7329057, find_or_add_symbol("rational?"), &cvar_7329056);
+- make_cvar(cvar_7329058, (object *)&__glo_complex_127_scheme_base);make_pair(pair_7329059, find_or_add_symbol("complex?"), &cvar_7329058);
+- make_cvar(cvar_7329060, (object *)&__glo_complex_127_191_191inline_191_191_scheme_base);make_pair(pair_7329061, find_or_add_symbol("complex?__inline__"), &cvar_7329060);
+- make_cvar(cvar_7329062, (object *)&__glo_inexact_127_scheme_base);make_pair(pair_7329063, find_or_add_symbol("inexact?"), &cvar_7329062);
+- make_cvar(cvar_7329064, (object *)&__glo_exact_127_scheme_base);make_pair(pair_7329065, find_or_add_symbol("exact?"), &cvar_7329064);
+- make_cvar(cvar_7329066, (object *)&__glo_exact_127_191_191inline_191_191_scheme_base);make_pair(pair_7329067, find_or_add_symbol("exact?__inline__"), &cvar_7329066);
+- make_cvar(cvar_7329068, (object *)&__glo_exact_91integer_127_scheme_base);make_pair(pair_7329069, find_or_add_symbol("exact-integer?"), &cvar_7329068);
+- make_cvar(cvar_7329070, (object *)&__glo_exact_91integer_127_191_191inline_191_191_scheme_base);make_pair(pair_7329071, find_or_add_symbol("exact-integer?__inline__"), &cvar_7329070);
+- make_cvar(cvar_7329072, (object *)&__glo_sqrt_scheme_base);make_pair(pair_7329073, find_or_add_symbol("sqrt"), &cvar_7329072);
+- make_cvar(cvar_7329074, (object *)&__glo_sqrt_191_191inline_191_191_scheme_base);make_pair(pair_7329075, find_or_add_symbol("sqrt__inline__"), &cvar_7329074);
+- make_cvar(cvar_7329076, (object *)&__glo_exact_91integer_91sqrt_scheme_base);make_pair(pair_7329077, find_or_add_symbol("exact-integer-sqrt"), &cvar_7329076);
+- make_cvar(cvar_7329078, (object *)&__glo_bignum_91sqrt_scheme_base);make_pair(pair_7329079, find_or_add_symbol("bignum-sqrt"), &cvar_7329078);
+- make_cvar(cvar_7329080, (object *)&__glo_bignum_127_scheme_base);make_pair(pair_7329081, find_or_add_symbol("bignum?"), &cvar_7329080);
+- make_cvar(cvar_7329082, (object *)&__glo_even_127_scheme_base);make_pair(pair_7329083, find_or_add_symbol("even?"), &cvar_7329082);
+- make_cvar(cvar_7329084, (object *)&__glo_odd_127_scheme_base);make_pair(pair_7329085, find_or_add_symbol("odd?"), &cvar_7329084);
+- make_cvar(cvar_7329086, (object *)&__glo_modulo_scheme_base);make_pair(pair_7329087, find_or_add_symbol("modulo"), &cvar_7329086);
+- make_cvar(cvar_7329088, (object *)&__glo_remainder_scheme_base);make_pair(pair_7329089, find_or_add_symbol("remainder"), &cvar_7329088);
+- make_cvar(cvar_7329090, (object *)&__glo_abs_scheme_base);make_pair(pair_7329091, find_or_add_symbol("abs"), &cvar_7329090);
+- make_cvar(cvar_7329092, (object *)&__glo_inexact_scheme_base);make_pair(pair_7329093, find_or_add_symbol("inexact"), &cvar_7329092);
+- make_cvar(cvar_7329094, (object *)&__glo_inexact_191_191inline_191_191_scheme_base);make_pair(pair_7329095, find_or_add_symbol("inexact__inline__"), &cvar_7329094);
+- make_cvar(cvar_7329096, (object *)&__glo_exact_scheme_base);make_pair(pair_7329097, find_or_add_symbol("exact"), &cvar_7329096);
+- make_cvar(cvar_7329098, (object *)&__glo_exact_191_191inline_191_191_scheme_base);make_pair(pair_7329099, find_or_add_symbol("exact__inline__"), &cvar_7329098);
+- make_cvar(cvar_7329100, (object *)&__glo_round_scheme_base);make_pair(pair_7329101, find_or_add_symbol("round"), &cvar_7329100);
+- make_cvar(cvar_7329102, (object *)&__glo_round_191_191inline_191_191_scheme_base);make_pair(pair_7329103, find_or_add_symbol("round__inline__"), &cvar_7329102);
+- make_cvar(cvar_7329104, (object *)&__glo_truncate_scheme_base);make_pair(pair_7329105, find_or_add_symbol("truncate"), &cvar_7329104);
+- make_cvar(cvar_7329106, (object *)&__glo_truncate_191_191inline_191_191_scheme_base);make_pair(pair_7329107, find_or_add_symbol("truncate__inline__"), &cvar_7329106);
+- make_cvar(cvar_7329108, (object *)&__glo_ceiling_scheme_base);make_pair(pair_7329109, find_or_add_symbol("ceiling"), &cvar_7329108);
+- make_cvar(cvar_7329110, (object *)&__glo_ceiling_191_191inline_191_191_scheme_base);make_pair(pair_7329111, find_or_add_symbol("ceiling__inline__"), &cvar_7329110);
+- make_cvar(cvar_7329112, (object *)&__glo_floor_scheme_base);make_pair(pair_7329113, find_or_add_symbol("floor"), &cvar_7329112);
+- make_cvar(cvar_7329114, (object *)&__glo_floor_191_191inline_191_191_scheme_base);make_pair(pair_7329115, find_or_add_symbol("floor__inline__"), &cvar_7329114);
+- make_cvar(cvar_7329116, (object *)&__glo_every_scheme_base);make_pair(pair_7329117, find_or_add_symbol("every"), &cvar_7329116);
+- make_cvar(cvar_7329118, (object *)&__glo_any_scheme_base);make_pair(pair_7329119, find_or_add_symbol("any"), &cvar_7329118);
+- make_cvar(cvar_7329120, (object *)&__glo_error_95loc_scheme_base);make_pair(pair_7329121, find_or_add_symbol("error/loc"), &cvar_7329120);
+- make_cvar(cvar_7329122, (object *)&__glo_Cyc_91remove_91exception_91handler_scheme_base);make_pair(pair_7329123, find_or_add_symbol("Cyc-remove-exception-handler"), &cvar_7329122);
+- make_cvar(cvar_7329124, (object *)&__glo_Cyc_91add_91exception_91handler_scheme_base);make_pair(pair_7329125, find_or_add_symbol("Cyc-add-exception-handler"), &cvar_7329124);
+- make_cvar(cvar_7329126, (object *)&__glo_with_91exception_91handler_scheme_base);make_pair(pair_7329127, find_or_add_symbol("with-exception-handler"), &cvar_7329126);
+- make_cvar(cvar_7329128, (object *)&__glo_with_91handler_scheme_base);make_pair(pair_7329129, find_or_add_symbol("with-handler"), &cvar_7329128);
+- make_cvar(cvar_7329130, (object *)&__glo_raise_91continuable_scheme_base);make_pair(pair_7329131, find_or_add_symbol("raise-continuable"), &cvar_7329130);
+- make_cvar(cvar_7329132, (object *)&__glo_raise_scheme_base);make_pair(pair_7329133, find_or_add_symbol("raise"), &cvar_7329132);
+- make_cvar(cvar_7329134, (object *)&__glo_error_scheme_base);make_pair(pair_7329135, find_or_add_symbol("error"), &cvar_7329134);
+- make_cvar(cvar_7329136, (object *)&__glo_error_91object_91irritants_scheme_base);make_pair(pair_7329137, find_or_add_symbol("error-object-irritants"), &cvar_7329136);
+- make_cvar(cvar_7329138, (object *)&__glo_error_91object_91message_scheme_base);make_pair(pair_7329139, find_or_add_symbol("error-object-message"), &cvar_7329138);
+- make_cvar(cvar_7329140, (object *)&__glo_error_91object_127_scheme_base);make_pair(pair_7329141, find_or_add_symbol("error-object?"), &cvar_7329140);
+- make_cvar(cvar_7329142, (object *)&__glo_current_91error_91port_scheme_base);make_pair(pair_7329143, find_or_add_symbol("current-error-port"), &cvar_7329142);
+- make_cvar(cvar_7329144, (object *)&__glo_current_91input_91port_scheme_base);make_pair(pair_7329145, find_or_add_symbol("current-input-port"), &cvar_7329144);
+- make_cvar(cvar_7329146, (object *)&__glo_current_91output_91port_scheme_base);make_pair(pair_7329147, find_or_add_symbol("current-output-port"), &cvar_7329146);
+- make_cvar(cvar_7329148, (object *)&__glo_make_91parameter_scheme_base);make_pair(pair_7329149, find_or_add_symbol("make-parameter"), &cvar_7329148);
+- make_cvar(cvar_7329150, (object *)&__glo__85parameter_91id_85_scheme_base);make_pair(pair_7329151, find_or_add_symbol("*parameter-id*"), &cvar_7329150);
+- make_cvar(cvar_7329152, (object *)&__glo_set_91param_91obj_67_scheme_base);make_pair(pair_7329153, find_or_add_symbol("set-param-obj!"), &cvar_7329152);
+- make_cvar(cvar_7329154, (object *)&__glo_get_91param_91objs_scheme_base);make_pair(pair_7329155, find_or_add_symbol("get-param-objs"), &cvar_7329154);
+- make_cvar(cvar_7329156, (object *)&__glo_parameterize_scheme_base);make_pair(pair_7329157, find_or_add_symbol("parameterize"), &cvar_7329156);
+- make_cvar(cvar_7329158, (object *)&__glo_Cyc_91make_91string_scheme_base);make_pair(pair_7329159, find_or_add_symbol("Cyc-make-string"), &cvar_7329158);
+- make_cvar(cvar_7329160, (object *)&__glo_make_91string_scheme_base);make_pair(pair_7329161, find_or_add_symbol("make-string"), &cvar_7329160);
+- make_cvar(cvar_7329162, (object *)&__glo_string_scheme_base);make_pair(pair_7329163, find_or_add_symbol("string"), &cvar_7329162);
+- make_cvar(cvar_7329164, (object *)&__glo_Cyc_91obj_123_127_scheme_base);make_pair(pair_7329165, find_or_add_symbol("Cyc-obj=?"), &cvar_7329164);
+- make_cvar(cvar_7329166, (object *)&__glo_symbol_123_127_scheme_base);make_pair(pair_7329167, find_or_add_symbol("symbol=?"), &cvar_7329166);
+- make_cvar(cvar_7329168, (object *)&__glo_boolean_123_127_scheme_base);make_pair(pair_7329169, find_or_add_symbol("boolean=?"), &cvar_7329168);
+- make_cvar(cvar_7329170, (object *)&__glo_vector_91fill_67_scheme_base);make_pair(pair_7329171, find_or_add_symbol("vector-fill!"), &cvar_7329170);
+- make_cvar(cvar_7329172, (object *)&__glo_vector_91copy_67_scheme_base);make_pair(pair_7329173, find_or_add_symbol("vector-copy!"), &cvar_7329172);
+- make_cvar(cvar_7329174, (object *)&__glo_vector_91copy_scheme_base);make_pair(pair_7329175, find_or_add_symbol("vector-copy"), &cvar_7329174);
+- make_cvar(cvar_7329176, (object *)&__glo_vector_91append_scheme_base);make_pair(pair_7329177, find_or_add_symbol("vector-append"), &cvar_7329176);
+- make_cvar(cvar_7329178, (object *)&__glo_vector_91for_91each_scheme_base);make_pair(pair_7329179, find_or_add_symbol("vector-for-each"), &cvar_7329178);
+- make_cvar(cvar_7329180, (object *)&__glo_vector_91map_scheme_base);make_pair(pair_7329181, find_or_add_symbol("vector-map"), &cvar_7329180);
+- make_cvar(cvar_7329182, (object *)&__glo_string_91for_91each_scheme_base);make_pair(pair_7329183, find_or_add_symbol("string-for-each"), &cvar_7329182);
+- make_cvar(cvar_7329184, (object *)&__glo_string_91map_scheme_base);make_pair(pair_7329185, find_or_add_symbol("string-map"), &cvar_7329184);
+- make_cvar(cvar_7329186, (object *)&__glo_string_91fill_67_scheme_base);make_pair(pair_7329187, find_or_add_symbol("string-fill!"), &cvar_7329186);
+- make_cvar(cvar_7329188, (object *)&__glo_string_91copy_67_scheme_base);make_pair(pair_7329189, find_or_add_symbol("string-copy!"), &cvar_7329188);
+- make_cvar(cvar_7329190, (object *)&__glo_string_91copy_scheme_base);make_pair(pair_7329191, find_or_add_symbol("string-copy"), &cvar_7329190);
+- make_cvar(cvar_7329192, (object *)&__glo_string_91_125vector_scheme_base);make_pair(pair_7329193, find_or_add_symbol("string->vector"), &cvar_7329192);
+- make_cvar(cvar_7329194, (object *)&__glo_string_91_125list_scheme_base);make_pair(pair_7329195, find_or_add_symbol("string->list"), &cvar_7329194);
+- make_cvar(cvar_7329196, (object *)&__glo_vector_91_125string_scheme_base);make_pair(pair_7329197, find_or_add_symbol("vector->string"), &cvar_7329196);
+- make_cvar(cvar_7329198, (object *)&__glo_string_91_125utf8_scheme_base);make_pair(pair_7329199, find_or_add_symbol("string->utf8"), &cvar_7329198);
+- make_cvar(cvar_7329200, (object *)&__glo_utf8_91_125string_scheme_base);make_pair(pair_7329201, find_or_add_symbol("utf8->string"), &cvar_7329200);
+- make_cvar(cvar_7329202, (object *)&__glo_bytevector_91copy_67_scheme_base);make_pair(pair_7329203, find_or_add_symbol("bytevector-copy!"), &cvar_7329202);
+- make_cvar(cvar_7329204, (object *)&__glo_bytevector_91copy_scheme_base);make_pair(pair_7329205, find_or_add_symbol("bytevector-copy"), &cvar_7329204);
+- make_cvar(cvar_7329206, (object *)&__glo_vector_91_125list_scheme_base);make_pair(pair_7329207, find_or_add_symbol("vector->list"), &cvar_7329206);
+- make_cvar(cvar_7329208, (object *)&__glo_vector_scheme_base);make_pair(pair_7329209, find_or_add_symbol("vector"), &cvar_7329208);
+- make_cvar(cvar_7329210, (object *)&__glo_reverse_scheme_base);make_pair(pair_7329211, find_or_add_symbol("reverse"), &cvar_7329210);
+- make_cvar(cvar_7329212, (object *)&__glo_list_91set_67_scheme_base);make_pair(pair_7329213, find_or_add_symbol("list-set!"), &cvar_7329212);
+- make_cvar(cvar_7329214, (object *)&__glo_list_91ref_scheme_base);make_pair(pair_7329215, find_or_add_symbol("list-ref"), &cvar_7329214);
+- make_cvar(cvar_7329216, (object *)&__glo_list_91tail_scheme_base);make_pair(pair_7329217, find_or_add_symbol("list-tail"), &cvar_7329216);
+- make_cvar(cvar_7329218, (object *)&__glo_for_91each_scheme_base);make_pair(pair_7329219, find_or_add_symbol("for-each"), &cvar_7329218);
+- make_cvar(cvar_7329220, (object *)&__glo_Cyc_91for_91each_91loop_912_scheme_base);make_pair(pair_7329221, find_or_add_symbol("Cyc-for-each-loop-2"), &cvar_7329220);
+- make_cvar(cvar_7329222, (object *)&__glo_Cyc_91for_91each_91loop_911_scheme_base);make_pair(pair_7329223, find_or_add_symbol("Cyc-for-each-loop-1"), &cvar_7329222);
+- make_cvar(cvar_7329224, (object *)&__glo_Cyc_91map_91loop_912_scheme_base);make_pair(pair_7329225, find_or_add_symbol("Cyc-map-loop-2"), &cvar_7329224);
+- make_cvar(cvar_7329226, (object *)&__glo_Cyc_91map_91loop_911_scheme_base);make_pair(pair_7329227, find_or_add_symbol("Cyc-map-loop-1"), &cvar_7329226);
+- make_cvar(cvar_7329228, (object *)&__glo_map_scheme_base);make_pair(pair_7329229, find_or_add_symbol("map"), &cvar_7329228);
+- make_cvar(cvar_7329230, (object *)&__glo__75cars_87cdrs_scheme_base);make_pair(pair_7329231, find_or_add_symbol("%cars+cdrs"), &cvar_7329230);
+- make_cvar(cvar_7329232, (object *)&__glo_car_87cdr_scheme_base);make_pair(pair_7329233, find_or_add_symbol("car+cdr"), &cvar_7329232);
+- make_cvar(cvar_7329234, (object *)&__glo_receive_scheme_base);make_pair(pair_7329235, find_or_add_symbol("receive"), &cvar_7329234);
+- make_cvar(cvar_7329236, (object *)&__glo_list_91copy_scheme_base);make_pair(pair_7329237, find_or_add_symbol("list-copy"), &cvar_7329236);
+- make_cvar(cvar_7329238, (object *)&__glo_make_91list_scheme_base);make_pair(pair_7329239, find_or_add_symbol("make-list"), &cvar_7329238);
+- make_cvar(cvar_7329240, (object *)&__glo__list_scheme_base);make_pair(pair_7329241, find_or_add_symbol("list"), &cvar_7329240);
+- make_cvar(cvar_7329242, (object *)&__glo_append_scheme_base);make_pair(pair_7329243, find_or_add_symbol("append"), &cvar_7329242);
+- make_cvar(cvar_7329244, (object *)&__glo_negative_127_191_191inline_191_191_scheme_base);make_pair(pair_7329245, find_or_add_symbol("negative?__inline__"), &cvar_7329244);
+- make_cvar(cvar_7329246, (object *)&__glo_negative_127_scheme_base);make_pair(pair_7329247, find_or_add_symbol("negative?"), &cvar_7329246);
+- make_cvar(cvar_7329248, (object *)&__glo_positive_127_191_191inline_191_191_scheme_base);make_pair(pair_7329249, find_or_add_symbol("positive?__inline__"), &cvar_7329248);
+- make_cvar(cvar_7329250, (object *)&__glo_positive_127_scheme_base);make_pair(pair_7329251, find_or_add_symbol("positive?"), &cvar_7329250);
+- make_cvar(cvar_7329252, (object *)&__glo_zero_127_191_191inline_191_191_scheme_base);make_pair(pair_7329253, find_or_add_symbol("zero?__inline__"), &cvar_7329252);
+- make_cvar(cvar_7329254, (object *)&__glo_zero_127_scheme_base);make_pair(pair_7329255, find_or_add_symbol("zero?"), &cvar_7329254);
+- make_cvar(cvar_7329256, (object *)&__glo_list_127_scheme_base);make_pair(pair_7329257, find_or_add_symbol("list?"), &cvar_7329256);
+- make_cvar(cvar_7329258, (object *)&__glo_list_127_191_191inline_191_191_scheme_base);make_pair(pair_7329259, find_or_add_symbol("list?__inline__"), &cvar_7329258);
+- make_cvar(cvar_7329260, (object *)&__glo_not_191_191inline_191_191_scheme_base);make_pair(pair_7329261, find_or_add_symbol("not__inline__"), &cvar_7329260);
+- make_cvar(cvar_7329262, (object *)&__glo_not_scheme_base);make_pair(pair_7329263, find_or_add_symbol("not"), &cvar_7329262);
+- make_cvar(cvar_7329264, (object *)&__glo_newline_scheme_base);make_pair(pair_7329265, find_or_add_symbol("newline"), &cvar_7329264);
+- make_cvar(cvar_7329266, (object *)&__glo_write_91char_scheme_base);make_pair(pair_7329267, find_or_add_symbol("write-char"), &cvar_7329266);
+- make_cvar(cvar_7329268, (object *)&__glo__75write_91bytevector_scheme_base);make_pair(pair_7329269, find_or_add_symbol("%write-bytevector"), &cvar_7329268);
+- make_cvar(cvar_7329270, (object *)&__glo__75write_91bytevector_191_191inline_191_191_scheme_base);make_pair(pair_7329271, find_or_add_symbol("%write-bytevector__inline__"), &cvar_7329270);
+- make_cvar(cvar_7329272, (object *)&__glo_write_91bytevector_scheme_base);make_pair(pair_7329273, find_or_add_symbol("write-bytevector"), &cvar_7329272);
+- make_cvar(cvar_7329274, (object *)&__glo_read_91bytevector_67_scheme_base);make_pair(pair_7329275, find_or_add_symbol("read-bytevector!"), &cvar_7329274);
+- make_cvar(cvar_7329276, (object *)&__glo_read_91bytevector_scheme_base);make_pair(pair_7329277, find_or_add_symbol("read-bytevector"), &cvar_7329276);
+- make_cvar(cvar_7329278, (object *)&__glo_write_91string_scheme_base);make_pair(pair_7329279, find_or_add_symbol("write-string"), &cvar_7329278);
+- make_cvar(cvar_7329280, (object *)&__glo_write_91string_912_scheme_base);make_pair(pair_7329281, find_or_add_symbol("write-string-2"), &cvar_7329280);
+- make_cvar(cvar_7329282, (object *)&__glo_write_91string_911_scheme_base);make_pair(pair_7329283, find_or_add_symbol("write-string-1"), &cvar_7329282);
+- make_cvar(cvar_7329284, (object *)&__glo_flush_91output_91port_scheme_base);make_pair(pair_7329285, find_or_add_symbol("flush-output-port"), &cvar_7329284);
+- make_cvar(cvar_7329286, (object *)&__glo_textual_91port_127_scheme_base);make_pair(pair_7329287, find_or_add_symbol("textual-port?"), &cvar_7329286);
+- make_cvar(cvar_7329288, (object *)&__glo_binary_91port_127_scheme_base);make_pair(pair_7329289, find_or_add_symbol("binary-port?"), &cvar_7329288);
+- make_cvar(cvar_7329290, (object *)&__glo__191binary_91port_127_scheme_base);make_pair(pair_7329291, find_or_add_symbol("_binary-port?"), &cvar_7329290);
+- make_cvar(cvar_7329292, (object *)&__glo_read_91string_scheme_base);make_pair(pair_7329293, find_or_add_symbol("read-string"), &cvar_7329292);
+- make_cvar(cvar_7329294, (object *)&__glo__191read_91line_scheme_base);make_pair(pair_7329295, find_or_add_symbol("_read-line"), &cvar_7329294);
+- make_cvar(cvar_7329296, (object *)&__glo_read_91line_scheme_base);make_pair(pair_7329297, find_or_add_symbol("read-line"), &cvar_7329296);
+- make_cvar(cvar_7329298, (object *)&__glo_read_91char_scheme_base);make_pair(pair_7329299, find_or_add_symbol("read-char"), &cvar_7329298);
+- make_cvar(cvar_7329300, (object *)&__glo_peek_91char_scheme_base);make_pair(pair_7329301, find_or_add_symbol("peek-char"), &cvar_7329300);
+- make_cvar(cvar_7329302, (object *)&__glo_char_91ready_127_scheme_base);make_pair(pair_7329303, find_or_add_symbol("char-ready?"), &cvar_7329302);
+- make_cvar(cvar_7329304, (object *)&__glo_Cyc_91char_91ready_127_scheme_base);make_pair(pair_7329305, find_or_add_symbol("Cyc-char-ready?"), &cvar_7329304);
+- make_cvar(cvar_7329306, (object *)&__glo_write_91u8_scheme_base);make_pair(pair_7329307, find_or_add_symbol("write-u8"), &cvar_7329306);
+- make_cvar(cvar_7329308, (object *)&__glo_peek_91u8_scheme_base);make_pair(pair_7329309, find_or_add_symbol("peek-u8"), &cvar_7329308);
+- make_cvar(cvar_7329310, (object *)&__glo_read_91u8_scheme_base);make_pair(pair_7329311, find_or_add_symbol("read-u8"), &cvar_7329310);
+- make_cvar(cvar_7329312, (object *)&__glo__191write_91u8_scheme_base);make_pair(pair_7329313, find_or_add_symbol("_write-u8"), &cvar_7329312);
+- make_cvar(cvar_7329314, (object *)&__glo__191peek_91u8_scheme_base);make_pair(pair_7329315, find_or_add_symbol("_peek-u8"), &cvar_7329314);
+- make_cvar(cvar_7329316, (object *)&__glo__191read_91u8_scheme_base);make_pair(pair_7329317, find_or_add_symbol("_read-u8"), &cvar_7329316);
+- make_cvar(cvar_7329318, (object *)&__glo_foldr_scheme_base);make_pair(pair_7329319, find_or_add_symbol("foldr"), &cvar_7329318);
+- make_cvar(cvar_7329320, (object *)&__glo_foldl_scheme_base);make_pair(pair_7329321, find_or_add_symbol("foldl"), &cvar_7329320);
+- make_cvar(cvar_7329322, (object *)&__glo_assoc_scheme_base);make_pair(pair_7329323, find_or_add_symbol("assoc"), &cvar_7329322);
+- make_cvar(cvar_7329324, (object *)&__glo_assoc_91helper_scheme_base);make_pair(pair_7329325, find_or_add_symbol("assoc-helper"), &cvar_7329324);
+- make_cvar(cvar_7329326, (object *)&__glo_member_scheme_base);make_pair(pair_7329327, find_or_add_symbol("member"), &cvar_7329326);
+- make_cvar(cvar_7329328, (object *)&__glo_member_91helper_scheme_base);make_pair(pair_7329329, find_or_add_symbol("member-helper"), &cvar_7329328);
+- make_cvar(cvar_7329330, (object *)&__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7329331, find_or_add_symbol("fast-string>=?__inline__"), &cvar_7329330);
+- make_cvar(cvar_7329332, (object *)&__glo_fast_91string_125_123_127_scheme_base);make_pair(pair_7329333, find_or_add_symbol("fast-string>=?"), &cvar_7329332);
+- make_cvar(cvar_7329334, (object *)&__glo_fast_91string_125_127_191_191inline_191_191_scheme_base);make_pair(pair_7329335, find_or_add_symbol("fast-string>?__inline__"), &cvar_7329334);
+- make_cvar(cvar_7329336, (object *)&__glo_fast_91string_125_127_scheme_base);make_pair(pair_7329337, find_or_add_symbol("fast-string>?"), &cvar_7329336);
+- make_cvar(cvar_7329338, (object *)&__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7329339, find_or_add_symbol("fast-string<=?__inline__"), &cvar_7329338);
+- make_cvar(cvar_7329340, (object *)&__glo_fast_91string_121_123_127_scheme_base);make_pair(pair_7329341, find_or_add_symbol("fast-string<=?"), &cvar_7329340);
+- make_cvar(cvar_7329342, (object *)&__glo_fast_91string_121_127_191_191inline_191_191_scheme_base);make_pair(pair_7329343, find_or_add_symbol("fast-string<?__inline__"), &cvar_7329342);
+- make_cvar(cvar_7329344, (object *)&__glo_fast_91string_121_127_scheme_base);make_pair(pair_7329345, find_or_add_symbol("fast-string<?"), &cvar_7329344);
+- make_cvar(cvar_7329346, (object *)&__glo_fast_91string_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7329347, find_or_add_symbol("fast-string=?__inline__"), &cvar_7329346);
+- make_cvar(cvar_7329348, (object *)&__glo_fast_91string_123_127_scheme_base);make_pair(pair_7329349, find_or_add_symbol("fast-string=?"), &cvar_7329348);
+- make_cvar(cvar_7329350, (object *)&__glo_string_125_123_127_scheme_base);make_pair(pair_7329351, find_or_add_symbol("string>=?"), &cvar_7329350);
+- make_cvar(cvar_7329352, (object *)&__glo_string_125_127_scheme_base);make_pair(pair_7329353, find_or_add_symbol("string>?"), &cvar_7329352);
+- make_cvar(cvar_7329354, (object *)&__glo_string_121_123_127_scheme_base);make_pair(pair_7329355, find_or_add_symbol("string<=?"), &cvar_7329354);
+- make_cvar(cvar_7329356, (object *)&__glo_string_121_127_scheme_base);make_pair(pair_7329357, find_or_add_symbol("string<?"), &cvar_7329356);
+- make_cvar(cvar_7329358, (object *)&__glo_string_123_127_scheme_base);make_pair(pair_7329359, find_or_add_symbol("string=?"), &cvar_7329358);
+- make_cvar(cvar_7329360, (object *)&__glo_char_125_123_127_scheme_base);make_pair(pair_7329361, find_or_add_symbol("char>=?"), &cvar_7329360);
+- make_cvar(cvar_7329362, (object *)&__glo_char_121_123_127_scheme_base);make_pair(pair_7329363, find_or_add_symbol("char<=?"), &cvar_7329362);
+- make_cvar(cvar_7329364, (object *)&__glo_char_125_127_scheme_base);make_pair(pair_7329365, find_or_add_symbol("char>?"), &cvar_7329364);
+- make_cvar(cvar_7329366, (object *)&__glo_char_121_127_scheme_base);make_pair(pair_7329367, find_or_add_symbol("char<?"), &cvar_7329366);
+- make_cvar(cvar_7329368, (object *)&__glo_char_123_127_scheme_base);make_pair(pair_7329369, find_or_add_symbol("char=?"), &cvar_7329368);
+- make_cvar(cvar_7329370, (object *)&__glo_Cyc_91bin_91op_91char_scheme_base);make_pair(pair_7329371, find_or_add_symbol("Cyc-bin-op-char"), &cvar_7329370);
+- make_cvar(cvar_7329372, (object *)&__glo_Cyc_91bin_91op_scheme_base);make_pair(pair_7329373, find_or_add_symbol("Cyc-bin-op"), &cvar_7329372);
+- make_cvar(cvar_7329374, (object *)&__glo_call_91with_91port_scheme_base);make_pair(pair_7329375, find_or_add_symbol("call-with-port"), &cvar_7329374);
+- make_cvar(cvar_7329376, (object *)&__glo_dynamic_91wind_scheme_base);make_pair(pair_7329377, find_or_add_symbol("dynamic-wind"), &cvar_7329376);
+- make_cvar(cvar_7329378, (object *)&__glo_call_91with_91values_scheme_base);make_pair(pair_7329379, find_or_add_symbol("call-with-values"), &cvar_7329378);
+- make_cvar(cvar_7329380, (object *)&__glo_values_scheme_base);make_pair(pair_7329381, find_or_add_symbol("values"), &cvar_7329380);
+- make_cvar(cvar_7329382, (object *)&__glo_call_91with_91current_91continuation_scheme_base);make_pair(pair_7329383, find_or_add_symbol("call-with-current-continuation"), &cvar_7329382);
+- make_cvar(cvar_7329384, (object *)&__glo_syntax_91error_scheme_base);make_pair(pair_7329385, find_or_add_symbol("syntax-error"), &cvar_7329384);
+- make_cvar(cvar_7329386, (object *)&__glo_quasiquote_scheme_base);make_pair(pair_7329387, find_or_add_symbol("quasiquote"), &cvar_7329386);
+- make_cvar(cvar_7329388, (object *)&__glo__do_scheme_base);make_pair(pair_7329389, find_or_add_symbol("do"), &cvar_7329388);
+- make_cvar(cvar_7329390, (object *)&__glo_unless_scheme_base);make_pair(pair_7329391, find_or_add_symbol("unless"), &cvar_7329390);
+- make_cvar(cvar_7329392, (object *)&__glo_when_scheme_base);make_pair(pair_7329393, find_or_add_symbol("when"), &cvar_7329392);
+- make_cvar(cvar_7329394, (object *)&__glo__case_scheme_base);make_pair(pair_7329395, find_or_add_symbol("case"), &cvar_7329394);
+- make_cvar(cvar_7329396, (object *)&__glo_cond_scheme_base);make_pair(pair_7329397, find_or_add_symbol("cond"), &cvar_7329396);
+- make_cvar(cvar_7329398, (object *)&__glo_cond_91expand_scheme_base);make_pair(pair_7329399, find_or_add_symbol("cond-expand"), &cvar_7329398);
+- make_cvar(cvar_7329400, (object *)&__glo_begin_scheme_base);make_pair(pair_7329401, find_or_add_symbol("begin"), &cvar_7329400);
+- make_cvar(cvar_7329402, (object *)&__glo_letrec_scheme_base);make_pair(pair_7329403, find_or_add_symbol("letrec"), &cvar_7329402);
+- make_cvar(cvar_7329404, (object *)&__glo_let_85_scheme_base);make_pair(pair_7329405, find_or_add_symbol("let*"), &cvar_7329404);
+- make_cvar(cvar_7329406, (object *)&__glo_let_scheme_base);make_pair(pair_7329407, find_or_add_symbol("let"), &cvar_7329406);
+- make_cvar(cvar_7329408, (object *)&__glo_or_scheme_base);make_pair(pair_7329409, find_or_add_symbol("or"), &cvar_7329408);
+- make_cvar(cvar_7329410, (object *)&__glo_and_scheme_base);make_pair(pair_7329411, find_or_add_symbol("and"), &cvar_7329410);
+- make_cvar(cvar_7329412, (object *)&__glo_Cyc_91version_scheme_base);make_pair(pair_7329413, find_or_add_symbol("Cyc-version"), &cvar_7329412);
+- make_cvar(cvar_7329414, (object *)&__glo_Cyc_91add_91feature_67_scheme_base);make_pair(pair_7329415, find_or_add_symbol("Cyc-add-feature!"), &cvar_7329414);
+- make_cvar(cvar_7329416, (object *)&__glo__85other_91features_85_scheme_base);make_pair(pair_7329417, find_or_add_symbol("*other-features*"), &cvar_7329416);
+- make_cvar(cvar_7329418, (object *)&__glo_features_scheme_base);make_pair(pair_7329419, find_or_add_symbol("features"), &cvar_7329418);
+- make_cvar(cvar_7329420, (object *)&__glo_call_95cc_scheme_base);make_pair(pair_7329421, find_or_add_symbol("call/cc"), &cvar_7329420);
+-make_pair(c_7329671, &pair_7328922,Cyc_global_variables);
+-make_pair(c_7329670, &pair_7328925, &c_7329671);
+-make_pair(c_7329669, &pair_7328927, &c_7329670);
+-make_pair(c_7329668, &pair_7328929, &c_7329669);
+-make_pair(c_7329667, &pair_7328931, &c_7329668);
+-make_pair(c_7329666, &pair_7328933, &c_7329667);
+-make_pair(c_7329665, &pair_7328935, &c_7329666);
+-make_pair(c_7329664, &pair_7328937, &c_7329665);
+-make_pair(c_7329663, &pair_7328939, &c_7329664);
+-make_pair(c_7329662, &pair_7328941, &c_7329663);
+-make_pair(c_7329661, &pair_7328943, &c_7329662);
+-make_pair(c_7329660, &pair_7328945, &c_7329661);
+-make_pair(c_7329659, &pair_7328947, &c_7329660);
+-make_pair(c_7329658, &pair_7328949, &c_7329659);
+-make_pair(c_7329657, &pair_7328951, &c_7329658);
+-make_pair(c_7329656, &pair_7328953, &c_7329657);
+-make_pair(c_7329655, &pair_7328955, &c_7329656);
+-make_pair(c_7329654, &pair_7328957, &c_7329655);
+-make_pair(c_7329653, &pair_7328959, &c_7329654);
+-make_pair(c_7329652, &pair_7328961, &c_7329653);
+-make_pair(c_7329651, &pair_7328963, &c_7329652);
+-make_pair(c_7329650, &pair_7328965, &c_7329651);
+-make_pair(c_7329649, &pair_7328967, &c_7329650);
+-make_pair(c_7329648, &pair_7328969, &c_7329649);
+-make_pair(c_7329647, &pair_7328971, &c_7329648);
+-make_pair(c_7329646, &pair_7328973, &c_7329647);
+-make_pair(c_7329645, &pair_7328975, &c_7329646);
+-make_pair(c_7329644, &pair_7328977, &c_7329645);
+-make_pair(c_7329643, &pair_7328979, &c_7329644);
+-make_pair(c_7329642, &pair_7328981, &c_7329643);
+-make_pair(c_7329641, &pair_7328983, &c_7329642);
+-make_pair(c_7329640, &pair_7328985, &c_7329641);
+-make_pair(c_7329639, &pair_7328987, &c_7329640);
+-make_pair(c_7329638, &pair_7328989, &c_7329639);
+-make_pair(c_7329637, &pair_7328991, &c_7329638);
+-make_pair(c_7329636, &pair_7328993, &c_7329637);
+-make_pair(c_7329635, &pair_7328995, &c_7329636);
+-make_pair(c_7329634, &pair_7328997, &c_7329635);
+-make_pair(c_7329633, &pair_7328999, &c_7329634);
+-make_pair(c_7329632, &pair_7329001, &c_7329633);
+-make_pair(c_7329631, &pair_7329003, &c_7329632);
+-make_pair(c_7329630, &pair_7329005, &c_7329631);
+-make_pair(c_7329629, &pair_7329007, &c_7329630);
+-make_pair(c_7329628, &pair_7329009, &c_7329629);
+-make_pair(c_7329627, &pair_7329011, &c_7329628);
+-make_pair(c_7329626, &pair_7329013, &c_7329627);
+-make_pair(c_7329625, &pair_7329015, &c_7329626);
+-make_pair(c_7329624, &pair_7329017, &c_7329625);
+-make_pair(c_7329623, &pair_7329019, &c_7329624);
+-make_pair(c_7329622, &pair_7329021, &c_7329623);
+-make_pair(c_7329621, &pair_7329023, &c_7329622);
+-make_pair(c_7329620, &pair_7329025, &c_7329621);
+-make_pair(c_7329619, &pair_7329027, &c_7329620);
+-make_pair(c_7329618, &pair_7329029, &c_7329619);
+-make_pair(c_7329617, &pair_7329031, &c_7329618);
+-make_pair(c_7329616, &pair_7329033, &c_7329617);
+-make_pair(c_7329615, &pair_7329035, &c_7329616);
+-make_pair(c_7329614, &pair_7329037, &c_7329615);
+-make_pair(c_7329613, &pair_7329039, &c_7329614);
+-make_pair(c_7329612, &pair_7329041, &c_7329613);
+-make_pair(c_7329611, &pair_7329043, &c_7329612);
+-make_pair(c_7329610, &pair_7329045, &c_7329611);
+-make_pair(c_7329609, &pair_7329047, &c_7329610);
+-make_pair(c_7329608, &pair_7329049, &c_7329609);
+-make_pair(c_7329607, &pair_7329051, &c_7329608);
+-make_pair(c_7329606, &pair_7329053, &c_7329607);
+-make_pair(c_7329605, &pair_7329055, &c_7329606);
+-make_pair(c_7329604, &pair_7329057, &c_7329605);
+-make_pair(c_7329603, &pair_7329059, &c_7329604);
+-make_pair(c_7329602, &pair_7329061, &c_7329603);
+-make_pair(c_7329601, &pair_7329063, &c_7329602);
+-make_pair(c_7329600, &pair_7329065, &c_7329601);
+-make_pair(c_7329599, &pair_7329067, &c_7329600);
+-make_pair(c_7329598, &pair_7329069, &c_7329599);
+-make_pair(c_7329597, &pair_7329071, &c_7329598);
+-make_pair(c_7329596, &pair_7329073, &c_7329597);
+-make_pair(c_7329595, &pair_7329075, &c_7329596);
+-make_pair(c_7329594, &pair_7329077, &c_7329595);
+-make_pair(c_7329593, &pair_7329079, &c_7329594);
+-make_pair(c_7329592, &pair_7329081, &c_7329593);
+-make_pair(c_7329591, &pair_7329083, &c_7329592);
+-make_pair(c_7329590, &pair_7329085, &c_7329591);
+-make_pair(c_7329589, &pair_7329087, &c_7329590);
+-make_pair(c_7329588, &pair_7329089, &c_7329589);
+-make_pair(c_7329587, &pair_7329091, &c_7329588);
+-make_pair(c_7329586, &pair_7329093, &c_7329587);
+-make_pair(c_7329585, &pair_7329095, &c_7329586);
+-make_pair(c_7329584, &pair_7329097, &c_7329585);
+-make_pair(c_7329583, &pair_7329099, &c_7329584);
+-make_pair(c_7329582, &pair_7329101, &c_7329583);
+-make_pair(c_7329581, &pair_7329103, &c_7329582);
+-make_pair(c_7329580, &pair_7329105, &c_7329581);
+-make_pair(c_7329579, &pair_7329107, &c_7329580);
+-make_pair(c_7329578, &pair_7329109, &c_7329579);
+-make_pair(c_7329577, &pair_7329111, &c_7329578);
+-make_pair(c_7329576, &pair_7329113, &c_7329577);
+-make_pair(c_7329575, &pair_7329115, &c_7329576);
+-make_pair(c_7329574, &pair_7329117, &c_7329575);
+-make_pair(c_7329573, &pair_7329119, &c_7329574);
+-make_pair(c_7329572, &pair_7329121, &c_7329573);
+-make_pair(c_7329571, &pair_7329123, &c_7329572);
+-make_pair(c_7329570, &pair_7329125, &c_7329571);
+-make_pair(c_7329569, &pair_7329127, &c_7329570);
+-make_pair(c_7329568, &pair_7329129, &c_7329569);
+-make_pair(c_7329567, &pair_7329131, &c_7329568);
+-make_pair(c_7329566, &pair_7329133, &c_7329567);
+-make_pair(c_7329565, &pair_7329135, &c_7329566);
+-make_pair(c_7329564, &pair_7329137, &c_7329565);
+-make_pair(c_7329563, &pair_7329139, &c_7329564);
+-make_pair(c_7329562, &pair_7329141, &c_7329563);
+-make_pair(c_7329561, &pair_7329143, &c_7329562);
+-make_pair(c_7329560, &pair_7329145, &c_7329561);
+-make_pair(c_7329559, &pair_7329147, &c_7329560);
+-make_pair(c_7329558, &pair_7329149, &c_7329559);
+-make_pair(c_7329557, &pair_7329151, &c_7329558);
+-make_pair(c_7329556, &pair_7329153, &c_7329557);
+-make_pair(c_7329555, &pair_7329155, &c_7329556);
+-make_pair(c_7329554, &pair_7329157, &c_7329555);
+-make_pair(c_7329553, &pair_7329159, &c_7329554);
+-make_pair(c_7329552, &pair_7329161, &c_7329553);
+-make_pair(c_7329551, &pair_7329163, &c_7329552);
+-make_pair(c_7329550, &pair_7329165, &c_7329551);
+-make_pair(c_7329549, &pair_7329167, &c_7329550);
+-make_pair(c_7329548, &pair_7329169, &c_7329549);
+-make_pair(c_7329547, &pair_7329171, &c_7329548);
+-make_pair(c_7329546, &pair_7329173, &c_7329547);
+-make_pair(c_7329545, &pair_7329175, &c_7329546);
+-make_pair(c_7329544, &pair_7329177, &c_7329545);
+-make_pair(c_7329543, &pair_7329179, &c_7329544);
+-make_pair(c_7329542, &pair_7329181, &c_7329543);
+-make_pair(c_7329541, &pair_7329183, &c_7329542);
+-make_pair(c_7329540, &pair_7329185, &c_7329541);
+-make_pair(c_7329539, &pair_7329187, &c_7329540);
+-make_pair(c_7329538, &pair_7329189, &c_7329539);
+-make_pair(c_7329537, &pair_7329191, &c_7329538);
+-make_pair(c_7329536, &pair_7329193, &c_7329537);
+-make_pair(c_7329535, &pair_7329195, &c_7329536);
+-make_pair(c_7329534, &pair_7329197, &c_7329535);
+-make_pair(c_7329533, &pair_7329199, &c_7329534);
+-make_pair(c_7329532, &pair_7329201, &c_7329533);
+-make_pair(c_7329531, &pair_7329203, &c_7329532);
+-make_pair(c_7329530, &pair_7329205, &c_7329531);
+-make_pair(c_7329529, &pair_7329207, &c_7329530);
+-make_pair(c_7329528, &pair_7329209, &c_7329529);
+-make_pair(c_7329527, &pair_7329211, &c_7329528);
+-make_pair(c_7329526, &pair_7329213, &c_7329527);
+-make_pair(c_7329525, &pair_7329215, &c_7329526);
+-make_pair(c_7329524, &pair_7329217, &c_7329525);
+-make_pair(c_7329523, &pair_7329219, &c_7329524);
+-make_pair(c_7329522, &pair_7329221, &c_7329523);
+-make_pair(c_7329521, &pair_7329223, &c_7329522);
+-make_pair(c_7329520, &pair_7329225, &c_7329521);
+-make_pair(c_7329519, &pair_7329227, &c_7329520);
+-make_pair(c_7329518, &pair_7329229, &c_7329519);
+-make_pair(c_7329517, &pair_7329231, &c_7329518);
+-make_pair(c_7329516, &pair_7329233, &c_7329517);
+-make_pair(c_7329515, &pair_7329235, &c_7329516);
+-make_pair(c_7329514, &pair_7329237, &c_7329515);
+-make_pair(c_7329513, &pair_7329239, &c_7329514);
+-make_pair(c_7329512, &pair_7329241, &c_7329513);
+-make_pair(c_7329511, &pair_7329243, &c_7329512);
+-make_pair(c_7329510, &pair_7329245, &c_7329511);
+-make_pair(c_7329509, &pair_7329247, &c_7329510);
+-make_pair(c_7329508, &pair_7329249, &c_7329509);
+-make_pair(c_7329507, &pair_7329251, &c_7329508);
+-make_pair(c_7329506, &pair_7329253, &c_7329507);
+-make_pair(c_7329505, &pair_7329255, &c_7329506);
+-make_pair(c_7329504, &pair_7329257, &c_7329505);
+-make_pair(c_7329503, &pair_7329259, &c_7329504);
+-make_pair(c_7329502, &pair_7329261, &c_7329503);
+-make_pair(c_7329501, &pair_7329263, &c_7329502);
+-make_pair(c_7329500, &pair_7329265, &c_7329501);
+-make_pair(c_7329499, &pair_7329267, &c_7329500);
+-make_pair(c_7329498, &pair_7329269, &c_7329499);
+-make_pair(c_7329497, &pair_7329271, &c_7329498);
+-make_pair(c_7329496, &pair_7329273, &c_7329497);
+-make_pair(c_7329495, &pair_7329275, &c_7329496);
+-make_pair(c_7329494, &pair_7329277, &c_7329495);
+-make_pair(c_7329493, &pair_7329279, &c_7329494);
+-make_pair(c_7329492, &pair_7329281, &c_7329493);
+-make_pair(c_7329491, &pair_7329283, &c_7329492);
+-make_pair(c_7329490, &pair_7329285, &c_7329491);
+-make_pair(c_7329489, &pair_7329287, &c_7329490);
+-make_pair(c_7329488, &pair_7329289, &c_7329489);
+-make_pair(c_7329487, &pair_7329291, &c_7329488);
+-make_pair(c_7329486, &pair_7329293, &c_7329487);
+-make_pair(c_7329485, &pair_7329295, &c_7329486);
+-make_pair(c_7329484, &pair_7329297, &c_7329485);
+-make_pair(c_7329483, &pair_7329299, &c_7329484);
+-make_pair(c_7329482, &pair_7329301, &c_7329483);
+-make_pair(c_7329481, &pair_7329303, &c_7329482);
+-make_pair(c_7329480, &pair_7329305, &c_7329481);
+-make_pair(c_7329479, &pair_7329307, &c_7329480);
+-make_pair(c_7329478, &pair_7329309, &c_7329479);
+-make_pair(c_7329477, &pair_7329311, &c_7329478);
+-make_pair(c_7329476, &pair_7329313, &c_7329477);
+-make_pair(c_7329475, &pair_7329315, &c_7329476);
+-make_pair(c_7329474, &pair_7329317, &c_7329475);
+-make_pair(c_7329473, &pair_7329319, &c_7329474);
+-make_pair(c_7329472, &pair_7329321, &c_7329473);
+-make_pair(c_7329471, &pair_7329323, &c_7329472);
+-make_pair(c_7329470, &pair_7329325, &c_7329471);
+-make_pair(c_7329469, &pair_7329327, &c_7329470);
+-make_pair(c_7329468, &pair_7329329, &c_7329469);
+-make_pair(c_7329467, &pair_7329331, &c_7329468);
+-make_pair(c_7329466, &pair_7329333, &c_7329467);
+-make_pair(c_7329465, &pair_7329335, &c_7329466);
+-make_pair(c_7329464, &pair_7329337, &c_7329465);
+-make_pair(c_7329463, &pair_7329339, &c_7329464);
+-make_pair(c_7329462, &pair_7329341, &c_7329463);
+-make_pair(c_7329461, &pair_7329343, &c_7329462);
+-make_pair(c_7329460, &pair_7329345, &c_7329461);
+-make_pair(c_7329459, &pair_7329347, &c_7329460);
+-make_pair(c_7329458, &pair_7329349, &c_7329459);
+-make_pair(c_7329457, &pair_7329351, &c_7329458);
+-make_pair(c_7329456, &pair_7329353, &c_7329457);
+-make_pair(c_7329455, &pair_7329355, &c_7329456);
+-make_pair(c_7329454, &pair_7329357, &c_7329455);
+-make_pair(c_7329453, &pair_7329359, &c_7329454);
+-make_pair(c_7329452, &pair_7329361, &c_7329453);
+-make_pair(c_7329451, &pair_7329363, &c_7329452);
+-make_pair(c_7329450, &pair_7329365, &c_7329451);
+-make_pair(c_7329449, &pair_7329367, &c_7329450);
+-make_pair(c_7329448, &pair_7329369, &c_7329449);
+-make_pair(c_7329447, &pair_7329371, &c_7329448);
+-make_pair(c_7329446, &pair_7329373, &c_7329447);
+-make_pair(c_7329445, &pair_7329375, &c_7329446);
+-make_pair(c_7329444, &pair_7329377, &c_7329445);
+-make_pair(c_7329443, &pair_7329379, &c_7329444);
+-make_pair(c_7329442, &pair_7329381, &c_7329443);
+-make_pair(c_7329441, &pair_7329383, &c_7329442);
+-make_pair(c_7329440, &pair_7329385, &c_7329441);
+-make_pair(c_7329439, &pair_7329387, &c_7329440);
+-make_pair(c_7329438, &pair_7329389, &c_7329439);
+-make_pair(c_7329437, &pair_7329391, &c_7329438);
+-make_pair(c_7329436, &pair_7329393, &c_7329437);
+-make_pair(c_7329435, &pair_7329395, &c_7329436);
+-make_pair(c_7329434, &pair_7329397, &c_7329435);
+-make_pair(c_7329433, &pair_7329399, &c_7329434);
+-make_pair(c_7329432, &pair_7329401, &c_7329433);
+-make_pair(c_7329431, &pair_7329403, &c_7329432);
+-make_pair(c_7329430, &pair_7329405, &c_7329431);
+-make_pair(c_7329429, &pair_7329407, &c_7329430);
+-make_pair(c_7329428, &pair_7329409, &c_7329429);
+-make_pair(c_7329427, &pair_7329411, &c_7329428);
+-make_pair(c_7329426, &pair_7329413, &c_7329427);
+-make_pair(c_7329425, &pair_7329415, &c_7329426);
+-make_pair(c_7329424, &pair_7329417, &c_7329425);
+-make_pair(c_7329423, &pair_7329419, &c_7329424);
+-make_pair(c_7329422, &pair_7329421, &c_7329423);
+-Cyc_global_variables = &c_7329422;
++ mclosure0(clo_7326464, c_schemebase_inlinable_lambdas); make_pair(pair_7326463, find_or_add_symbol("c_schemebase_inlinable_lambdas"), &clo_7326464);
++ make_cvar(cvar_7326465, (object *)&__glo_lib_91init_117schemebase_scheme_base);make_pair(pair_7326466, find_or_add_symbol("lib-init:schemebase"), &cvar_7326465);
++ make_cvar(cvar_7326467, (object *)&__glo_define_91values_scheme_base);make_pair(pair_7326468, find_or_add_symbol("define-values"), &cvar_7326467);
++ make_cvar(cvar_7326469, (object *)&__glo_define_91record_91type_scheme_base);make_pair(pair_7326470, find_or_add_symbol("define-record-type"), &cvar_7326469);
++ make_cvar(cvar_7326471, (object *)&__glo_is_91a_127_scheme_base);make_pair(pair_7326472, find_or_add_symbol("is-a?"), &cvar_7326471);
++ make_cvar(cvar_7326473, (object *)&__glo_record_127_scheme_base);make_pair(pair_7326474, find_or_add_symbol("record?"), &cvar_7326473);
++ make_cvar(cvar_7326475, (object *)&__glo__191list_91index_scheme_base);make_pair(pair_7326476, find_or_add_symbol("_list-index"), &cvar_7326475);
++ make_cvar(cvar_7326477, (object *)&__glo_make_91setter_scheme_base);make_pair(pair_7326478, find_or_add_symbol("make-setter"), &cvar_7326477);
++ make_cvar(cvar_7326479, (object *)&__glo_make_91getter_scheme_base);make_pair(pair_7326480, find_or_add_symbol("make-getter"), &cvar_7326479);
++ make_cvar(cvar_7326481, (object *)&__glo_slot_91ref_scheme_base);make_pair(pair_7326482, find_or_add_symbol("slot-ref"), &cvar_7326481);
++ make_cvar(cvar_7326483, (object *)&__glo_slot_91set_67_scheme_base);make_pair(pair_7326484, find_or_add_symbol("slot-set!"), &cvar_7326483);
++ make_cvar(cvar_7326485, (object *)&__glo_type_91slot_91offset_scheme_base);make_pair(pair_7326486, find_or_add_symbol("type-slot-offset"), &cvar_7326485);
++ make_cvar(cvar_7326487, (object *)&__glo_make_91constructor_95args_scheme_base);make_pair(pair_7326488, find_or_add_symbol("make-constructor/args"), &cvar_7326487);
++ make_cvar(cvar_7326489, (object *)&__glo_make_91constructor_scheme_base);make_pair(pair_7326490, find_or_add_symbol("make-constructor"), &cvar_7326489);
++ make_cvar(cvar_7326491, (object *)&__glo_make_91type_91predicate_scheme_base);make_pair(pair_7326492, find_or_add_symbol("make-type-predicate"), &cvar_7326491);
++ make_cvar(cvar_7326493, (object *)&__glo_register_91simple_91type_scheme_base);make_pair(pair_7326494, find_or_add_symbol("register-simple-type"), &cvar_7326493);
++ make_cvar(cvar_7326495, (object *)&__glo_record_91marker_scheme_base);make_pair(pair_7326496, find_or_add_symbol("record-marker"), &cvar_7326495);
++ make_cvar(cvar_7326497, (object *)&__glo_guard_91aux_scheme_base);make_pair(pair_7326498, find_or_add_symbol("guard-aux"), &cvar_7326497);
++ make_cvar(cvar_7326499, (object *)&__glo_guard_scheme_base);make_pair(pair_7326500, find_or_add_symbol("guard"), &cvar_7326499);
++ make_cvar(cvar_7326501, (object *)&__glo_let_91values_scheme_base);make_pair(pair_7326502, find_or_add_symbol("let-values"), &cvar_7326501);
++ make_cvar(cvar_7326503, (object *)&__glo_let_85_91values_scheme_base);make_pair(pair_7326504, find_or_add_symbol("let*-values"), &cvar_7326503);
++ make_cvar(cvar_7326505, (object *)&__glo_letrec_85_scheme_base);make_pair(pair_7326506, find_or_add_symbol("letrec*"), &cvar_7326505);
++ make_cvar(cvar_7326507, (object *)&__glo_syntax_91rules_scheme_base);make_pair(pair_7326508, find_or_add_symbol("syntax-rules"), &cvar_7326507);
++ make_cvar(cvar_7326509, (object *)&__glo_cons_91source_scheme_base);make_pair(pair_7326510, find_or_add_symbol("cons-source"), &cvar_7326509);
++ make_cvar(cvar_7326511, (object *)&__glo_find_scheme_base);make_pair(pair_7326512, find_or_add_symbol("find"), &cvar_7326511);
++ make_cvar(cvar_7326513, (object *)&__glo_find_91tail_scheme_base);make_pair(pair_7326514, find_or_add_symbol("find-tail"), &cvar_7326513);
++ make_cvar(cvar_7326515, (object *)&__glo_identifier_127_scheme_base);make_pair(pair_7326516, find_or_add_symbol("identifier?"), &cvar_7326515);
++ make_cvar(cvar_7326517, (object *)&__glo_open_91output_91bytevector_scheme_base);make_pair(pair_7326518, find_or_add_symbol("open-output-bytevector"), &cvar_7326517);
++ make_cvar(cvar_7326519, (object *)&__glo_open_91input_91bytevector_scheme_base);make_pair(pair_7326520, find_or_add_symbol("open-input-bytevector"), &cvar_7326519);
++ make_cvar(cvar_7326521, (object *)&__glo_get_91output_91bytevector_scheme_base);make_pair(pair_7326522, find_or_add_symbol("get-output-bytevector"), &cvar_7326521);
++ make_cvar(cvar_7326523, (object *)&__glo_get_91output_91string_scheme_base);make_pair(pair_7326524, find_or_add_symbol("get-output-string"), &cvar_7326523);
++ make_cvar(cvar_7326525, (object *)&__glo_open_91output_91string_scheme_base);make_pair(pair_7326526, find_or_add_symbol("open-output-string"), &cvar_7326525);
++ make_cvar(cvar_7326527, (object *)&__glo_open_91input_91string_scheme_base);make_pair(pair_7326528, find_or_add_symbol("open-input-string"), &cvar_7326527);
++ make_cvar(cvar_7326529, (object *)&__glo_output_91port_91open_127_scheme_base);make_pair(pair_7326530, find_or_add_symbol("output-port-open?"), &cvar_7326529);
++ make_cvar(cvar_7326531, (object *)&__glo_input_91port_91open_127_scheme_base);make_pair(pair_7326532, find_or_add_symbol("input-port-open?"), &cvar_7326531);
++ make_cvar(cvar_7326533, (object *)&__glo_output_91port_127_scheme_base);make_pair(pair_7326534, find_or_add_symbol("output-port?"), &cvar_7326533);
++ make_cvar(cvar_7326535, (object *)&__glo_input_91port_127_scheme_base);make_pair(pair_7326536, find_or_add_symbol("input-port?"), &cvar_7326535);
++ make_cvar(cvar_7326537, (object *)&__glo_make_91record_91marker_scheme_base);make_pair(pair_7326538, find_or_add_symbol("make-record-marker"), &cvar_7326537);
++ make_cvar(cvar_7326539, (object *)&__glo_make_91record_91marker_191_191inline_191_191_scheme_base);make_pair(pair_7326540, find_or_add_symbol("make-record-marker__inline__"), &cvar_7326539);
++ make_cvar(cvar_7326541, (object *)&__glo__void_scheme_base);make_pair(pair_7326542, find_or_add_symbol("void"), &cvar_7326541);
++ make_cvar(cvar_7326543, (object *)&__glo_void_191_191inline_191_191_scheme_base);make_pair(pair_7326544, find_or_add_symbol("void__inline__"), &cvar_7326543);
++ make_cvar(cvar_7326545, (object *)&__glo_eof_91object_scheme_base);make_pair(pair_7326546, find_or_add_symbol("eof-object"), &cvar_7326545);
++ make_cvar(cvar_7326547, (object *)&__glo_eof_91object_191_191inline_191_191_scheme_base);make_pair(pair_7326548, find_or_add_symbol("eof-object__inline__"), &cvar_7326547);
++ make_cvar(cvar_7326549, (object *)&__glo_expt_scheme_base);make_pair(pair_7326550, find_or_add_symbol("expt"), &cvar_7326549);
++ make_cvar(cvar_7326551, (object *)&__glo_square_191_191inline_191_191_scheme_base);make_pair(pair_7326552, find_or_add_symbol("square__inline__"), &cvar_7326551);
++ make_cvar(cvar_7326553, (object *)&__glo_square_scheme_base);make_pair(pair_7326554, find_or_add_symbol("square"), &cvar_7326553);
++ make_cvar(cvar_7326555, (object *)&__glo_floor_95_scheme_base);make_pair(pair_7326556, find_or_add_symbol("floor/"), &cvar_7326555);
++ make_cvar(cvar_7326557, (object *)&__glo_floor_91remainder_scheme_base);make_pair(pair_7326558, find_or_add_symbol("floor-remainder"), &cvar_7326557);
++ make_cvar(cvar_7326559, (object *)&__glo_floor_91quotient_scheme_base);make_pair(pair_7326560, find_or_add_symbol("floor-quotient"), &cvar_7326559);
++ make_cvar(cvar_7326561, (object *)&__glo_truncate_95_scheme_base);make_pair(pair_7326562, find_or_add_symbol("truncate/"), &cvar_7326561);
++ make_cvar(cvar_7326563, (object *)&__glo_truncate_91remainder_scheme_base);make_pair(pair_7326564, find_or_add_symbol("truncate-remainder"), &cvar_7326563);
++ make_cvar(cvar_7326565, (object *)&__glo_truncate_91quotient_scheme_base);make_pair(pair_7326566, find_or_add_symbol("truncate-quotient"), &cvar_7326565);
++ make_cvar(cvar_7326567, (object *)&__glo_quotient_191_191inline_191_191_scheme_base);make_pair(pair_7326568, find_or_add_symbol("quotient__inline__"), &cvar_7326567);
++ make_cvar(cvar_7326569, (object *)&__glo_quotient_scheme_base);make_pair(pair_7326570, find_or_add_symbol("quotient"), &cvar_7326569);
++ make_cvar(cvar_7326571, (object *)&__glo_fixnum_127_scheme_base);make_pair(pair_7326572, find_or_add_symbol("fixnum?"), &cvar_7326571);
++ make_cvar(cvar_7326573, (object *)&__glo_fixnum_127_191_191inline_191_191_scheme_base);make_pair(pair_7326574, find_or_add_symbol("fixnum?__inline__"), &cvar_7326573);
++ make_cvar(cvar_7326575, (object *)&__glo_denominator_scheme_base);make_pair(pair_7326576, find_or_add_symbol("denominator"), &cvar_7326575);
++ make_cvar(cvar_7326577, (object *)&__glo_numerator_scheme_base);make_pair(pair_7326578, find_or_add_symbol("numerator"), &cvar_7326577);
++ make_cvar(cvar_7326579, (object *)&__glo_lcm_95entry_scheme_base);make_pair(pair_7326580, find_or_add_symbol("lcm/entry"), &cvar_7326579);
++ make_cvar(cvar_7326581, (object *)&__glo_lcm_95main_scheme_base);make_pair(pair_7326582, find_or_add_symbol("lcm/main"), &cvar_7326581);
++ make_cvar(cvar_7326583, (object *)&__glo_gcd_95entry_scheme_base);make_pair(pair_7326584, find_or_add_symbol("gcd/entry"), &cvar_7326583);
++ make_cvar(cvar_7326585, (object *)&__glo_gcd_95main_scheme_base);make_pair(pair_7326586, find_or_add_symbol("gcd/main"), &cvar_7326585);
++ make_cvar(cvar_7326587, (object *)&__glo_lcm_scheme_base);make_pair(pair_7326588, find_or_add_symbol("lcm"), &cvar_7326587);
++ make_cvar(cvar_7326589, (object *)&__glo_gcd_scheme_base);make_pair(pair_7326590, find_or_add_symbol("gcd"), &cvar_7326589);
++ make_cvar(cvar_7326591, (object *)&__glo_min_scheme_base);make_pair(pair_7326592, find_or_add_symbol("min"), &cvar_7326591);
++ make_cvar(cvar_7326593, (object *)&__glo_max_scheme_base);make_pair(pair_7326594, find_or_add_symbol("max"), &cvar_7326593);
++ make_cvar(cvar_7326595, (object *)&__glo_rationalize_scheme_base);make_pair(pair_7326596, find_or_add_symbol("rationalize"), &cvar_7326595);
++ make_cvar(cvar_7326597, (object *)&__glo_rational_127_scheme_base);make_pair(pair_7326598, find_or_add_symbol("rational?"), &cvar_7326597);
++ make_cvar(cvar_7326599, (object *)&__glo_complex_127_scheme_base);make_pair(pair_7326600, find_or_add_symbol("complex?"), &cvar_7326599);
++ make_cvar(cvar_7326601, (object *)&__glo_complex_127_191_191inline_191_191_scheme_base);make_pair(pair_7326602, find_or_add_symbol("complex?__inline__"), &cvar_7326601);
++ make_cvar(cvar_7326603, (object *)&__glo_inexact_127_scheme_base);make_pair(pair_7326604, find_or_add_symbol("inexact?"), &cvar_7326603);
++ make_cvar(cvar_7326605, (object *)&__glo_exact_127_scheme_base);make_pair(pair_7326606, find_or_add_symbol("exact?"), &cvar_7326605);
++ make_cvar(cvar_7326607, (object *)&__glo_exact_127_191_191inline_191_191_scheme_base);make_pair(pair_7326608, find_or_add_symbol("exact?__inline__"), &cvar_7326607);
++ make_cvar(cvar_7326609, (object *)&__glo_exact_91integer_127_scheme_base);make_pair(pair_7326610, find_or_add_symbol("exact-integer?"), &cvar_7326609);
++ make_cvar(cvar_7326611, (object *)&__glo_exact_91integer_127_191_191inline_191_191_scheme_base);make_pair(pair_7326612, find_or_add_symbol("exact-integer?__inline__"), &cvar_7326611);
++ make_cvar(cvar_7326613, (object *)&__glo_sqrt_scheme_base);make_pair(pair_7326614, find_or_add_symbol("sqrt"), &cvar_7326613);
++ make_cvar(cvar_7326615, (object *)&__glo_sqrt_191_191inline_191_191_scheme_base);make_pair(pair_7326616, find_or_add_symbol("sqrt__inline__"), &cvar_7326615);
++ make_cvar(cvar_7326617, (object *)&__glo_exact_91integer_91sqrt_scheme_base);make_pair(pair_7326618, find_or_add_symbol("exact-integer-sqrt"), &cvar_7326617);
++ make_cvar(cvar_7326619, (object *)&__glo_bignum_91sqrt_scheme_base);make_pair(pair_7326620, find_or_add_symbol("bignum-sqrt"), &cvar_7326619);
++ make_cvar(cvar_7326621, (object *)&__glo_bignum_127_scheme_base);make_pair(pair_7326622, find_or_add_symbol("bignum?"), &cvar_7326621);
++ make_cvar(cvar_7326623, (object *)&__glo_even_127_scheme_base);make_pair(pair_7326624, find_or_add_symbol("even?"), &cvar_7326623);
++ make_cvar(cvar_7326625, (object *)&__glo_odd_127_scheme_base);make_pair(pair_7326626, find_or_add_symbol("odd?"), &cvar_7326625);
++ make_cvar(cvar_7326627, (object *)&__glo_modulo_scheme_base);make_pair(pair_7326628, find_or_add_symbol("modulo"), &cvar_7326627);
++ make_cvar(cvar_7326629, (object *)&__glo_remainder_scheme_base);make_pair(pair_7326630, find_or_add_symbol("remainder"), &cvar_7326629);
++ make_cvar(cvar_7326631, (object *)&__glo_abs_scheme_base);make_pair(pair_7326632, find_or_add_symbol("abs"), &cvar_7326631);
++ make_cvar(cvar_7326633, (object *)&__glo_inexact_scheme_base);make_pair(pair_7326634, find_or_add_symbol("inexact"), &cvar_7326633);
++ make_cvar(cvar_7326635, (object *)&__glo_inexact_191_191inline_191_191_scheme_base);make_pair(pair_7326636, find_or_add_symbol("inexact__inline__"), &cvar_7326635);
++ make_cvar(cvar_7326637, (object *)&__glo_exact_scheme_base);make_pair(pair_7326638, find_or_add_symbol("exact"), &cvar_7326637);
++ make_cvar(cvar_7326639, (object *)&__glo_exact_191_191inline_191_191_scheme_base);make_pair(pair_7326640, find_or_add_symbol("exact__inline__"), &cvar_7326639);
++ make_cvar(cvar_7326641, (object *)&__glo_round_scheme_base);make_pair(pair_7326642, find_or_add_symbol("round"), &cvar_7326641);
++ make_cvar(cvar_7326643, (object *)&__glo_round_191_191inline_191_191_scheme_base);make_pair(pair_7326644, find_or_add_symbol("round__inline__"), &cvar_7326643);
++ make_cvar(cvar_7326645, (object *)&__glo_truncate_scheme_base);make_pair(pair_7326646, find_or_add_symbol("truncate"), &cvar_7326645);
++ make_cvar(cvar_7326647, (object *)&__glo_truncate_191_191inline_191_191_scheme_base);make_pair(pair_7326648, find_or_add_symbol("truncate__inline__"), &cvar_7326647);
++ make_cvar(cvar_7326649, (object *)&__glo_ceiling_scheme_base);make_pair(pair_7326650, find_or_add_symbol("ceiling"), &cvar_7326649);
++ make_cvar(cvar_7326651, (object *)&__glo_ceiling_191_191inline_191_191_scheme_base);make_pair(pair_7326652, find_or_add_symbol("ceiling__inline__"), &cvar_7326651);
++ make_cvar(cvar_7326653, (object *)&__glo_floor_scheme_base);make_pair(pair_7326654, find_or_add_symbol("floor"), &cvar_7326653);
++ make_cvar(cvar_7326655, (object *)&__glo_floor_191_191inline_191_191_scheme_base);make_pair(pair_7326656, find_or_add_symbol("floor__inline__"), &cvar_7326655);
++ make_cvar(cvar_7326657, (object *)&__glo_every_scheme_base);make_pair(pair_7326658, find_or_add_symbol("every"), &cvar_7326657);
++ make_cvar(cvar_7326659, (object *)&__glo_any_scheme_base);make_pair(pair_7326660, find_or_add_symbol("any"), &cvar_7326659);
++ make_cvar(cvar_7326661, (object *)&__glo_error_95loc_scheme_base);make_pair(pair_7326662, find_or_add_symbol("error/loc"), &cvar_7326661);
++ make_cvar(cvar_7326663, (object *)&__glo_Cyc_91remove_91exception_91handler_scheme_base);make_pair(pair_7326664, find_or_add_symbol("Cyc-remove-exception-handler"), &cvar_7326663);
++ make_cvar(cvar_7326665, (object *)&__glo_Cyc_91add_91exception_91handler_scheme_base);make_pair(pair_7326666, find_or_add_symbol("Cyc-add-exception-handler"), &cvar_7326665);
++ make_cvar(cvar_7326667, (object *)&__glo_with_91exception_91handler_scheme_base);make_pair(pair_7326668, find_or_add_symbol("with-exception-handler"), &cvar_7326667);
++ make_cvar(cvar_7326669, (object *)&__glo_with_91handler_scheme_base);make_pair(pair_7326670, find_or_add_symbol("with-handler"), &cvar_7326669);
++ make_cvar(cvar_7326671, (object *)&__glo_raise_91continuable_scheme_base);make_pair(pair_7326672, find_or_add_symbol("raise-continuable"), &cvar_7326671);
++ make_cvar(cvar_7326673, (object *)&__glo_raise_scheme_base);make_pair(pair_7326674, find_or_add_symbol("raise"), &cvar_7326673);
++ make_cvar(cvar_7326675, (object *)&__glo_error_scheme_base);make_pair(pair_7326676, find_or_add_symbol("error"), &cvar_7326675);
++ make_cvar(cvar_7326677, (object *)&__glo_error_91object_91irritants_scheme_base);make_pair(pair_7326678, find_or_add_symbol("error-object-irritants"), &cvar_7326677);
++ make_cvar(cvar_7326679, (object *)&__glo_error_91object_91message_scheme_base);make_pair(pair_7326680, find_or_add_symbol("error-object-message"), &cvar_7326679);
++ make_cvar(cvar_7326681, (object *)&__glo_error_91object_127_scheme_base);make_pair(pair_7326682, find_or_add_symbol("error-object?"), &cvar_7326681);
++ make_cvar(cvar_7326683, (object *)&__glo_current_91error_91port_scheme_base);make_pair(pair_7326684, find_or_add_symbol("current-error-port"), &cvar_7326683);
++ make_cvar(cvar_7326685, (object *)&__glo_current_91input_91port_scheme_base);make_pair(pair_7326686, find_or_add_symbol("current-input-port"), &cvar_7326685);
++ make_cvar(cvar_7326687, (object *)&__glo_current_91output_91port_scheme_base);make_pair(pair_7326688, find_or_add_symbol("current-output-port"), &cvar_7326687);
++ make_cvar(cvar_7326689, (object *)&__glo_make_91parameter_scheme_base);make_pair(pair_7326690, find_or_add_symbol("make-parameter"), &cvar_7326689);
++ make_cvar(cvar_7326691, (object *)&__glo__85parameter_91id_85_scheme_base);make_pair(pair_7326692, find_or_add_symbol("*parameter-id*"), &cvar_7326691);
++ make_cvar(cvar_7326693, (object *)&__glo_set_91param_91obj_67_scheme_base);make_pair(pair_7326694, find_or_add_symbol("set-param-obj!"), &cvar_7326693);
++ make_cvar(cvar_7326695, (object *)&__glo_get_91param_91objs_scheme_base);make_pair(pair_7326696, find_or_add_symbol("get-param-objs"), &cvar_7326695);
++ make_cvar(cvar_7326697, (object *)&__glo_parameterize_scheme_base);make_pair(pair_7326698, find_or_add_symbol("parameterize"), &cvar_7326697);
++ make_cvar(cvar_7326699, (object *)&__glo_Cyc_91make_91string_scheme_base);make_pair(pair_7326700, find_or_add_symbol("Cyc-make-string"), &cvar_7326699);
++ make_cvar(cvar_7326701, (object *)&__glo_make_91string_scheme_base);make_pair(pair_7326702, find_or_add_symbol("make-string"), &cvar_7326701);
++ make_cvar(cvar_7326703, (object *)&__glo_string_scheme_base);make_pair(pair_7326704, find_or_add_symbol("string"), &cvar_7326703);
++ make_cvar(cvar_7326705, (object *)&__glo_Cyc_91obj_123_127_scheme_base);make_pair(pair_7326706, find_or_add_symbol("Cyc-obj=?"), &cvar_7326705);
++ make_cvar(cvar_7326707, (object *)&__glo_symbol_123_127_scheme_base);make_pair(pair_7326708, find_or_add_symbol("symbol=?"), &cvar_7326707);
++ make_cvar(cvar_7326709, (object *)&__glo_boolean_123_127_scheme_base);make_pair(pair_7326710, find_or_add_symbol("boolean=?"), &cvar_7326709);
++ make_cvar(cvar_7326711, (object *)&__glo_vector_91fill_67_scheme_base);make_pair(pair_7326712, find_or_add_symbol("vector-fill!"), &cvar_7326711);
++ make_cvar(cvar_7326713, (object *)&__glo_vector_91copy_67_scheme_base);make_pair(pair_7326714, find_or_add_symbol("vector-copy!"), &cvar_7326713);
++ make_cvar(cvar_7326715, (object *)&__glo_vector_91copy_scheme_base);make_pair(pair_7326716, find_or_add_symbol("vector-copy"), &cvar_7326715);
++ make_cvar(cvar_7326717, (object *)&__glo_vector_91append_scheme_base);make_pair(pair_7326718, find_or_add_symbol("vector-append"), &cvar_7326717);
++ make_cvar(cvar_7326719, (object *)&__glo_vector_91for_91each_scheme_base);make_pair(pair_7326720, find_or_add_symbol("vector-for-each"), &cvar_7326719);
++ make_cvar(cvar_7326721, (object *)&__glo_vector_91map_scheme_base);make_pair(pair_7326722, find_or_add_symbol("vector-map"), &cvar_7326721);
++ make_cvar(cvar_7326723, (object *)&__glo_string_91for_91each_scheme_base);make_pair(pair_7326724, find_or_add_symbol("string-for-each"), &cvar_7326723);
++ make_cvar(cvar_7326725, (object *)&__glo_string_91map_scheme_base);make_pair(pair_7326726, find_or_add_symbol("string-map"), &cvar_7326725);
++ make_cvar(cvar_7326727, (object *)&__glo_string_91fill_67_scheme_base);make_pair(pair_7326728, find_or_add_symbol("string-fill!"), &cvar_7326727);
++ make_cvar(cvar_7326729, (object *)&__glo_string_91copy_67_scheme_base);make_pair(pair_7326730, find_or_add_symbol("string-copy!"), &cvar_7326729);
++ make_cvar(cvar_7326731, (object *)&__glo_string_91copy_scheme_base);make_pair(pair_7326732, find_or_add_symbol("string-copy"), &cvar_7326731);
++ make_cvar(cvar_7326733, (object *)&__glo_string_91_125vector_scheme_base);make_pair(pair_7326734, find_or_add_symbol("string->vector"), &cvar_7326733);
++ make_cvar(cvar_7326735, (object *)&__glo_string_91_125list_scheme_base);make_pair(pair_7326736, find_or_add_symbol("string->list"), &cvar_7326735);
++ make_cvar(cvar_7326737, (object *)&__glo_vector_91_125string_scheme_base);make_pair(pair_7326738, find_or_add_symbol("vector->string"), &cvar_7326737);
++ make_cvar(cvar_7326739, (object *)&__glo_string_91_125utf8_scheme_base);make_pair(pair_7326740, find_or_add_symbol("string->utf8"), &cvar_7326739);
++ make_cvar(cvar_7326741, (object *)&__glo_utf8_91_125string_scheme_base);make_pair(pair_7326742, find_or_add_symbol("utf8->string"), &cvar_7326741);
++ make_cvar(cvar_7326743, (object *)&__glo_bytevector_91copy_67_scheme_base);make_pair(pair_7326744, find_or_add_symbol("bytevector-copy!"), &cvar_7326743);
++ make_cvar(cvar_7326745, (object *)&__glo_bytevector_91copy_scheme_base);make_pair(pair_7326746, find_or_add_symbol("bytevector-copy"), &cvar_7326745);
++ make_cvar(cvar_7326747, (object *)&__glo_vector_91_125list_scheme_base);make_pair(pair_7326748, find_or_add_symbol("vector->list"), &cvar_7326747);
++ make_cvar(cvar_7326749, (object *)&__glo_vector_scheme_base);make_pair(pair_7326750, find_or_add_symbol("vector"), &cvar_7326749);
++ make_cvar(cvar_7326751, (object *)&__glo_reverse_scheme_base);make_pair(pair_7326752, find_or_add_symbol("reverse"), &cvar_7326751);
++ make_cvar(cvar_7326753, (object *)&__glo_list_91set_67_scheme_base);make_pair(pair_7326754, find_or_add_symbol("list-set!"), &cvar_7326753);
++ make_cvar(cvar_7326755, (object *)&__glo_list_91ref_scheme_base);make_pair(pair_7326756, find_or_add_symbol("list-ref"), &cvar_7326755);
++ make_cvar(cvar_7326757, (object *)&__glo_list_91tail_scheme_base);make_pair(pair_7326758, find_or_add_symbol("list-tail"), &cvar_7326757);
++ make_cvar(cvar_7326759, (object *)&__glo_for_91each_scheme_base);make_pair(pair_7326760, find_or_add_symbol("for-each"), &cvar_7326759);
++ make_cvar(cvar_7326761, (object *)&__glo_Cyc_91for_91each_91loop_912_scheme_base);make_pair(pair_7326762, find_or_add_symbol("Cyc-for-each-loop-2"), &cvar_7326761);
++ make_cvar(cvar_7326763, (object *)&__glo_Cyc_91for_91each_91loop_911_scheme_base);make_pair(pair_7326764, find_or_add_symbol("Cyc-for-each-loop-1"), &cvar_7326763);
++ make_cvar(cvar_7326765, (object *)&__glo_Cyc_91map_91loop_912_scheme_base);make_pair(pair_7326766, find_or_add_symbol("Cyc-map-loop-2"), &cvar_7326765);
++ make_cvar(cvar_7326767, (object *)&__glo_Cyc_91map_91loop_911_scheme_base);make_pair(pair_7326768, find_or_add_symbol("Cyc-map-loop-1"), &cvar_7326767);
++ make_cvar(cvar_7326769, (object *)&__glo_map_scheme_base);make_pair(pair_7326770, find_or_add_symbol("map"), &cvar_7326769);
++ make_cvar(cvar_7326771, (object *)&__glo__75cars_87cdrs_scheme_base);make_pair(pair_7326772, find_or_add_symbol("%cars+cdrs"), &cvar_7326771);
++ make_cvar(cvar_7326773, (object *)&__glo_car_87cdr_scheme_base);make_pair(pair_7326774, find_or_add_symbol("car+cdr"), &cvar_7326773);
++ make_cvar(cvar_7326775, (object *)&__glo_receive_scheme_base);make_pair(pair_7326776, find_or_add_symbol("receive"), &cvar_7326775);
++ make_cvar(cvar_7326777, (object *)&__glo_list_91copy_scheme_base);make_pair(pair_7326778, find_or_add_symbol("list-copy"), &cvar_7326777);
++ make_cvar(cvar_7326779, (object *)&__glo_make_91list_scheme_base);make_pair(pair_7326780, find_or_add_symbol("make-list"), &cvar_7326779);
++ make_cvar(cvar_7326781, (object *)&__glo__list_scheme_base);make_pair(pair_7326782, find_or_add_symbol("list"), &cvar_7326781);
++ make_cvar(cvar_7326783, (object *)&__glo_append_scheme_base);make_pair(pair_7326784, find_or_add_symbol("append"), &cvar_7326783);
++ make_cvar(cvar_7326785, (object *)&__glo_negative_127_191_191inline_191_191_scheme_base);make_pair(pair_7326786, find_or_add_symbol("negative?__inline__"), &cvar_7326785);
++ make_cvar(cvar_7326787, (object *)&__glo_negative_127_scheme_base);make_pair(pair_7326788, find_or_add_symbol("negative?"), &cvar_7326787);
++ make_cvar(cvar_7326789, (object *)&__glo_positive_127_191_191inline_191_191_scheme_base);make_pair(pair_7326790, find_or_add_symbol("positive?__inline__"), &cvar_7326789);
++ make_cvar(cvar_7326791, (object *)&__glo_positive_127_scheme_base);make_pair(pair_7326792, find_or_add_symbol("positive?"), &cvar_7326791);
++ make_cvar(cvar_7326793, (object *)&__glo_zero_127_191_191inline_191_191_scheme_base);make_pair(pair_7326794, find_or_add_symbol("zero?__inline__"), &cvar_7326793);
++ make_cvar(cvar_7326795, (object *)&__glo_zero_127_scheme_base);make_pair(pair_7326796, find_or_add_symbol("zero?"), &cvar_7326795);
++ make_cvar(cvar_7326797, (object *)&__glo_list_127_scheme_base);make_pair(pair_7326798, find_or_add_symbol("list?"), &cvar_7326797);
++ make_cvar(cvar_7326799, (object *)&__glo_list_127_191_191inline_191_191_scheme_base);make_pair(pair_7326800, find_or_add_symbol("list?__inline__"), &cvar_7326799);
++ make_cvar(cvar_7326801, (object *)&__glo_not_191_191inline_191_191_scheme_base);make_pair(pair_7326802, find_or_add_symbol("not__inline__"), &cvar_7326801);
++ make_cvar(cvar_7326803, (object *)&__glo_not_scheme_base);make_pair(pair_7326804, find_or_add_symbol("not"), &cvar_7326803);
++ make_cvar(cvar_7326805, (object *)&__glo_newline_scheme_base);make_pair(pair_7326806, find_or_add_symbol("newline"), &cvar_7326805);
++ make_cvar(cvar_7326807, (object *)&__glo_write_91char_scheme_base);make_pair(pair_7326808, find_or_add_symbol("write-char"), &cvar_7326807);
++ make_cvar(cvar_7326809, (object *)&__glo__75write_91bytevector_scheme_base);make_pair(pair_7326810, find_or_add_symbol("%write-bytevector"), &cvar_7326809);
++ make_cvar(cvar_7326811, (object *)&__glo__75write_91bytevector_191_191inline_191_191_scheme_base);make_pair(pair_7326812, find_or_add_symbol("%write-bytevector__inline__"), &cvar_7326811);
++ make_cvar(cvar_7326813, (object *)&__glo_write_91bytevector_scheme_base);make_pair(pair_7326814, find_or_add_symbol("write-bytevector"), &cvar_7326813);
++ make_cvar(cvar_7326815, (object *)&__glo_read_91bytevector_67_scheme_base);make_pair(pair_7326816, find_or_add_symbol("read-bytevector!"), &cvar_7326815);
++ make_cvar(cvar_7326817, (object *)&__glo_read_91bytevector_scheme_base);make_pair(pair_7326818, find_or_add_symbol("read-bytevector"), &cvar_7326817);
++ make_cvar(cvar_7326819, (object *)&__glo_write_91string_scheme_base);make_pair(pair_7326820, find_or_add_symbol("write-string"), &cvar_7326819);
++ make_cvar(cvar_7326821, (object *)&__glo_write_91string_912_scheme_base);make_pair(pair_7326822, find_or_add_symbol("write-string-2"), &cvar_7326821);
++ make_cvar(cvar_7326823, (object *)&__glo_write_91string_911_scheme_base);make_pair(pair_7326824, find_or_add_symbol("write-string-1"), &cvar_7326823);
++ make_cvar(cvar_7326825, (object *)&__glo_flush_91output_91port_scheme_base);make_pair(pair_7326826, find_or_add_symbol("flush-output-port"), &cvar_7326825);
++ make_cvar(cvar_7326827, (object *)&__glo_textual_91port_127_scheme_base);make_pair(pair_7326828, find_or_add_symbol("textual-port?"), &cvar_7326827);
++ make_cvar(cvar_7326829, (object *)&__glo_binary_91port_127_scheme_base);make_pair(pair_7326830, find_or_add_symbol("binary-port?"), &cvar_7326829);
++ make_cvar(cvar_7326831, (object *)&__glo__191binary_91port_127_scheme_base);make_pair(pair_7326832, find_or_add_symbol("_binary-port?"), &cvar_7326831);
++ make_cvar(cvar_7326833, (object *)&__glo_read_91string_scheme_base);make_pair(pair_7326834, find_or_add_symbol("read-string"), &cvar_7326833);
++ make_cvar(cvar_7326835, (object *)&__glo__191read_91line_scheme_base);make_pair(pair_7326836, find_or_add_symbol("_read-line"), &cvar_7326835);
++ make_cvar(cvar_7326837, (object *)&__glo_read_91line_scheme_base);make_pair(pair_7326838, find_or_add_symbol("read-line"), &cvar_7326837);
++ make_cvar(cvar_7326839, (object *)&__glo_read_91char_scheme_base);make_pair(pair_7326840, find_or_add_symbol("read-char"), &cvar_7326839);
++ make_cvar(cvar_7326841, (object *)&__glo_peek_91char_scheme_base);make_pair(pair_7326842, find_or_add_symbol("peek-char"), &cvar_7326841);
++ make_cvar(cvar_7326843, (object *)&__glo_char_91ready_127_scheme_base);make_pair(pair_7326844, find_or_add_symbol("char-ready?"), &cvar_7326843);
++ make_cvar(cvar_7326845, (object *)&__glo_Cyc_91char_91ready_127_scheme_base);make_pair(pair_7326846, find_or_add_symbol("Cyc-char-ready?"), &cvar_7326845);
++ make_cvar(cvar_7326847, (object *)&__glo_write_91u8_scheme_base);make_pair(pair_7326848, find_or_add_symbol("write-u8"), &cvar_7326847);
++ make_cvar(cvar_7326849, (object *)&__glo_peek_91u8_scheme_base);make_pair(pair_7326850, find_or_add_symbol("peek-u8"), &cvar_7326849);
++ make_cvar(cvar_7326851, (object *)&__glo_read_91u8_scheme_base);make_pair(pair_7326852, find_or_add_symbol("read-u8"), &cvar_7326851);
++ make_cvar(cvar_7326853, (object *)&__glo__191write_91u8_scheme_base);make_pair(pair_7326854, find_or_add_symbol("_write-u8"), &cvar_7326853);
++ make_cvar(cvar_7326855, (object *)&__glo__191peek_91u8_scheme_base);make_pair(pair_7326856, find_or_add_symbol("_peek-u8"), &cvar_7326855);
++ make_cvar(cvar_7326857, (object *)&__glo__191read_91u8_scheme_base);make_pair(pair_7326858, find_or_add_symbol("_read-u8"), &cvar_7326857);
++ make_cvar(cvar_7326859, (object *)&__glo_foldr_scheme_base);make_pair(pair_7326860, find_or_add_symbol("foldr"), &cvar_7326859);
++ make_cvar(cvar_7326861, (object *)&__glo_foldl_scheme_base);make_pair(pair_7326862, find_or_add_symbol("foldl"), &cvar_7326861);
++ make_cvar(cvar_7326863, (object *)&__glo_assoc_scheme_base);make_pair(pair_7326864, find_or_add_symbol("assoc"), &cvar_7326863);
++ make_cvar(cvar_7326865, (object *)&__glo_assoc_91helper_scheme_base);make_pair(pair_7326866, find_or_add_symbol("assoc-helper"), &cvar_7326865);
++ make_cvar(cvar_7326867, (object *)&__glo_member_scheme_base);make_pair(pair_7326868, find_or_add_symbol("member"), &cvar_7326867);
++ make_cvar(cvar_7326869, (object *)&__glo_member_91helper_scheme_base);make_pair(pair_7326870, find_or_add_symbol("member-helper"), &cvar_7326869);
++ make_cvar(cvar_7326871, (object *)&__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326872, find_or_add_symbol("fast-string>=?__inline__"), &cvar_7326871);
++ make_cvar(cvar_7326873, (object *)&__glo_fast_91string_125_123_127_scheme_base);make_pair(pair_7326874, find_or_add_symbol("fast-string>=?"), &cvar_7326873);
++ make_cvar(cvar_7326875, (object *)&__glo_fast_91string_125_127_191_191inline_191_191_scheme_base);make_pair(pair_7326876, find_or_add_symbol("fast-string>?__inline__"), &cvar_7326875);
++ make_cvar(cvar_7326877, (object *)&__glo_fast_91string_125_127_scheme_base);make_pair(pair_7326878, find_or_add_symbol("fast-string>?"), &cvar_7326877);
++ make_cvar(cvar_7326879, (object *)&__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326880, find_or_add_symbol("fast-string<=?__inline__"), &cvar_7326879);
++ make_cvar(cvar_7326881, (object *)&__glo_fast_91string_121_123_127_scheme_base);make_pair(pair_7326882, find_or_add_symbol("fast-string<=?"), &cvar_7326881);
++ make_cvar(cvar_7326883, (object *)&__glo_fast_91string_121_127_191_191inline_191_191_scheme_base);make_pair(pair_7326884, find_or_add_symbol("fast-string<?__inline__"), &cvar_7326883);
++ make_cvar(cvar_7326885, (object *)&__glo_fast_91string_121_127_scheme_base);make_pair(pair_7326886, find_or_add_symbol("fast-string<?"), &cvar_7326885);
++ make_cvar(cvar_7326887, (object *)&__glo_fast_91string_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326888, find_or_add_symbol("fast-string=?__inline__"), &cvar_7326887);
++ make_cvar(cvar_7326889, (object *)&__glo_fast_91string_123_127_scheme_base);make_pair(pair_7326890, find_or_add_symbol("fast-string=?"), &cvar_7326889);
++ make_cvar(cvar_7326891, (object *)&__glo_string_125_123_127_scheme_base);make_pair(pair_7326892, find_or_add_symbol("string>=?"), &cvar_7326891);
++ make_cvar(cvar_7326893, (object *)&__glo_string_125_127_scheme_base);make_pair(pair_7326894, find_or_add_symbol("string>?"), &cvar_7326893);
++ make_cvar(cvar_7326895, (object *)&__glo_string_121_123_127_scheme_base);make_pair(pair_7326896, find_or_add_symbol("string<=?"), &cvar_7326895);
++ make_cvar(cvar_7326897, (object *)&__glo_string_121_127_scheme_base);make_pair(pair_7326898, find_or_add_symbol("string<?"), &cvar_7326897);
++ make_cvar(cvar_7326899, (object *)&__glo_string_123_127_scheme_base);make_pair(pair_7326900, find_or_add_symbol("string=?"), &cvar_7326899);
++ make_cvar(cvar_7326901, (object *)&__glo_char_125_123_127_scheme_base);make_pair(pair_7326902, find_or_add_symbol("char>=?"), &cvar_7326901);
++ make_cvar(cvar_7326903, (object *)&__glo_char_121_123_127_scheme_base);make_pair(pair_7326904, find_or_add_symbol("char<=?"), &cvar_7326903);
++ make_cvar(cvar_7326905, (object *)&__glo_char_125_127_scheme_base);make_pair(pair_7326906, find_or_add_symbol("char>?"), &cvar_7326905);
++ make_cvar(cvar_7326907, (object *)&__glo_char_121_127_scheme_base);make_pair(pair_7326908, find_or_add_symbol("char<?"), &cvar_7326907);
++ make_cvar(cvar_7326909, (object *)&__glo_char_123_127_scheme_base);make_pair(pair_7326910, find_or_add_symbol("char=?"), &cvar_7326909);
++ make_cvar(cvar_7326911, (object *)&__glo_Cyc_91bin_91op_91char_scheme_base);make_pair(pair_7326912, find_or_add_symbol("Cyc-bin-op-char"), &cvar_7326911);
++ make_cvar(cvar_7326913, (object *)&__glo_Cyc_91bin_91op_scheme_base);make_pair(pair_7326914, find_or_add_symbol("Cyc-bin-op"), &cvar_7326913);
++ make_cvar(cvar_7326915, (object *)&__glo_call_91with_91port_scheme_base);make_pair(pair_7326916, find_or_add_symbol("call-with-port"), &cvar_7326915);
++ make_cvar(cvar_7326917, (object *)&__glo_dynamic_91wind_scheme_base);make_pair(pair_7326918, find_or_add_symbol("dynamic-wind"), &cvar_7326917);
++ make_cvar(cvar_7326919, (object *)&__glo_call_91with_91values_scheme_base);make_pair(pair_7326920, find_or_add_symbol("call-with-values"), &cvar_7326919);
++ make_cvar(cvar_7326921, (object *)&__glo_values_scheme_base);make_pair(pair_7326922, find_or_add_symbol("values"), &cvar_7326921);
++ make_cvar(cvar_7326923, (object *)&__glo_call_91with_91current_91continuation_scheme_base);make_pair(pair_7326924, find_or_add_symbol("call-with-current-continuation"), &cvar_7326923);
++ make_cvar(cvar_7326925, (object *)&__glo_syntax_91error_scheme_base);make_pair(pair_7326926, find_or_add_symbol("syntax-error"), &cvar_7326925);
++ make_cvar(cvar_7326927, (object *)&__glo_quasiquote_scheme_base);make_pair(pair_7326928, find_or_add_symbol("quasiquote"), &cvar_7326927);
++ make_cvar(cvar_7326929, (object *)&__glo__do_scheme_base);make_pair(pair_7326930, find_or_add_symbol("do"), &cvar_7326929);
++ make_cvar(cvar_7326931, (object *)&__glo_unless_scheme_base);make_pair(pair_7326932, find_or_add_symbol("unless"), &cvar_7326931);
++ make_cvar(cvar_7326933, (object *)&__glo_when_scheme_base);make_pair(pair_7326934, find_or_add_symbol("when"), &cvar_7326933);
++ make_cvar(cvar_7326935, (object *)&__glo__case_scheme_base);make_pair(pair_7326936, find_or_add_symbol("case"), &cvar_7326935);
++ make_cvar(cvar_7326937, (object *)&__glo_cond_scheme_base);make_pair(pair_7326938, find_or_add_symbol("cond"), &cvar_7326937);
++ make_cvar(cvar_7326939, (object *)&__glo_cond_91expand_scheme_base);make_pair(pair_7326940, find_or_add_symbol("cond-expand"), &cvar_7326939);
++ make_cvar(cvar_7326941, (object *)&__glo_begin_scheme_base);make_pair(pair_7326942, find_or_add_symbol("begin"), &cvar_7326941);
++ make_cvar(cvar_7326943, (object *)&__glo_letrec_scheme_base);make_pair(pair_7326944, find_or_add_symbol("letrec"), &cvar_7326943);
++ make_cvar(cvar_7326945, (object *)&__glo_let_85_scheme_base);make_pair(pair_7326946, find_or_add_symbol("let*"), &cvar_7326945);
++ make_cvar(cvar_7326947, (object *)&__glo_let_scheme_base);make_pair(pair_7326948, find_or_add_symbol("let"), &cvar_7326947);
++ make_cvar(cvar_7326949, (object *)&__glo_or_scheme_base);make_pair(pair_7326950, find_or_add_symbol("or"), &cvar_7326949);
++ make_cvar(cvar_7326951, (object *)&__glo_and_scheme_base);make_pair(pair_7326952, find_or_add_symbol("and"), &cvar_7326951);
++ make_cvar(cvar_7326953, (object *)&__glo_Cyc_91version_scheme_base);make_pair(pair_7326954, find_or_add_symbol("Cyc-version"), &cvar_7326953);
++ make_cvar(cvar_7326955, (object *)&__glo_Cyc_91add_91feature_67_scheme_base);make_pair(pair_7326956, find_or_add_symbol("Cyc-add-feature!"), &cvar_7326955);
++ make_cvar(cvar_7326957, (object *)&__glo__85other_91features_85_scheme_base);make_pair(pair_7326958, find_or_add_symbol("*other-features*"), &cvar_7326957);
++ make_cvar(cvar_7326959, (object *)&__glo_features_scheme_base);make_pair(pair_7326960, find_or_add_symbol("features"), &cvar_7326959);
++ make_cvar(cvar_7326961, (object *)&__glo_call_95cc_scheme_base);make_pair(pair_7326962, find_or_add_symbol("call/cc"), &cvar_7326961);
++make_pair(c_7327212, &pair_7326463,Cyc_global_variables);
++make_pair(c_7327211, &pair_7326466, &c_7327212);
++make_pair(c_7327210, &pair_7326468, &c_7327211);
++make_pair(c_7327209, &pair_7326470, &c_7327210);
++make_pair(c_7327208, &pair_7326472, &c_7327209);
++make_pair(c_7327207, &pair_7326474, &c_7327208);
++make_pair(c_7327206, &pair_7326476, &c_7327207);
++make_pair(c_7327205, &pair_7326478, &c_7327206);
++make_pair(c_7327204, &pair_7326480, &c_7327205);
++make_pair(c_7327203, &pair_7326482, &c_7327204);
++make_pair(c_7327202, &pair_7326484, &c_7327203);
++make_pair(c_7327201, &pair_7326486, &c_7327202);
++make_pair(c_7327200, &pair_7326488, &c_7327201);
++make_pair(c_7327199, &pair_7326490, &c_7327200);
++make_pair(c_7327198, &pair_7326492, &c_7327199);
++make_pair(c_7327197, &pair_7326494, &c_7327198);
++make_pair(c_7327196, &pair_7326496, &c_7327197);
++make_pair(c_7327195, &pair_7326498, &c_7327196);
++make_pair(c_7327194, &pair_7326500, &c_7327195);
++make_pair(c_7327193, &pair_7326502, &c_7327194);
++make_pair(c_7327192, &pair_7326504, &c_7327193);
++make_pair(c_7327191, &pair_7326506, &c_7327192);
++make_pair(c_7327190, &pair_7326508, &c_7327191);
++make_pair(c_7327189, &pair_7326510, &c_7327190);
++make_pair(c_7327188, &pair_7326512, &c_7327189);
++make_pair(c_7327187, &pair_7326514, &c_7327188);
++make_pair(c_7327186, &pair_7326516, &c_7327187);
++make_pair(c_7327185, &pair_7326518, &c_7327186);
++make_pair(c_7327184, &pair_7326520, &c_7327185);
++make_pair(c_7327183, &pair_7326522, &c_7327184);
++make_pair(c_7327182, &pair_7326524, &c_7327183);
++make_pair(c_7327181, &pair_7326526, &c_7327182);
++make_pair(c_7327180, &pair_7326528, &c_7327181);
++make_pair(c_7327179, &pair_7326530, &c_7327180);
++make_pair(c_7327178, &pair_7326532, &c_7327179);
++make_pair(c_7327177, &pair_7326534, &c_7327178);
++make_pair(c_7327176, &pair_7326536, &c_7327177);
++make_pair(c_7327175, &pair_7326538, &c_7327176);
++make_pair(c_7327174, &pair_7326540, &c_7327175);
++make_pair(c_7327173, &pair_7326542, &c_7327174);
++make_pair(c_7327172, &pair_7326544, &c_7327173);
++make_pair(c_7327171, &pair_7326546, &c_7327172);
++make_pair(c_7327170, &pair_7326548, &c_7327171);
++make_pair(c_7327169, &pair_7326550, &c_7327170);
++make_pair(c_7327168, &pair_7326552, &c_7327169);
++make_pair(c_7327167, &pair_7326554, &c_7327168);
++make_pair(c_7327166, &pair_7326556, &c_7327167);
++make_pair(c_7327165, &pair_7326558, &c_7327166);
++make_pair(c_7327164, &pair_7326560, &c_7327165);
++make_pair(c_7327163, &pair_7326562, &c_7327164);
++make_pair(c_7327162, &pair_7326564, &c_7327163);
++make_pair(c_7327161, &pair_7326566, &c_7327162);
++make_pair(c_7327160, &pair_7326568, &c_7327161);
++make_pair(c_7327159, &pair_7326570, &c_7327160);
++make_pair(c_7327158, &pair_7326572, &c_7327159);
++make_pair(c_7327157, &pair_7326574, &c_7327158);
++make_pair(c_7327156, &pair_7326576, &c_7327157);
++make_pair(c_7327155, &pair_7326578, &c_7327156);
++make_pair(c_7327154, &pair_7326580, &c_7327155);
++make_pair(c_7327153, &pair_7326582, &c_7327154);
++make_pair(c_7327152, &pair_7326584, &c_7327153);
++make_pair(c_7327151, &pair_7326586, &c_7327152);
++make_pair(c_7327150, &pair_7326588, &c_7327151);
++make_pair(c_7327149, &pair_7326590, &c_7327150);
++make_pair(c_7327148, &pair_7326592, &c_7327149);
++make_pair(c_7327147, &pair_7326594, &c_7327148);
++make_pair(c_7327146, &pair_7326596, &c_7327147);
++make_pair(c_7327145, &pair_7326598, &c_7327146);
++make_pair(c_7327144, &pair_7326600, &c_7327145);
++make_pair(c_7327143, &pair_7326602, &c_7327144);
++make_pair(c_7327142, &pair_7326604, &c_7327143);
++make_pair(c_7327141, &pair_7326606, &c_7327142);
++make_pair(c_7327140, &pair_7326608, &c_7327141);
++make_pair(c_7327139, &pair_7326610, &c_7327140);
++make_pair(c_7327138, &pair_7326612, &c_7327139);
++make_pair(c_7327137, &pair_7326614, &c_7327138);
++make_pair(c_7327136, &pair_7326616, &c_7327137);
++make_pair(c_7327135, &pair_7326618, &c_7327136);
++make_pair(c_7327134, &pair_7326620, &c_7327135);
++make_pair(c_7327133, &pair_7326622, &c_7327134);
++make_pair(c_7327132, &pair_7326624, &c_7327133);
++make_pair(c_7327131, &pair_7326626, &c_7327132);
++make_pair(c_7327130, &pair_7326628, &c_7327131);
++make_pair(c_7327129, &pair_7326630, &c_7327130);
++make_pair(c_7327128, &pair_7326632, &c_7327129);
++make_pair(c_7327127, &pair_7326634, &c_7327128);
++make_pair(c_7327126, &pair_7326636, &c_7327127);
++make_pair(c_7327125, &pair_7326638, &c_7327126);
++make_pair(c_7327124, &pair_7326640, &c_7327125);
++make_pair(c_7327123, &pair_7326642, &c_7327124);
++make_pair(c_7327122, &pair_7326644, &c_7327123);
++make_pair(c_7327121, &pair_7326646, &c_7327122);
++make_pair(c_7327120, &pair_7326648, &c_7327121);
++make_pair(c_7327119, &pair_7326650, &c_7327120);
++make_pair(c_7327118, &pair_7326652, &c_7327119);
++make_pair(c_7327117, &pair_7326654, &c_7327118);
++make_pair(c_7327116, &pair_7326656, &c_7327117);
++make_pair(c_7327115, &pair_7326658, &c_7327116);
++make_pair(c_7327114, &pair_7326660, &c_7327115);
++make_pair(c_7327113, &pair_7326662, &c_7327114);
++make_pair(c_7327112, &pair_7326664, &c_7327113);
++make_pair(c_7327111, &pair_7326666, &c_7327112);
++make_pair(c_7327110, &pair_7326668, &c_7327111);
++make_pair(c_7327109, &pair_7326670, &c_7327110);
++make_pair(c_7327108, &pair_7326672, &c_7327109);
++make_pair(c_7327107, &pair_7326674, &c_7327108);
++make_pair(c_7327106, &pair_7326676, &c_7327107);
++make_pair(c_7327105, &pair_7326678, &c_7327106);
++make_pair(c_7327104, &pair_7326680, &c_7327105);
++make_pair(c_7327103, &pair_7326682, &c_7327104);
++make_pair(c_7327102, &pair_7326684, &c_7327103);
++make_pair(c_7327101, &pair_7326686, &c_7327102);
++make_pair(c_7327100, &pair_7326688, &c_7327101);
++make_pair(c_7327099, &pair_7326690, &c_7327100);
++make_pair(c_7327098, &pair_7326692, &c_7327099);
++make_pair(c_7327097, &pair_7326694, &c_7327098);
++make_pair(c_7327096, &pair_7326696, &c_7327097);
++make_pair(c_7327095, &pair_7326698, &c_7327096);
++make_pair(c_7327094, &pair_7326700, &c_7327095);
++make_pair(c_7327093, &pair_7326702, &c_7327094);
++make_pair(c_7327092, &pair_7326704, &c_7327093);
++make_pair(c_7327091, &pair_7326706, &c_7327092);
++make_pair(c_7327090, &pair_7326708, &c_7327091);
++make_pair(c_7327089, &pair_7326710, &c_7327090);
++make_pair(c_7327088, &pair_7326712, &c_7327089);
++make_pair(c_7327087, &pair_7326714, &c_7327088);
++make_pair(c_7327086, &pair_7326716, &c_7327087);
++make_pair(c_7327085, &pair_7326718, &c_7327086);
++make_pair(c_7327084, &pair_7326720, &c_7327085);
++make_pair(c_7327083, &pair_7326722, &c_7327084);
++make_pair(c_7327082, &pair_7326724, &c_7327083);
++make_pair(c_7327081, &pair_7326726, &c_7327082);
++make_pair(c_7327080, &pair_7326728, &c_7327081);
++make_pair(c_7327079, &pair_7326730, &c_7327080);
++make_pair(c_7327078, &pair_7326732, &c_7327079);
++make_pair(c_7327077, &pair_7326734, &c_7327078);
++make_pair(c_7327076, &pair_7326736, &c_7327077);
++make_pair(c_7327075, &pair_7326738, &c_7327076);
++make_pair(c_7327074, &pair_7326740, &c_7327075);
++make_pair(c_7327073, &pair_7326742, &c_7327074);
++make_pair(c_7327072, &pair_7326744, &c_7327073);
++make_pair(c_7327071, &pair_7326746, &c_7327072);
++make_pair(c_7327070, &pair_7326748, &c_7327071);
++make_pair(c_7327069, &pair_7326750, &c_7327070);
++make_pair(c_7327068, &pair_7326752, &c_7327069);
++make_pair(c_7327067, &pair_7326754, &c_7327068);
++make_pair(c_7327066, &pair_7326756, &c_7327067);
++make_pair(c_7327065, &pair_7326758, &c_7327066);
++make_pair(c_7327064, &pair_7326760, &c_7327065);
++make_pair(c_7327063, &pair_7326762, &c_7327064);
++make_pair(c_7327062, &pair_7326764, &c_7327063);
++make_pair(c_7327061, &pair_7326766, &c_7327062);
++make_pair(c_7327060, &pair_7326768, &c_7327061);
++make_pair(c_7327059, &pair_7326770, &c_7327060);
++make_pair(c_7327058, &pair_7326772, &c_7327059);
++make_pair(c_7327057, &pair_7326774, &c_7327058);
++make_pair(c_7327056, &pair_7326776, &c_7327057);
++make_pair(c_7327055, &pair_7326778, &c_7327056);
++make_pair(c_7327054, &pair_7326780, &c_7327055);
++make_pair(c_7327053, &pair_7326782, &c_7327054);
++make_pair(c_7327052, &pair_7326784, &c_7327053);
++make_pair(c_7327051, &pair_7326786, &c_7327052);
++make_pair(c_7327050, &pair_7326788, &c_7327051);
++make_pair(c_7327049, &pair_7326790, &c_7327050);
++make_pair(c_7327048, &pair_7326792, &c_7327049);
++make_pair(c_7327047, &pair_7326794, &c_7327048);
++make_pair(c_7327046, &pair_7326796, &c_7327047);
++make_pair(c_7327045, &pair_7326798, &c_7327046);
++make_pair(c_7327044, &pair_7326800, &c_7327045);
++make_pair(c_7327043, &pair_7326802, &c_7327044);
++make_pair(c_7327042, &pair_7326804, &c_7327043);
++make_pair(c_7327041, &pair_7326806, &c_7327042);
++make_pair(c_7327040, &pair_7326808, &c_7327041);
++make_pair(c_7327039, &pair_7326810, &c_7327040);
++make_pair(c_7327038, &pair_7326812, &c_7327039);
++make_pair(c_7327037, &pair_7326814, &c_7327038);
++make_pair(c_7327036, &pair_7326816, &c_7327037);
++make_pair(c_7327035, &pair_7326818, &c_7327036);
++make_pair(c_7327034, &pair_7326820, &c_7327035);
++make_pair(c_7327033, &pair_7326822, &c_7327034);
++make_pair(c_7327032, &pair_7326824, &c_7327033);
++make_pair(c_7327031, &pair_7326826, &c_7327032);
++make_pair(c_7327030, &pair_7326828, &c_7327031);
++make_pair(c_7327029, &pair_7326830, &c_7327030);
++make_pair(c_7327028, &pair_7326832, &c_7327029);
++make_pair(c_7327027, &pair_7326834, &c_7327028);
++make_pair(c_7327026, &pair_7326836, &c_7327027);
++make_pair(c_7327025, &pair_7326838, &c_7327026);
++make_pair(c_7327024, &pair_7326840, &c_7327025);
++make_pair(c_7327023, &pair_7326842, &c_7327024);
++make_pair(c_7327022, &pair_7326844, &c_7327023);
++make_pair(c_7327021, &pair_7326846, &c_7327022);
++make_pair(c_7327020, &pair_7326848, &c_7327021);
++make_pair(c_7327019, &pair_7326850, &c_7327020);
++make_pair(c_7327018, &pair_7326852, &c_7327019);
++make_pair(c_7327017, &pair_7326854, &c_7327018);
++make_pair(c_7327016, &pair_7326856, &c_7327017);
++make_pair(c_7327015, &pair_7326858, &c_7327016);
++make_pair(c_7327014, &pair_7326860, &c_7327015);
++make_pair(c_7327013, &pair_7326862, &c_7327014);
++make_pair(c_7327012, &pair_7326864, &c_7327013);
++make_pair(c_7327011, &pair_7326866, &c_7327012);
++make_pair(c_7327010, &pair_7326868, &c_7327011);
++make_pair(c_7327009, &pair_7326870, &c_7327010);
++make_pair(c_7327008, &pair_7326872, &c_7327009);
++make_pair(c_7327007, &pair_7326874, &c_7327008);
++make_pair(c_7327006, &pair_7326876, &c_7327007);
++make_pair(c_7327005, &pair_7326878, &c_7327006);
++make_pair(c_7327004, &pair_7326880, &c_7327005);
++make_pair(c_7327003, &pair_7326882, &c_7327004);
++make_pair(c_7327002, &pair_7326884, &c_7327003);
++make_pair(c_7327001, &pair_7326886, &c_7327002);
++make_pair(c_7327000, &pair_7326888, &c_7327001);
++make_pair(c_7326999, &pair_7326890, &c_7327000);
++make_pair(c_7326998, &pair_7326892, &c_7326999);
++make_pair(c_7326997, &pair_7326894, &c_7326998);
++make_pair(c_7326996, &pair_7326896, &c_7326997);
++make_pair(c_7326995, &pair_7326898, &c_7326996);
++make_pair(c_7326994, &pair_7326900, &c_7326995);
++make_pair(c_7326993, &pair_7326902, &c_7326994);
++make_pair(c_7326992, &pair_7326904, &c_7326993);
++make_pair(c_7326991, &pair_7326906, &c_7326992);
++make_pair(c_7326990, &pair_7326908, &c_7326991);
++make_pair(c_7326989, &pair_7326910, &c_7326990);
++make_pair(c_7326988, &pair_7326912, &c_7326989);
++make_pair(c_7326987, &pair_7326914, &c_7326988);
++make_pair(c_7326986, &pair_7326916, &c_7326987);
++make_pair(c_7326985, &pair_7326918, &c_7326986);
++make_pair(c_7326984, &pair_7326920, &c_7326985);
++make_pair(c_7326983, &pair_7326922, &c_7326984);
++make_pair(c_7326982, &pair_7326924, &c_7326983);
++make_pair(c_7326981, &pair_7326926, &c_7326982);
++make_pair(c_7326980, &pair_7326928, &c_7326981);
++make_pair(c_7326979, &pair_7326930, &c_7326980);
++make_pair(c_7326978, &pair_7326932, &c_7326979);
++make_pair(c_7326977, &pair_7326934, &c_7326978);
++make_pair(c_7326976, &pair_7326936, &c_7326977);
++make_pair(c_7326975, &pair_7326938, &c_7326976);
++make_pair(c_7326974, &pair_7326940, &c_7326975);
++make_pair(c_7326973, &pair_7326942, &c_7326974);
++make_pair(c_7326972, &pair_7326944, &c_7326973);
++make_pair(c_7326971, &pair_7326946, &c_7326972);
++make_pair(c_7326970, &pair_7326948, &c_7326971);
++make_pair(c_7326969, &pair_7326950, &c_7326970);
++make_pair(c_7326968, &pair_7326952, &c_7326969);
++make_pair(c_7326967, &pair_7326954, &c_7326968);
++make_pair(c_7326966, &pair_7326956, &c_7326967);
++make_pair(c_7326965, &pair_7326958, &c_7326966);
++make_pair(c_7326964, &pair_7326960, &c_7326965);
++make_pair(c_7326963, &pair_7326962, &c_7326964);
++Cyc_global_variables = &c_7326963;
+ object buf[1]; buf[0] = ((closure1_type *)clo)->element;
+ (((closure)__glo_lib_91init_117schemebase_scheme_base)->fn)(data, buf[0], 1, buf);
+ }
diff --git a/cyclone-bootstrap/patches/patch-scheme_base.sld b/cyclone-bootstrap/patches/patch-scheme_base.sld
new file mode 100644
index 0000000000..79e0b40203
--- /dev/null
+++ b/cyclone-bootstrap/patches/patch-scheme_base.sld
@@ -0,0 +1,31 @@
+$NetBSD$
+
+Make let-values be the same as let*-values, to work around
+
+ https://github.com/justinethier/cyclone/issues/504
+
+--- scheme/base.sld.orig 2022-08-25 21:12:33.000000000 +0000
++++ scheme/base.sld
+@@ -1877,7 +1877,7 @@
+ (let-values ("step") () () expr () params rest . body))
+ ))
+
+-(define-syntax
++#;(define-syntax
+ let-values
+ (syntax-rules
+ ()
+@@ -1945,6 +1945,13 @@
+ (lambda (arg ... . x)
+ (let-values "bind" bindings (tmp ... (a x)) body))))))
+
++(define-syntax
++ let-values
++ (syntax-rules
++ ()
++ ((let-values (binding ...) body0 body1 ...)
++ (let*-values (binding ...) body0 body1 ...))))
++
+ (define-syntax guard
+ (syntax-rules ()
+ ((guard (var clause ...) e1 e2 ...)
Home |
Main Index |
Thread Index |
Old Index